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

(-)a/C4/Accounts.pm (-2 / +1 lines)
Lines 762-768 sub makepartialpayment { Link Here
762
    .  'description, accounttype, amountoutstanding, itemnumber, manager_id) '
762
    .  'description, accounttype, amountoutstanding, itemnumber, manager_id) '
763
    . ' VALUES (?, ?, now(), ?, ?, ?, 0, ?, ?)';
763
    . ' VALUES (?, ?, now(), ?, ?, ?, 0, ?, ?)';
764
764
765
    $dbh->do(  $insert, undef, $borrowernumber, $nextaccntno, $amount,
765
    $dbh->do(  $insert, undef, $borrowernumber, $nextaccntno, 0 - $amount,
766
        "Payment, thanks - $user", 'Pay', $data->{'itemnumber'}, $manager_id);
766
        "Payment, thanks - $user", 'Pay', $data->{'itemnumber'}, $manager_id);
767
767
768
    UpdateStats( $user, 'payment', $amount, '', '', '', $borrowernumber, $accountno );
768
    UpdateStats( $user, 'payment', $amount, '', '', '', $borrowernumber, $accountno );
769
- 

Return to bug 8739