X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=cataloguing%2Fadditem.pl;h=a81901983baec14262bd5c375bac9dc77db9ab2e;hb=4cb139b9cecf33e10fb2fdc0ea6839dabd683d55;hp=f2a5ccbec9a8f509a8858ecb8012196c76896b4e;hpb=762c3304ea102d0fadb62c02bd384778c0e803b2;p=koha.git diff --git a/cataloguing/additem.pl b/cataloguing/additem.pl index f2a5ccbec9..a81901983b 100755 --- a/cataloguing/additem.pl +++ b/cataloguing/additem.pl @@ -27,6 +27,7 @@ use C4::Output; use C4::Biblio; use C4::Items; use C4::Context; +use C4::Circulation; use C4::Koha; # XXX subfield_is_koha_internal_p use C4::Branch; # XXX subfield_is_koha_internal_p use C4::ClassSource; @@ -401,11 +402,6 @@ if ($op eq "additem") { $record = _increment_barcode($record, $frameworkcode); } - - if (C4::Context->preference('autoBarcode') eq 'incremental') { - $record = _increment_barcode($record, $frameworkcode); - } - my $addedolditem = TransformMarcToKoha( $dbh, $record ); # If we have to add or add & duplicate, we add the item @@ -606,6 +602,15 @@ if ($op eq "additem") { ModItemFromMarc($itemtosave,$biblionumber,$itemnumber); $itemnumber=""; } + my $item = GetItem( $itemnumber ); + my $olditemlost = $item->{'itemlost'}; + + my ($lost_tag,$lost_subfield) = GetMarcFromKohaField("items.itemlost",''); + + my $newitemlost = $itemtosave->subfield( $lost_tag, $lost_subfield ); + if (($olditemlost eq '0' or $olditemlost eq '' ) and $newitemlost ge '1'){ + LostItem($itemnumber,'MARK RETURNED'); + } $nextop="additem"; } elsif ($op eq "delinkitem"){ my $analyticfield = '773';