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

(-)a/acqui/addorderiso2709.pl (-4 / +2 lines)
Lines 532-541 sub import_biblios_list { Link Here
532
                my $quantity = delete $iteminfos->{quantity} || 1;
532
                my $quantity = delete $iteminfos->{quantity} || 1;
533
533
534
                # Handle incorrectly named original parameters for MarcItemFieldsToOrder
534
                # Handle incorrectly named original parameters for MarcItemFieldsToOrder
535
                $iteminfos->{location}   = delete $iteminfos->{loc}    if $iteminfos->{loc};
535
                $iteminfos->{location}  = delete $iteminfos->{loc}   if $iteminfos->{loc};
536
                $iteminfos->{copynumber} = delete $iteminfos->{copyno} if $iteminfos->{copyno};
537
                # Price is handled as "itemprice" in the UI form to distinguish from MarcFieldsToOrder
536
                # Price is handled as "itemprice" in the UI form to distinguish from MarcFieldsToOrder
538
                $iteminfos->{itemprice}  = delete $iteminfos->{price}  if $iteminfos->{itemprice};
537
                $iteminfos->{itemprice} = delete $iteminfos->{price} if $iteminfos->{itemprice};
539
538
540
                # Convert budge code to a budget id
539
                # Convert budge code to a budget id
541
                my $item_budget_code = delete $iteminfos->{budget_code};
540
                my $item_budget_code = delete $iteminfos->{budget_code};
542
- 

Return to bug 38680