function decision(message, url){if(confirm(message)) location.href = url;}var emptyString=/^\s*$/;var global_valfield;function trim(str){return str.replace(/^\s+|\s+$/g,'');} function setFocusDelayed() {global_valfield.focus();} function setfocus(valfield) {global_valfield=valfield;setTimeout('setFocusDelayed()',100);} function field_error(fld,cssclass) {var elem=document.getElementById(fld);elem.className=cssclass;} var proceed=2;function commonCheck(valfield,infofield,required) {if(!document.getElementById) return true;var elem=document.getElementById(infofield);if(emptyString.test(valfield.value)){if(required){field_error(infofield,"error");setfocus(valfield);return false;} else{field_error(infofield,"textfield");return true;}} return proceed;} function validateName(valfield,infofield,required) {var stat=commonCheck(valfield,infofield,required);if(stat!=proceed)return stat;field_error(infofield,"textfield");return true;} function validateEmail(valfield,infofield,required) {var stat=commonCheck(valfield,infofield,required);if(stat!=proceed)return stat;var tfld=trim(valfield.value);var email=/^[^@]+@[^@.]+\.[^@]*\w\w$/;if(!email.test(tfld)){field_error(infofield,"error");setfocus(valfield);return false;} var email2=/^[A-Za-z][\w.-]+@\w[\w.-]+\.[\w.-]*[A-Za-z][A-Za-z]$/;if(!email2.test(tfld)) field_error(infofield,"error");else field_error(infofield,"textfield");return true;} function validatePhone(valfield,infofield,required) {var stat=commonCheck(valfield,infofield,required);if(stat!=proceed)return stat;var tfld=trim(valfield.value);var telnr=/^\+?[0-9 ()-]+[0-9]$/;if(!telnr.test(tfld)){field_error(infofield,"error");setfocus(valfield);return false;} var numdigits=0;for(var j=0;j<tfld.length;j++) if(tfld.charAt(j)>='0'&&tfld.charAt(j)<='9')numdigits++;if((numdigits>14)||(numdigits<10)) field_error(infofield,"error");else{field_error(infofield,"textfield");} return true;} function validateComments(valfield,infofield,required) {if(required) {if(valfield.value=='') {field_error(infofield,"comment_box_error");return false;} else {field_error(infofield,"comment_box");return true;}} else {field_error(infofield,"comment_box");return true;}} function validateYear(valfield,infofield,required) {var stat=commonCheck(valfield,infofield,required);if(stat!=proceed)return stat;var tfld=trim(valfield.value);var telnr=/^[0-9]+[0-9]$/;if(!telnr.test(tfld)){field_error(infofield,"error");setfocus(valfield);return false;} var numdigits=0;for(var j=0;j<tfld.length;j++) if(tfld.charAt(j)>='0'&&tfld.charAt(j)<='9')numdigits++;if((numdigits>4)||(numdigits<4)) field_error(infofield,"error");else{field_error(infofield,"textfield");} return true;} function validateNumber(valfield,infofield,required) {var stat=commonCheck(valfield,infofield,required);if(stat!=proceed)return stat;var tfld=trim(valfield.value);var telnr=/^[0-9]$/;if(!telnr.test(tfld)){field_error(infofield,"error");setfocus(valfield);return false;} return true;} function validateWebsite(valfield,infofield,required) {var stat=commonCheck(valfield,infofield,required);if(stat!=proceed)return stat;var tfld=trim(valfield.value);var telnr=/^(((ht|f)tp(s?))\:\/\/)([0-9a-zA-Z\-]+\.)+[a-zA-Z]{2,6}(\:[0-9]+)?(\/\S*)?$/;if(!telnr.test(tfld)){field_error(infofield,"error");setfocus(valfield);return false;} field_error(infofield,"textfield");return true;}
