[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-devel] Some script for item deletion - suggestion
From: |
Tümer Garip |
Subject: |
[Koha-devel] Some script for item deletion - suggestion |
Date: |
Wed, 1 Mar 2006 15:55:47 +0200 |
Hi Paul,
We noticed that the librarian can actaully delete an item (by mistake or
while correcting some biblios). Although
KOHA keeps records of deleted items its too much work trying to retrive
it. So we think KOHA should prevent deletion of such items. We have
added the following script to additem.pl
} elsif ($op eq "delitem") {
#-----------------------------------------------------------------------
-------------------------------------------------------
# retrieve item if exist => then, it's a modif
+ my $sth=$dbh->prepare("select * from issues i where i.returndate is
null and i.itemnumber=?");
+ $sth->execute($itemnum);
+ my $onloan=$sth->fetchrow;
+ push @errors,"book_on_loan" if ($onloan); ##error book_on_loan added
to template as well
+ if ($onloan){
+ $nextop = "additem";
+ }else{
&NEWdelitem($dbh,$bibid,$itemnum);
$nextop="additem";
+ }
We also believe a similar code should be inserted to addbiblio.pl as
well
If you think the sameway can you please commit these, thanks
Tumer
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-devel] Some script for item deletion - suggestion,
Tümer Garip <=