|
Lines 298-303
sub redirect_add_subscription {
Link Here
|
| 298 |
my @irregularity = $query->multi_param('irregularity'); |
298 |
my @irregularity = $query->multi_param('irregularity'); |
| 299 |
my $locale = $query->param('locale'); |
299 |
my $locale = $query->param('locale'); |
| 300 |
my $graceperiod = $query->param('graceperiod') || 0; |
300 |
my $graceperiod = $query->param('graceperiod') || 0; |
|
|
301 |
my $warn_when_late = $query->param('warn_when_late'); |
| 301 |
|
302 |
|
| 302 |
my $subtype = $query->param('subtype'); |
303 |
my $subtype = $query->param('subtype'); |
| 303 |
my $sublength = $query->param('sublength'); |
304 |
my $sublength = $query->param('sublength'); |
|
Lines 351-357
sub redirect_add_subscription {
Link Here
|
| 351 |
$lastvalue3, $innerloop3, $status, $notes, $letter, $firstacquidate, |
352 |
$lastvalue3, $innerloop3, $status, $notes, $letter, $firstacquidate, |
| 352 |
join(";",@irregularity), $numberpattern, $locale, $callnumber, |
353 |
join(";",@irregularity), $numberpattern, $locale, $callnumber, |
| 353 |
$manualhistory, $internalnotes, $serialsadditems, |
354 |
$manualhistory, $internalnotes, $serialsadditems, |
| 354 |
$staffdisplaycount, $opacdisplaycount, $graceperiod, $location, $enddate, |
355 |
$staffdisplaycount, $opacdisplaycount, $graceperiod, $warn_when_late, $location, $enddate, |
| 355 |
$skip_serialseq, $itemtype, $previousitemtype, $mana_id, $ccode, $published_on_template |
356 |
$skip_serialseq, $itemtype, $previousitemtype, $mana_id, $ccode, $published_on_template |
| 356 |
); |
357 |
); |
| 357 |
if ( (C4::Context->preference('Mana') == 1) and ( grep { $_ eq "subscription" } split(/,/, C4::Context->preference('AutoShareWithMana'))) ){ |
358 |
if ( (C4::Context->preference('Mana') == 1) and ( grep { $_ eq "subscription" } split(/,/, C4::Context->preference('AutoShareWithMana'))) ){ |
|
Lines 421-426
sub redirect_mod_subscription {
Link Here
|
| 421 |
my $staffdisplaycount = $query->param('staffdisplaycount'); |
422 |
my $staffdisplaycount = $query->param('staffdisplaycount'); |
| 422 |
my $opacdisplaycount = $query->param('opacdisplaycount'); |
423 |
my $opacdisplaycount = $query->param('opacdisplaycount'); |
| 423 |
my $graceperiod = $query->param('graceperiod') || 0; |
424 |
my $graceperiod = $query->param('graceperiod') || 0; |
|
|
425 |
my $warn_when_late = $query->param('warn_when_late'); |
| 424 |
my $location = $query->param('location'); |
426 |
my $location = $query->param('location'); |
| 425 |
my $itemtype = $query->param('itemtype'); |
427 |
my $itemtype = $query->param('itemtype'); |
| 426 |
my $previousitemtype = $query->param('previousitemtype'); |
428 |
my $previousitemtype = $query->param('previousitemtype'); |
|
Lines 461-467
sub redirect_mod_subscription {
Link Here
|
| 461 |
$innerloop1, $lastvalue2, $innerloop2, $lastvalue3, $innerloop3, |
463 |
$innerloop1, $lastvalue2, $innerloop2, $lastvalue3, $innerloop3, |
| 462 |
$status, $biblionumber, $callnumber, $notes, $letter, |
464 |
$status, $biblionumber, $callnumber, $notes, $letter, |
| 463 |
$manualhistory, $internalnotes, $serialsadditems, $staffdisplaycount, |
465 |
$manualhistory, $internalnotes, $serialsadditems, $staffdisplaycount, |
| 464 |
$opacdisplaycount, $graceperiod, $location, $enddate, $subscriptionid, |
466 |
$opacdisplaycount, $graceperiod, $warn_when_late, $location, $enddate, $subscriptionid, |
| 465 |
$skip_serialseq, $itemtype, $previousitemtype, $mana_id, $ccode, $published_on_template |
467 |
$skip_serialseq, $itemtype, $previousitemtype, $mana_id, $ccode, $published_on_template |
| 466 |
); |
468 |
); |
| 467 |
|
469 |
|
| 468 |
- |
|
|