View | Details | Raw Unified | Return to bug 7639
Collapse All | Expand All

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

Return to bug 7639