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

[Owen Leonard]

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

Modified Files:
      Tag: rel_2_2
	request.pl 
Log Message:
Fix to display waiting status only if item has arrived at pickup branch.  Setting 'atdestination' variable if so.  Changes are required in the template to take advantage of this.

Index: request.pl
===================================================================
RCS file: /cvsroot/koha/koha/request.pl,v
retrieving revision 1.28
retrieving revision 1.28.2.1
diff -C2 -r1.28 -r1.28.2.1
*** request.pl	13 Jul 2004 12:55:01 -0000	1.28
--- request.pl	16 Feb 2005 21:26:02 -0000	1.28.2.1
***************
*** 134,143 ****
  		my $item = $res->{'itemnumber'};
  		$item = getiteminformation(\%env,$item);
  		$reserve{'barcode'}=$item->{'barcode'};
  		$reserve{'biblionumber'}=$item->{'biblionumber'};
  		$reserve{'wbrcode'} = $res->{'branchcode'};
  		$reserve{'wbrname'} = $branches->{$res->{'branchcode'}}->{'branchname'};
      }
!     $reserve{'date'} = format_date($res->{'reservedate'});
  	$reserve{'borrowernumber'}=$res->{'borrowernumber'};
  	$reserve{'biblionumber'}=$res->{'biblionumber'};
--- 134,148 ----
  		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'});
  	$reserve{'borrowernumber'}=$res->{'borrowernumber'};
  	$reserve{'biblionumber'}=$res->{'biblionumber'};