View | Details | Raw Unified | Return to bug 41900
Collapse All | Expand All

(-)a/acqui/addorderiso2709.pl (-1 / +18 lines)
Lines 163-168 if ( $op eq "" ) { Link Here
163
            $cell = PrepareItemrecordDisplay( '', '', undef, '' );
163
            $cell = PrepareItemrecordDisplay( '', '', undef, '' );
164
            $template->param( 'NoACQframework' => 1 );
164
            $template->param( 'NoACQframework' => 1 );
165
        }
165
        }
166
167
        my @bookseller_field = grep( $_->{kohafield} eq "items.booksellerid", @{ $cell->{iteminformation} } );
168
        if ( scalar(@bookseller_field) ) {
169
            my $vendors = Koha::Acquisition::Booksellers->search;
170
            my @authorised_values;
171
            my %authorised_lib;
172
            while ( my $vendor = $vendors->next ) {
173
                push @authorised_values, $vendor->id;
174
                $authorised_lib{ $vendor->id } = $vendor->name;
175
            }
176
            $bookseller_field[0]->{marc_value} = {
177
                type    => 'select',
178
                values  => \@authorised_values,
179
                labels  => \%authorised_lib,
180
                default => $booksellerid,
181
            };
182
        }
183
166
        my @itemloop;
184
        my @itemloop;
167
        push @itemloop, $cell;
185
        push @itemloop, $cell;
168
186
169
- 

Return to bug 41900