[Top][All Lists]
[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'});
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha request.pl,1.28,1.29,
Owen Leonard <=