- my $additional_fields = Koha::AdditionalField->all( { tablename => 'subscription' } );
- insert_additional_fields( $additional_fields, $biblionumber, $subscriptionid );
-
- print $query->redirect("/cgi-bin/koha/serials/subscription-detail.pl?subscriptionid=$subscriptionid");
- return;
-}
-
-sub insert_additional_fields {
- my ( $additional_fields, $biblionumber, $subscriptionid ) = @_;
- my $record = GetMarcBiblio( $biblionumber, 1 );
- for my $field ( @$additional_fields ) {
- my $af = Koha::AdditionalField->new({ id => $field->{id} })->fetch;
- if ( $af->{marcfield} ) {
- my ( $field, $subfield ) = split /\$/, $af->{marcfield};
- $af->{values} = undef;
- if ( $field and $subfield ) {
- my $value = $record->subfield( $field, $subfield );
- $af->{values} = {
- $subscriptionid => $value
- };
+ my @additional_fields;
+ my $record = GetMarcBiblio({ biblionumber => $biblionumber, embed_items => 1 });
+ my $subscription_fields = Koha::AdditionalFields->search({ tablename => 'subscription' });
+ while ( my $field = $subscription_fields->next ) {
+ my $value = $query->param('additional_field_' . $field->id);
+ if ($field->marcfield) {
+ my ($field, $subfield) = split /\$/, $field->marcfield;
+ if ( $record and $field and $subfield ) {
+ $value = $record->subfield( $field, $subfield );