// EXAMPLES OF HOW TO CALL THESE FUNCTIONS FROM THE PRIMARY VALIDATE SCRIPT ARE AT THE BOTTOM

//  REGULAR EXPRESSIONS USED IN THESE FUNCTIONS
var emailval = /[@]/ ; var numval = /^\d+$/ ; var alphaval = /^\D+$/ ;

//  CHECKS TO SEE IF THE SPECIFIED FORM ELEMENT IS NOT A NUMBER
function isnotnumber(fn1,fe1,msg) {
	var path = document[fn1][fe1].value
	if( (path != "") && (!(numval.test(path)))  ) 
		{ error = 1 ; errortext += "* " + msg + " must be entered as a number only\n" ; }	
}

//  CHECKS TO SEE IF THE SPECIFIED FORM ELEMENT CONTAINS ONLY ALPHA CHARACTERS
function isnotalpha(fn1,fe1,msg) {
	var path = document[fn1][fe1].value
	if( (path != "") && (!(alphaval.test(path)))  ) 
		{ error = 1 ; errortext += "* " + msg + " must be entered without any numbers\n" ; }	
}

//  CHECKS TO SEE IF THE FIRST LETTER ENTERED IS ONLY AN ALPHA CHARACTER
function firstletterisalpha(fn1,fe1,msg) {
	var path = document[fn1][fe1].value
	if( (path != "") && (!(firstletteralpha.test(path)))  ) 
		{ error = 1 ; errortext += "* The first character in " + msg + " must be entered as a letter only\n" ; }	
}

//  CHECK IF THE SELECT FORM ELEMENT HAS AN OPTION(S) SELECTED
function checkselect(fn1,fe1,selindex,msg) {
	var path = document[fn1][fe1] ;
	var fe1_lenth = path.length ;

	if(path.length == 2)
		{  error = 1 ; errortext += "Add some valid options first\n" ; }
	else if(path.selectedIndex <= selindex)
		{ error = 1 ; errortext += "* Please select a valid option from the " + msg +" option list\n" ; }
}

//  CHCK IF THE SELECT FORM ELEMENT HAS A VALID OPTION(S) SELECTED, AND CONFIRM IF THE USER WANTS TO DELETE SELECTED OPTION(S)
function checkdelete(fn1,fe1,selindex,msg) {
	var path = document[fn1][fe1] ;
	var fe1_lenth = path.length ;

	if(path.length == 2)
		{  error = 1 ; errortext += "Add some valid options first\n" ; }
	else
	{
		if(path.selectedIndex <= selindex)
			{ error = 1 ; errortext += "* Please select a valid option from the " + msg +" option list\n" ; }
		else
			{		
				var promptfordelete = "Are you sure you want to PERMANENTLY DELETE the following record(s) ?\n"
				for(var i = 0; i < fe1_lenth; i++)
				{
					if (path[i].selected)
						{ promptfordelete += "   " + path.options[i].text + "\n" ; }	
				}				
				if( !confirm(promptfordelete) )
					{ error = 1 ; submitform = false ; }
			}
	}
}

//  CHECKS TO SEE IF THE SPECIFIED FORM ELEMENT CONTAINS A VALID EMAIL ADDRESS
function isnotemail(fn1,fe1,msg) {
	var path = document[fn1][fe1]
	if( path.value != "" && !emailval.test(path.value) )	
		{ error = 1 ; errortext += "* " + msg + " must be entered correctly\n" ; }
}

/**** EXAMPLES OF HOW TO CALL THESE VALIDATE FUNCITONS ****

// CHECK IF THE FIRST LETTER IN A STRING IS AN ALPHA CHARACTER
	 firstletterisalpha(fn1,'username','USER NAME')

// CHECK IF THE STRING CONTAINS ONLY INTEGER CHARACTERS
	 isnotnumber(fn1,'fax','FAX NUMBER') ;

/// CHECK IF THE STRING CONTAINS ONLY ALPHA CHARACTERS
	  isnotalpha(fn1,'cardname','CREDIT CARD NAME') ;

/// CHECK IF THE SELECT FORM ELEMENT HAS AN OPTION(S) SELECTED
	  checkselect(fn1,'cardtype',1,'CARD TYPE') ;

/// CHCK IF THE SELECT FORM ELEMENT HAS A VALID OPTION(S) SELECTED, AND CONFIRM IF THE USER WANTS TO DELETE SELECTED OPTION(S)
      checkdelete(fn1,'positionid',1,'DELETE POSITION')

/// CHECKS TO SEE IF THE SPECIFIED FORM ELEMENT CONTAINS A VALID EMAIL ADDRESS
      isnotemail(fn1,'Email','EMAIL')

*/