|
Lines 543-548
sub ModItem {
Link Here
|
| 543 |
my $log_action = $additional_params->{log_action} // 1; |
543 |
my $log_action = $additional_params->{log_action} // 1; |
| 544 |
my $unlinked_item_subfields = $additional_params->{unlinked_item_subfields}; |
544 |
my $unlinked_item_subfields = $additional_params->{unlinked_item_subfields}; |
| 545 |
|
545 |
|
|
|
546 |
return unless %$item; |
| 547 |
$item->{'itemnumber'} = $itemnumber or return; |
| 548 |
|
| 546 |
# if $biblionumber is undefined, get it from the current item |
549 |
# if $biblionumber is undefined, get it from the current item |
| 547 |
unless (defined $biblionumber) { |
550 |
unless (defined $biblionumber) { |
| 548 |
$biblionumber = _get_single_item_column('biblionumber', $itemnumber); |
551 |
$biblionumber = _get_single_item_column('biblionumber', $itemnumber); |
|
Lines 552-559
sub ModItem {
Link Here
|
| 552 |
$item->{'more_subfields_xml'} = _get_unlinked_subfields_xml($unlinked_item_subfields); |
555 |
$item->{'more_subfields_xml'} = _get_unlinked_subfields_xml($unlinked_item_subfields); |
| 553 |
}; |
556 |
}; |
| 554 |
|
557 |
|
| 555 |
$item->{'itemnumber'} = $itemnumber or return; |
|
|
| 556 |
|
| 557 |
my @fields = qw( itemlost withdrawn damaged ); |
558 |
my @fields = qw( itemlost withdrawn damaged ); |
| 558 |
|
559 |
|
| 559 |
# Only call GetItem if we need to set an "on" date field |
560 |
# Only call GetItem if we need to set an "on" date field |
| 560 |
- |
|
|