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.10,1.11


From: Finlay Thompson
Subject: [Koha-cvs] CVS: koha request.pl,1.10,1.11
Date: Tue, 20 Aug 2002 21:31:27 -0700

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
  }
+ 
  
  




reply via email to

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