Lines 598-604
if ($op eq "additem") {
Link Here
|
598 |
} |
598 |
} |
599 |
my $item = GetItem( $itemnumber ); |
599 |
my $item = GetItem( $itemnumber ); |
600 |
my $olditemlost = $item->{'itemlost'}; |
600 |
my $olditemlost = $item->{'itemlost'}; |
601 |
my $newitemlost = $itemtosave->subfield('952','1'); |
601 |
|
|
|
602 |
my ($lost_tag,$lost_subfield) = GetMarcFromKohaField("items.itemlost",''); |
603 |
|
604 |
my $newitemlost = $itemtosave->subfield( $lost_tag, $lost_subfield ); |
602 |
if (($olditemlost eq '0' or $olditemlost eq '' ) and $newitemlost ge '1'){ |
605 |
if (($olditemlost eq '0' or $olditemlost eq '' ) and $newitemlost ge '1'){ |
603 |
LostItem($itemnumber,'MARK RETURNED'); |
606 |
LostItem($itemnumber,'MARK RETURNED'); |
604 |
} |
607 |
} |
605 |
- |
|
|