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

(-)a/acqui/addorderiso2709.pl (-2 / +1 lines)
Lines 538-544 sub import_biblios_list { Link Here
538
        # Items
538
        # Items
539
        my @itemlist = ();
539
        my @itemlist = ();
540
        my $all_items_quantity = 0;
540
        my $all_items_quantity = 0;
541
        my $alliteminfos = C4::Acquisition::Utils::GetMarcItemFieldsToOrderValues( $marcrecord, [ 'homebranch', 'holdingbranch', 'itype', 'nonpublic_note', 'public_note', 'loc', 'ccode', 'notforloan', 'uri', 'copyno', 'price', 'replacementprice', 'itemcallnumber', 'quantity', 'budget_code' ] );
541
        my $alliteminfos = Koha::Acquisition::Utils::GetMarcItemFieldsToOrderValues( $marcrecord, [ 'homebranch', 'holdingbranch', 'itype', 'nonpublic_note', 'public_note', 'loc', 'ccode', 'notforloan', 'uri', 'copyno', 'price', 'replacementprice', 'itemcallnumber', 'quantity', 'budget_code' ] );
542
        if ($alliteminfos != -1) {
542
        if ($alliteminfos != -1) {
543
            foreach my $iteminfos (@$alliteminfos) {
543
            foreach my $iteminfos (@$alliteminfos) {
544
                my $item_homebranch = $iteminfos->{homebranch};
544
                my $item_homebranch = $iteminfos->{homebranch};
545
- 

Return to bug 20817