
<!--
function formata_data(entra) {
	//...chamar no evento onBlur do componente.
	//...entra é um objeto textField
	dty=entra.value;
	dtx='';
	for (i=0;i<dty.length;i++) {
	  if (dty.charCodeAt(i)>=48 && dty.charCodeAt(i)<=57 ) dtx+=dty.substring(i,i+1);
	}
	hoje=new Date();
    ano = hoje.getFullYear();	
	
	if (dtx=='00000000' || dtx=='0000' || dtx=='000000' || dtx=='0') {
		entra.value='00/00/0000';
	} else {
		if (dtx.length==4) {
			dtx=dtx.substring(0,2)+'/'+dtx.substring(2,5)+'/'+ano;
			entra.value=dtx;
		} else {
			if (dtx.length==6) {
				decada=0;
				eval('decada='+dtx.substring(4,6)+'+0');
				//if (decada>=20) ano='2000';
				//dtx=dtx.substring(0,2)+'/'+dtx.substring(2,4)+'/'+ano.substring(0,2)+dtx.substring(4,6);
				dtx=dtx.substring(0,2)+'/'+dtx.substring(2,4)+'/20'+dtx.substring(4,6);
				entra.value=dtx;	
			} else {
				if (dtx.length==8) {
					dtx=dtx.substring(0,2)+'/'+dtx.substring(2,4)+'/'+dtx.substring(4,8);
					entra.value=dtx;
				} else {
					if (dtx.length>0) {
							alert('DATA IRREGULAR: '+entra.value);
					}
				}
			}
		}
	}
	if (dtx.length>0) {
		k=valida_data(dtx,'');
	}
	
}


function valida_texto(txt,nulo) {
	erro="";
	tx=txt.replace(/^\s*/, "").replace(/\s*$/, ""); /// = função trim()
	if (tx.length>0) {
		badword = "select,insert,update,delete,drop,destroy,"+String.fromCharCode(39)+",&";
		badw=badword.split(",");
		
		for (i=0;i<8;i++) {
			if (tx.toLowerCase().indexOf(badw[i]+' ')>-1) {
				erro=erro+" "+badw[i];
			}
		}
	} else {
		if (nulo!=null) {
			alert('Texto obrigatório não informado');
			return false;
		}
	}
	if (erro!="") {
		alert('Palavra reservada utilizada no texto: '+erro);
		return false;
	} else {
		return true;
	}
}

/*
function trocar_string(velho,novo,texto) { 
    for (var i=0; i<texto.length; i++) { 
        if (texto.substring(i,i+velho.length) == velho) { 
        texto = texto.substring(0,i)+novo+texto.substring(i+velho.length,texto.length) 
        } 
    } 
    return texto; 
} 
*/

function valida_data(dtx,nulo) {
	//http://www.mhavila.com.br/topicos/web/valform.html
	//http://aspetc.brassites.com.br/areas.asp?codarea=12&codsecao=3
   valida=true;
	if (dtx.length>0) {
		if (dtx.length==10) {
			var reDate4 = /^((0?[1-9]|[12]\d)\/(0?[1-9]|1[0-2])|30\/(0?[13-9]|1[0-2])|31\/(0?[13578]|1[02]))\/(19|20)?\d{2}$/;
			if (reDate4.test(dtx)) {
				//...FORMATO DD MM YYYY
				d=parseInt(dtx.substring(0,2));
				m=parseInt(dtx.substring(3,5));
				a=parseInt(dtx.substring(6,10));
				if (m==2) {
					if ( a % 4==0 ) {
						if (d>29) valida=false;
					} else {
						if (d>28) valida=false;
					}
				}
				if (a<1900) valida=false;
			} else {
				valida=false;
			}
			if (!valida) alert(dtx+' Não é uma data válida')
		} else {
			valida=false;
			alert('Formato de data: DD/MM/YYYY')
		}
	} else {
			if (nulo!=null) {
				valida=false;
				alert('Data obrigatória não informada');
			}
	}
	return valida;
}

var reEmail1 = /^[\w!#$%&'*+\/=?^`{|}~-]+(\.[\w!#$%&'*+\/=?^`{|}~-]+)*@(([\w-]+\.)+[A-Za-z]{2,6}|\[\d{1,3}(\.\d{1,3}){3}\])$/;
var reEmail2 = /^[\w-]+(\.[\w-]+)*@(([\w-]{2,63}\.)+[A-Za-z]{2,6}|\[\d{1,3}(\.\d{1,3}){3}\])$/;
var reEmail3 = /^[\w-]+(\.[\w-]+)*@(([A-Za-z\d][A-Za-z\d-]{0,61}[A-Za-z\d]\.)+[A-Za-z]{2,6}|\[\d{1,3}(\.\d{1,3}){3}\])$/;
var reEmail = reEmail3;

function valida_email(email,nulo)
{
	//eval("reEmail = reEmail" + pFmt);
	if (email!="") {
		if (reEmail.test(email)) {
			return true;
		} else {
			alert(email + " NÃO é um endereço de e-mail válido.");
			return false;
		}
	} else {
		if (nulo!=null) {
			alert('Email é obrigatório');
			return false;
		} else { return true;}
	}
}


function valida_hhmm(hora,nulo) {
	if (hora!="") {
		var reTime2 = /^([0-1]\d|2[0-3]):[0-5]\d$/;
		if (reTime2.test(hora)) {
			return true;
		} else {
			alert(hora+' Não é hora válida');
			return false;
		}
	} else {
		if (nulo!=null) {
			alert('O horario é obrigatório');
			return false;
		} else {
			return true;
		}
	}
}

function valida_dataHora(dth,nulo) {
	ret=false;
	if (dth.length>=16) {
		dt=dth.substring(0,dth.indexOf(' '));
		hr=dth.substring(dt.length,dth.length);
		dt=dt.replace(/^\s*/, "").replace(/\s*$/, ""); /// = função trim()
		hr=hr.replace(/^\s*/, "").replace(/\s*$/, ""); /// = função trim()
		if (dt.length==10 && hr.length==5) {
			if (valida_data(dt) && valida_hora(hr)) {
				ret=true;
			}
		}
	}
	return ret;
}

function valida_int(digitos,nulo) {
	if (digitos!="") {
		var reDigits = /^\d+$/;
		if (reDigits.test(digitos)) {
			return true;
		} else {
			alert(digitos+' Não é número válido');
			return false;
		}
	} else {
		if (nulo!=null) {
			alert('Número obrigatório não preenchido');
			return false;
		} else {
			return true;
		}
	}
}


function valida_decimal(valor,nulo){
	if (valor!="") {
		//var reDecimalPt = /^[+-]?((\d+|\d{1,3}(\.\d{3})+)(\,\d*)?|\,\d+)$/;
		var reDecimalEn = /^[+-]?((\d+|\d{1,3}(\,\d{3})+)(\.\d*)?|\.\d+)$/;
		//var reDecimal = reDecimalPt;
		//pLang="En";
		//charDec = ( pLang != "En"? ",": "." );
		//eval("reDecimal = reDecimal" + pLang);
		if (reDecimalEn.test(valor)) {
			//pos = pStr.indexOf(charDec);
			//decs = pos == -1? 0: pStr.length - pos - 1;
			return true; //alert(pStr + " é um float válido (" + pLang + ") com " + decs + " decimais.");
		} else {
			alert (valor+' Não é valor válido');
			return false ;//alert(pStr + " NÃO é um float válido.");
		}
	} else {
		if (nulo!=null) {
			alert('Valor obrigatório não preenchido');
			return false;
		} else {
			return true;
		}
	}
}

//-->