projects
/
koha_fer
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 8910 - silent warnings triggered in about.pl
[koha_fer]
/
members
/
paycollect.pl
diff --git
a/members/paycollect.pl
b/members/paycollect.pl
index
7dfb622
..
5a732a9
100755
(executable)
--- a/
members/paycollect.pl
+++ b/
members/paycollect.pl
@@
-56,7
+56,7
@@
my $writeoff = $input->param('writeoff_individual');
my $select_lines = $input->param('selected');
my $select = $input->param('selected_accts');
my $accountno;
my $select_lines = $input->param('selected');
my $select = $input->param('selected_accts');
my $accountno;
-
+my $accountlines_id;
if ( $individual || $writeoff ) {
if ($individual) {
$template->param( pay_individual => 1 );
if ( $individual || $writeoff ) {
if ($individual) {
$template->param( pay_individual => 1 );
@@
-64,6
+64,7
@@
if ( $individual || $writeoff ) {
$template->param( writeoff_individual => 1 );
}
my $accounttype = $input->param('accounttype');
$template->param( writeoff_individual => 1 );
}
my $accounttype = $input->param('accounttype');
+ $accountlines_id = $input->param('accountlines_id');
my $amount = $input->param('amount');
my $amountoutstanding = $input->param('amountoutstanding');
$accountno = $input->param('accountno');
my $amount = $input->param('amount');
my $amountoutstanding = $input->param('amountoutstanding');
$accountno = $input->param('accountno');
@@
-75,6
+76,7
@@
if ( $individual || $writeoff ) {
$total_due = $amountoutstanding;
$template->param(
accounttype => $accounttype,
$total_due = $amountoutstanding;
$template->param(
accounttype => $accounttype,
+ accountlines_id => $accountlines_id,
accountno => $accountno,
amount => $amount,
amountoutstanding => $amountoutstanding,
accountno => $accountno,
amount => $amount,
amountoutstanding => $amountoutstanding,
@@
-101,10
+103,10
@@
if ( $total_paid and $total_paid ne '0.00' ) {
} else {
if ($individual) {
if ( $total_paid == $total_due ) {
} else {
if ($individual) {
if ( $total_paid == $total_due ) {
- makepayment( $borrowernumber, $accountno, $total_paid, $user,
+ makepayment( $
accountlines_id, $
borrowernumber, $accountno, $total_paid, $user,
$branch );
} else {
$branch );
} else {
- makepartialpayment( $borrowernumber, $accountno, $total_paid,
+ makepartialpayment( $
accountlines_id, $
borrowernumber, $accountno, $total_paid,
$user, $branch );
}
print $input->redirect(
$user, $branch );
}
print $input->redirect(