Lines 160-165
sub AddItemFromMarc {
Link Here
|
160 |
my $unlinked_item_subfields = _get_unlinked_item_subfields( $localitemmarc, $frameworkcode ); |
160 |
my $unlinked_item_subfields = _get_unlinked_item_subfields( $localitemmarc, $frameworkcode ); |
161 |
$item_values->{more_subfields_xml} = _get_unlinked_subfields_xml($unlinked_item_subfields); |
161 |
$item_values->{more_subfields_xml} = _get_unlinked_subfields_xml($unlinked_item_subfields); |
162 |
$item_values->{biblionumber} = $biblionumber; |
162 |
$item_values->{biblionumber} = $biblionumber; |
|
|
163 |
$item_values->{cn_source} = delete $item_values->{'items.cn_source'}; # Because of C4::Biblio::_disambiguate |
163 |
my $item = Koha::Item->new( $item_values )->store; |
164 |
my $item = Koha::Item->new( $item_values )->store; |
164 |
return ( $item->biblionumber, $item->biblioitemnumber, $item->itemnumber ); |
165 |
return ( $item->biblionumber, $item->biblioitemnumber, $item->itemnumber ); |
165 |
} |
166 |
} |
Lines 238-243
sub AddItemBatchFromMarc {
Link Here
|
238 |
$item->{'more_subfields_xml'} = _get_unlinked_subfields_xml($unlinked_item_subfields); |
239 |
$item->{'more_subfields_xml'} = _get_unlinked_subfields_xml($unlinked_item_subfields); |
239 |
$item->{'biblionumber'} = $biblionumber; |
240 |
$item->{'biblionumber'} = $biblionumber; |
240 |
$item->{'biblioitemnumber'} = $biblioitemnumber; |
241 |
$item->{'biblioitemnumber'} = $biblioitemnumber; |
|
|
242 |
$item->{cn_source} = delete $item->{'items.cn_source'}; # Because of C4::Biblio::_disambiguate |
241 |
|
243 |
|
242 |
# check for duplicate barcode |
244 |
# check for duplicate barcode |
243 |
my %item_errors = CheckItemPreSave($item); |
245 |
my %item_errors = CheckItemPreSave($item); |
Lines 279-284
sub ModItemFromMarc {
Link Here
|
279 |
$localitemmarc->append_fields( $item_marc->field($itemtag) ); |
281 |
$localitemmarc->append_fields( $item_marc->field($itemtag) ); |
280 |
my $item_object = Koha::Items->find($itemnumber); |
282 |
my $item_object = Koha::Items->find($itemnumber); |
281 |
my $item = TransformMarcToKoha( $localitemmarc, $frameworkcode, 'items' ); |
283 |
my $item = TransformMarcToKoha( $localitemmarc, $frameworkcode, 'items' ); |
|
|
284 |
$item->{cn_source} = delete $item->{'items.cn_source'}; # Because of C4::Biblio::_disambiguate |
282 |
$item_object->set($item); |
285 |
$item_object->set($item); |
283 |
my $unlinked_item_subfields = _get_unlinked_item_subfields( $localitemmarc, $frameworkcode ); |
286 |
my $unlinked_item_subfields = _get_unlinked_item_subfields( $localitemmarc, $frameworkcode ); |
284 |
$item_object->more_subfields_xml(_get_unlinked_subfields_xml($unlinked_item_subfields))->store; |
287 |
$item_object->more_subfields_xml(_get_unlinked_subfields_xml($unlinked_item_subfields))->store; |
285 |
- |
|
|