|
Lines 458-484
elsif ($op eq "add-branch-cat") {
Link Here
|
| 458 |
); |
458 |
); |
| 459 |
} |
459 |
} |
| 460 |
} |
460 |
} |
| 461 |
elsif ( $op eq "add-max-daily-article-requests" ) { |
461 |
elsif ( $op eq "add-open-article-requests-limit" ) { |
| 462 |
my $categorycode = $input->param('categorycode'); |
462 |
my $categorycode = $input->param('categorycode'); |
| 463 |
my $max_daily_article_requests = strip_non_numeric( scalar $input->param('max_daily_article_requests') ); |
463 |
my $open_article_requests_limit = strip_non_numeric( scalar $input->param('open_article_requests_limit') ); |
| 464 |
|
464 |
|
| 465 |
Koha::Exceptions::Exception->throw("No value passed for article request limit") |
465 |
Koha::Exceptions::Exception->throw("No value passed for article request limit") |
| 466 |
if not defined $max_daily_article_requests # There is a JS check for that |
466 |
if not defined $open_article_requests_limit # There is a JS check for that |
| 467 |
|| $max_daily_article_requests eq ''; |
467 |
|| $open_article_requests_limit eq ''; |
| 468 |
|
468 |
|
| 469 |
if ( $branch eq "*" ) { |
469 |
if ( $branch eq "*" ) { |
| 470 |
if ( $categorycode eq "*" ) { |
470 |
if ( $categorycode eq "*" ) { |
| 471 |
Koha::CirculationRules->set_rules( |
471 |
Koha::CirculationRules->set_rules( |
| 472 |
{ categorycode => undef, |
472 |
{ categorycode => undef, |
| 473 |
branchcode => undef, |
473 |
branchcode => undef, |
| 474 |
rules => { max_daily_article_requests => $max_daily_article_requests, } |
474 |
rules => { open_article_requests_limit => $open_article_requests_limit, } |
| 475 |
} |
475 |
} |
| 476 |
); |
476 |
); |
| 477 |
} else { |
477 |
} else { |
| 478 |
Koha::CirculationRules->set_rules( |
478 |
Koha::CirculationRules->set_rules( |
| 479 |
{ categorycode => $categorycode, |
479 |
{ categorycode => $categorycode, |
| 480 |
branchcode => undef, |
480 |
branchcode => undef, |
| 481 |
rules => { max_daily_article_requests => $max_daily_article_requests, } |
481 |
rules => { open_article_requests_limit => $open_article_requests_limit, } |
| 482 |
} |
482 |
} |
| 483 |
); |
483 |
); |
| 484 |
} |
484 |
} |
|
Lines 486-517
elsif ( $op eq "add-max-daily-article-requests" ) {
Link Here
|
| 486 |
Koha::CirculationRules->set_rules( |
486 |
Koha::CirculationRules->set_rules( |
| 487 |
{ categorycode => undef, |
487 |
{ categorycode => undef, |
| 488 |
branchcode => $branch, |
488 |
branchcode => $branch, |
| 489 |
rules => { max_daily_article_requests => $max_daily_article_requests, } |
489 |
rules => { open_article_requests_limit => $open_article_requests_limit, } |
| 490 |
} |
490 |
} |
| 491 |
); |
491 |
); |
| 492 |
} else { |
492 |
} else { |
| 493 |
Koha::CirculationRules->set_rules( |
493 |
Koha::CirculationRules->set_rules( |
| 494 |
{ categorycode => $categorycode, |
494 |
{ categorycode => $categorycode, |
| 495 |
branchcode => $branch, |
495 |
branchcode => $branch, |
| 496 |
rules => { max_daily_article_requests => $max_daily_article_requests, } |
496 |
rules => { open_article_requests_limit => $open_article_requests_limit, } |
| 497 |
} |
497 |
} |
| 498 |
); |
498 |
); |
| 499 |
} |
499 |
} |
| 500 |
} elsif ( $op eq 'del-max-daily-article-requests' ) { |
500 |
} elsif ( $op eq 'del-open-article-requests-limit' ) { |
| 501 |
my $categorycode = $input->param('categorycode'); |
501 |
my $categorycode = $input->param('categorycode'); |
| 502 |
if ( $branch eq "*" ) { |
502 |
if ( $branch eq "*" ) { |
| 503 |
if ( $categorycode eq "*" ) { |
503 |
if ( $categorycode eq "*" ) { |
| 504 |
Koha::CirculationRules->set_rules( |
504 |
Koha::CirculationRules->set_rules( |
| 505 |
{ branchcode => undef, |
505 |
{ branchcode => undef, |
| 506 |
categorycode => undef, |
506 |
categorycode => undef, |
| 507 |
rules => { max_daily_article_requests => undef, } |
507 |
rules => { open_article_requests_limit => undef, } |
| 508 |
} |
508 |
} |
| 509 |
); |
509 |
); |
| 510 |
} else { |
510 |
} else { |
| 511 |
Koha::CirculationRules->set_rules( |
511 |
Koha::CirculationRules->set_rules( |
| 512 |
{ categorycode => $categorycode, |
512 |
{ categorycode => $categorycode, |
| 513 |
branchcode => undef, |
513 |
branchcode => undef, |
| 514 |
rules => { max_daily_article_requests => undef, } |
514 |
rules => { open_article_requests_limit => undef, } |
| 515 |
} |
515 |
} |
| 516 |
); |
516 |
); |
| 517 |
} |
517 |
} |
|
Lines 519-532
elsif ( $op eq "add-max-daily-article-requests" ) {
Link Here
|
| 519 |
Koha::CirculationRules->set_rules( |
519 |
Koha::CirculationRules->set_rules( |
| 520 |
{ branchcode => $branch, |
520 |
{ branchcode => $branch, |
| 521 |
categorycode => undef, |
521 |
categorycode => undef, |
| 522 |
rules => { max_daily_article_requests => undef, } |
522 |
rules => { open_article_requests_limit => undef, } |
| 523 |
} |
523 |
} |
| 524 |
); |
524 |
); |
| 525 |
} else { |
525 |
} else { |
| 526 |
Koha::CirculationRules->set_rules( |
526 |
Koha::CirculationRules->set_rules( |
| 527 |
{ categorycode => $categorycode, |
527 |
{ categorycode => $categorycode, |
| 528 |
branchcode => $branch, |
528 |
branchcode => $branch, |
| 529 |
rules => { max_daily_article_requests => undef, } |
529 |
rules => { open_article_requests_limit => undef, } |
| 530 |
} |
530 |
} |
| 531 |
); |
531 |
); |
| 532 |
} |
532 |
} |