// -----------------------------------------------------------------------------
// Validation and button protection when uploading a file in the dbf sup directory!
//
var DBF_submitted = 0;
function DBF_UploadValidation(form) {
if (DBF_submitted) {
   alert("Form already submitted, please be patient");
   return false;}
 
// field validations go here
 
if (!DBF_submitted) {
   form.go.disabled=true;
   submitted = 1;
   form.submit();}
} 
//
// Make sure a date in a form is legal
// .. uses iDay, iMonth and iYear
function LegalDate(Form)
{
var i,iDay;
iDay = Form.iDay.value;

switch (Form.iMonth.value) {
	case "2":	i = 28; 
				if (Form.iYear.value == parseInt(Form.iYear.value/4,10)*4) {
					i++;
				}
				if (iDay > i) { 
					iDay = i;
				}	
				break;

	case "4":
	case "6":
	case "9":
	case "11":	 if (iDay > 30) iDay = 30;	break;
	default:		break;
	}
	Form.iDay.value = iDay;
};
function ValidEmailAddress(str){
	var filter=/^(\w+(?:\.\w+)*)@((?:\w+\.)*\w[\w-]{0,66})\.([a-z]{2,6}(?:\.[a-z]{2})?)$/i
	if (filter.test(str)){
	return (true)
	}
return (false)
}



// -----------------------------------------------------------------------------
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -----------------------------------------------------------------------------
function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}
// -----------------------------------------------------------------------------
function MM_showHideLayers() { //v6.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}
// -----------------------------------------------------------------------------
function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}