Lines 213-237
if ($op eq ""){
Link Here
|
213 |
$import_record->import_biblio->matched_biblionumber($biblionumber)->store; |
213 |
$import_record->import_biblio->matched_biblionumber($biblionumber)->store; |
214 |
|
214 |
|
215 |
# Add items from MarcItemFieldsToOrder |
215 |
# Add items from MarcItemFieldsToOrder |
216 |
my @homebranches = $input->multi_param('homebranch_' . $import_record->import_record_id); |
216 |
my @homebranches = $input->multi_param( 'homebranch_' . $import_record->import_record_id ); |
217 |
my $count = scalar @homebranches; |
217 |
my $count = scalar @homebranches; |
218 |
my @holdingbranches = $input->multi_param('holdingbranch_' . $import_record->import_record_id); |
218 |
my @holdingbranches = $input->multi_param( 'holdingbranch_' . $import_record->import_record_id ); |
219 |
my @itypes = $input->multi_param('itype_' . $import_record->import_record_id); |
219 |
my @itypes = $input->multi_param( 'itype_' . $import_record->import_record_id ); |
220 |
my @nonpublic_notes = $input->multi_param('nonpublic_note_' . $import_record->import_record_id); |
220 |
my @nonpublic_notes = $input->multi_param( 'nonpublic_note_' . $import_record->import_record_id ); |
221 |
my @public_notes = $input->multi_param('public_note_' . $import_record->import_record_id); |
221 |
my @public_notes = $input->multi_param( 'public_note_' . $import_record->import_record_id ); |
222 |
my @locs = $input->multi_param('loc_' . $import_record->import_record_id); |
222 |
my @locs = $input->multi_param( 'loc_' . $import_record->import_record_id ); |
223 |
my @ccodes = $input->multi_param('ccode_' . $import_record->import_record_id); |
223 |
my @ccodes = $input->multi_param( 'ccode_' . $import_record->import_record_id ); |
224 |
my @notforloans = $input->multi_param('notforloan_' . $import_record->import_record_id); |
224 |
my @notforloans = $input->multi_param( 'notforloan_' . $import_record->import_record_id ); |
225 |
my @uris = $input->multi_param('uri_' . $import_record->import_record_id); |
225 |
my @uris = $input->multi_param( 'uri_' . $import_record->import_record_id ); |
226 |
my @copynos = $input->multi_param('copyno_' . $import_record->import_record_id); |
226 |
my @copynos = $input->multi_param( 'copyno_' . $import_record->import_record_id ); |
227 |
my @budget_ids = |
227 |
my @budget_ids = |
228 |
$input->multi_param( 'budget_code_' . $import_record->import_record_id ); # bad field name used in template! |
228 |
$input->multi_param( 'budget_code_' . $import_record->import_record_id ); # bad field name used in template! |
229 |
my @itemprices = $input->multi_param('itemprice_' . $import_record->import_record_id); |
229 |
my @itemprices = $input->multi_param( 'itemprice_' . $import_record->import_record_id ); |
230 |
my @replacementprices = $input->multi_param('replacementprice_' . $import_record->import_record_id); |
230 |
my @replacementprices = $input->multi_param( 'replacementprice_' . $import_record->import_record_id ); |
231 |
my @itemcallnumbers = $input->multi_param('itemcallnumber_' . $import_record->import_record_id); |
231 |
my @itemcallnumbers = $input->multi_param( 'itemcallnumber_' . $import_record->import_record_id ); |
232 |
my @coded_location_qualifiers = $input->multi_param('coded_location_qualifier_' . $import_record->import_record_id); |
232 |
my @coded_location_qualifiers = |
233 |
my @barcodes = $input->multi_param('barcode_' . $import_record->import_record_id); |
233 |
$input->multi_param( 'coded_location_qualifier_' . $import_record->import_record_id ); |
234 |
my @enumchrons = $input->multi_param('enumchron_' . $import_record->import_record_id); |
234 |
my @barcodes = $input->multi_param( 'barcode_' . $import_record->import_record_id ); |
|
|
235 |
my @enumchrons = $input->multi_param( 'enumchron_' . $import_record->import_record_id ); |
235 |
my $itemcreation = 0; |
236 |
my $itemcreation = 0; |
236 |
|
237 |
|
237 |
my @itemnumbers; |
238 |
my @itemnumbers; |
Lines 535-540
sub import_biblios_list {
Link Here
|
535 |
# Handle incorrectly named original parameters for MarcItemFieldsToOrder |
536 |
# Handle incorrectly named original parameters for MarcItemFieldsToOrder |
536 |
$iteminfos->{location} = delete $iteminfos->{loc} if $iteminfos->{loc}; |
537 |
$iteminfos->{location} = delete $iteminfos->{loc} if $iteminfos->{loc}; |
537 |
$iteminfos->{copynumber} = delete $iteminfos->{copyno} if $iteminfos->{copyno}; |
538 |
$iteminfos->{copynumber} = delete $iteminfos->{copyno} if $iteminfos->{copyno}; |
|
|
539 |
# Price is handled as "itemprice" in the UI form to distinguish from MarcFieldsToOrder |
540 |
$iteminfos->{itemprice} = delete $iteminfos->{price} if $iteminfos->{price}; |
538 |
|
541 |
|
539 |
# Convert budge code to a budget id |
542 |
# Convert budge code to a budget id |
540 |
my $item_budget_code = delete $iteminfos->{budget_code}; |
543 |
my $item_budget_code = delete $iteminfos->{budget_code}; |
541 |
- |
|
|