
function checkFields(form)
{   
  fld = form.elements["cl_name"] ; 
  result = nameChk(fld,0,0, 'Name') ;
  if (!result)
  {
    fld.focus() ;
    return result ;
  }
    
  fld = form.elements["cl_email"] ; 
  result = emailCheck(fld.value, 'E-mail') ;
  if (!result)
  {
    fld.focus() ;
    return result ;
}

  
  fld = form.elements["cl_address"] ; 
  result = anyStr(fld,1,60, 'Address') ;
  if (!result)
  {
    fld.focus() ;
    return result ;
  }
}


var lay_name,imgname,imgno;
var msg = "This page requires version 4 or later of\n Netscape Navigator or Internet Explorer"
var dyn = (document.layers || document.all) ? true : alert(msg);
var nav = (document.layers) ? true : false;
var iex = (document.all) ? true : false;

var colors,date1=new Date();

if (screen.colordepth=="16"|| screen.colordepth=="24")
colors=screen.colordepth+"-bit colors"
else 
colors=screen.colordepth+" colors"

function day_is(dayint)
{
var day;
switch(dayint)
{ 
case 0:
day="Sunday";
break;
case 1:
day="Monday";
break;
case 2:
day="Tuesday";
break;
case 3:
day="Wednesday";
break;
case 4:
day="Thrusday";
break;
case 5:
day="Friday";
break;
case 6:
day="Saturday";
break;
default:
day="invalid day";
}
return day;
}

/* 1.1.2: Fixed a bug where trailing . in e-mail address was passing
            (the bug is actually in the weak regexp engine of the browser; I
            simplified the regexps to make it work).
   1.1.1: Removed restriction that countries must be preceded by a domain,
            so abc@host.uk is now legal.  However, there's still the 
            restriction that an address must end in a two or three letter
            word.
     1.1: Rewrote most of the function to conform more closely to RFC 822.
     1.0: Original  */

<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->

<!-- Begin
function emailCheck (emailStr)
{
/* The following pattern is used to check if the entered e-mail address
   fits the user@domain format.  It also is used to separate the username
   from the domain. */
var emailPat=/^(.+)@(.+)$/
/* The following string represents the pattern for matching all special
   characters.  We don't want to allow special characters in the address. 
   These characters include ( ) < > @ , ; : \ " . [ ]    */
var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]"
/* The following string represents the range of characters allowed in a 
   username or domainname.  It really states which chars aren't allowed. */
var validChars="\[^\\s" + specialChars + "\]"
/* The following pattern applies if the "user" is a quoted string (in
   which case, there are no rules about which characters are allowed
   and which aren't; anything goes).  E.g. "jiminy cricket"@disney.com
   is a legal e-mail address. */
var quotedUser="(\"[^\"]*\")"
/* The following pattern applies for domains that are IP addresses,
   rather than symbolic names.  E.g. joe@[123.124.233.4] is a legal
   e-mail address. NOTE: The square brackets are required. */
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
/* The following string represents an atom (basically a series of
   non-special characters.) */
var atom=validChars + '+'
/* The following string represents one word in the typical username.
   For example, in john.doe@somewhere.com, john and doe are words.
   Basically, a word is either an atom or quoted string. */
var word="(" + atom + "|" + quotedUser + ")"
// The following pattern describes the structure of the user
var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
/* The following pattern describes the structure of a normal symbolic
   domain, as opposed to ipDomainPat, shown above. */
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")


/* Finally, let's start trying to figure out if the supplied address is
   valid. */

/* Begin with the coarse pattern to simply break up user@domain into
   different pieces that are easy to analyze. */
var matchArray=emailStr.match(emailPat)
if (matchArray==null) {
  /* Too many/few @'s or something; basically, this address doesn't
     even fit the general mould of a valid e-mail address. */
	alert("Email address seems incorrect (check @ and .'s)")
	return false
}
var user=matchArray[1]
var domain=matchArray[2]

// See if "user" is valid 
if (user.match(userPat)==null) {
    // user is not valid
    alert("The username doesn't seem to be valid.")
    return false
}

/* if the e-mail address is at an IP address (as opposed to a symbolic
   host name) make sure the IP address is valid. */
var IPArray=domain.match(ipDomainPat)
if (IPArray!=null) {
    // this is an IP address
	  for (var i=1;i<=4;i++) {
	    if (IPArray[i]>255) {
	        alert("Destination IP address is invalid!")
		return false
	    }
    }
    return true
}

// Domain is symbolic name
var domainArray=domain.match(domainPat)
if (domainArray==null) {
	alert("The domain name doesn't seem to be valid.")
    return false
}

/* domain name seems valid, but now make sure that it ends in a
   three-letter word (like com, edu, gov) or a two-letter word,
   representing country (uk, nl), and that there's a hostname preceding 
   the domain or country. */

/* Now we need to break up the domain to get a count of how many atoms
   it consists of. */
var atomPat=new RegExp(atom,"g")
var domArr=domain.match(atomPat)
var len=domArr.length
if (domArr[domArr.length-1].length<2 || 
    domArr[domArr.length-1].length>3) {
   // the address must end in a two letter or three letter word.
   alert("The address must end in a three-letter domain, or two letter country.")
   return false
}

// Make sure there's a host name preceding the domain.
if (len<2) {
   var errStr="This address is missing a hostname!"
   alert(errStr)
   return false
}

// If we've gotten this far, everything's valid!
return true;
}

function checkVal(fld, mbr)
{
  if (!mbr)
    fld.focus() ;
}

function anyStr(fld, minlength, maxlength, field)
{
  str = fld.value ; 
  anyChars = false ;
  //field = fld.name.toUpperCase() ;

  if (str.length == 0)
  {
    alert(field + " can not be all blank")
    return false ;
  }
    
  for (var i=0; i<str.length; i++) 
  {
    subStr = str.substring(i, i+1) ;  
    if (subStr != ' ')
      anyChars = true ;
  }

  if (!anyChars)
  {
    alert(field + " can not be all spaces") ;
    return false ;
  }

  if (minlength > 0 || maxlength > 0)
    if(!chkLength(fld, minlength, maxlength))
	  return false ;
  
  return true ;
}

function isZip(fld,field)
{
  str = fld.value ; 
  anyChars = false ;
  //field = fld.name.toUpperCase();

 // if (str.length == 0)
 // {
 //   alert(field + " must have format 99999 or 99999-9999") ;
 //   return false ;
 // }

  
  if (str.length < 5)
  {

    alert(field + " must have format 99999 or 99999-9999") ;
    return false ;
  }

  for (var i=0; i<str.length; i++) 
  {
	subStr = str.substring(i, i+1) ;  
if(subStr < 0 || subStr > 9||(subStr >= 'A' && subStr <= 'Z') || (subStr >= 'a' && subStr <= 'z'))
  {
	alert(field + " must have format 99999 or 99999-9999") ;
	return false ;
  }	  
    if (i <= 55)
    {
	  if (subStr < 0 || subStr > 9)
      {
        alert(field + " must have format 99999 or 99999-9999") ;
        return false ;
      }	  
 }
// else
// {
//  if (i == 5)
//  {
//	    if (subStr != '-')
//      {
//          alert(field + " must have format 99999-9999") ;
//         return false ;
//        }
//	  }
//	  if (i > 5)
//	  {
//	    if (subStr < 0 || subStr > 9)
//        {
//          alert(field + " must have format 99999-9999") ;
//          return false ;
//        }
//	  }
//	}
  }

  return true ;
}

function isPhone(fld,field)
{
  str = fld.value ; 
  anyChars = false ;
  //field = fld.name.toUpperCase() ;

  if (str.length == 0)
  {
    alert(field + " must have format 999-999-9999") ;
    return false ;
  }

  if (str.length != 12)
  {
    alert(field + " must have format 999-999-9999") ;
    return false ;
  }

  for (var i=0; i<12; i++) 
  {
	subStr = str.substring(i, i+1) ;  
    if ((i == 3) || (i == 7))
    {
	  if (subStr != '-')
      {
        alert(field + " must have format 999-999-9999") ;
        return false ;
      }	  
    }
    else
    {
	  if ((subStr < '0') || (subStr > '9'))
      {
        alert(field + " must have format 999-999-9999") ;
        return false ;
      }
	}
  }

  return true ;
}

//************************* if phone no. is not req but if typed needs to be checked for formatting *************
function isPhoneNo(fld,field)
{
  str = fld.value ; 
  anyChars = false ;
  //field = fld.name.toUpperCase() ;

 if (!str.length == 0)
 {
  if (str.length != 12)
  {
    alert(field + " must have format 999-999-9999") ;
    return false ;
  }

  for (var i=0; i<12; i++) 
  {
	subStr = str.substring(i, i+1) ;  
    if ((i == 3) || (i == 7))
    {
	  if (subStr != '-')
      {
        alert(field + " must have format 999-999-9999") ;
        return false ;
      }	  
    }
    else
    {
	  if ((subStr < '0') || (subStr > '9'))
      {
        alert(field + " must have format 999-999-9999") ;
        return false ;
      }
	}
  }
	}
  return true ;
  
}
  

//************************************pankaj's modification********************************

function isDigit(fld, minlength, maxlength, minvalue, maxvalue,field)
{ 
  str = fld.value ;
  //field = fld.name.toUpperCase() ;
  if (str.length == 0)
  {
    alert(field + " : not a number")
    return false ;
  }

  if ((str == parseDbl(str) && str >= 0) == false)
  {
    alert(field + " : Not a valid number") ;
    return false ;
  }
  
  if (minlength > 0 || maxlength > 0)
  if (chkLength(fld, minlength, maxlength) == false)
  {
    if (minlength == 0)  
      alert("Should be maximum " + maxlength + " digits") ;
    else if (maxlength == 0)
      alert("Should be minimum " + minlength + " digits") ;
    else
      alert("Should be minimum " + minlength + " and maximum " + maxlength + " digits") ;
    return false ;
  }
  
  if (minvalue != 0 || maxvalue != 0)
  if (chkValue(str, minvalue, maxvalue) == false)
  {
    alert("Should be within the range " + minvalue + " - " + maxvalue) ;
    return false ;
  }
  
  return true ;
}

function nameChk(fld, minlength, maxlength, field)
{
  str = fld.value ; 
  anyChars = false ;
  //field = fld.name.toUpperCase() ;

  if (str.length == 0)
  {
    alert(field + " can not be all blank")
    return false ;
  }
    
  for (var i=0; i<str.length; i++) 
  {
    subStr = str.substring(i, i+1) ;  
    if (subStr != ' ')
      anyChars = true ;
  }

  if (!anyChars)
  {
    alert(field + " can not be all spaces") ;
    return false ;
  }

  for (var i=0; i<str.length; i++) 
  {
    subStr = str.substring(i, i+1);
    if (i == 0)
    {
	  if (subStr == ' ')
      {
	    alert(field + " must start with an alphabet please...") ;
        return false ;
      }
    }

    if ((subStr >= 'A' && subStr <= 'Z') || (subStr >= 'a' && subStr <= 'z') || (subStr == ' '))
    {}
    else
    {
      alert(field + " can have characters A-Z, a-z or space") ;
      return false ;
    }
  }

  if (minlength > 0 || maxlength > 0)
    if(!chkLength(fld, minlength, maxlength))
	  return false ;
  
  return true ;
}

function strChk(fld, minlength, maxlength, field)
{
  str   = fld.value ; 
 // field = fld.name.toUpperCase() ;

  if (str.length == 0)
  {
    alert(field + " can not be blank")
    return false ;
  }

  anySpaces = false ;
    
  for (var i=0; i<str.length; i++) 
  {
    subStr = str.substring(i, i+1) ;  
    if (subStr == ' ')
      anySpaces = true ;
  }

  if (anySpaces)
  {
    alert(field + " can not have spaces") ;
    return false ;
  }

  for (var i=0; i<str.length; i++) 
  {
    subStr = str.substring(i, i+1);
    if (i == 0)
    {
	  if (subStr == ' ')
      {
	    alert(field + " must start with an alphabet please...") ;
        return false ;
      }
    }

    if ((subStr >= 'A' && subStr <= 'Z') || (subStr >= 'a' && subStr <= 'z') || (subStr == ' '))
    {}
    else
    {
      alert(field + " can have characters A-Z, a-z or space") ;
      return false ;
    }
  }

  if (minlength > 0 || maxlength > 0)
    if(!chkLength(fld, minlength, maxlength))
	  return false ;
  
  return true ;
}

function idChk(fld, minlength, maxlength, field)
{
  str = fld.value ; 
//  field = fld.name.toUpperCase() ;

  if (str.length == 0)
  {
    alert(field + " can not be blank")
    return false ;
  }

  anySpaces = false ;
    
  for (var i=0; i<str.length; i++) 
  {
    subStr = str.substring(i, i+1) ;  
    if (subStr == ' ')
      anySpaces = true ;
  }

  if (anySpaces)
  {
    alert(field + " can not have spaces") ;
    return false ;
  }

  for (var i=0; i<str.length; i++) 
  {
    subStr = str.substring(i, i+1);

    if ((subStr >= 'A' && subStr <= 'Z') || (subStr >= 'a' && subStr <= 'z') || (subStr == '_') || (subStr == '-'))
    {}
    else
    {
      alert(field + " can have characters A-Z, a-z, - or an _") ;
      return false ;
    }
  }

  if (minlength > 0 || maxlength > 0)
    if(!chkLength(fld, minlength, maxlength))
	  return false ;

  return true ;
}

function passwordChk(fld, minlength, maxlength, field)
{
  str = fld.value ; 
 // field = fld.name.toUpperCase() ;

  if (str.length == 0)
  {
    alert(field + " can not be blank")
    return false ;
  }

  anySpaces = false ;
    
  for (var i=0; i<str.length; i++) 
  {
    subStr = str.substring(i, i+1) ;  
    if (subStr == ' ' || subStr=="'")
      anySpaces = true ;
  }

  if (anySpaces)
  {
    alert(field + " can not have spaces") ;
    return false ;
  }

  if (minlength > 0 || maxlength > 0)
    if(!chkLength(fld, minlength, maxlength))
	  return false ;

  return true ;
}

function chkLength(fld, minlength, maxlength, field)
{
  str       = fld.value ;
//  field     = fld.name.toUpperCase() ;
  maxstatus = true ;
  minstatus = true ;

  if (maxlength > 0)
    if (str.length > maxlength)
      maxstatus = false ;

  if (minlength > 0)
    if (str.length < minlength)
      minstatus = false ;
      
  if (!maxstatus || !minstatus)
  {
    if (minlength == 0)  
      alert(field + " should be maximum " + maxlength + " characters") ;
    else if (maxlength == 0)
      alert(field + " should be minimum " + minlength + " characters") ;
    else
      alert(field + " should be minimum " + minlength + " and maximum " + maxlength + " characters") ;
    return false ;    
  } 
  else
    return true ;
}

function chkValue(str, minvalue, maxvalue, field)
{
  if (parseInt(str) < minvalue)
      return false ;
  
  if (parseInt(str) > maxvalue)
      return false ;
      
  return true ;
}

function showStatus(message)
{
  status = message ;
}  

