|
Lines 535-541
sub import_biblios_list {
Link Here
|
| 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}; |
536 |
$iteminfos->{copynumber} = delete $iteminfos->{copyno} if $iteminfos->{copyno}; |
| 537 |
# Price is handled as "itemprice" in the UI form to distinguish from MarcFieldsToOrder |
537 |
# Price is handled as "itemprice" in the UI form to distinguish from MarcFieldsToOrder |
| 538 |
$iteminfos->{itemprice} = delete $iteminfos->{price} if $iteminfos->{price}; |
538 |
$iteminfos->{itemprice} = delete $iteminfos->{price} if $iteminfos->{itemprice}; |
| 539 |
|
539 |
|
| 540 |
# Convert budge code to a budget id |
540 |
# Convert budge code to a budget id |
| 541 |
my $item_budget_code = delete $iteminfos->{budget_code}; |
541 |
my $item_budget_code = delete $iteminfos->{budget_code}; |
| 542 |
- |
|
|