Bug fixes
This commit is contained in:
parent
0a377febe0
commit
574e8e7b40
4 changed files with 11 additions and 14 deletions
|
@ -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>
|
||||
|
|
|
@ -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>
|
||||
|
|
|
@ -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" >
|
||||
|
|
10
newmember.pl
10
newmember.pl
|
@ -149,12 +149,18 @@ if ($ok == 0) {
|
|||
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'},
|
||||
|
|
Loading…
Reference in a new issue