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 707-713
sub CanBookBeIssued {
Link Here
|
707 |
# So issuingimpossible should be ok. |
707 |
# So issuingimpossible should be ok. |
708 |
} |
708 |
} |
709 |
|
709 |
|
710 |
my $fees = Koha::Fees->new( |
710 |
my $fees = Koha::Charges::Fees->new( |
711 |
{ |
711 |
{ |
712 |
patron => $patron, |
712 |
patron => $patron, |
713 |
library => $library, |
713 |
library => $library, |
Lines 1337-1343
sub AddIssue {
Link Here
|
1337 |
|
1337 |
|
1338 |
my $patron = Koha::Patrons->find( $borrower ); |
1338 |
my $patron = Koha::Patrons->find( $borrower ); |
1339 |
my $library = Koha::Libraries->find( $branch ); |
1339 |
my $library = Koha::Libraries->find( $branch ); |
1340 |
my $fees = Koha::Fees->new( |
1340 |
my $fees = Koha::Charges::Fees->new( |
1341 |
{ |
1341 |
{ |
1342 |
patron => $patron, |
1342 |
patron => $patron, |
1343 |
library => $library, |
1343 |
library => $library, |
Lines 2906-2912
sub AddRenewal {
Link Here
|
2906 |
} |
2906 |
} |
2907 |
|
2907 |
|
2908 |
|
2908 |
|
2909 |
my $fees = Koha::Fees->new( |
2909 |
my $fees = Koha::Charges::Fees->new( |
2910 |
{ |
2910 |
{ |
2911 |
patron => $patron, |
2911 |
patron => $patron, |
2912 |
library => $library, |
2912 |
library => $library, |