Lines 70-75
my $total_due = $account->outstanding_debits->total_outstanding;
Link Here
|
70 |
|
70 |
|
71 |
my $total_paid = $input->param('paid'); |
71 |
my $total_paid = $input->param('paid'); |
72 |
my $total_collected = $input->param('collected'); |
72 |
my $total_collected = $input->param('collected'); |
|
|
73 |
my $note = $input->param('pay_individual_note'); |
73 |
|
74 |
|
74 |
my $selected_lines = $input->param('selected'); # comes from pay.pl |
75 |
my $selected_lines = $input->param('selected'); # comes from pay.pl |
75 |
my $pay_individual = $input->param('pay_individual'); |
76 |
my $pay_individual = $input->param('pay_individual'); |
Lines 100-105
if ( $pay_individual || $writeoff_individual ) {
Link Here
|
100 |
itemnumber => $itemnumber, |
101 |
itemnumber => $itemnumber, |
101 |
individual_description => $description, |
102 |
individual_description => $description, |
102 |
payment_note => $payment_note, |
103 |
payment_note => $payment_note, |
|
|
104 |
note => $note, |
103 |
); |
105 |
); |
104 |
} elsif ($selected_lines) { |
106 |
} elsif ($selected_lines) { |
105 |
$total_due = $input->param('amt'); |
107 |
$total_due = $input->param('amt'); |
Lines 165-171
if ( $total_paid and $total_paid ne '0.00' ) {
Link Here
|
165 |
note => $payment_note, |
167 |
note => $payment_note, |
166 |
interface => C4::Context->interface, |
168 |
interface => C4::Context->interface, |
167 |
payment_type => $payment_type, |
169 |
payment_type => $payment_type, |
168 |
cash_register => $cash_register_id |
170 |
cash_register => $cash_register_id, |
|
|
171 |
note => $note, |
169 |
} |
172 |
} |
170 |
); |
173 |
); |
171 |
$payment_id = $pay_result->{payment_id}; |
174 |
$payment_id = $pay_result->{payment_id}; |
172 |
- |
|
|