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

(-)a/acqui/addorderiso2709.pl (-2 / +1 lines)
Lines 511-517 sub import_biblios_list { Link Here
511
        # Items
511
        # Items
512
        my @itemlist = ();
512
        my @itemlist = ();
513
        my $all_items_quantity = 0;
513
        my $all_items_quantity = 0;
514
        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' ] );
514
        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' ] );
515
        if ($alliteminfos != -1) {
515
        if ($alliteminfos != -1) {
516
            foreach my $iteminfos (@$alliteminfos) {
516
            foreach my $iteminfos (@$alliteminfos) {
517
                my $item_homebranch = $iteminfos->{homebranch};
517
                my $item_homebranch = $iteminfos->{homebranch};
518
- 

Return to bug 20817