View | Details | Raw Unified | Return to bug 15897
Collapse All | Expand All

(-)a/members/paycollect.pl (-7 / +9 lines)
Lines 112-123 if ( $total_paid and $total_paid ne '0.00' ) { Link Here
112 
    } else {
 112 
    } else {
113 
        if ($individual) {
 113 
        if ($individual) {
114 
            if ( $total_paid == $total_due ) {
 114 
            if ( $total_paid == $total_due ) {
115 
                Koha::Account->new( { patron_id => $borrowernumber } )->pay({
 115 
                my $line = Koha::Account::Lines->find($accountlines_id);
116 
                    accountlines_id => $accountlines_id,
 116 
                Koha::Account->new( { patron_id => $borrowernumber } )->pay(
117 
                    amount          => $total_paid,
 117 
                    {
118 
                    library_id      => $branch,
 118 
                        lines      => [$line],
119 
                    note            => $payment_note,
 119 
                        amount     => $total_paid,
120 
                });
 120 
                        library_id => $branch,
121 
                        note       => $payment_note
122 
                    }
123 
                );
121 
            } else {
 124 
            } else {
122 
                makepartialpayment( $accountlines_id, $borrowernumber, $accountno, $total_paid,
 125 
                makepartialpayment( $accountlines_id, $borrowernumber, $accountno, $total_paid,
123 
                    $user, $branch, $payment_note );
 126 
                    $user, $branch, $payment_note );
124 
-

Return to bug 15897