+ # get suggestion fields if applicable. If it's a subscription renewal, then the biblio already exists
+ # otherwise, retrieve suggestion information.
+ elsif ($suggestionid) {
+ $data = GetSuggestion($suggestionid);
+ $budget_id ||= $data->{'budgetid'} // 0;
+ }
+
+ if ( not $biblionumber and Koha::BiblioFrameworks->find('ACQ') ) {
+ #my $acq_mss = Koha::MarcSubfieldStructures->search({ frameworkcode => 'ACQ', tagfield => { '!=' => $itemnumber_tag } });
+ foreach my $tag ( sort keys %{$tagslib} ) {
+ next if $tag eq '';
+ next if $tag eq $itemnumber_tag; # skip items fields
+ foreach my $subfield ( sort keys %{ $tagslib->{$tag} } ) {
+ my $mss = $tagslib->{$tag}{$subfield};
+ next if IsMarcStructureInternal($mss);
+ next if $mss->{tab} == -1;
+ my $value = $mss->{defaultvalue};
+
+ if ($suggestionid and $mss->{kohafield}) {
+ # Reading suggestion info if ordering from a suggestion
+ if ( $mss->{kohafield} eq 'biblio.title' ) {
+ $value = $data->{title};
+ }
+ elsif ( $mss->{kohafield} eq 'biblio.author' ) {
+ $value = $data->{author};
+ }
+ elsif ( $mss->{kohafield} eq 'biblioitems.publishercode' ) {
+ $value = $data->{publishercode};
+ }
+ elsif ( $mss->{kohafield} eq 'biblioitems.editionstatement' ) {
+ $value = $data->{editionstatement};
+ }
+ elsif ( $mss->{kohafield} eq 'biblioitems.publicationyear' ) {
+ $value = $data->{publicationyear};
+ }
+ elsif ( $mss->{kohafield} eq 'biblioitems.isbn' ) {
+ $value = $data->{isbn};
+ }
+ elsif ( $mss->{kohafield} eq 'biblio.seriestitle' ) {
+ $value = $data->{seriestitle};
+ }
+ }