Lines 292-309
elsif ($op eq "add-branch-cat") {
Link Here
|
292 |
|
292 |
|
293 |
if ($branch eq "*") { |
293 |
if ($branch eq "*") { |
294 |
if ($categorycode eq "*") { |
294 |
if ($categorycode eq "*") { |
|
|
295 |
#FIXME This block is will probably be never used |
295 |
my $sth_search = $dbh->prepare("SELECT count(*) AS total |
296 |
my $sth_search = $dbh->prepare("SELECT count(*) AS total |
296 |
FROM default_circ_rules"); |
297 |
FROM default_circ_rules"); |
297 |
my $sth_insert = $dbh->prepare(q| |
298 |
my $sth_insert = $dbh->prepare(q| |
298 |
INSERT INTO default_circ_rules |
299 |
INSERT INTO default_circ_rules |
299 |
(maxissueqty, maxonsiteissueqty, max_holds) |
300 |
(maxissueqty, maxonsiteissueqty) |
300 |
VALUES (?, ?, ?) |
301 |
VALUES (?, ?) |
301 |
|); |
302 |
|); |
302 |
my $sth_update = $dbh->prepare(q| |
303 |
my $sth_update = $dbh->prepare(q| |
303 |
UPDATE default_circ_rules |
304 |
UPDATE default_circ_rules |
304 |
SET maxissueqty = ?, |
305 |
SET maxissueqty = ?, |
305 |
maxonsiteissueqty = ?, |
306 |
maxonsiteissueqty = ?, |
306 |
max_holds = ? |
|
|
307 |
|); |
307 |
|); |
308 |
|
308 |
|
309 |
$sth_search->execute(); |
309 |
$sth_search->execute(); |
Lines 385-398
elsif ($op eq "add-branch-cat") {
Link Here
|
385 |
AND categorycode = ?"); |
385 |
AND categorycode = ?"); |
386 |
my $sth_insert = $dbh->prepare(q| |
386 |
my $sth_insert = $dbh->prepare(q| |
387 |
INSERT INTO branch_borrower_circ_rules |
387 |
INSERT INTO branch_borrower_circ_rules |
388 |
(branchcode, categorycode, maxissueqty, maxonsiteissueqty, max_holds) |
388 |
(branchcode, categorycode, maxissueqty, maxonsiteissueqty) |
389 |
VALUES (?, ?, ?, ?, ?) |
389 |
VALUES (?, ?, ?, ?) |
390 |
|); |
390 |
|); |
391 |
my $sth_update = $dbh->prepare(q| |
391 |
my $sth_update = $dbh->prepare(q| |
392 |
UPDATE branch_borrower_circ_rules |
392 |
UPDATE branch_borrower_circ_rules |
393 |
SET maxissueqty = ?, |
393 |
SET maxissueqty = ?, |
394 |
maxonsiteissueqty = ? |
394 |
maxonsiteissueqty = ? |
395 |
max_holds = ? |
|
|
396 |
WHERE branchcode = ? |
395 |
WHERE branchcode = ? |
397 |
AND categorycode = ? |
396 |
AND categorycode = ? |
398 |
|); |
397 |
|); |
Lines 400-408
elsif ($op eq "add-branch-cat") {
Link Here
|
400 |
$sth_search->execute($branch, $categorycode); |
399 |
$sth_search->execute($branch, $categorycode); |
401 |
my $res = $sth_search->fetchrow_hashref(); |
400 |
my $res = $sth_search->fetchrow_hashref(); |
402 |
if ($res->{total}) { |
401 |
if ($res->{total}) { |
403 |
$sth_update->execute($maxissueqty, $maxonsiteissueqty, $max_holds, $branch, $categorycode); |
402 |
$sth_update->execute($maxissueqty, $maxonsiteissueqty, $branch, $categorycode); |
404 |
} else { |
403 |
} else { |
405 |
$sth_insert->execute($branch, $categorycode, $maxissueqty, $maxonsiteissueqty, $max_holds); |
404 |
$sth_insert->execute($branch, $categorycode, $maxissueqty, $maxonsiteissueqty); |
406 |
} |
405 |
} |
407 |
|
406 |
|
408 |
Koha::CirculationRules->set_rule( |
407 |
Koha::CirculationRules->set_rule( |
409 |
- |
|
|