|
Lines 81-99
if ( $op eq "renew" ) {
Link Here
|
| 81 |
output_and_exit( $query, $cookie, $template, 'unknown_subscription') unless $subscription; |
81 |
output_and_exit( $query, $cookie, $template, 'unknown_subscription') unless $subscription; |
| 82 |
my $startdate = output_pref( { str => scalar $query->param('startdate'), dateonly => 1, dateformat => 'iso' } ); |
82 |
my $startdate = output_pref( { str => scalar $query->param('startdate'), dateonly => 1, dateformat => 'iso' } ); |
| 83 |
ReNewSubscription( |
83 |
ReNewSubscription( |
| 84 |
$subscriptionid, $loggedinuser, |
84 |
{ |
| 85 |
$startdate, scalar $query->param('numberlength'), |
85 |
subscriptionid => $subscriptionid, |
| 86 |
scalar $query->param('weeklength'), scalar $query->param('monthlength'), |
86 |
user => $loggedinuser, |
| 87 |
scalar $query->param('note'), $branchcode |
87 |
startdate => $startdate, |
|
|
88 |
numberlength => scalar $query->param('numberlength'), |
| 89 |
weeklength => scalar $query->param('weeklength'), |
| 90 |
monthlength => scalar $query->param('monthlength'), |
| 91 |
note => scalar $query->param('note'), |
| 92 |
branchcode => $branchcode |
| 93 |
} |
| 88 |
); |
94 |
); |
| 89 |
} elsif ( $op eq 'multi_renew' ) { |
95 |
} elsif ( $op eq 'multi_renew' ) { |
| 90 |
for my $subscriptionid ( @subscriptionids ) { |
96 |
for my $subscriptionid ( @subscriptionids ) { |
| 91 |
my $subscription = GetSubscription( $subscriptionid ); |
97 |
my $subscription = GetSubscription( $subscriptionid ); |
| 92 |
next unless $subscription; |
98 |
next unless $subscription; |
| 93 |
ReNewSubscription( |
99 |
ReNewSubscription( |
| 94 |
$subscriptionid, $loggedinuser, |
100 |
{ |
| 95 |
$subscription->{enddate}, $subscription->{numberlength}, |
101 |
subscriptionid => $subscriptionid, |
| 96 |
$subscription->{weeklength}, $subscription->{monthlength}, |
102 |
user => $loggedinuser, |
|
|
103 |
startdate => $subscription->{enddate}, |
| 104 |
numberlength => $subscription->{numberlength}, |
| 105 |
weeklength => $subscription->{weeklength}, |
| 106 |
monthlength => $subscription->{monthlength}, |
| 107 |
} |
| 97 |
); |
108 |
); |
| 98 |
} |
109 |
} |
| 99 |
} else { |
110 |
} else { |