function VerificaTecla() {
if ((window.event.keyCode == 39) || (window.event.keyCode == 59) || (window.event.keyCode == 60) || (window.event.keyCode == 62) || (window.event.keyCode == 34) || (window.event.keyCode == 35))
{
window.event.keyCode =0;
}
}

function abrearquivo(nomarquivo)
{


                window.documento=document;
                largura=700;
                altura=545;
                
                
                Arquivo = window.open("admin/files/1/"+nomarquivo,"Arquivo","left="+(screen.width-10-largura)/2+" ,top="+(screen.height-28-altura)/2+",height="+altura+",width="+largura+",toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes");

                Arquivo.focus();




}

function AbrePopUp(largura,altura,Nome,Pagina)
{


PopUp=window.open(Pagina,"gmr_"+Nome,"left="+(screen.width-10-largura)/2+ ",top="+(screen.height-28-altura)/2+",height="+altura+",width="+largura+",       toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes");

PopUp.focus();

}

//funçao para verificar campos obrigatórios
function ValidaCampos(Label,NomeCampo,TipoCampo,QtdeCampos)
{
var strMensagem="";

	for (var i=0; i<QtdeCampos; i++)
	{
		if (TipoCampo[i]=="text" || TipoCampo[i]=="area") 
		{		
			if (eval("CtBranco(document.Form."+NomeCampo[i]+".value)==''"))
			{
				strMensagem=strMensagem+"- "+Label[i]+"\n";		
			}		
		}
		
		if (TipoCampo[i]=="combo") 
		{		
			if (eval("CtBranco(document.Form."+NomeCampo[i]+".value)==''") || eval("CtBranco(document.Form."+NomeCampo[i]+".value)=='0'") || eval("CtBranco(document.Form."+NomeCampo[i]+".value)=='-1'"))
			{
				strMensagem=strMensagem+"- "+Label[i]+"\n";		
			}		
		}
		
		if (TipoCampo[i]=="check") 
		{		
			if (eval("! document.Form."+NomeCampo[i]+".checked"))
			{
				strMensagem=strMensagem+"- "+Label[i]+"\n";		
			}		
		}		
	}
	
	if (strMensagem!="")
	{
	   alert("Atenção, o(s) campo(s) abaixo deve(m) ser informado(s):\n\n" + strMensagem);
	   return false;	
	}
	else
	   return true;
}

function show_calendar(str_target, str_datetime) {
	var arr_months = ["Janeiro", "Fevereiro", "Março", "Abril", "Maio", "Junho",
		"Julho", "Agosto", "Setembro", "Outubro", "Novembro", "Dezembro"];
	var week_days = ["Dom", "Seg", "Ter", "Qua", "Qui", "Sex", "Sab"];
	var n_weekstart = 1; // day week starts from (normally 0 or 1)

	var dt_datetime = (str_datetime == null || str_datetime =="" ?  new Date() : str2dt(str_datetime));
	var dt_prev_month = new Date(dt_datetime);
	var MesPrev;
	MesPrev = (dt_datetime.getFullYear()-1);
	if (MesPrev.length == 1)
	{ 
		dt_prev_month.setFullYear("0"+dt_datetime.getFullYear()-1);
	}
	else
	{
		dt_prev_month.setFullYear(dt_datetime.getFullYear()-1);
	}
	
	var dt_next_month = new Date(dt_datetime);
	var MesNext;
	MesNext = (dt_datetime.getFullYear()+1);
	if (MesNext.length == 1)
	{
		dt_next_month.setFullYear("0"+dt_datetime.getFullYear()+1);
	}
	else
	{
		dt_next_month.setFullYear(dt_datetime.getFullYear()+1);
	}


        var dt_jan = new Date(dt_datetime);
        dt_jan.setMonth("0");

        var dt_fev = new Date(dt_datetime);
        dt_fev.setMonth("01");

        var dt_mar = new Date(dt_datetime);
	dt_mar.setMonth("02");

        var dt_abr = new Date(dt_datetime);
	dt_abr.setMonth("03");

        var dt_mai = new Date(dt_datetime);
	dt_mai.setMonth("04");

        var dt_jun = new Date(dt_datetime);
	dt_jun.setMonth("05");

        var dt_jul = new Date(dt_datetime);
	dt_jul.setMonth("06");

        var dt_ago = new Date(dt_datetime);
	dt_ago.setMonth("07");

        var dt_set = new Date(dt_datetime);
	dt_set.setMonth("08");

        var dt_out = new Date(dt_datetime);
	dt_out.setMonth("09");

        var dt_nov = new Date(dt_datetime);
	dt_nov.setMonth("10");

        var dt_dez = new Date(dt_datetime);
	dt_dez.setMonth("11");

	var dt_firstday = new Date(dt_datetime);
	dt_firstday.setDate(1);
	dt_firstday.setDate(1-(7+dt_firstday.getDay()-n_weekstart)%7);
	var dt_lastday = new Date(dt_next_month);
	dt_lastday.setDate(0);
	
	// html generation (feel free to tune it for your particular application)
	// print calendar header
	var str_buffer = new String (
		"<html>\n"+
                "<link href=\"js/Calendario.css\" rel=\"stylesheet\" type=\"text/css\">\n"+
		"<head>\n"+
		"	<title>Calendário</title>\n"+
		"</head>\n"+
		"<body bgcolor=\"White\">\n"+
		"<table cellspacing=\"0\" border=\"0\" height=\"170\" width=\"248\">\n"+
		"<tr><td bgcolor=\"#000000\">\n"+
		"<table cellspacing=\"1\" cellpadding=\"2\" border=\"0\" height=\"170\" width=\"248\">\n"+

                "<tr>\n	<td class=\"PadraoMes\" colspan=\"1\" align=\"center\">\n"+
                "<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\" width=\"100%\">\n"+
		
		"<tr>\n <td valign=\"middle\"  align=\"left\" colspan=\"1\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_prev_month)+"')\">"+
                "<img src=\"images/prev.gif\" width=\"16\" height=\"16\" border=\"0\""+
		" alt=\"Ano Anterior\"></a></td>\n"+

		"<td valign=\"middle\" align=\"left\" colspan=\"1\" class=\"PadraoAno\">&nbsp;<a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_prev_month)+"')\">"+
		"<font color=\"white\">"+MesPrev+"</font></a></td>\n</tr>\n</table>\n"+



		"<td align=\"center\" class=\"PadraoTituloMes\" colspan=\"5\">"+
		arr_months[dt_datetime.getMonth()]+" "+dt_datetime.getFullYear()+"</td>\n"+

		"<td class=\"PadraoMes\" colspan=\"1\" align=\"center\">\n"+
		"<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\" width=\"100%\">\n"+		

		"<tr>\n <td valign=\"middle\" align=\"right\" colspan=\"1\" class=\"PadraoAno\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_next_month)+"')\">"+
		"<font color=\"white\">"+MesNext+"</font></a>&nbsp;</td>\n"+

		"<td valign=\"middle\"  align=\"right\" colspan=\"1\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_next_month)+"')\">"+
                "<img src=\"images/next.gif\" width=\"16\" height=\"16\" border=\"0\""+
		" alt=\"Próximo Ano\"></a></td>\n</tr>\n</table>\n"+


		//"</table></td></tr>\n" +

                "</tr>\n <tr>\n	<td class=\"PadraoEspaco\" height=2 colspan=\"7\">&nbsp</td>\n</tr>\n"+
		
		"<tr>\n	<td class=\"PadraoMes\" colspan=\"7\" align=\"center\">\n"+
		"<table cellspacing=\"0\" cellpadding=\"2\" border=\"0\" width=\"100%\">\n"+

                "<tr>\n	<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_jan)+"')\"><font color=\"white\">Jan</font></a></td>\n"+

                "<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_fev)+"')\"><font color=\"white\">Fev</font></a></td>\n"+

                "<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_mar)+"')\"><font color=\"white\">Mar</font></a></td>\n"+

                "<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_abr)+"')\"><font color=\"white\">Abr</font></a></td>\n"+

                "<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_mai)+"')\"><font color=\"white\">Mai</font></a></td>\n"+

                "<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_jun)+"')\"><font color=\"white\">Jun</font></a></td>\n"+

                //"<td class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		//str_target+"', '"+ dt2dtstr(dt_prev_month)+"')\">"+
                //"<img src=\"images/prev.gif\" width=\"16\" height=\"16\" border=\"0\""+
		//" alt=\"Ano Anterior\"></a></td>\n</tr>\n"+

                "<tr>\n	<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_jul)+"')\"><font color=\"white\">Jul</font></a></td>\n"+

                "<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_ago)+"')\"><font color=\"white\">Ago</font></a></td>\n"+

                "<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_set)+"')\"><font color=\"white\">Set</font></a></td>\n"+

                "<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_out)+"')\"><font color=\"white\">Out</font></a></td>\n"+

                "<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_nov)+"')\"><font color=\"white\">Nov</font></a></td>\n"+

                "<td width=\"42\" class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		str_target+"', '"+ dt2dtstr(dt_dez)+"')\"><font color=\"white\">Dez</font></a></td>\n"+

                //"<td class=\"PadraoMes\"><a href=\"javascript:window.opener.show_calendar('"+
		//str_target+"', '"+ dt2dtstr(dt_next_month)+"')\">"+
                //"<img src=\"images/next.gif\" width=\"16\" height=\"16\" border=\"0\""+
		//" alt=\"Próximo Ano\"></a></td>\n</tr>\n"+
                
		"</table></td></tr>\n" +

		"</tr>\n <tr>\n	<td class=\"PadraoEspaco\" height=2 colspan=\"7\">&nbsp</td>\n</tr>\n"
	);

	var dt_current_day = new Date(dt_firstday);
	
	// Titulos dos Dias
	str_buffer += "<tr>\n";
	for (var n=0; n<7; n++)
		str_buffer += "	<td align=center width=\"36\" class=\"PadraoDia\">"+
		week_days[(n_weekstart+n)%7]+"</td>\n";
	
	// Tabela do Calendário
	str_buffer += "</tr>\n";
	while (dt_current_day.getMonth() == dt_datetime.getMonth() ||
		dt_current_day.getMonth() == dt_firstday.getMonth()) {
		
		// Linhas do calendario
		str_buffer += "<tr>\n";
		for (var n_current_wday=0; n_current_wday<7; n_current_wday++) {
				if (dt_current_day.getDate() == dt_datetime.getDate() &&
					dt_current_day.getMonth() == dt_datetime.getMonth())
					// Data Corrente
					str_buffer += "	<td width=\"36\" class=\"PadraoDiaSelecionado\" align=\"right\">";
				else if (dt_current_day.getDay() == 0 || dt_current_day.getDay() == 6)
					// Fins de Semana
					str_buffer += "	<td width=\"36\" class=\"PadraoFimSemana\" align=\"right\">";
				else
					// Dias Uteis
					str_buffer += "	<td width=\"36\" class=\"PadraoDiaUtil\" align=\"right\">";

				if (dt_current_day.getMonth() == dt_datetime.getMonth())
					// Dias do mes corrente
					str_buffer += "<a href=\"javascript:window.opener."+str_target+
					".value='"+dt2dtstr(dt_current_day)+"'; window.close();\">"+
					"<font color=\"black\">";
				else 
					// Dias de outros meses
					str_buffer += "<a href=\"javascript:window.opener."+str_target+
					".value='"+dt2dtstr(dt_current_day)+"'; window.close();\">"+
					"<font color=\"gray\">";
				str_buffer += dt_current_day.getDate()+"</font></a></td>\n";
				dt_current_day.setDate(dt_current_day.getDate()+1);
		}
		// print row footer
		str_buffer += "</tr>\n"
	}
	// print calendar footer
	str_buffer +=
		
                "<form name=\"cal\">\n"+
		"<tr>\n<td class=\"PadraoRodape\" height=1 colspan=\"7\">&nbsp</td>\n</tr>\n"+
		"<tr>\n<td align=center valign=middle colspan=\"7\" class=\"PadraoDiaUtil\">"+
		"<input type=\"hidden\" name=\"time\" value=\""+dt2tmstr(dt_datetime)+"\" >\n" +
		"<a href=\"javascript:window.opener."+str_target+
		".value='';window.close();\">"+
		"<img src=\"images/limpar_data.jpg\" border=\"0\""+
		" alt=\"Limpar Data\"></a>\n</td></tr>\n</form>\n" +
		"</table>\n" +
		"</td>\n</tr>\n</table>\n" +
		"</body>\n" +
		"</html>\n";

        var largura=270;
        var altura=260;  

	var vWinCal = window.open("", "Calendar", 
		"left="+(screen.width-10-largura)/2+" ,top="+(screen.height-28-altura)/2+",height="+altura+",width="+largura+",status=no,resizable=no");
	vWinCal.opener = self;
	vWinCal.focus();
	var calc_doc = vWinCal.document;
	calc_doc.write (str_buffer);
	calc_doc.close();
}
// datetime parsing and formatting routimes. modify them if you wish other datetime format
function str2dt (str_datetime) {
	var re_date = /^(\d+)\/(\d+)\/(\d+)$/;
	if (!re_date.exec(str_datetime))
		return alert("Invalid Datetime format: "+ str_datetime);
	return (new Date (RegExp.$3, RegExp.$2-1, RegExp.$1, RegExp.$4, RegExp.$5, RegExp.$6));
}
function dt2dtstr (dt_datetime) {
var Dia;
var Mes;

Mes = dt_datetime.getMonth()+1;
Dia = dt_datetime.getDate();


if (Mes < 10) {
	Mes = "0" + Mes;
}

if (Dia < 10) {
	Dia = "0" + Dia;
}


	return (new String (
		Dia+"/"+(Mes)+"/"+dt_datetime.getFullYear()+""));


	//return (new String (
	//	dt_datetime.getDate()+"/"+(dt_datetime.getMonth()+1)+"/"+dt_datetime.getFullYear()+""));


}
function dt2tmstr (dt_datetime) {
	return (new String (
			dt_datetime.getHours()+":"+dt_datetime.getMinutes()+":"+dt_datetime.getSeconds()));
}

function FormataData(campo,teclapres) {
	var tecla = teclapres.keyCode;
	vr = campo.value;
	//ve se tecla apertada foi um No
	if ((tecla < 48) || (tecla > 57)){
		for(i=0;i<vr.length+1;i++){
			vr = vr.replace( String.fromCharCode(tecla), "" );
			vr = vr.replace( String.fromCharCode(tecla).toLowerCase(), "" );

		}
	}

	for(i=0;i<vr.length+1;i++){
	//"super marreta" nao deixa passar nada!!
//		aux = vr.substr( i, 1 );
//		if ((aux == "/") || (aux == "|") || (aux=="'") || 
//			(aux==" ") || (aux=="!") || (aux=="@") || 
//			(aux=="#") || (aux=="$") || (aux=="%") || 
//			(aux=="¨") || (aux=="&") || (aux=="*") || 
//			(aux=="(") || (aux==")") || (aux=="-") ||
//			(aux=="_") || (aux=="=") || (aux=="+") ||
//			(aux==".") || (aux==":") || (aux=="?") ||
//			(aux==">") || (aux=="<") || (aux==",") ||
//			(aux=="\") || (aux=="£") || (aux=="¢") ||
//			(aux=="´") || (aux=="`") || (aux=="{") ||
//			(aux=="[") || (aux=="ª") || (aux=="^") ||
//			(aux=="}") || (aux=="]") || (aux=="º") ||
//			(aux=="°") || (aux==";") || (aux=="§") || (aux=="¬")||(aux=="~") ||) {
//			vr = vr.replace(aux,"");
		vr = vr.replace( "/", "" );
		vr = vr.replace( ".", "" );
//		}
	}

	campo.value = vr;

	if (vr.length > 8)
		vr = vr.substr( 0, 8 );
	
	tam = vr.length;
	
	if ( tam > 0 && tam < 4 ){
		//FORMATACAO DE VALORES
	
		aux1 = vr.substr( 0, 1);
		//ve se passou de trinta
		if (aux1 > 3)
			vr = "3"+ vr.substr( 1, vr.length - 1);
	
		aux2 = vr.substr(2, 1);
		//ve se passou de dez
		if (aux2 > 1)
			vr = vr.substr( 0,2) +"1"+ vr.substr( 3, vr.length - 1);

		aux3 = vr.substr( 1, 1);
		aux1 = vr.substr( 0, 1);
		//ve se passou de trinta e um
		if ((aux1 == 3) &&(aux3 > 1))
			vr = vr.substr( 0,1) +"1"+ vr.substr( 2, vr.length - 1);
		
	}
	
	if (tam >= 4){
		//FORMATA DIA->MESES (nao inclui bisexto)
		aux1 = vr.substr(0, 2);
		aux2 = vr.substr(2, 2);
		//ve se mes passou de doze
		if (aux2 > 12)
			vr = vr.substr( 0,2) +"12"+ vr.substr( 3, vr.length - 1);	
		
		//JANEIRO
		if ((aux2 == "01") && (aux1 >31)){
			vr = "31"+ vr.substr( 2, vr.length - 1);
		}
		//FEVEREIRO
		else if ((aux2 == "02") && (aux1 >28)){
			vr = "28"+ vr.substr( 2, vr.length - 1);
		}
		//MARCO
		else if ((aux2 == "03") && (aux1 >30)){
			vr = "30"+ vr.substr( 2, vr.length - 1)
		}
		//ABRIL
		else if ((aux2 == "04") && (aux1 >30)){
			vr = "30"+ vr.substr( 2, vr.length - 1)
		}
		//MAIO
		else if ((aux2 == "05") && (aux1 >31)){
			vr = "31"+ vr.substr( 2, vr.length - 1)
		}
		//JUNHO
		else if ((aux2 == "06") && (aux1 >30)){
			vr = "30"+ vr.substr( 2, vr.length - 1)
		}
		//JULHO
		else if ((aux2 == "07") && (aux1 >31)){
			vr = "31"+ vr.substr( 2, vr.length - 1)
		}
		//AGOSTO
		else if ((aux2 == "08") && (aux1 >31)){
			vr = "31"+ vr.substr( 2, vr.length - 1)
		}
		//SETEMBRO
		else if ((aux2 == "09") && (aux1 >30)){
			vr = "30"+ vr.substr( 2, vr.length - 1)
		}
		//OUTUBRO
		else if ((aux2 == "10") && (aux1 >31)){
			vr = "31"+ vr.substr( 2, vr.length - 1)
		}
		//NOVEMBRO
		else if ((aux2 == "11") && (aux1 >30)){
			vr = "30"+ vr.substr( 2, vr.length - 1)
		}
		//DEZEMBRO
		else if ((aux2 == "12") && (aux1 >31)){
			vr = "31"+ vr.substr( 2, vr.length - 1);
		}
	}
	

	tam = vr.length + 1;

	if ( tecla != 9 && tecla != 8 ){
//		if ( tam = 2)
//			campo.value = vr;
		if ( tam > 2 && tam < 5 )
			campo.value = vr.substr( 0, tam - 2  ) + '/' + vr.substr( tam - 2, tam );
		if ( tam >= 5 && tam <= 10 )
			campo.value = vr.substr( 0, 2 ) + '/' + vr.substr( 2, 2 ) + '/' + vr.substr( 4, 4); 
	}
	
}

function Valida(evento)
{
	var tecla = evento.keyCode;
	return (((tecla>=48)&&(tecla<=57)) || (tecla==45));
}

function SoNumero(teclapres) {
var tecla = teclapres.keyCode;
	if ((tecla < 48) || (tecla > 57)){
		teclapres.keyCode = 0;
	}	
}



function VerificaTecla() {
if ((window.event.keyCode == 39) || (window.event.keyCode == 59) || (window.event.keyCode == 60) || (window.event.keyCode == 62) || (window.event.keyCode == 38) || (window.event.keyCode == 34) || (window.event.keyCode == 35) || (window.event.keyCode == 36))
{
window.event.keyCode =0;
}
}


function Formata(campo,tamanho,evento,numcasas)
{
	var tecla = evento.keyCode;
	var desloc = -10;
	if (campo.readOnly==false)
	{
		switch(tecla)
		{
			case 39: desloc=2; break;
			case 37: desloc=0; break;
			case 38: desloc=-3; break;
		    case 40: desloc=5; break;
		}
		if (desloc!=-10)
		{
			if ((document.Form.elements[campo.tabIndex+desloc])&&(document.Form.elements[campo.tabIndex+desloc].type!="hidden"))
			{
				document.Form.elements[campo.tabIndex+desloc].focus();
			}
		}
		else
		{
			if (((tecla>=96)&&(tecla<=106)) ||((tecla>=48)&&(tecla<=57)) || (tecla==45))
			{
				FormataValor(campo,tamanho,evento,numcasas);
			}
		}
	}
}

//Esta função formata os valores quando digitados em um text, colocando automaticamente os pontos e virgulas.
function FormataValor(campo,tammax,teclapres,numcasas) {
     	var tecla = teclapres.keyCode;
     	var vrfinal = "";
     	var i = "";
     	var tamanhomin;
     	vr = campo.value;
     	vr = vr.replace( "/", "" );
     	vr = vr.replace( "/", "" );
     	vr = vr.replace( ",", "" );
     	vr = vr.replace( ".", "" );
     	vr = vr.replace( ".", "" );
     	vr = vr.replace( ".", "" );
     	vr = vr.replace( ".", "" );
     	tam = vr.length;
     	if (tam < tammax && tecla != 8){ tam = vr.length + 1 ; }
     	if (tecla == 8 ){	tam = tam - 1 ; }
     	if ( tecla == 8 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105 ){
     		
     		if ( tam <= numcasas  || numcasas==0){
     	 		vrfinal = vr ; 
     	 		 }
     	 	if ( (tam > numcasas) && (tam <= (numcasas + 3)) ){
     	 		if (numcasas!=0) {
     	 			vrfinal = vr.substr( 0, tam - numcasas ) + ',' + vr.substr( tam - numcasas, tam ) ; 
     	 		}  	 		
     	 	}
     	 	if ( (tam >= (numcasas + 4)) && (tam <= (numcasas + 6)) ){
				if (numcasas!=0) {     	 	
     	 			vrfinal = vr.substr( 0, tam - (numcasas + 3)) + '.' + vr.substr( tam - (numcasas + 3), 3 ) + ',' + vr.substr( tam - numcasas, tam ) ; 
     	 		}
     	 		else
     	 		{
					vrfinal = vr.substr( 0, tam - (numcasas + 3)) + '.' + vr.substr( tam - (numcasas + 3), 3 ) ;      	 		
     	 		}	
     	 	}
     	 		
     	 	if ( (tam >= (numcasas + 7)) && (tam <= (numcasas + 9)) ){
     	 		if (numcasas!=0) {
     	 			vrfinal = vr.substr( 0, tam - (numcasas + 6)) + '.' + vr.substr( tam - (numcasas + 6), 3 ) + '.' + vr.substr( tam - (numcasas + 3), 3 ) + ',' + vr.substr( tam - numcasas, tam ) ; 
     	 		}
     	 		else
     	 		{
     	 			vrfinal = vr.substr( 0, tam - (numcasas + 6)) + '.' + vr.substr( tam - (numcasas + 6), 3 ) + '.' + vr.substr( tam - (numcasas + 3), 3 ) ; 
     	 		}	
     	 	}
     	 	
     	 	
     	 	if ( (tam >= (numcasas + 10)) && (tam <= (numcasas + 12)) ){
				if (numcasas!=0) {     	 	
     	 			vrfinal = vr.substr( 0, tam - (numcasas + 9)) + '.' + vr.substr( tam - (numcasas + 9), 3 ) + '.' + vr.substr( tam - (numcasas + 6), 3 ) + '.' + vr.substr( tam - (numcasas + 3), 3 ) + ',' + vr.substr( tam - numcasas, tam ) ; 
     	 		}
     	 		else
     	 		{
     	 			vrfinal = vr.substr( 0, tam - (numcasas + 9)) + '.' + vr.substr( tam - (numcasas + 9), 3 ) + '.' + vr.substr( tam - (numcasas + 6), 3 ) + '.' + vr.substr( tam - (numcasas + 3), 3 ) ; 
     	 		}
     	 		
     	 	}
     	 	if ( (tam >= (numcasas + 13)) && (tam <= (numcasas + 15)) ){
     	 		if (numcasas!=0) {
     	 			vrfinal = vr.substr( 0, tam - (numcasas + 12)) + '.' + vr.substr( tam - (numcasas + 12), 3 ) + '.' + vr.substr( tam - (numcasas + 9), 3 ) + '.' + vr.substr( tam - (numcasas + 6), 3 ) + '.' + vr.substr( tam - (numcasas + 3), 3 ) + ',' + vr.substr( tam - numcasas, tam ) ;
     	 		}
     	 		else
     	 		{
     	 			vrfinal = vr.substr( 0, tam - (numcasas + 12)) + '.' + vr.substr( tam - (numcasas + 12), 3 ) + '.' + vr.substr( tam - (numcasas + 9), 3 ) + '.' + vr.substr( tam - (numcasas + 6), 3 ) + '.' + vr.substr( tam - (numcasas + 3), 3 )  ;
     	 		}	
     	 			
     	 	}
             
            
            
                   i=0;
                   while (i<vrfinal.length){
                      if ((vrfinal.substr( i,1 )=="0")||(vrfinal.substr( i,1 )==".")||(vrfinal.substr( i,1 )==",")) {
                         vrfinal = vrfinal.substr( i + 1, vrfinal.length );
                      }
                      else {
                         i=vrfinal.length;
                      }
                   }
                   if (tecla==8){
                    tamanhominimo=numcasas+2;
                   }
                    else
                   {
                    tamanhominimo=numcasas;
                   }
                   if (vrfinal.length<tamanhominimo){
                     vrfinal=vrfinal.replace( ",", "" );
                     while (vrfinal.length<tamanhominimo){
                        vrfinal = "0"+vrfinal
     	           }
     	         vrfinal=vrfinal.substr(0,1)+","+vrfinal.substr(1,vrfinal.length);
     	       }
     	       campo.value = vrfinal;
     	}
     }


//funcao que retira espaços em branco
function CtBranco(Texto)
{
   var CtBranco;
   var i;
   var AuxArquivo;
   
   CtBranco=0;
   AuxArquivo = Texto;
   for (i = 1; i < AuxArquivo.length + 1; i++) 
   { 
	    	if (AuxArquivo.substring(i-1,i) == " ") 
						{ 
		      	CtBranco++;
		    }
   }
   if (CtBranco==AuxArquivo.length) 
   {
      Texto="";
   	  return Texto;
   }
   return Texto;	  
}  

//funcao que obriga que o valor digitado contenha apenas números
function ObrigaNumerico(Numero)
  {
  		Ctchar=0;
  		AuxValor = Numero;
  		for (i = 1; i < AuxValor.length + 1; i++) 
  		{ 
  			if (((AuxValor.substring(i-1,i) != "0") && (AuxValor.substring(i-1,i) != "1") && (AuxValor.substring(i-1,i) != "2") && (AuxValor.substring(i-1,i) != "3") && (AuxValor.substring(i-1,i) != "4") && (AuxValor.substring(i-1,i) != "5") && (AuxValor.substring(i-1,i) != "6") && (AuxValor.substring(i-1,i) != "7") && (AuxValor.substring(i-1,i) != "8") && (AuxValor.substring(i-1,i) != "9")))
  			{ 
  				Ctchar++;
  			}
  		}
	
  		if (Ctchar > 0) 
  		{
  			Texto = "false";
  			return Texto;
  		}
  		else
  		{
  			Texto = "true";
  			return Texto;
  		}												
  }

//Funcao que esconde o div da combo 
function HideLayer(layer)
{
document.all[layer].style.visibility = "hidden";
}

//Funcao para exibir o div da combo
function ShowLayer(layer,seta)
{
var auxleft;
var auxtop;
var auxparent;
var auxwidth;
auxwidth=0;
if (seta.previousSibling.tagName=="INPUT")
 {
  auxwidth=seta.offsetWidth+seta.previousSibling.offsetWidth;
 }
else
 {
  auxwidth=seta.offsetWidth+seta.offsetLeft;
 } 
auxleft=seta.offsetLeft;
auxtop=seta.offsetTop;
auxparent=seta.offsetParent;
while (auxparent!=null)
 {
  auxleft=auxleft+auxparent.offsetLeft;
  auxtop=auxtop+auxparent.offsetTop;
  auxparent=auxparent.offsetParent;
 }
if (auxwidth!=0)
 {
  document.all[layer].style.width=auxwidth;
 }
document.all[layer].style.left = auxleft+seta.offsetWidth-document.all[layer].offsetWidth;
document.all[layer].style.top = auxtop+seta.offsetHeight;
document.all[layer].style.visibility = "visible";
}

//funcao para critica de datas
function isdate(dtparam) {
    var diaparam   = dtparam.substring(0,2);
    var mesparam = dtparam.substring(3,5);
    var anoparam = dtparam.substring(6,10);
    var barra1 = dtparam.substring(2,3);
    var barra2 = dtparam.substring(5,6);
          
    if ((barra1 != '/')||(barra2!='/')) {
       return false;}

    if (isNaN(diaparam)) {
       return false;}

    if (isNaN(mesparam)) {
       return false;}
    
    if (mesparam > 12) {
       return false } 
    
    if (isNaN(anoparam)) {
       return false;}
    
    if (anoparam.length < 4) {
       return false; }

    if ((mesparam == 2)&&(diaparam > 29)) {
        return false; }

    if (diaparam==31) {
    if ((mesparam!=1)&&(mesparam!=3)&&(mesparam!=5)&&(mesparam!=7)&&(mesparam!=8)&&(mesparam!=10)&&(mesparam!=12)) {
       return false; }
     }
      
    if (diaparam>31) {
    return false; }

    var bis = anoparam % 4
    
    if (diaparam == 29)
	{
      if ((mesparam == 2)&&(bis!=0))
	  {
        return false;
  	  }
    }
    return true;
}