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

(-)a/Koha/Template/Plugin/CirculationRules.pm (-1 / +44 lines)
Lines 24-29 use base qw( Template::Plugin ); Link Here
24
use Koha::CirculationRules;
24
use Koha::CirculationRules;
25
use C4::Circulation qw( GetRenewCount );
25
use C4::Circulation qw( GetRenewCount );
26
26
27
=head1 NAME
28
29
Koha::Template::Plugin::CirculationRules - A template plugin for dealing with things related to circulation
30
31
32
=head2 Methods
33
34
=head3 Get
35
36
[% SET rule = CirculationRules.Get( branchcode, categorycode, itemtype, rule_name ) %]
37
38
Returns the effective rule value for the given tuple.
39
40
=cut
41
27
sub Get {
42
sub Get {
28
    my ( $self, $branchcode, $categorycode, $itemtype, $rule_name ) = @_;
43
    my ( $self, $branchcode, $categorycode, $itemtype, $rule_name ) = @_;
29
44
Lines 43-48 sub Get { Link Here
43
    return $rule->rule_value if $rule;
58
    return $rule->rule_value if $rule;
44
}
59
}
45
60
61
=head3 Search
62
63
[% SET rule = CirculationRules.Search( branchcode, categorycode, itemtype, rule_name, { want_rule = 1 } ) %]
64
65
Returns the first rule that matches the given critea.
66
It does not perform precendence sorting as CirculationRules.Get would.
67
68
By default, it returns only the rule value. Set want_rule to true to return
69
the rule object.
70
71
=cut
72
46
sub Search {
73
sub Search {
47
    my ( $self, $branchcode, $categorycode, $itemtype, $rule_name, $params) = @_;
74
    my ( $self, $branchcode, $categorycode, $itemtype, $rule_name, $params) = @_;
48
75
Lines 63-68 sub Search { Link Here
63
    return $rule->rule_value if $rule;
90
    return $rule->rule_value if $rule;
64
}
91
}
65
92
93
=head3 Renewals
94
95
[% SET renewals = CirculationRules.Renewals( borrowernumber, itemnumber ) %]
96
[% renewals.remaining | html %]
97
98
Returns a hash of data about renewals for a checkout, by the given borrowernumber and itemnumber.
99
100
Hash keys include:
101
count - The number of renewals already used
102
allowed - The total number of renewals this checkout may have
103
remaining - The total number of renewals that can still be made
104
unseen_count - The number of unseen renewals already used
105
unseen_allowed - The total number of unseen renewals this checkout may have
106
unseen_remaining - The total number of unseen renewals that can still be made
107
108
=cut
109
66
sub Renewals {
110
sub Renewals {
67
    my ( $self, $borrowernumber, $itemnumber );
111
    my ( $self, $borrowernumber, $itemnumber );
68
112
69
- 

Return to bug 30901