diff options
author | ivan <ivan> | 2001-09-01 22:18:38 +0000 |
---|---|---|
committer | ivan <ivan> | 2001-09-01 22:18:38 +0000 |
commit | 60c10ab363668ec3016306e6069eaade9e04d544 (patch) | |
tree | 1bafc60565d93299b827a777f2528ca43472b253 /FS/FS/cust_credit_bill.pm | |
parent | f918ef6adbc3c19e705e2f5fda1efe135f3554c8 (diff) |
add primary key
Diffstat (limited to 'FS/FS/cust_credit_bill.pm')
-rw-r--r-- | FS/FS/cust_credit_bill.pm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/FS/FS/cust_credit_bill.pm b/FS/FS/cust_credit_bill.pm index be3d548..d6c4f6c 100644 --- a/FS/FS/cust_credit_bill.pm +++ b/FS/FS/cust_credit_bill.pm @@ -99,7 +99,8 @@ sub check { my $self = shift; my $error = - $self->ut_number('crednum') + $self->ut_numbern('creditbillnum') + || $self->ut_number('crednum') || $self->ut_number('invnum') || $self->ut_numbern('_date') || $self->ut_money('amount') @@ -129,7 +130,7 @@ sub check { =head1 VERSION -$Id: cust_credit_bill.pm,v 1.1 2001-09-01 21:52:19 jeff Exp $ +$Id: cust_credit_bill.pm,v 1.2 2001-09-01 22:18:38 ivan Exp $ =head1 BUGS @@ -137,8 +138,8 @@ The delete method. =head1 SEE ALSO -L<FS::Record>, L<FS::cust_refund>, L<FS::cust_bill>, schema.html from the base -documentation. +L<FS::Record>, L<FS::cust_refund>, L<FS::cust_bill>, L<cust_credit>, +schema.html from the base documentation. =cut |