3 #script to set up screen for modification of borrower details
4 #written 20/12/99 by chris@katipo.co.nz
7 # Copyright 2000-2002 Katipo Communications
9 # This file is part of Koha.
11 # Koha is free software; you can redistribute it and/or modify it under the
12 # terms of the GNU General Public License as published by the Free Software
13 # Foundation; either version 2 of the License, or (at your option) any later
16 # Koha is distributed in the hope that it will be useful, but WITHOUT ANY
17 # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
18 # A PARTICULAR PURPOSE. See the GNU General Public License for more details.
20 # You should have received a copy of the GNU General Public License along with
21 # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
22 # Suite 330, Boston, MA 02111-1307 USA
31 my $member=$input->param('bornum');
33 $member=NewBorrowerNumber();
35 my $type=$input->param('type');
39 print startmenu('member');
40 my $data=borrdata('',$member);
44 <FONT SIZE=6><em>Add New Junior Member </em></font><br>
45 <form action=/cgi-bin/koha/newjmember.pl method=post>
46 <!--<input type=hidden name=joining value="">
47 <input type=hidden name=expiry value="">
48 <input type=hidden name=type value="borrowers">-->
49 <input type=hidden name=borrowernumber value=$member>
50 <input type=hidden name=updtype value=I>
51 <input type=hidden name=area value="$data->{'area'}">
52 <input type=hidden name=city value="$data->{'city'}">
53 <input type=hidden name=street value="$data->{'address'}">
54 <input type=hidden name=streetaddress value="$data->{'streetaddress'}">
55 <input type=hidden name=streetcity value="$data->{'streetcity'}">
56 <input type=hidden name=phone value="$data->{'phone'}">
57 <input type=hidden name=phoneday value="$data->{'phoneday'}">
59 <input type=hidden name=faxnumber value="$data->{'faxnumber'}">
60 <input type=hidden name=emailaddress value="$data->{'emailaddress'}">
61 <input type=hidden name=contactname value="$data->{'contactname'}">
62 <input type=hidden name=altphone value"$data->{'altphone'}">
63 <table border=0 cellspacing=0 cellpadding=5 >
66 <tr valign=top><td COLSPAN=1><input type=reset value="Clear all Fields"></td></tr>
67 <tr valign=top bgcolor="99cc33" ><td COLSPAN=5 background="/images/background-mem.gif">
68 <tr valign=top bgcolor="99cc33" ><td COLSPAN=5 background="/images/background-mem.gif">
69 <B>PARENT OR GUARDIAN </b></td></tr>
70 <tr valign=top bgcolor=white>
71 <td><SELECT NAME="title" SIZE="1">
72 <OPTION value=" ">No Title
76 if ($data->{'title'} eq 'Miss'){
81 if ($data->{'title'} eq 'Mrs'){
86 if ($data->{'title'} eq 'Ms'){
91 if ($data->{'title'} eq 'Mr'){
96 if ($data->{'title'} eq 'Dr'){
101 if ($data->{'title'} eq 'Sir'){
110 <td><input type=text name=firstname_guardian size=20 value="$data->{'firstname'}"></td>
111 <td colspan=2><input type=text name=surname_guardian size=20 value="$data->{'surname'}"></td>
112 <td><input type=text name=guardian_number size=20 value="$data->{'cardnumber'}"></td></tr>
113 <tr valign=top bgcolor=white>
114 <td><FONT SIZE=2>Title</FONT></td>
116 <td><FONT SIZE=2>Given Names*</FONT></td>
117 <td colspan=2><FONT SIZE=2>Surname*</FONT></td>
118 <td><FONT SIZE=2>Membership No.</FONT></td>
121 <tr><td> </TD></TR>
125 my $cmember1=NewBorrowerNumber();
126 for (my $i=0;$i<3;$i++){
127 my $cmember=$cmember1+$i;
130 <tr valign=top bgcolor="99cc33" ><td COLSPAN=5 background="/images/background-mem.gif">
131 <B>CHILD $count </b></td></TR>
134 <TR><td COLSPAN=4 ALIGN=RIGHT ><font size=3 face='arial,helvetica'>
135 <STRONG>Member# $cmember, Card Number*</STRONG> </TD><TD><input type=text name=cardnumber_child_$i size=20 value=""><br>
136 <input type=hidden name=bornumber_child_$i value=$cmember>
141 <td><input type=text name=firstname_child_$i size=20 value=""></td>
142 <td><input type=text name=surname_child_$i size=20 value=""></td>
144 <input type=text name=dateofbirth_child_$i size=10 value="">
146 <input type="radio" name="sex_child_$i" value="F">F
147 <input type="radio" name="sex_child_$i" value="M">M* </td>
149 <input type=text name=school_child_$i size=20 value="">
152 <tr valign=top bgcolor=white>
153 <td><FONT SIZE=2>Given Names*</FONT></td>
154 <td><FONT SIZE=2>Surname*</FONT></td>
156 <td><FONT SIZE=2>Date of Birth<BR> (dd/mm/yy)*</FONT></td>
157 <td><FONT SIZE=2> </FONT></td>
158 <td><FONT SIZE=2>School</FONT></td></tr>
163 <tr valign=top bgcolor=white>
165 <td COLSPAN=5><textarea name=altnotes_child_$i wrap=physical cols=70 rows=3></textarea></td></tr><tr valign=top bgcolor=white>
167 <td><FONT SIZE=2>Notes</font></td>
169 <tr><td> </TD></TR>
174 <tr valign=top bgcolor=white><td COLSPAN=5 align=right >
175 <input type=image src="/images/save-changes.gif" WIDTH=188 HEIGHT=44 ALT="Add New Member" border=0 ></td>
183 print endmenu('member');