diff options
author | ivan <ivan> | 2004-05-01 21:40:41 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-05-01 21:40:41 +0000 |
commit | 6e0b2d0a94827df55364a45fe1d1ba8928c5d659 (patch) | |
tree | 939e1d1dbe4f9125ed44b8d0ddbe0a1b1d10ef1d /httemplate/search/cust_bill.html | |
parent | 79803ed2813d72e572feac02576bc591c835f049 (diff) |
I'm slow this morning
Diffstat (limited to 'httemplate/search/cust_bill.html')
-rwxr-xr-x | httemplate/search/cust_bill.html | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/httemplate/search/cust_bill.html b/httemplate/search/cust_bill.html index 874c77035..f65b08260 100755 --- a/httemplate/search/cust_bill.html +++ b/httemplate/search/cust_bill.html @@ -70,12 +70,13 @@ sub { sprintf('$%.2f', shift->get('owed') ) }, sub { sprintf('$%.2f', shift->charged ) }, sub { time2str('%b %d %Y', shift->_date ) }, - sub { my $cust_main = shift->cust_main; + sub { my $cust_bill = shift; + my $cust_main = $cust_bill->cust_main; $cust_main ? $cust_main->get('last'). ', '. $cust_main->first : "WARNING: can't find cust_main.custnum ". - shift->custnum. ' (cust_bill.invnum '. - shift->invnum. ')'; + $cust_bill->custnum. ' (cust_bill.invnum '. + $cust_bill->invnum. ')'; }, sub { my $cust_main = shift->cust_main; $cust_main ? $cust_main->company : ''; |