|
Lines 104-110
$subs->{location} = GetKohaAuthorisedValueLib("LOC",$subs->{location});
Link Here
|
| 104 |
$subs->{abouttoexpire} = abouttoexpire($subs->{subscriptionid}); |
104 |
$subs->{abouttoexpire} = abouttoexpire($subs->{subscriptionid}); |
| 105 |
$template->param(%{ $subs }); |
105 |
$template->param(%{ $subs }); |
| 106 |
$template->param(biblionumber_for_new_subscription => $subs->{bibnum}); |
106 |
$template->param(biblionumber_for_new_subscription => $subs->{bibnum}); |
| 107 |
my @irregular_issues = split /,/, $subs->{irregularity}; |
107 |
my @irregular_issues = split /;/, $subs->{irregularity}; |
| 108 |
|
108 |
|
| 109 |
my $frequency = C4::Serials::Frequency::GetSubscriptionFrequency($subs->{periodicity}); |
109 |
my $frequency = C4::Serials::Frequency::GetSubscriptionFrequency($subs->{periodicity}); |
| 110 |
my $numberpattern = C4::Serials::Numberpattern::GetSubscriptionNumberpattern($subs->{numberpattern}); |
110 |
my $numberpattern = C4::Serials::Numberpattern::GetSubscriptionNumberpattern($subs->{numberpattern}); |
| 111 |
- |
|
|