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

(-)a/C4/Circulation.pm (-39 / +37 lines)
Lines 19-82 package C4::Circulation; Link Here
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
20
21
use Modern::Perl;
21
use Modern::Perl;
22
23
use Algorithm::CheckDigits;
24
use Carp;
25
use Data::Dumper;
26
use Date::Calc qw(
27
    Today
28
    Today_and_Now
29
    Add_Delta_YM
30
    Add_Delta_DHMS
31
    Date_to_Days
32
    Day_of_Week
33
    Add_Delta_Days
34
);
22
use DateTime;
35
use DateTime;
36
use Encode;
37
use List::MoreUtils qw( uniq any );
23
use POSIX qw( floor );
38
use POSIX qw( floor );
39
use Scalar::Util qw( looks_like_number );
40
use Try::Tiny;
24
use YAML::XS;
41
use YAML::XS;
25
use Encode;
26
42
27
use Koha::DateUtils;
43
use C4::Accounts;
28
use C4::Context;
29
use C4::Stats;
30
use C4::Reserves;
31
use C4::Biblio;
44
use C4::Biblio;
45
use C4::Context;
46
use C4::Debug;
47
use C4::ItemCirculationAlertPreference;
32
use C4::Items;
48
use C4::Items;
49
use C4::Log; # logaction
33
use C4::Members;
50
use C4::Members;
34
use C4::Accounts;
35
use C4::ItemCirculationAlertPreference;
36
use C4::Message;
51
use C4::Message;
37
use C4::Debug;
38
use C4::Log; # logaction
39
use C4::Overdues qw(CalcFine UpdateFine get_chargeable_units);
52
use C4::Overdues qw(CalcFine UpdateFine get_chargeable_units);
53
use C4::Reserves;
40
use C4::RotatingCollections qw(GetCollectionItemBranches);
54
use C4::RotatingCollections qw(GetCollectionItemBranches);
41
use Algorithm::CheckDigits;
55
use C4::Stats;
42
56
43
use Data::Dumper;
57
use Koha::Account::Lines;
58
use Koha::Account::Offsets;
44
use Koha::Account;
59
use Koha::Account;
45
use Koha::AuthorisedValues;
60
use Koha::AuthorisedValues;
46
use Koha::Biblioitems;
61
use Koha::Biblioitems;
47
use Koha::DateUtils;
48
use Koha::Calendar;
62
use Koha::Calendar;
63
use Koha::Charges::Fees;
64
use Koha::Checkouts::ReturnClaims;
49
use Koha::Checkouts;
65
use Koha::Checkouts;
66
use Koha::Config::SysPrefs;
67
use Koha::Database;
68
use Koha::DateUtils;
69
use Koha::Exceptions::Checkout;
70
use Koha::Holds;
50
use Koha::Illrequests;
71
use Koha::Illrequests;
51
use Koha::Items;
72
use Koha::Items;
52
use Koha::Patrons;
53
use Koha::Patron::Debarments;
54
use Koha::Database;
55
use Koha::Libraries;
73
use Koha::Libraries;
56
use Koha::Account::Lines;
74
use Koha::Patron::Debarments;
57
use Koha::Holds;
75
use Koha::Patrons;
58
use Koha::Account::Lines;
59
use Koha::Account::Offsets;
60
use Koha::Config::SysPrefs;
61
use Koha::Charges::Fees;
62
use Koha::Config::SysPref;
63
use Koha::Checkouts::ReturnClaims;
64
use Koha::SearchEngine::Indexer;
65
use Koha::Exceptions::Checkout;
66
use Koha::Plugins;
76
use Koha::Plugins;
67
use Carp;
77
use Koha::SearchEngine::Indexer;
68
use List::MoreUtils qw( uniq any );
78
69
use Scalar::Util qw( looks_like_number );
70
use Try::Tiny;
71
use Date::Calc qw(
72
    Today
73
    Today_and_Now
74
    Add_Delta_YM
75
    Add_Delta_DHMS
76
    Date_to_Days
77
    Day_of_Week
78
    Add_Delta_Days
79
);
80
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
79
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
81
80
82
BEGIN {
81
BEGIN {
83
- 

Return to bug 26351