|
Lines 128-133
if (@subscriptionid){
Link Here
|
| 128 |
my $numberpattern = C4::Serials::Numberpattern::GetSubscriptionNumberpattern($subs->{numberpattern}); |
128 |
my $numberpattern = C4::Serials::Numberpattern::GetSubscriptionNumberpattern($subs->{numberpattern}); |
| 129 |
$subs->{frequency} = $frequency; |
129 |
$subs->{frequency} = $frequency; |
| 130 |
$subs->{numberpattern} = $numberpattern; |
130 |
$subs->{numberpattern} = $numberpattern; |
|
|
131 |
$subs->{'hasRouting'} = check_routing($subscriptionid); |
| 131 |
push @$subscriptiondescs,$subs; |
132 |
push @$subscriptiondescs,$subs; |
| 132 |
my $tmpsubscription= GetFullSubscription($subscriptionid); |
133 |
my $tmpsubscription= GetFullSubscription($subscriptionid); |
| 133 |
@subscriptioninformation=(@$tmpsubscription,@subscriptioninformation); |
134 |
@subscriptioninformation=(@$tmpsubscription,@subscriptioninformation); |
| 134 |
- |
|
|