koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha request.pl,1.28,1.29


From: Owen Leonard
Subject: [Koha-cvs] CVS: koha request.pl,1.28,1.29
Date: Wed, 19 Jan 2005 13:39:28 -0800

Update of /cvsroot/koha/koha
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13177

Modified Files:
        request.pl 
Log Message:
Comparing reserves' destination branch to the current holding branch to 
determine actual waiting status.  If destination branch is equal to holding 
branch, the item has been checked in at its destination and can be accurately 
shown as waiting.  If not, the item is still in transit and should display that 
information.

Index: request.pl
===================================================================
RCS file: /cvsroot/koha/koha/request.pl,v
retrieving revision 1.28
retrieving revision 1.29
diff -C2 -r1.28 -r1.29
*** request.pl  13 Jul 2004 12:55:01 -0000      1.28
--- request.pl  19 Jan 2005 21:39:25 -0000      1.29
***************
*** 134,141 ****
--- 134,145 ----
                my $item = $res->{'itemnumber'};
                $item = getiteminformation(\%env,$item);
+               $reserve{'holdingbranch'}=$item->{'holdingbranch'};
                $reserve{'barcode'}=$item->{'barcode'};
                $reserve{'biblionumber'}=$item->{'biblionumber'};
                $reserve{'wbrcode'} = $res->{'branchcode'};
                $reserve{'wbrname'} = 
$branches->{$res->{'branchcode'}}->{'branchname'};
+               if($reserve{'holdingbranch'} eq $reserve{'wbrcode'}){
+                       $reserve{'atdestination'} = 1;
+               }
      }
      $reserve{'date'} = format_date($res->{'reservedate'});




reply via email to

[Prev in Thread] Current Thread [Next in Thread]