Lines 229-234
if ($op eq ""){
Link Here
|
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); |
233 |
my @barcodes = $input->multi_param('barcode_' . $import_record->import_record_id); |
234 |
my @enumchrons = $input->multi_param('enumchron_' . $import_record->import_record_id); |
232 |
my $itemcreation = 0; |
235 |
my $itemcreation = 0; |
233 |
|
236 |
|
234 |
my @itemnumbers; |
237 |
my @itemnumbers; |
Lines 236-255
if ($op eq ""){
Link Here
|
236 |
$itemcreation = 1; |
239 |
$itemcreation = 1; |
237 |
my $item = Koha::Item->new( |
240 |
my $item = Koha::Item->new( |
238 |
{ |
241 |
{ |
239 |
biblionumber => $biblionumber, |
242 |
biblionumber => $biblionumber, |
240 |
homebranch => $homebranches[$i], |
243 |
homebranch => $homebranches[$i], |
241 |
holdingbranch => $holdingbranches[$i], |
244 |
holdingbranch => $holdingbranches[$i], |
242 |
itemnotes_nonpublic => $nonpublic_notes[$i], |
245 |
itemnotes_nonpublic => $nonpublic_notes[$i], |
243 |
itemnotes => $public_notes[$i], |
246 |
itemnotes => $public_notes[$i], |
244 |
location => $locs[$i], |
247 |
location => $locs[$i], |
245 |
ccode => $ccodes[$i], |
248 |
ccode => $ccodes[$i], |
246 |
itype => $itypes[$i], |
249 |
itype => $itypes[$i], |
247 |
notforloan => $notforloans[$i], |
250 |
notforloan => $notforloans[$i], |
248 |
uri => $uris[$i], |
251 |
uri => $uris[$i], |
249 |
copynumber => $copynos[$i], |
252 |
copynumber => $copynos[$i], |
250 |
price => $itemprices[$i], |
253 |
price => $itemprices[$i], |
251 |
replacementprice => $replacementprices[$i], |
254 |
replacementprice => $replacementprices[$i], |
252 |
itemcallnumber => $itemcallnumbers[$i], |
255 |
itemcallnumber => $itemcallnumbers[$i], |
|
|
256 |
coded_location_qualifier => $coded_location_qualifiers[$i], |
257 |
barcode => $barcodes[$i], |
258 |
enumchron => $enumchrons[$i], |
253 |
} |
259 |
} |
254 |
)->store; |
260 |
)->store; |
255 |
push( @itemnumbers, $item->itemnumber ); |
261 |
push( @itemnumbers, $item->itemnumber ); |