|
Lines 313-319
sub redirect_add_subscription {
Link Here
|
| 313 |
my $firstacquidate = output_pref( { str => scalar $query->param('firstacquidate'), dateonly => 1, dateformat => 'iso' } ); |
313 |
my $firstacquidate = output_pref( { str => scalar $query->param('firstacquidate'), dateonly => 1, dateformat => 'iso' } ); |
| 314 |
|
314 |
|
| 315 |
if(!defined $enddate || $enddate eq '') { |
315 |
if(!defined $enddate || $enddate eq '') { |
| 316 |
my $subscription = Koha::Subscriptions->new({ |
316 |
my $subscription = Koha::Subscription->new({ |
| 317 |
startdate => $startdate, |
317 |
startdate => $startdate, |
| 318 |
periodicity => $periodicity, |
318 |
periodicity => $periodicity, |
| 319 |
weeklength => $weeklength, |
319 |
weeklength => $weeklength, |
|
Lines 434-440
sub redirect_mod_subscription {
Link Here
|
| 434 |
|
434 |
|
| 435 |
# Guess end date |
435 |
# Guess end date |
| 436 |
if(!defined $enddate || $enddate eq '') { |
436 |
if(!defined $enddate || $enddate eq '') { |
| 437 |
my $subscription = Koha::Subscriptions->new({ |
437 |
my $subscription = Koha::Subscription->new({ |
| 438 |
startdate => $startdate, |
438 |
startdate => $startdate, |
| 439 |
periodicity => $periodicity, |
439 |
periodicity => $periodicity, |
| 440 |
weeklength => $weeklength, |
440 |
weeklength => $weeklength, |
| 441 |
- |
|
|