diff --git a/acqui.simple/additem.pl b/acqui.simple/additem.pl index 7bb4bb0b07..7cdbf4089f 100755 --- a/acqui.simple/additem.pl +++ b/acqui.simple/additem.pl @@ -95,6 +95,12 @@ if ($op eq "additem") { $itemrecord = MARCgetitem($dbh,$bibid,$itemnum); $nextop="saveitem"; #------------------------------------------------------------------------------------------------------------------------------ +} elsif ($op eq "delitem") { +#------------------------------------------------------------------------------------------------------------------------------ +# retrieve item if exist => then, it's a modif + &NEWdelitem($dbh,$bibid,$itemnum); + $nextop="additem"; +#------------------------------------------------------------------------------------------------------------------------------ } elsif ($op eq "saveitem") { #------------------------------------------------------------------------------------------------------------------------------ # rebuild