From d293d820c16d3b60bc828eb6d7a57029d04d6ecd Mon Sep 17 00:00:00 2001
From: plugz <plugz>
Date: Tue, 1 Jul 2003 10:31:30 +0000
Subject: [PATCH] Itemtypes, branch, and categories are displayed using their
 respective description to ease reading.

---
 moremember.pl | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/moremember.pl b/moremember.pl
index b838559e3b..b0da2bf56d 100755
--- a/moremember.pl
+++ b/moremember.pl
@@ -117,6 +117,12 @@ if ($data->{'categorycode'} ne 'C'){
 my %bor;
 $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
 # for (my $i;$i<$numaccts;$i++)
@@ -172,7 +178,7 @@ for (my $i=0;$i<$count;$i++){
 	# return the correct item type either (or a properly-formatted
 	# charge, for that matter).
 	my ($charge,$itemtype)=calc_charges(undef,$dbh,$issue->[$i]{'itemnumber'},$bornum);
-	$row{'itemtype'}=$itemtype;
+	$row{'itemtype'}=&ItemType($itemtype);
 	$row{'charge'}=$charge;
 
 	#check item is not reserved
-- 
2.39.5