package XML::Quickbooks::LogicEngine;

sub IsActive {
  my ($self, $name, $databaserow)=@_;

  $databaserow->{active};
}

1;