Bug fixes

liblime · Apr 13, 2003 · 574e8e7 · 574e8e7
1 parent 0a377fe
commit 574e8e7
Show file tree

Hide file tree

Showing 4 changed files with 11 additions and 14 deletions.
diff --git a/koha-tmpl/intranet-tmpl/default/en/members/memberentry.tmpl b/koha-tmpl/intranet-tmpl/default/en/members/memberentry.tmpl
@@ -89,7 +89,7 @@
 	<tr valign=top bgcolor=white>
 		<td  COLSPAN=3><FONT SIZE=2><b>Postal Address*</b></FONT></td>
 		<td><FONT SIZE=2><b>Town*</b></FONT></td>
-		<td><FONT SIZE=2>Area</FONT></td>
+		<td><FONT SIZE=2>Joining Branch</FONT></td>
 	</tr>
 	<tr valign=top bgcolor=white>
 		<td COLSPAN=3><input type=text name=address size=40 value="<TMPL_VAR NAME=address>"></td>

diff --git a/koha-tmpl/intranet-tmpl/default/en/members/moremember.tmpl b/koha-tmpl/intranet-tmpl/default/en/members/moremember.tmpl
@@ -32,8 +32,7 @@
 		E-mail: <a href="mailto:<TMPL_VAR NAME="emailaddress">"><TMPL_VAR NAME="emailaddress"></a><br>
 		Text messaging: <TMPL_VAR NAME="textmessaging"><p>
 		Membership Number: <TMPL_VAR NAME="borrowernumber"><BR>
-		Membership: <TMPL_VAR NAME="categorycode"><BR>
-		Area: <TMPL_VAR NAME="area"><BR>
+		Membership Category: <TMPL_VAR NAME="categorycode"><BR>
 		Fee:$30/year, Paid<BR>
 		Joined: <TMPL_VAR NAME="dateenrolled">,  Expires: <TMPL_VAR NAME="expiry"><BR>
 		Joining Branch: <TMPL_VAR NAME="branchcode"><P>

diff --git a/koha-tmpl/intranet-tmpl/default/en/newmember.tmpl b/koha-tmpl/intranet-tmpl/default/en/newmember.tmpl
@@ -42,15 +42,7 @@
 				<B>Membership Category</B>
 			</td>
 			<td>
-				<TMPL_VAR Name="membercat">
-			</td>
-		</tr>
-		<tr valign=top bgcolor="white" >
-			<td>
-				<B>Area </B>
-			</td>
-			<td>
-				<TMPL_VAR Name="area">
+				<TMPL_VAR Name="memcat">
 			</td>
 		</tr>
 		<tr valign=top bgcolor="white" >

diff --git a/newmember.pl b/newmember.pl
@@ -149,12 +149,18 @@
 	push(@inputsloop, \%line);
     }
 
+    #Get the fee
+    my $dbh = C4::Context->dbh;
+    my $sth = $dbh->prepare("SELECT enrolmentfee FROM categories WHERE categorycode = ?");
+    $sth->execute($data{'categorycode'});
+    my ($fee) = $sth->fetchrow;
+    $sth->finish;
+
     $template->param(name => $name,
 		     bornum => $data{'borrowernumber'},
 		     cardnum => $data{'cardnumber'},
 		     memcat => $data{'categorycode'},
-		     area => $data{'area'},
-		     fee => $data{'fee'},
+		     fee => $fee,
 		     joindate => format_date($data{'joining'}),
 		     expdate => format_date($data{'expiry'}),
 		     branchcode => $data{'branchcode'},