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