Changed it so you cant renew a book that is on request, made a link from
the on request text to the request(reserve) data
This commit is contained in:
parent
e371a7114f
commit
58a8ef5bbb
|
|
@ -5,7 +5,8 @@
|
|||
#Displays all the detailas about a borrower
|
||||
#needs html removed and to use the C4::Output more, but its tricky
|
||||
#last modified 21/1/2000 by chris@katipo.co.nz
|
||||
|
||||
#modifiecd 31/1/2001 by chris@katipo.co.nz to not allow items on request
|
||||
#to be renewed
|
||||
use strict;
|
||||
use C4::Output;
|
||||
use CGI;
|
||||
|
|
@ -194,15 +195,15 @@ for (my $i=0;$i<$count;$i++){
|
|||
#check item is not reserved
|
||||
my ($rescount,$reserves)=FindReserves($issue->[$i]{'biblionumber'},'');
|
||||
if ($rescount >0){
|
||||
print "<TD>On Request";
|
||||
print "<TD><a href=/cgi-bin/koha/request.pl?bib=$issue->[$i]{'biblionumber'}>On Request - no renewals</a></td></tr>";
|
||||
} else {
|
||||
print "<TD>";
|
||||
}
|
||||
|
||||
print "<input type=radio name=\"renew_item_$issue->[$i]{'itemnumber'}\" value=y>Y
|
||||
<input type=radio name=\"renew_item_$issue->[$i]{'itemnumber'}\" value=n>N</td>
|
||||
</tr>
|
||||
";
|
||||
|
||||
}
|
||||
}
|
||||
print <<printend
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue