Lines 247-252
if ( $step == 5 ) {
Link Here
|
247 |
$maxissueqty = undef if $maxissueqty !~ /^\d+/; |
247 |
$maxissueqty = undef if $maxissueqty !~ /^\d+/; |
248 |
$issuelength = $issuelength eq q{} ? undef : $issuelength; |
248 |
$issuelength = $issuelength eq q{} ? undef : $issuelength; |
249 |
|
249 |
|
|
|
250 |
# Bug 19378 - Set reservesallowed, holds_per_day, holds_per_record in onboarding tool |
251 |
my $reservesallowed = $input->param('reservesallowed'); |
252 |
my $holds_per_record = $input->param('holds_per_record'); |
253 |
my $holds_per_day = $input->param('holds_per_day'); |
254 |
|
255 |
$holds_per_day =~ s/\s//g; |
256 |
$holds_per_day = undef if $holds_per_day !~ /^\d+/; |
257 |
|
250 |
my $params = { |
258 |
my $params = { |
251 |
branchcode => $branchcode, |
259 |
branchcode => $branchcode, |
252 |
categorycode => $categorycode, |
260 |
categorycode => $categorycode, |
Lines 256-261
if ( $step == 5 ) {
Link Here
|
256 |
issuelength => $issuelength, |
264 |
issuelength => $issuelength, |
257 |
lengthunit => $lengthunit, |
265 |
lengthunit => $lengthunit, |
258 |
onshelfholds => $onshelfholds, |
266 |
onshelfholds => $onshelfholds, |
|
|
267 |
reservesallowed => $reservesallowed, |
268 |
holds_per_record => $holds_per_record, |
269 |
holds_per_day => $holds_per_day, |
259 |
}; |
270 |
}; |
260 |
|
271 |
|
261 |
my $issuingrule = Koha::IssuingRule->new($params); |
272 |
my $issuingrule = Koha::IssuingRule->new($params); |