path: root/LedgerSMB/DBObject/Customer.pm

package LedgerSMB::DBObject::Customer;

use base qw(LedgerSMB::DBObject::Company);
use strict;

my $ENTITY_CLASS = 2;

sub set_entity_class {
    my $self = shift @_;
    $self->{entity_class} = $ENTITY_CLASS;
}
    



sub search {
    
    
}
1;