[Koha-cvs] CVS: koha request.pl,1.10,1.11

Finlay Thompson finlayt at users.sourceforge.net
Wed Aug 21 06:31:27 CEST 2002


Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv10938

Modified Files:
	request.pl 
Log Message:

Changed the display of lost, long overdue, reference, and cancelled items.



Index: request.pl
===================================================================
RCS file: /cvsroot/koha/koha/request.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -r1.10 -r1.11
*** request.pl	21 Aug 2002 02:45:30 -0000	1.10
--- request.pl	21 Aug 2002 04:31:25 -0000	1.11
***************
*** 71,88 ****
  my $bibitemrows = "";
  for (my $i=0; $i<$count2; $i++) {
!     unless ($data[$i]->{'notforloan'}){
! 	my @barcodes = barcodes($data[$i]->{'biblioitemnumber'});
! 	if ($data[$i]->{'dewey'} == 0){
! 	    $data[$i]->{'dewey'}="";
! 	}
! 	$data[$i]->{'volumeddesc'} = "&nbsp;" unless $data[$i]->{'volumeddesc'};
! 	$data[$i]->{'dewey'}=~ s/\.0000$//;
! 	$data[$i]->{'dewey'}=~ s/00$//;
! 	my $class="$data[$i]->{'classification'}$data[$i]->{'dewey'}$data[$i]->{'subclass'}";
! 	$bibitemrows .= <<"EOF";
  <tr VALIGN=TOP>
! <TD><input type=checkbox name=reqbib value=$data[$i]->{'biblioitemnumber'}>
! <input type=hidden name=biblioitem value=$data[$i]->{'biblioitemnumber'}>
! </td>
  <TD>$data[$i]->{'description'}</td>
  <TD>$class</td>
--- 71,97 ----
  my $bibitemrows = "";
  for (my $i=0; $i<$count2; $i++) {
!     my @barcodes = barcodes($data[$i]->{'biblioitemnumber'});
!     if ($data[$i]->{'dewey'} == 0){
! 	$data[$i]->{'dewey'}="";
!     }
!     $data[$i]->{'volumeddesc'} = "&nbsp;" unless $data[$i]->{'volumeddesc'};
!     $data[$i]->{'dewey'}=~ s/\.0000$//;
!     $data[$i]->{'dewey'}=~ s/00$//;
!     my $class="$data[$i]->{'classification'}$data[$i]->{'dewey'}$data[$i]->{'subclass'}";
!     my $select;
!     if ($data[$i]->{'notforloan'}) {
! 	$select = "Reference Item.";
!     } elsif ($data[$i]->{'itemlost'} == 1) {
! 	$select = "Item Lost";
!     } elsif ($data[$i]->{'itemlost'} == 2) {
! 	$select = "Long Overdue";
!     } elsif ($data[$i]->{'wthdrawn'}) {
! 	$select = "Item Cancelled";
!     } else {
! 	$select = " <input type=checkbox name=reqbib value=$data[$i]->{'biblioitemnumber'}><input type=hidden name=biblioitem value=$data[$i]->{'biblioitemnumber'}>";
!     }
!     $bibitemrows .= <<"EOF";
  <tr VALIGN=TOP>
! <TD>$select</td>
  <TD>$data[$i]->{'description'}</td>
  <TD>$class</td>
***************
*** 94,99 ****
  </tr>
  EOF
-     }
  }
  
  
--- 103,108 ----
  </tr>
  EOF
  }
+ 
  
  





More information about the Koha-cvs mailing list