[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha moremember.pl,1.32,1.33
From: |
Jerome Vizcaino |
Subject: |
[Koha-cvs] CVS: koha moremember.pl,1.32,1.33 |
Date: |
Tue, 01 Jul 2003 03:31:32 -0700 |
Update of /cvsroot/koha/koha
In directory sc8-pr-cvs1:/tmp/cvs-serv17394
Modified Files:
moremember.pl
Log Message:
Itemtypes, branch, and categories are displayed using their respective
description to ease reading.
Index: moremember.pl
===================================================================
RCS file: /cvsroot/koha/koha/moremember.pl,v
retrieving revision 1.32
retrieving revision 1.33
diff -C2 -r1.32 -r1.33
*** moremember.pl 19 May 2003 13:59:12 -0000 1.32
--- moremember.pl 1 Jul 2003 10:31:30 -0000 1.33
***************
*** 118,121 ****
--- 118,127 ----
$bor{'borrowernumber'}=$bornum;
+ # Converts the branchcode to the branch name
+ $data->{'branchcode'} = &getbranchname($data->{'branchcode'});
+
+ # Converts the categorycode to the description
+ $data->{'categorycode'} = &getborrowercategory($data->{'categorycode'});
+
# FIXME
# it looks like $numaccts is a temp variable and that the
***************
*** 173,177 ****
# charge, for that matter).
my
($charge,$itemtype)=calc_charges(undef,$dbh,$issue->[$i]{'itemnumber'},$bornum);
! $row{'itemtype'}=$itemtype;
$row{'charge'}=$charge;
--- 179,183 ----
# charge, for that matter).
my
($charge,$itemtype)=calc_charges(undef,$dbh,$issue->[$i]{'itemnumber'},$bornum);
! $row{'itemtype'}=&ItemType($itemtype);
$row{'charge'}=$charge;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha moremember.pl,1.32,1.33,
Jerome Vizcaino <=