Lines 749-756
if ($op eq "additem") {
Link Here
|
749 |
$itemnumber = q{}; |
749 |
$itemnumber = q{}; |
750 |
my $olditemlost = $item->itemlost; |
750 |
my $olditemlost = $item->itemlost; |
751 |
my $newitemlost = $newitem->{itemlost}; |
751 |
my $newitemlost = $newitem->{itemlost}; |
752 |
LostItem( $item->itemnumber, 'additem' ) |
752 |
if ( $newitemlost && $newitemlost ge '1' && !$olditemlost ) { |
753 |
if $newitemlost && $newitemlost ge '1' && !$olditemlost; |
753 |
LostItem( $item->itemnumber, 'additem' ) |
|
|
754 |
} elsif ( !$newitemlost && $olditemlost && $olditemlost ge '1' ) { |
755 |
$item->set_found; |
756 |
} |
754 |
} |
757 |
} |
755 |
$nextop="additem"; |
758 |
$nextop="additem"; |
756 |
} elsif ($op eq "delinkitem"){ |
759 |
} elsif ($op eq "delinkitem"){ |
757 |
- |
|
|