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

(-)a/cataloguing/additem.pl (-2 / +4 lines)
Lines 607-613 if ($op eq "additem") { Link Here
607
    }
607
    }
608
  my $item = GetItem( $itemnumber );
608
  my $item = GetItem( $itemnumber );
609
    my $olditemlost =  $item->{'itemlost'};
609
    my $olditemlost =  $item->{'itemlost'};
610
    my $newitemlost = $itemtosave->subfield('952','1');
610
611
   my ($lost_tag,$lost_subfield) = GetMarcFromKohaField("items.itemlost",'');
612
613
   my $newitemlost = $itemtosave->subfield( $lost_tag, $lost_subfield );
611
    if (($olditemlost eq '0' or $olditemlost eq '' ) and $newitemlost ge '1'){
614
    if (($olditemlost eq '0' or $olditemlost eq '' ) and $newitemlost ge '1'){
612
  LostItem($itemnumber,'MARK RETURNED');
615
  LostItem($itemnumber,'MARK RETURNED');
613
    }
616
    }
614
- 

Return to bug 7639