	
	function checkRef()
	{
		alert("you have reference")
	}
	
	
	var blAlpha
	
	
	function validateFields() {
	
	var strPhone = "(" + document.frmCreate.txtAreaPhone.value + ") " + document.frmCreate.txtfirstPhone.value + "-" + document.frmCreate.txtsecondPhone.value;
	var strFax = "(" + document.frmCreate.txtAreaFax.value + ") " + document.frmCreate.txtfirstFax.value + "-" + document.frmCreate.txtsecondFax.value;
	//alert(document.frmCreate.txtAreaPhone.value)
	//alert(document.frmCreate.txtfirstPhone.value)
	//alert(document.frmCreate.txtsecondPhone.value)
	//action="newUser.asp"
	alert(strPhone);
	alert(strFax);
	return false;
	
	}
	
	
	
	
	function isBlank(idx,msg)
	{
	
	//idx.value = allTrim(idx.value)
	var txtVal=idx.value
	if(txtVal=="")
		{
		alert("Please fill in the " + msg + " field.");
		//idx.focus
		return false
		}
	return true
	}

	function isBlankCustom(idx)
	{
	var txtVal=idx.value
	var txtLen=idx.length
	
	if(txtVal=="")
		{
		return false;
		}
	return true
	}
	
	function isBlankVar(idx)
	{
	var txtVal=idx
	var txtLen=idx.length
	
	if(txtVal=="")
		{
		return false;
		}
	return true
	}

function deZero(x)
{while(x.charAt(0)=="0") x=x.substring(1,x.length)
 return x}

function lTrim(x)
{while(x.charAt(0)==" ") x=x.substring(1,x.length)
 return x}

function rTrim(x)
{while(x.charAt(x.length-1)==" ") x=x.substring(0,x.length-1)
 return x}

function allTrim(x)
{x = rTrim(lTrim(x))
 return x}

function intCheck(x)
{while(x.charAt(0)=="0") x=x.substring(1,x.length)
 x=(parseInt(x)==x)? x: "not an integer!"
 return x}
 

function IsNum(idx,msg) //Checks the field value for numeric entries
{
        var newValue = idx.value
        var newLength = newValue.length
        for(var i=0; i!=newLength; i++)
        {
                aChar = newValue.substring(i,i+1)
                if (aChar < "0" || aChar > "9")
                        {
                        idx.value=""
                        alert("The entry for '" + msg + "' was incorrect.\n It must be number. \nPlease check your entry and try again.");
			idx.focus();
                        return false
                        
                        }
                }
        return true
        }
function isAlpha(idx,msg)//Checks the field value for alphabetic characters
{
        var txValue = idx.value
        var txLength = txValue.length
        var exChars = "., "
        var checkIt
        for (var x=0; x!=txLength; x++)
	{
		txChar = txValue.substring(x, x+1)
		txChar = txChar.toUpperCase()
		checkIt = exChars.indexOf(txChar)
		if (checkIt == -1 && txChar < "A" || txChar > "Z" )
		{
			idx.value=""
			alert("The entry for '" + msg 
			+ "' is invalid.\nPlease check your entries and try again.");
			idx.focus();
			return false
		}
	}
	return true
}


function IsNumC(idx)
	{
	var boxValue=idx.value
	var boxLength=boxValue.length
	var SpecChar="-() Ext."
	var VerifyChar
	
	for(var i=0; i!=boxLength; i++)
		{
		aChar=boxValue.substring(i,i+1)
		VerifyChar=SpecChar.indexOf(aChar)
		if(VerifyChar==-1 && aChar<"0" || aChar > "9")
			{
			idx.select
			return false
			}
		}
	return true
	}

function IsMoney(idx, msg)
{
  var checkOK = "0123456789-.";
  var checkStr = idx.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else
      allNum += ch;
  }
  if (!allValid)
  {
    alert("Please enter a valid dollar amount for " + msg );
    idx.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("Please enter only one decimal for " + msg);
    idx.focus();
    return (false);
  }
  return (true);
}



function IsReal(idx, msg)
{
  var checkOK = "0123456789.";
  var checkStr = idx.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else
      allNum += ch;
  }
  if (!allValid)
  {
    alert("Please enter a valid number for " + msg );
    idx.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("Please enter only one decimal for " + msg);
    idx.focus();
    return (false);
  }
  return (true);
}







function isNumM(txbx,msg)
	{
	var boxValue=txbx.value
	
	var boxLength=boxValue.length
	var SpecChar="-() "
	var VerifyChar
	for(var k=0; k!=boxLength; k++)
		{
		aChar=boxValue.substring(k,k+1)
		VerifyChar=SpecChar.indexOf(aChar)
		if(VerifyChar==1 && aChar<"0" || aChar > "9")
			{
			txbx.select
			alert('The entry for ' + msg + ' contains invalid characters\nPlease check your entries and resubmit');
			return false
			}
		}
	return true
	}
	
	
function isNumMCustom(txbx)
	{
	
	var boxValue=txbx.value
	
	var boxLength=boxValue.length
	var SpecChar="-() "
	var VerifyChar
	for(var k=0; k!=boxLength; k++)
		{
		aChar=boxValue.substring(k,k+1)
		VerifyChar=SpecChar.indexOf(aChar)
		if(VerifyChar==1 && aChar<"0" || aChar > "9")
			{
			txbx.select
			return false
			}
		}
	return true
	}

 function isVarNum(idx) 
 {
 
	var boxValue=idx
	var boxLength=boxValue.length
	var SpecChar="-() "
	var VerifyChar
	for(var k=0; k!=boxLength; k++)
		{
		aChar=boxValue.substring(k,k+1)
		VerifyChar=SpecChar.indexOf(aChar)
		if(VerifyChar==1 && aChar<"0" || aChar > "9")
			{
			
			return false
			}
		}
	return true
 
 
 }
 
 

function isLenOk(idx,msg,sz)
	{
	var tValue=idx.value
	var tValLen=tValue.length
	if(tValLen < sz)
		{
		alert('The entry for ' + msg + ' is not long enough.\nThe minimum length for ' + msg + ' is ' + sz + '.\nPlease check your entries and try again.')
		idx.focus
		return false
		}
	return true
	}

function isLenOkCustom(idx,sz)
	{
	
	var tValue=idx.value
	var tValLen=tValue.length
	
	if(tValLen < sz)
		{
		idx.focus
		return false
		}
	return true
	}


function isLenOkTrimmed(idx,sz)
	{
	
	var tValue=idx
	tValue = allTrim(tValue)
	var tValLen=tValue.length
	if(tValLen < sz)
		{
			return false
		}
	return true
	}


function isLenOkVar(idx,sz)
	{
	
	var tValue=idx
	tValue = allTrim(tValue)
	var tValLen=tValue.length
	if(tValLen < sz)
		{
			return false
		}
	return true
	}


function isLenGreaterThen(idx,msg,sz) {
	var tValue = idx.value.length
	
	if (tValue > sz) {
	
		alert('The entry for ' + msg + ' is too long.')
		idx.focus
		return false
	}
	
}	





function isEmail(idx,msg)
	{
	var eValue=idx.value
	var eLen=eValue.length
	var err = 0
		
	if(isLenOk(idx,msg,5))
		{
		
		
		var eChar="@"
		err = 1
		for(var i=0; i!=eLen; i++)
			{
			sChar=eValue.substring(i,i+1)
			pChar=sChar.indexOf(eChar)
			
			if(pChar>=0)
				{
				
				err = 0
				}
			}
		
		if (err == 0) {
		var eChar="."
		err = 1
		for(var i=0; i!=eLen; i++)
			{
			sChar=eValue.substring(i,i+1)
			pChar=sChar.indexOf(eChar)
						
			if(pChar>=0)
				{
				
				err = 0
				}
			}
		
		}
		
		
		
		//negative testing
		if (err == 0) {
		//*******************************************************************
		eChar = " "
		for(var i=0; i!=eLen; i++)
			{
			sChar=eValue.substring(i,i+1)
			pChar=sChar.indexOf(eChar)
			
			if(pChar>=0)
				{
				err = 1
				}
			}
		
				
		
		//***************************************************************
		}
		
		
		
		}
		
	
	if (err == 1) {	
	
	alert('The entry for ' + msg + ' does not apprear to be a valid email address.\nPlease check your entry and try again.')
	//alert('Debug sChar=' + sChar + ' pChar=' + pChar)
	return false
	}
	return true
	}		
function checkdate(idx,sTitle){
//	window.onerror=null // for all other strange errors
	
	
	//Allowing blanks disabled for merritt
	//if (idx.value == "") {
	//return true; }
	
	var err=0
	a = idx.value
	b = a.substring(0, 2)// month
	c = a.substring(2, 3)// '/'
	d = a.substring(3, 5)// day
	e = a.substring(5, 6)// '/'
	f = a.substring(6, 10)// year
	
			
	if (isVarNum(b) == false)  err = 1
	if (isVarNum(d) == false)  err = 1
	if (isVarNum(f) == false)  err = 1
	
	if (isLenOkTrimmed(b,2) == false) err = 1
	if (isLenOkTrimmed(d,2) == false) err = 1
	if (isLenOkTrimmed(f,4) == false) err = 1
	if (isLenOkTrimmed(idx.value,10) == false) err = 1
	
	//alert(isAlphaCustom(b))
	
	if (b<1 || b>12) err = 1
	if (c != '/') err = 1
	if (d<1 || d>31) err = 1
	if (e != '/') err = 1
	if (f<1800 || f>3000) err = 1
	if (f.length != 4) err = 1 
	//advanced error checking

	// months with 30 days
	if (b==4 || b==6 || b==9 || b==11){
		if (d==31) err=1
	}

	// february, leap year
	if (b==2){
		// feb
		var g=parseInt(f/4)
		if (isNaN(g)) {
			err=1
		}

		if (d>29) err=1
		if (d==29 && ((f/4)!=parseInt(f/4))) err=1
	}

	if (err==1){
		alert('Enter ' + sTitle + ' date in format MM/DD/YYYY');
		idx.focus();
		return false;
	}
	else{
		return true;
	}

}

function isAlphaCustom(idx)

//Checks the field value for alphabetic characters
//This function is for negative testing of char items another words if a value is an alphanumeric it brings back true

{
        
        var txValue = idx
       // alert(txValue)
        var txLength = txValue.length
        alert(txLength)
        var exChars = "., "
        var checkIt
        for (var x=0; x<=txLength; x++)
	{
		txChar = txValue.substring(x, x+1)
		txChar = txChar.toUpperCase()
		alert(txChar)
		checkIt = exChars.indexOf(txChar)
		if (checkIt == -1 && txChar < "A" || txChar > "Z" )
		{
			alert("not numeric")	
			return "yes"
		}
	}
	return "no"
}


function isNullStr(idx){
if (idx == null) {
	return "";
	}
else {
	return idx;

	}
}

function isNullNum(idx){
if (idx == null) {
	return "0";
	}
else {
	return idx;
	}
}

function validPhone(idx1,idx2,idx3,sz,msg,blMust)
{
var err=0
var blIsNum
var blIsLenOK
var blCompleteBlank = false
var sComposite

if (isBlankVar(idx1) == false) err=1;
if (isBlankVar(idx2) == false) err=1;
if (isBlankVar(idx3) == false) err=1;



if (idx1 == 0) err=1;
if (idx2 == 0) err=1;
//This was disabled because phonenumber can be in a 555 555 0000 format
//if (idx3 == 0) err=1;

sComposite = idx1 + idx2 + idx3

if (blMust == false)
	{
		if (isBlankVar(sComposite) == false) blCompleteBlank = true
	
	}


if (isVarNum(sComposite) == false) err =1;
if (isLenOkVar(sComposite,sz) == false) err=1;


if (err==1) 

{
	//if the entry returned an error BUT it is not required and completely blank return true
	if (blMust == false)
	{
	 
	 if (blCompleteBlank == true) 
		{
			return true
		}
	else
		{
			alert(msg + " Entry is invalid or contains wrong number of characters.")
			return false
		}
	
	}
	
	if (blMust == true)
	{	
		alert(msg + " Entry is blank, invalid or contains wrong number of characters.")
	}
	
	return false
	
	
}
else
{
	return true
}




}




