biblio & item deletion now works fine in MARC editor.

Stores deleted biblio/item in the marc field of the deletedbiblio/deleteditem table.
This commit is contained in:
tipaul 2003-11-24 17:12:41 +00:00
parent feccbd1685
commit 94deaaec47
1 changed files with 6 additions and 0 deletions

View File

@ -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