-print <<printend
-<BLOCKQUOTE>
-
-<FONT SIZE=6><em>Add New Junior Member </em></font><br>
-<form action=/cgi-bin/koha/newjmember.pl method=post>
-<!--<input type=hidden name=joining value="">
-<input type=hidden name=expiry value="">
-<input type=hidden name=type value="borrowers">-->
-<input type=hidden name=borrowernumber value=$member>
-<input type=hidden name=updtype value=I>
-<input type=hidden name=area value="$data->{'area'}">
-<input type=hidden name=city value="$data->{'city'}">
-<input type=hidden name=street value="$data->{'address'}">
-<input type=hidden name=streetaddress value="$data->{'streetaddress'}">
-<input type=hidden name=streetcity value="$data->{'streetcity'}">
-<input type=hidden name=phone value="$data->{'phone'}">
-<input type=hidden name=phoneday value="$data->{'phoneday'}">
-
-<input type=hidden name=faxnumber value="$data->{'faxnumber'}">
-<input type=hidden name=emailaddress value="$data->{'emailaddress'}">
-<input type=hidden name=contactname value="$data->{'contactname'}">
-<input type=hidden name=altphone value"$data->{'altphone'}">
-<table border=0 cellspacing=0 cellpadding=5 >
-
-
-<tr valign=top><td COLSPAN=1><input type=reset value="Clear all Fields"></td></tr>
-<tr valign=top bgcolor="99cc33" ><td COLSPAN=5 background="/images/background-mem.gif">
-<tr valign=top bgcolor="99cc33" ><td COLSPAN=5 background="/images/background-mem.gif">
-<B>PARENT OR GUARDIAN </b></td></tr>
-<tr valign=top bgcolor=white>
-<td><SELECT NAME="title" SIZE="1">
-<OPTION value=" ">No Title
-<OPTION value=Miss
-printend
-;
-if ($data->{'title'} eq 'Miss'){
- print " Selected";
-}
-print ">Miss
-<OPTION value=Mrs";
-if ($data->{'title'} eq 'Mrs'){
- print " Selected";
-}
-print ">Mrs
-<OPTION value=Ms";
-if ($data->{'title'} eq 'Ms'){
- print " Selected";
-}
-print ">Ms
-<OPTION value=Mr";
-if ($data->{'title'} eq 'Mr'){
- print " Selected";
-}
-print ">Mr
-<OPTION value=Dr";
-if ($data->{'title'} eq 'Dr'){
- print " Selected";
-}
-print ">Dr
-<OPTION value=Sir";
-if ($data->{'title'} eq 'Sir'){
- print " Selected";
-}
-print <<printend
- >Sir
-</SELECT>
-</td>