|
Lines 609-615
if ($op eq "additem") {
Link Here
|
| 609 |
} |
609 |
} |
| 610 |
my $item = GetItem( $itemnumber ); |
610 |
my $item = GetItem( $itemnumber ); |
| 611 |
my $olditemlost = $item->{'itemlost'}; |
611 |
my $olditemlost = $item->{'itemlost'}; |
| 612 |
my $newitemlost = $itemtosave->subfield('952','1'); |
612 |
|
|
|
613 |
my ($lost_tag,$lost_subfield) = GetMarcFromKohaField("items.itemlost",''); |
| 614 |
|
| 615 |
my $newitemlost = $itemtosave->subfield( $lost_tag, $lost_subfield ); |
| 613 |
if (($olditemlost eq '0' or $olditemlost eq '' ) and $newitemlost ge '1'){ |
616 |
if (($olditemlost eq '0' or $olditemlost eq '' ) and $newitemlost ge '1'){ |
| 614 |
LostItem($itemnumber,'MARK RETURNED'); |
617 |
LostItem($itemnumber,'MARK RETURNED'); |
| 615 |
} |
618 |
} |
| 616 |
- |
|
|