diff options
Diffstat (limited to 'bin/pos.pl')
-rwxr-xr-x | bin/pos.pl | 8 |
1 files changed, 6 insertions, 2 deletions
@@ -123,20 +123,24 @@ sub add { sub openinvoices { undef %column_data; undef %column_heading; + $form->{customer} = ""; + $form->{customer_id} = 0; + delete $form->{l_subtotal}; + delete $form->{subtotal}; $ENV{REMOTE_ADDR} =~ /(\d+)\.(\d+)\.(\d+)\.(\d+)/; $form->{till} = $4; $form->{sort} = 'transdate'; - for (qw(open l_invnumber l_transdate l_name l_amount l_curr l_till l_subtotal)) { $form->{$_} = 'Y'; } + for (qw(open l_invnumber l_transdate l_name l_amount l_curr l_till)) { $form->{$_} = 'Y'; } if ($myconfig{role} ne 'user') { $form->{l_employee} = 'Y'; } $form->{title} = $locale->text('Open'); - transactions; + &transactions; } |