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