[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-devel] CVS: koha moremember.pl,1.3,1.4
From: |
Chris Cornack |
Subject: |
[Koha-devel] CVS: koha moremember.pl,1.3,1.4 |
Date: |
Wed, 07 Mar 2001 13:02:50 -0800 |
Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv24495
Modified Files:
moremember.pl
Log Message:
Changing the form so it passes through a modify value to tell the script to
show the flags
Index: moremember.pl
===================================================================
RCS file: /cvsroot/koha/koha/moremember.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** moremember.pl 2001/02/21 22:17:58 1.3
--- moremember.pl 2001/03/07 21:02:48 1.4
***************
*** 15,18 ****
--- 15,19 ----
use C4::Reserves2;
use C4::Circulation::Renewals2;
+ use C4::Circulation::Circ2;
my $input = new CGI;
my $bornum=$input->param('bornum');
***************
*** 96,102 ****
<form action=/cgi-bin/koha/memberentry.pl method=post>
<input type=hidden name=bornum value=$bornum>
! <INPUT TYPE="image" name="submit" VALUE="modify" height=42 WIDTH=93
BORDER=0 src="/images/modify-mem.gif">
! <INPUT TYPE="image" name="submit" VALUE="delete" height=42 WIDTH=93
BORDER=0 src="/images/delete-mem.gif">
</p>
--- 97,103 ----
<form action=/cgi-bin/koha/memberentry.pl method=post>
<input type=hidden name=bornum value=$bornum>
! <INPUT TYPE="image" name="modify" VALUE="modify" height=42 WIDTH=93
BORDER=0 src="/images/modify-mem.gif">
! <INPUT TYPE="image" name="delete" VALUE="delete" height=42 WIDTH=93
BORDER=0 src="/images/delete-mem.gif">
</p>
***************
*** 132,136 ****
print "<td>$accts->[$i]{'date'}</td>";
# print "<TD>$accts->[$i]{'accounttype'}</td>";
! print "<TD>$accts->[$i]{'description'} $accts->[$i]{'title'}</td>
<TD>$amount</td><td>$amount2</td>
</tr>";
--- 133,143 ----
print "<td>$accts->[$i]{'date'}</td>";
# print "<TD>$accts->[$i]{'accounttype'}</td>";
! print "<TD>";
! my $env;
! if ($accts->[$i]{'accounttype'} ne 'Res'){
! my
$iteminfo=C4::Circulation::Circ2::getiteminformation($env,$accts->[$i]->{'itemnumber'},'');
! print "<a
href=/cgi-bin/koha/moredetail.pl?itemnumber=$accts->[$i]->{'itemnumber'}&bib=$iteminfo->{'biblionumber'}&bi=$iteminfo->{'biblioitemnumber'}>$accts->[$i]->{'description'}
$accts->[$i]{'title'}</a>";
! }
! print "</td>
<TD>$amount</td><td>$amount2</td>
</tr>";
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-devel] CVS: koha moremember.pl,1.3,1.4,
Chris Cornack <=
- Prev by Date:
[Koha-devel] CVS: koha memberentry.pl,1.1.1.1,1.2 insertdata.pl,1.1.1.1,1.2
- Next by Date:
[Koha-devel] CVS: koha insertdata.pl,1.2,1.3
- Previous by thread:
[Koha-devel] CVS: koha memberentry.pl,1.1.1.1,1.2 insertdata.pl,1.1.1.1,1.2
- Next by thread:
[Koha-devel] CVS: koha insertdata.pl,1.2,1.3
- Index(es):