- print <<printend
- <script>
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- function isNotNull(f,noalert) {
- if (f.value.length ==0) {
- return false;
- }
- return true;
- }
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- function toUC(f) {
- var x=f.value.toUpperCase();
- f.value=x;
- return true;
- }
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- function isNum(v,maybenull) {
- var n = new Number(v.value);
- if (isNaN(n)) {
- return false;
- }
- if (maybenull==0 && v.value=='') {
- return false;
- }
- return true;
- }
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- function isDate(f) {
- var t = Date.parse(f.value);
- if (isNaN(t)) {
- return false;
- }
- }
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- function Check(f) {
- var ok=1;
- var _alertString="";
- var alertString2;
- if (f.searchfield.value.length==0) {
- _alertString += "- site name missing\\n";
- }
- if (f.host.value.length==0) {
- _alertString += "- host missing\\n";
- }
- if (f.port.value.length==0) {
- _alertString += "- port missing\\n";
- }
- if (f.db.value.length==0) {
- _alertString += "- database missing\\n";
- }
- if (isNaN(f.port.value)) {
- _alertString += "- port must be a number\\n";
- }
- if (isNaN(f.rank.value)) {
- _alertString += "- rank must be a number\\n";
- }
- if (isNaN(f.checked.value) || f.checked.value<0 || f.checked.value>1) {
- _alertString += "- checked must be 0 or 1\\n";
- }
- if (_alertString.length==0) {
- document.Aform.submit();
- } else {
- alertString2 = "Form not submitted because of the following problem(s)\\n";
- alertString2 += "------------------------------------------------------------------------------------\\n\\n";
- alertString2 += _alertString;
- alert(alertString2);
- }
- }
- </SCRIPT>
-printend
-;#/
- if ($searchfield) {
- print "<h1>Modify Z39.50 Server</h1>";
- } else {
- print "<h1>Add Z39.50 Server</h1>";
- }
- print "<form action='$script_name' name=Aform method=post>";
- print "<input type=hidden name=op value='add_validate'>";
- print "<table>";
- if ($searchfield) {
- print "<tr><td>Z39.50 Server</td><td><input type=hidden name=searchfield value=\"$searchfield\">$searchfield</td></tr>\n";
- } else {
- print "<tr><td>Z39.50 Server</td><td><input type=text name=searchfield size=40></td></tr>\n";
- }
- print "<tr><td>Hostname</td><td><input type=text name=host size=30 value='$data->{'host'}'></td></tr>\n";
- print "<tr><td>Port</td><td><input type=text name=port size=5 value='$data->{'port'}' onBlur=isNum(this)></td></tr>\n";
- print "<tr><td>Database</td><td><input type=text name=db value='$data->{'db'}'></td></tr>\n";
- print "<tr><td>Userid</td><td><input type=text name=userid value='$data->{'userid'}'></td></tr>\n";
- print "<tr><td>Password</td><td><input type=text name=password value='$data->{'password'}'></td></tr>\n";
- print "<tr><td>Checked (searched by default)</td><td><input type=text size=1 name=checked value='$data->{'checked'}' onBlur=isNum(this)></td></tr>";
- print "<tr><td>Rank (display order)</td><td><input type=text name=rank size=4 value='$data->{'rank'}' onBlur=isNum(this)></td></tr>";
- print "<tr><td> </td><td><INPUT type=button value='OK' onClick='Check(this.form)'></td></tr>";
- print "</table>";
- print "</form>";
-;