Lines 59-65
use Koha::RefundLostItemFeeRules;
Link Here
|
59 |
use Koha::Account::Lines; |
59 |
use Koha::Account::Lines; |
60 |
use Koha::Account::Offsets; |
60 |
use Koha::Account::Offsets; |
61 |
use Koha::Config::SysPrefs; |
61 |
use Koha::Config::SysPrefs; |
62 |
use Koha::Fees; |
62 |
use Koha::Charges::Fees; |
63 |
use Carp; |
63 |
use Carp; |
64 |
use List::MoreUtils qw( uniq any ); |
64 |
use List::MoreUtils qw( uniq any ); |
65 |
use Scalar::Util qw( looks_like_number ); |
65 |
use Scalar::Util qw( looks_like_number ); |
Lines 716-722
sub CanBookBeIssued {
Link Here
|
716 |
# So issuingimpossible should be ok. |
716 |
# So issuingimpossible should be ok. |
717 |
} |
717 |
} |
718 |
|
718 |
|
719 |
my $fees = Koha::Fees->new( |
719 |
my $fees = Koha::Charges::Fees->new( |
720 |
{ |
720 |
{ |
721 |
patron => $patron, |
721 |
patron => $patron, |
722 |
library => $library, |
722 |
library => $library, |
Lines 1347-1353
sub AddIssue {
Link Here
|
1347 |
|
1347 |
|
1348 |
my $patron = Koha::Patrons->find( $borrower ); |
1348 |
my $patron = Koha::Patrons->find( $borrower ); |
1349 |
my $library = Koha::Libraries->find( $branch ); |
1349 |
my $library = Koha::Libraries->find( $branch ); |
1350 |
my $fees = Koha::Fees->new( |
1350 |
my $fees = Koha::Charges::Fees->new( |
1351 |
{ |
1351 |
{ |
1352 |
patron => $patron, |
1352 |
patron => $patron, |
1353 |
library => $library, |
1353 |
library => $library, |
Lines 2893-2899
sub AddRenewal {
Link Here
|
2893 |
} |
2893 |
} |
2894 |
|
2894 |
|
2895 |
|
2895 |
|
2896 |
my $fees = Koha::Fees->new( |
2896 |
my $fees = Koha::Charges::Fees->new( |
2897 |
{ |
2897 |
{ |
2898 |
patron => $patron, |
2898 |
patron => $patron, |
2899 |
library => $library, |
2899 |
library => $library, |