<!--
// Sri Sathya System
// http://www.sathsys.com
// No part of this snippet should be used without written permission of Sri Sathya System.
// For queries write to jSnip@sathsys.com

function inCharBox(tx, box) {
	var txLen = tx.length;
	var i;
	for (i=0; i < txLen; i++) {
	  var c = tx.charAt(i);
	  if (box.indexOf(c) == -1) {
		return false;
	  }
	}
	return true;
}

// display error and change focus
function dispErr(fname, ermsg){
	alert(ermsg);
	document.den[fname].focus();	
}

// check input text
function chkText(fname, inMsg) {
	var rawText = document.den[fname].value;
	// check characters & ,.occurances
	if ((!inCharBox(rawText,"abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ., ")) || (rawText.indexOf(',')==0) || (rawText.indexOf(' ')==0)){
		dispErr(fname, inMsg);
		return false;
	}
	return true;
}

// check email
function chkEmail(fname, inMsg) {
	var rawEmail = document.den[fname].value;
	// check @
	if (rawEmail.indexOf("@") == -1) {
		dispErr(fname, inMsg);
		return false;
	}
	var atC
	atC = 0;
	for (var i=0; i < rawEmail.length; i++) {
		if (rawEmail.charAt(i) == "@") atC++;
	}
	if (atC > 1) {
		dispErr(fname, inMsg);
		return false;
	}
	
	// check characters
	if (!inCharBox(rawEmail,"abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890_-.@")) {
		dispErr(fname, inMsg);
		return false;
	}	
	// check occurances
	var spChars = "@_.-"
	for (var i=0;  i< spChars.length ; i++) {
		if ((rawEmail.indexOf(spChars.charAt(i)) == 0 ) || (rawEmail.indexOf(spChars.charAt(i)) == rawEmail.length)){
		   dispErr(fname, inMsg);
		   return false;		   
		}
	}
	var eBin;
	var te;
	eBin = rawEmail.split("@");
	te = eBin[(eBin.length-1)];
	// check for .
	if (te.indexOf(".") == -1) {
		dispErr(fname, inMsg);
		return false;
	}
	// check . occurance after @
	var dC
	dC = 0;	
	for (var i=0;i<te.length;i++) {
		if (te.charAt(i) == ".") dC ++;
	}
	// check if secondary dom exists
	if (te.indexOf(".") == 0) {
		dispErr(fname, inMsg);
		return false;
	}
	//if (dC > 1) {
		//dispErr(fname, inMsg);
		//return false;
	//}
	eBin = te.split(".");
	te = eBin[(eBin.length-1)];
	// check domain length
	if (te.length == 0) {
		dispErr(fname, inMsg);
		return false;
	} 	
	return true;
}

// check for blank
function isBlank(s) {
 var len = s.length;
 var i;
 if (len == 0)  return true;
 for (i=0;i<len;i++) {
   if (s.charAt(i) != " ") return false;
 }
 return true;
}

// check for white spaces
var whitespace = " \t\n\r";
function isWhiteSpace(s)
{ 
  var i; 	                                       
  if (isBlank(s)) return true; 	  
  for (i = 0; i < s.length; i++)
  {    
       var c = s.charAt(i);
 	    if (whitespace.indexOf(c) == -1) return false;
  }
  return true;
}

// check a field for blank spaces & types
function chkField(fname,blMsg,ftype,inMsg,opt) {
if (opt==1) {
	if (isBlank(document.den[fname].value)) {
		dispErr(fname, blMsg);
		return false;
	}
}
	switch (ftype) {
		case "t" :
			if (!chkText(fname,inMsg)) return false;
			break;
		case "e" :
			if (!chkEmail(fname,inMsg)) return false;
			break;
		default :
			return true;
	}
	return true;
}
// Sri Sathya System
// http://www.sathsys.com
// No part of this snippet should be used without written permission of Sri Sathya System.
// For queries write to jSnip@sathsys.com
-->