function y2k(number) { return (number < 1000) ? number + 1900 : number; }

function isDate (day,month,year) {
// checa se a data passada para a função é válida.
// aceita datas nos seguintes formatos:
// isDate(dd,mm,yyyy), ou
// isDate(dd,mm) - assume o ano atual, ou
// isDate(dd) - assume o ano mes a ano atuais.


var today = new Date();
year = ((!year) ? y2k(today.getYear()):year);
month = ((!month) ? today.getMonth():month-1);
if (!day) return false
var test = new Date(year,month,day);
if ( (y2k(test.getYear()) == year) &&
(month == test.getMonth()) &&
(day == test.getDate()) )
return true;
else
return false
}

//if (isDate(29,2,1997))
//document.write("Data válida");
//else
//document.write("Data inválida");



// =======================================================================
// >>> Função: FormataCep
//			campo: sequencia do campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function FormataCep(campo,tammax,teclapres) {
	if (teclapres == 0)
		{var tecla = 999;}		
	else
		{var tecla = teclapres.keyCode;}							
			
	vr = document.Formulario[campo].value;
	vr = vr.replace( "-", "" );		// CodeKey: 109; 189
	vr = vr.replace( " ", "" );
	tam = vr.length;
	
	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; }
	else  
		if (tecla == 109 || tecla == 189 || tecla == 32)
			tecla = 999; 
		
	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		if (tam <= 5) 
	 		document.Formulario[campo].value = vr;
	 	if ((tam > 5) && (tam <= 8))
	 		document.Formulario[campo].value = vr.substr(0, 5) + '-' + vr.substr(5, tam-5);
	}	
	if (tecla != 9 && tecla != 999){SaltaCampo (campo,campo+1,tammax,teclapres)}
}


// =======================================================================
// >>> Função: FormataCPF
//			campo: sequencia do campo no objeto Document;
//			prox: sequencia do proximo campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 23/06/2000 (Cláudio Junes)
// =======================================================================

function FormataCPF(campo,prox,tammax,teclapres) {
	if (teclapres == 0)
		{var tecla = 999;}		
	else
		{var tecla = teclapres.keyCode;}						
		
	vr = document.Formulario[campo].value;
	vr = vr.replace( ".", "" );		// CodeKey: 190; 194
	vr = vr.replace( ".", "" );
	vr = vr.replace( ".", "" );
	vr = vr.replace( "-", "" );		// CodeKey: 109; 189
	vr = vr.replace( " ", "" );
	tam = vr.length;

	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; }
	else  
		if (tecla == 109 || tecla == 189 || tecla == 190 || tecla == 194 || tecla == 32)
			tecla = 999;

	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		if (tam <= 3)
	 		document.Formulario[campo].value = vr;
	 	if ((tam > 3) && (tam <= 6))
	 		document.Formulario[campo].value = vr.substr(0, 3) + '.' + vr.substr(3, tam-3);
	 	if ((tam > 6) && (tam <= 9))
	 		document.Formulario[campo].value = vr.substr(0, 3) + '.' + vr.substr(3, 3) + '.' + vr.substr(6, tam-6);
	 	if ((tam > 9) && (tam <= 11))
	 		document.Formulario[campo].value = vr.substr(0, 3) + '.' + vr.substr(3, 3) + '.' + vr.substr(6, 3) + '-' + vr.substr(9, tam-6);
	}		
	if (tecla != 9 && tecla != 999){SaltaCampo (campo,prox,tammax,teclapres)}
}


// =======================================================================
// >>> Função: FormataCNPJ (antigo CGC)
//			campo: sequencia do campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function FormataCNPJ(campo,tammax,teclapres) {
	if (teclapres == 0)
		{var tecla = 999;}		
	else
		{var tecla = teclapres.keyCode;}						
		
	vr = document.Formulario[campo].value;
	vr = vr.replace( ".", "" );		// CodeKey: 190; 194
	vr = vr.replace( ".", "" );
	vr = vr.replace( "-", "" );		// CodeKey: 109; 189
	vr = vr.replace( "/", "" );		// CodeKey: 111; 193
	vr = vr.replace( " ", "" );
	tam = vr.length;

	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; }
	else  
		if (tecla == 109 || tecla == 189 || tecla == 190 || tecla == 194 || tecla == 111 || tecla == 193 || tecla == 32)
			tecla = 999;

	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		if (tam <= 2)
	 		document.Formulario[campo].value = vr;
	 	if ((tam > 2) && (tam <= 5))
	 		document.Formulario[campo].value = vr.substr(0, 2) + '.' + vr.substr(2, tam-2);
	 	if ((tam > 5) && (tam <= 8))
	 		document.Formulario[campo].value = vr.substr(0, 2) + '.' + vr.substr(2, 3) + '.' + vr.substr(5, tam-5);
	 	if ((tam > 8) && (tam <= 12))
	 		document.Formulario[campo].value = vr.substr(0, 2) + '.' + vr.substr(2, 3) + '.' + vr.substr(5, 3) + '/' + vr.substr(8, tam-8);
	 	if ((tam > 12) && (tam <= 14))
	 		document.Formulario[campo].value = vr.substr(0, 2) + '.' + vr.substr(2, 3) + '.' + vr.substr(5, 3) + '/' + vr.substr(8, 4) + '-' + vr.substr(12, tam-12);	
	}		
	if (tecla != 9 && tecla != 999){SaltaCampo (campo,campo+1,tammax,teclapres)}
}


// =======================================================================
// >>> Função: FormataFone
//			campo: sequencia do campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function FormataFone(campo,tammax,teclapres){	
	if (teclapres == 0)
		{var tecla = 999;}		
	else
		{var tecla = teclapres.keyCode;}		

	vr = document.Formulario[campo].value;
	vr = vr.replace( "(", "" );
	vr = vr.replace( " ", "" );
	vr = vr.replace( ")", "" );
	vr = vr.replace( "-", "" );		// CodeKey: 109; 189
	vr = vr.replace( " ", "" );
	tam = vr.length ;
	if (tam == 1 && vr == "0") {vr = "";}
	
	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; }
	else  
		if (tecla == 109 || tecla == 189 || tecla == 32)
			tecla = 999;	

	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		if (tam == 2 && document.Formulario[campo].value == "0")
			vr = "";
		if (tam <= 4)
	 		document.Formulario[campo].value = vr;
	 	if ((tam > 4) && (tam <= 8)) 
	 		document.Formulario[campo].value = vr.substr(0, tam-4) + '-' + vr.substr(tam-4, tam);
	 	if (tam == 9)
	 		document.Formulario[campo].value = '(0xx' + vr.substr(0, 2) + ')  ' + vr.substr(tam-7, 3) + '-' + vr.substr(tam-4, tam);
	 	if (tam > 9)
	 		document.Formulario[campo].value = ' (0xx' + vr.substr(3, 2) + ') ' + vr.substr(tam-8, 4) + '-' + vr.substr(tam-4, tam);
	}
	if (tecla != 9 && tecla != 999){SaltaCampo (campo,campo+1,tammax,teclapres)}
}


// =======================================================================
// >>> Função: FormataFoneSemOp
//			campo: sequencia do campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 03/10/2003 (Adriana Ferreira)
// =======================================================================

function FormataFoneSemOp(campo,tammax,teclapres){	
	if (teclapres == 0)
		{var tecla = 999;}		
	else
		{var tecla = teclapres.keyCode;}		

	vr = document.Formulario[campo].value;
	vr = vr.replace( "(", "" );
	vr = vr.replace( " ", "" );
	vr = vr.replace( ")", "" );
	vr = vr.replace( "-", "" );		// CodeKey: 109; 189
	//vr = vr.replace( " ", "" );
	tam = vr.length ;
	
	if (tam == 1 && vr == "0") {vr = "";}
	
	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; }
	else  
		if (tecla == 109 || tecla == 189 || tecla == 32)
			tecla = 999;	

	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		if (tam == 2 && document.Formulario[campo].value == "0")
			vr = "";
		if (tam <= 4)
	 		document.Formulario[campo].value = vr;
	 	if ((tam > 4) && (tam <= 8))
	 		document.Formulario[campo].value = vr.substr(0, tam-4) + '-' + vr.substr(tam-4, tam);
	 	if (tam == 9)
	 		document.Formulario[campo].value = '(0' + vr.substr(0, 2) + ')' + vr.substr(2, 4) + '-' + vr.substr(6, tam);
	 	if (tam > 9)
	 		document.Formulario[campo].value = ' (0' + vr.substr(1, 2) + ')' + vr.substr(3, 4) + '-' + vr.substr(7, tam);
	}
	if (tecla != 9 && tecla != 999){SaltaCampo (campo,campo+1,tammax,teclapres)}
}


// =======================================================================
// >>> Função: FormataDecimal
//			campo: sequencia do campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function FormataDecimal(campo,tammax,teclapres) {
	
	if (teclapres == 0)
		var tecla = 999;
	else
		var tecla = teclapres.keyCode;
		
	vr = document.Formulario[campo].value;	
	vr = vr.replace( ".", "" );		// CodeKey: 190; 194
	vr = vr.replace( ".", "" );
	vr = vr.replace( ".", "" );
	vr = vr.replace( ".", "" );
	vr = vr.replace( ",", "" );		// CodeKey: 188; 110	
	vr = vr.replace( " ", "" );
	if (vr.substr(0, 1) == "0" && vr.substr(0, 2) != "0") {vr = vr.replace( "0", "" )}

	tam = vr.length;
		
	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; }
	else  
		if (tecla == 190 || tecla == 194 || tecla == 188 || tecla == 110 || tecla == 32)
			tecla = 999; 
	
	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		if (tam == 0)
	 		document.Formulario[campo].value = vr;
		if (tam == 1)
	 		document.Formulario[campo].value = '0,0' + vr;
		if (tam == 2)
	 		document.Formulario[campo].value = '0,' + vr;
	 	if ((tam > 2) && (tam <= 5))
	 		document.Formulario[campo].value = vr.substr(0, tam-2) + ',' + vr.substr(tam-2, tam);
	 	if ((tam >= 6) && (tam <= 8))
	 		document.Formulario[campo].value = vr.substr(0, tam-5) + '.' + vr.substr(tam-5, 3) + ',' + vr.substr(tam-2, tam);
	 	if ((tam >= 9) && (tam <= 11))
	 		document.Formulario[campo].value = vr.substr(0, tam-8) + '.' + vr.substr(tam-8, 3) + '.' + vr.substr(tam-5, 3) + ',' + vr.substr(tam-2, tam);
	 	if ((tam >= 12) && (tam <= 14))
	 		document.Formulario[campo].value = vr.substr(0, tam-11) + '.' + vr.substr(tam-11, 3) + '.' + vr.substr(tam-8, 3) + '.' + vr.substr(tam-5, 3) + ',' + vr.substr(tam-2, tam);
	 	if ((tam >= 15) && (tam <= 17))
	 		document.Formulario[campo].value = vr.substr(0, tam-14) + '.' + vr.substr(tam-14, 3) + '.' + vr.substr(tam-11, 3) + '.' + vr.substr(tam-8, 3) + '.' + vr.substr(tam-5, 3) + ',' + vr.substr(tam-2, tam);
	}			
	if (tecla != 9 && tecla != 999) {SaltaCampo (campo,campo+1,tammax,teclapres);}
}


// =======================================================================
// >>> Função: FormataInteiro
//			campo: sequencia do campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function FormataInteiro(campo,tammax,teclapres) {
	if (teclapres == 0)
		var tecla = 999;
	else
		var tecla = teclapres.keyCode;
		
	vr = document.Formulario[campo].value;	
	vr = vr.replace( " ", "" );
	tam = vr.length;
		
	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; }
	else  
		if (tecla == 190 || tecla == 194 || tecla == 188 || tecla == 110 || tecla == 32)
			tecla = 999; 
	
	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		document.Formulario[campo].value = vr;
	}			
	if (tecla != 9 && tecla != 999) {SaltaCampo (campo,campo+1,tammax,teclapres);}
}

// =======================================================================
// >>> Função: FormataPeriodo
//			campo: sequencia do campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function FormataPeriodo(campo,proximo,tammax,teclapres) {
	if (teclapres == 0)
		{var tecla = 999;}		
	else
		{var tecla = teclapres.keyCode;}
	
	vr = document.Formulario[campo].value;
	vr = vr.replace( "/", "" );		// CodeKey: 111; 193
	vr = vr.replace( " ", "" );
	tam = vr.length;

	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; }
	else  
		if (tecla == 111 || tecla == 193 || tecla == 32)
			tecla = 999; 
		
	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		if (tam <= 2)
	 		document.Formulario[campo].value = vr;	
		if (tam > 2 && tam < 7)
			document.Formulario[campo].value = vr.substr(0, 2) + '/' + vr.substr(2, tam-2);
	}
	if (tecla != 9 && tecla != 999){ SaltaCampo (campo,proximo,tammax,teclapres)}
}

// =======================================================================
// >>> Função: FormataData
//			campo: sequencia do campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function FormataData(campo,tammax,teclapres) {
	if (teclapres == 0)
		{var tecla = 999;}		
	else
		{var tecla = teclapres.keyCode;}
	
	vr = document.Formulario[campo].value;
	vr = vr.replace( "/", "" );		// CodeKey: 111; 193
	vr = vr.replace( "/", "" );
	vr = vr.replace( " ", "" );
	tam = vr.length;

	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; }
	else  
		if (tecla == 111 || tecla == 193 || tecla == 32)
			tecla = 999; 
		
	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		if (tam <= 2)
	 		document.Formulario[campo].value = vr;	
		if (tam > 2 && tam < 5)
			document.Formulario[campo].value = vr.substr(0, 2) + '/' + vr.substr(2, tam-2);
		if (tam >= 5 && tam <= 8)
			document.Formulario[campo].value = vr.substr(0, 2) + '/' + vr.substr(2, 2) + '/' + vr.substr(4, tam-4); 
	}
	if (tecla != 9 && tecla != 999){ SaltaCampo (campo,campo+1,tammax,teclapres)}
}


// =======================================================================
// >>> Função: FormataDataC
//			campo: sequencia do campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function FormataDataC(campo,tammax,teclapres) {
	if (teclapres == 0)
		{var tecla = 999;}		
	else
		{var tecla = teclapres.keyCode;}
	
	vr = document.Formulario[campo].value;
	vr = vr.replace( "/", "" );		// CodeKey: 111; 193
	vr = vr.replace( "/", "" );
	vr = vr.replace( " ", "" );
	tam = vr.length;

	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; }
	else  
		if (tecla == 111 || tecla == 193 || tecla == 32)
			tecla = 999; 
		
	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		if (tam <= 2)
	 		document.Formulario[campo].value = vr;	
		if (tam > 2 && tam < 5)
			document.Formulario[campo].value = vr.substr(0, 2) + '/' + vr.substr(2, tam-2);
		if (tam == 5)
			document.Formulario[campo].value = vr.substr(0, 2) + '/' + vr.substr(2, 2) + '/' + vr.substr(4, tam-4); 			
		if (tam == 6){	
			strDia = vr.substr(0, 2);
			strMes = vr.substr(2, 2);
			strAno = vr.substr(4, tam-4);
			document.Formulario[campo].value = strDia + '/' + strMes + '/' + strAno; 
			if (strAno >= 90 && strAno <= 99)
				strAno = "19" + strAno; 
			else
				strAno = "20" + strAno; 
			document.all("Calendario").day = strDia;
			document.all("Calendario").month = strMes;
			document.all("Calendario").year = strAno;		
			}
		if (tam == 7)
			document.Formulario[campo].value = vr.substr(0, 2) + '/' + vr.substr(2, 2) + '/' + vr.substr(4, tam-4); 			
		if (tam == 8){
			strDia = vr.substr(0, 2);
			strMes = vr.substr(2, 2);
			strAno = vr.substr(4, tam-4);
			document.Formulario[campo].value = strDia + '/' + strMes + '/' + strAno; 
			document.all("Calendario").day = strDia;
			document.all("Calendario").month = strMes;
			document.all("Calendario").year = strAno;
			}
	}
	if (tecla != 9 && tecla != 999){ SaltaCampo (campo,campo+1,tammax,teclapres)}
}

// Checa Data de Nascimento //
function VerificaDataNasc(in_obj,tipo)
{
	if (in_obj.value!="") {
  		if (!check_data(in_obj.value))
		{
		  document.forms[0].elements[in_obj.name].focus();
		}
		if (tipo == "N" && (parseInt(in_obj.value.substring(6,10)) == 1979))
		{
			alert("Atenção: Só será válido caso já tenha completado 21 anos");
		}
		if (tipo == "N" && (parseInt(in_obj.value.substring(6,10)) > 1979))
		{
			alert("Idade mínima para solicitação deve ser 21 anos.");
			document.forms[0].elements[in_obj.name].focus();
		}
		if (tipo == "U" && (parseInt(in_obj.value.substring(6,10)) == 1982))
		{
			alert("Atenção: Só será válido caso já tenha completado 18 anos");
		}
		if (tipo == "U" && (parseInt(in_obj.value.substring(6,10)) > 1982))
		{
			alert("Idade mínima para solicitação deve ser 18 anos.");
			document.forms[0].elements[in_obj.name].focus();
		}
		if (tipo == "A" && (parseInt(in_obj.value.substring(6,10)) == 1984))
		{
			alert("Atenção: Só será válido caso já tenha completado 16 anos");
		}
		if (tipo == "A" && (parseInt(in_obj.value.substring(6,10)) > 1984))
		{
			alert("Idade mínima para solicitação deve ser 16 anos.");
			document.forms[0].elements[in_obj.name].focus();
		}
	}
}

// Checa Data //
function check_data(data_ver)
{
 var barra="";
 var ano, dia, mes=0;
 var hoje = new Date();

 // verifica barras
 barra = data_ver.substring(2,3);
 if (barra != "/")
    {
     alert("Atenção! Este campo deve ser preenchido no formato DD/MM/AAAA (ano com quatro dígitos). Verifique as informações digitadas e tente novamente.");
     return false;
    }
 barra = data_ver.substring(5,6);
 if (barra != "/")
    {
     alert("Atenção! Este campo deve ser preenchido no formato DD/MM/AAAA (ano com quatro dígitos). Verifique as informações digitadas e tente novamente.");
     return false;
    }

 // verifica digitos
 for (i=0; i < 10; i++)
     {
      if (i == 2 || i == 5) continue;
      if ((digito(data_ver.substring(i,i+1))) != 1)
         {
         alert("Atenção! Este campo deve ser preenchido no formato DD/MM/AAAA (ano com quatro dígitos). Verifique as informações digitadas e tente novamente.");
         return false;
         }
     }

 // verifica validade das datas
 barra = data_ver.substring(6,10);
 ano = parseInt(barra, 10);
 if (ano < 1900)
    {
     alert("Atenção! Preencha o ano com quatro dígitos e superior ou igual a 1900. Verifique as informações digitadas e tente novamente.");
     return false;
    }

 barra = data_ver.substring(3,5);
 mes = parseInt(barra, 10);
 if (mes < 1 || mes > 12)
    {
     alert("Preencha todos os campos conforme as indicações. Dessa forma poderemos processar sua solicitação com mais rapidez. Verifique as informações digitadas e tente novamente.");
     return false;
    }

 barra = data_ver.substring(0,2);
 dia = parseInt(barra, 10);
 if ((mes == 1 || mes==3 || mes==5 || mes==7 || mes==8 || mes==10 || mes==12) &&
     (dia < 1 || dia > 31))
    {
     alert("Preencha todos os campos conforme as indicações. Dessa forma poderemos processar sua solicitação com mais rapidez. Verifique as informações digitadas e tente novamente.");
     return false;
    }
 if ((mes == 4 || mes==6 || mes==9 || mes==11) &&
     (dia < 1 || dia > 30))
    {
     alert("Preencha todos os campos conforme as indicações. Dessa forma poderemos processar sua solicitação com mais rapidez. Verifique as informações digitadas e tente novamente.");
     return false;
    }
 if (mes == 2 && (dia < 1 || dia > 29))
    {
     alert("Preencha todos os campos conforme as indicações. Dessa forma poderemos processar sua solicitação com mais rapidez. Verifique as informações digitadas e tente novamente.");
     return false;
    }

 if (ano > (hoje.getYear() + 1900))
    {
     alert("Preencha todos os campos conforme as indicações. Dessa forma poderemos processar sua solicitação com mais rapidez. Verifique as informações digitadas e tente novamente.");
     return false;
    }
 if (ano == (hoje.getYear() + 1900))
    {
     if (mes > (hoje.getMonth() + 1))
        {
        alert("Preencha todos os campos conforme as indicações. Dessa forma poderemos processar sua solicitação com mais rapidez. Verifique as informações digitadas e tente novamente.");
        return false;
        }
     if (mes == (hoje.getMonth() + 1))
        {
         if (dia > hoje.getDate())
            {
             alert("Preencha todos os campos conforme as indicações. Dessa forma poderemos processar sua solicitação com mais rapidez. Verifique as informações digitadas e tente novamente.");
             return false;
            }
        }
    }

 return true;
}

//2.4.Funcao checa se o caracter é numerico retorna 1 e se for string retorna 0
 function digito(dig)
{
 if (dig != "0" && dig !="1" && dig !="2" && dig !="3" && dig !="4"
     && dig !="5" && dig !="6" && dig !="7" && dig !="8" && dig !="9")
    return 0;
 else return 1;
}


//2.2.Funcao que checa se o email é válido
function VerificaEMail(email)
{
	if (email.value != "") {
		var reg1 = new RegExp("(@.*@)|(\\.\\.)|(@\\.)|(\\.@)|(^\\.)")
			var reg2 = new RegExp("[a-zA-Z0-9\\-\\.]+\\@(\\[?)[a-zA-Z0-9\\-\\.]+\\.([a-zA-Z]{2,3}|[0-9]{1,3})(\\]?)$")
		if (reg1.test(email.value) || !(reg2.test(email.value))) {
		  alert("Favor preencher o campo de email corretamente");
		  email.value = "";
		  email.focus();
			}
	}
}

// Checa se o CEP foi digitado e se é valido //
function VerificaCEP(in_cep)
{
	var len = in_cep.value.length
	  if (len != 0){
		var cep1 = in_cep.value.substr(0,5);
		var cep2 = in_cep.value.substr(6,3);

		if (numerico(cep1) == true)
	    {
		  if (in_cep.value.substr(5,1) == '-')
	    	{

			  if (numerico(cep2) == true)
	    		{
	    		}
	    	  else
	    	  	{
	    		  alert("Favor preencher o campo de CEP corretamente");
	    		  in_cep.value = "";
	    		  in_cep.focus();
			  	}
			}
		   else
		    {
    		  alert("Favor preencher o campo de CEP corretamente");
    		  in_cep.value = "";
    		  in_cep.focus();
		    }
		}
	  else
	    {
   		  alert("Favor preencher o campo de CEP corretamente");
   		  in_cep.value = "";
   		  in_cep.focus();
	    }
  	  }
}

//2.3.Funcao que obriga que o campo seja numerico
 function numerico(valor)
{
 for (i=0; i < valor.length; i++)
     {
      if ((digito(valor.substring(i,i+1))) != 1)
         {
         return false;
         }
     }
 return true;
}

// Checa consistencia de DropDown para campos Text
function TestaCamposRelacionados(campo, campoRelacionado, opcaoDisabilita)
{
	if (campoRelacionado.options[opcaoDisabilita].selected)
	{
		campo.blur();
	}
}

function LimpaCamposRelacionados(campo, opcaoDisabilita, camposRelacionados)
{
	if (campo.options[opcaoDisabilita].selected || campo.options[0].selected)
		for (i = 0; i < camposRelacionados.length; i++)
			eval("document.forms[0]."+camposRelacionados[i]+".value = ''")
}

// Define consistencia dos checkbox
function VerificaCheck(checkobj)
{
	if (checkobj[0].checked==true)
		for (i=1;i<checkobj.length;i++)
			checkobj[i].checked = false
}

// =======================================================================
// >>> Função: SaltaCampo
//			campo: sequencia do campo no objeto Document;
//			prox: sequencia do próximo campo no objeto Document;
//			tammax: tamanho máximo do campo (sem separadores);
//			teclapres: evento na página que disparou a função;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function SaltaCampo (campo,prox,tammax,teclapres){
	var tecla = teclapres.keyCode;
	vr = document.Formulario[campo].value;
	if(tecla != 37 && tecla != 38 && tecla != 39 && tecla != 40){
	 	tam = vr.length;		
	 	if (tecla != 0 && tecla != 9 && tecla != 16)
			if (tam == tammax || tecla == 13)
				document.Formulario[prox].focus(); }
}

// =======================================================================
// >>> Função: SaltaCampoDireto
//			prox: sequencia do próximo campo no objeto Document;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function SaltaCampoDireto (prox){
	document.Formulario[prox].focus();
}

// =======================================================================
// >>> Função: RetornaCodigo
//			teclapres: evento na página que disparou a função;
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function RetornaCodigo (teclapres){
	var tecla = teclapres.keyCode;
	alert (tecla);
}

// =======================================================================
// >>> Procedimento SelecionaCampo
//			campo: sequencia do campo a ser selecionado no objeto Document.
//	Última atualização => 25/05/2000 (Cláudio Junes)
// =======================================================================

function SelecionaCampo(campo){
	document.Formulario[campo].select();
}

//formatacartao
function FormataCartao(campo, teclapres) {
	

	tammax = 16;
	
	if (teclapres == 0) {
		var tecla = 999;
	} else {
		var tecla = teclapres.keyCode;
	}
		
	vr = campo.value
	
	vr = vr.replace( ".", "" );
	vr = vr.replace( ".", "" );
	vr = vr.replace( ".", "" );
	
	tam = vr.length;

	if (vr.substr(tam-1,1) != 0 && vr.substr(tam-1,1) != 1 && vr.substr(tam-1,1) != 2 && vr.substr(tam-1,1) != 3 && vr.substr(tam-1,1) != 4 && vr.substr(tam-1,1) != 5 && vr.substr(tam-1,1) != 6 && vr.substr(tam-1,1) != 7 && vr.substr(tam-1,1) != 8 && vr.substr(tam-1,1) != 9) {
		vr = vr.substr(0,tam-1);
		tam = vr.length;
		tecla = 999; 
	} else  
		if (tecla == 109 || tecla == 189 || tecla == 190 || tecla == 194 || tecla == 32)
			tecla = 999;
			
	if (tecla == 8 || tecla == 46 || tecla == 999 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105){
		if (tam <= 4)
	 		campo.value = vr;
	 	if ((tam > 4) && (tam <= 8))
	 		campo.value = vr.substr(0, 4) + '.' + vr.substr(4, 4);
	 	if ((tam > 8) && (tam <= 12))
	 		campo.value = vr.substr(0, 4) + '.' + vr.substr(4, 4) + '.' + vr.substr(8, 4);
	 	if ((tam > 12) && (tam <= 16))
	 		campo.value = vr.substr(0, 4) + '.' + vr.substr(4, 4) + '.' + vr.substr(8, 4) + '.' + vr.substr(12, 4);
	}
}

function DesformataCartao(campo) {
	
	var vr
	
	vr = campo.value
	
	vr = vr.replace( ".", "" );
	vr = vr.replace( ".", "" );
	vr = vr.replace( ".", "" );
	
	return(vr)
	
}

function VerificaRegionalSetting() {

	var dcTest
	
	dcTest = String(1 / 10)
		
	if (dcTest.indexOf(".") == -1) {

		return("PT")

	} else {

		return("EN")

	}
	
}

function ConverteDecimalEN(valor) {
	
	var vr
	
	vr = String(valor)
	
	vr = vr.replace( ".", "" )
	vr = vr.replace( ",", "" )
	vr = vr.replace( " ", "" )
	
	vr = vr / 100
	
	return(vr)
	
}