Lines 37-42
use C4::Stats;
Link Here
|
37 |
use C4::BackgroundJob; |
37 |
use C4::BackgroundJob; |
38 |
use Koha::Upload; |
38 |
use Koha::Upload; |
39 |
use Koha::Account; |
39 |
use Koha::Account; |
|
|
40 |
use Koha::Patrons; |
40 |
|
41 |
|
41 |
use Date::Calc qw( Add_Delta_Days Date_to_Days ); |
42 |
use Date::Calc qw( Add_Delta_Days Date_to_Days ); |
42 |
|
43 |
|
Lines 364-370
sub kocMakePayment {
Link Here
|
364 |
my $cardnumber = $circ->{cardnumber}; |
365 |
my $cardnumber = $circ->{cardnumber}; |
365 |
my $amount = $circ->{amount}; |
366 |
my $amount = $circ->{amount}; |
366 |
|
367 |
|
367 |
my $patron = Koha::Borrowers->find( { cardnumber => $cardnumber } ); |
368 |
my $patron = Koha::Patrons->find( { cardnumber => $cardnumber } ); |
368 |
|
369 |
|
369 |
Koha::Account->new( { patron_id => $patron->id } ) |
370 |
Koha::Account->new( { patron_id => $patron->id } ) |
370 |
->pay( { amount => $amount } ); |
371 |
->pay( { amount => $amount } ); |
371 |
- |
|
|