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

(-)a/acqui/addorderiso2709.pl (-2 / +1 lines)
Lines 537-543 sub import_biblios_list { Link Here
537
        # Items
537
        # Items
538
        my @itemlist = ();
538
        my @itemlist = ();
539
        my $all_items_quantity = 0;
539
        my $all_items_quantity = 0;
540
        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' ] );
540
        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' ] );
541
        if ($alliteminfos != -1) {
541
        if ($alliteminfos != -1) {
542
            foreach my $iteminfos (@$alliteminfos) {
542
            foreach my $iteminfos (@$alliteminfos) {
543
                my $item_homebranch = $iteminfos->{homebranch};
543
                my $item_homebranch = $iteminfos->{homebranch};
544
- 

Return to bug 20817