|
Lines 121-133
my @irregular_issues = split /;/, $subs->{irregularity};
Link Here
|
| 121 |
my $frequency = C4::Serials::Frequency::GetSubscriptionFrequency($subs->{periodicity}); |
121 |
my $frequency = C4::Serials::Frequency::GetSubscriptionFrequency($subs->{periodicity}); |
| 122 |
my $numberpattern = C4::Serials::Numberpattern::GetSubscriptionNumberpattern($subs->{numberpattern}); |
122 |
my $numberpattern = C4::Serials::Numberpattern::GetSubscriptionNumberpattern($subs->{numberpattern}); |
| 123 |
|
123 |
|
| 124 |
my $subscription_object = Koha::Subscriptions->find( $subscriptionid ); |
124 |
my $subscription = Koha::Subscriptions->find( $subscriptionid ); |
|
|
125 |
|
| 125 |
$template->param( |
126 |
$template->param( |
| 126 |
available_additional_fields => Koha::AdditionalFields->search( { tablename => 'subscription' } ), |
127 |
available_additional_fields => Koha::AdditionalFields->search( { tablename => 'subscription' } ), |
| 127 |
additional_field_values => { |
128 |
additional_field_values => { map { $_->field->name => $_->value } $subscription->additional_field_values->as_list }, |
| 128 |
map { $_->field->name => $_->value } |
|
|
| 129 |
$subscription_object->additional_field_values->as_list |
| 130 |
}, |
| 131 |
); |
129 |
); |
| 132 |
|
130 |
|
| 133 |
# FIXME Do we want to hide canceled orders? |
131 |
# FIXME Do we want to hide canceled orders? |
|
Lines 148-153
while ( my $o = $orders->next ) {
Link Here
|
| 148 |
} |
146 |
} |
| 149 |
|
147 |
|
| 150 |
$template->param( |
148 |
$template->param( |
|
|
149 |
subscription => $subscription, |
| 151 |
subscriptionid => $subscriptionid, |
150 |
subscriptionid => $subscriptionid, |
| 152 |
serialslist => \@serialslist, |
151 |
serialslist => \@serialslist, |
| 153 |
hasRouting => $hasRouting, |
152 |
hasRouting => $hasRouting, |
| 154 |
- |
|
|