//<!--

//Retorna o Objeto 
function RetornaObjeto(pObj){
	try{
		if (document.all){				
			return document.all[pObj];				
		}else{
			if (document.layers){
				return document.layers[pObj];
			}else{
				return document.getElementById(pObj);
			}
		}
				return document[pObj];
	}catch(Exception){
		return null;
	}
	return null;
}

//Remove Caracteres Invalido para a formatacao de numeros
function TiraCaracterInvalido(pCampo, pChar)
{
	var wCode = pChar.keyCode;
	var wValor = new String(pCampo.value);
	
	if ((wValor.indexOf(".",0) > -1) && (pChar.keyCode == 190))
		return false;
		
	if ((wValor.indexOf(",",0) > -1) && (pChar.keyCode == 188))
		return false;

	if ((wCode >= 65) && (wCode < 96))
		return false;

	return true;	
}

function FormataValor(pForm, pCampo, pTamMax, pTeclaPres, pVirgula) {
    //alert('aqui');
    //alert(pCampo);
    
	var wTecla = pTeclaPres.keyCode;
	wVr = pForm[pCampo].value;
	wVr = wVr.replace( "/", "" );
	wVr = wVr.replace( "/", "" );
	wVr = wVr.replace( ",", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( "," , "" )
	wTam = wVr.length;

	if (wTam < pTamMax && wTecla != 8)
	   { wTam = wVr.length + 1 ; }

	if (wTecla == 8 ){	wTam = wTam - 1 ; }
		
	if ( wTecla == 8 || wTecla >= 48 && wTecla <= 57 || wTecla >= 96 && wTecla <= 105 ){
      if (pVirgula == 1) {
		
		if ( wTam <= 2 ){ 
	 		pForm[pCampo].value = wVr ; 
		}


	 	if ( (wTam > 2) && (wTam <= 5) ){
		   pForm[pCampo].value = wVr.substr( 0, wTam - 2 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 6) && (wTam <= 8) ){
    	   pForm[pCampo].value = wVr.substr( 0, wTam - 5 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 9) && (wTam <= 11) ) {
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 8 ) + '.' + wVr.substr( wTam - 8, 3 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 12) && (wTam <= 14) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 11 ) + '.' + wVr.substr( wTam - 11, 3 ) + '.' + wVr.substr( wTam - 8, 3 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 15) && (wTam <= 17) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 14 ) + '.' + wVr.substr( wTam - 14, 3 ) + '.' + wVr.substr( wTam - 11, 3 ) + '.' + wVr.substr( wTam - 8, 3 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ;}
     } else { 
		if ( wTam <= 3 ){ 
	 		pForm[pCampo].value = wVr ; }
	 	if ( (wTam > 3) && (wTam <= 6) ){
		   pForm[pCampo].value = wVr.substr( 0, wTam - 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 7) && (wTam <= 9) ) {
    	   pForm[pCampo].value = wVr.substr( 0, wTam - 6 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 10) && (wTam <= 12) ) {
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 9 ) + '.' + wVr.substr( wTam - 9, 3 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 13) && (wTam <= 15) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 12 ) + '.' + wVr.substr( wTam - 12, 3 ) + '.' + wVr.substr( wTam - 9, 3 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 16) && (wTam <= 18) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 15 ) + '.' + wVr.substr( wTam - 15, 3 ) + '.' + wVr.substr( wTam - 12, 3 ) + '.' + wVr.substr( wTam - 9, 3 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ;}
	 }
	}		
	
}


function addItem(pObj, pValue, pTexto){
    var wObj = document.getElementById(pObj);
    var wItem = new Option(pTexto, pValue);
    var wTotal = wObj.options.length;
    wObj.options[wTotal] = wItem;
}
	   
function removeItens(pObj){
    var wObj = document.getElementById(pObj);
    for(x=0;x<wObj.options.length;x++){
        try{
            wObj.remove(x);
            x--;
        }catch(Exception){
            break;
        }
    }
}

function rTrim(pValor){
    var wVar = new String(pValor);
    try{
        while (wVar.substr(wVar.length -1,1) == ' '){
            wVar = wVar.substr(0,wVar.length -1);
        }
    }catch(Exception){}        
    return wVar;
}

//Function to open pop up window
function openWin(theURL,winName,features) {
  	window.open(theURL,winName,features);
}

//Valida o CPF em Funcao do Custom Validate
function ValidaCPF(source, arguments) {
	var wVr, wRe, wVrSEQ, wTam, wSoma, wSoma2, i, j, wDig1, wDig2,
		wVETOR_CC = new Array(9),
		wVETOR_PESO = new Array(9);

	var wVrCPF = arguments.Value+"";

	//Remove os Caracteres . e -		
	while(wVrCPF.indexOf('.')>0)
		wVrCPF = wVrCPF.replace('.','');
	
	while(wVrCPF.indexOf('-')>0)
		wVrCPF = wVrCPF.replace('-','');
		
	wTam = wVrCPF.length+1;
	
	if (wTam < 11) {
		arguments.IsValid = false;
		return;
	}
	
	for (i = 0; i < wVrCPF.length; i++) {
		if (isNaN(parseInt(wVrCPF.charAt(i))) ) {
			arguments.IsValid = false;
			return;
		}
	}
	
	if (wVrCPF == "11111111111" || wVrCPF == "22222222222" || wVrCPF == "33333333333" || wVrCPF == "44444444444" || wVrCPF == "55555555555" || 
		wVrCPF == "66666666666" || wVrCPF == "77777777777" || wVrCPF == "88888888888" || wVrCPF == "99999999999") {
		arguments.IsValid = false;
		return;
	}
	
	wSoma = 0;
	wSoma2 = 0;
	j = 2;

	for (i = 0; i < 11; i++) {
		wVETOR_CC[i] = wVrCPF.charAt(i);
		wVETOR_PESO[i] = j;
		j++; 
	} 
	
	i = 0;
			
	while (i < 9)  {
		i++;
		if (i < 10) {
			wSoma += wVETOR_CC[9 - i] * wVETOR_PESO[i - 1]; 
		}
		wSoma2 += wVETOR_CC[10 - i] * wVETOR_PESO[i - 1];
	}
	
	wDig1 = (wSoma * 10) % 11;
	wDig2 = (wSoma2 * 10) % 11;
	if (wDig1 == 10) { 
		wDig1 = 0;
	}	
	if (wDig2 == 10) { 
		wDig2 = 0;
	}	
	
	if (parseInt(wVrCPF.charAt(9)) != wDig1 || parseInt(wVrCPF.charAt(10)) != wDig2) {
		arguments.IsValid = false;
		return;
	}	
	//Retorna Pagina Pronta	    
	arguments.IsValid = true;
	return;  
}


function EnviarDados(pURL, pTarget) {

	var wStr = new String(pURL);
	var wAction = wStr.substr(0,wStr.indexOf('?'));
	
  	// Criar o Formulario e seus elementos
  	var wFrm=document.createElement('form');
  	wFrm.setAttribute('name','frmEnviaDadosURL');
	wFrm.setAttribute('action',wAction);
  	wFrm.setAttribute('method','post');
	//Verifica se existe algum target
	var wStr2 = new String(pTarget);
	if (wStr2 != "undefined")
  		wFrm.setAttribute('target', wStr2);
			    
	if (wStr.indexOf('?') > 0){
	
		wStr = wStr.substr(wStr.indexOf('?')+1,wStr.length);

		while (wStr.length >0){

			var wInput = document.createElement("input");
			wInput.setAttribute('type','hidden');
			wInput.setAttribute('name', wStr.substr(0,wStr.indexOf('=')));

			
			wStr = wStr.substr(wStr.indexOf('=')+1,wStr.length); 
			
			if (wStr.indexOf('&') > -1){		
		
				wInput.setAttribute('value', wStr.substr(0,wStr.indexOf('&')));

				wStr = wStr.substr(wStr.indexOf('&')+1,wStr.length);
			}else{
				wInput.setAttribute('value', wStr);
				wStr = "";	
			}
      
			wFrm.appendChild(wInput);
		}

	}else{
  		wFrm.setAttribute('action',wStr);
	}
    try{
	    document.appendChild(wFrm);
	}catch(Exception){
	    //Mozilla
	    document.body.appendChild(wFrm);
	}
	document.forms[document.forms.length-1].submit();
}

/*function EnviarDados(pURL) {

		document.clear();
		var wStr = new String(pURL);
    	
		if (wStr.indexOf('?') > 0){
			var wAction = wStr.substr(0,wStr.indexOf('?'));

			wStr = wStr.substr(wStr.indexOf('?')+1,wStr.length);	
			document.write ("<form name=\"frmEnviaDadosURL\" action=\"" + wAction + "\" method=post>");		

			//alert(wStr.length);
			while (wStr.length >0){
				document.write ("<input type=hidden name='" + wStr.substr(0,wStr.indexOf('=')) + "' value='");
				wStr = wStr.substr(wStr.indexOf('=')+1,wStr.length); 
				
				if (wStr.indexOf('&') > -1){		
					document.write(wStr.substr(0,wStr.indexOf('&')) + "'>");
					wStr = wStr.substr(wStr.indexOf('&')+1,wStr.length);
				}else{
					document.write(wStr + "'>");
					wStr = "";	
				}	
			}
			
		}else{
			document.write ("<form name=\"frmEnviaDadosURL\" action=" + wStr + " method=post>");		
		}
		document.write ("</form>.");
		//alert(document.forms.length);
		document.forms['frmEnviaDadosURL'].submit();
}
*/
function Cabecalho()
{/*
		<meta name="GENERATOR" Content="Microsoft Visual Studio .NET 7.1">
		<meta name="CODE_LANGUAGE" Content="C#">
		<meta name="vs_defaultClientScript" content="JavaScript">
		<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
*/
	document.write("<meta http-equiv=\"GENERATOR\" content=\"Microsoft Visual Studio .NET 7.1\">");
	document.write("<meta http-equiv=\"vs_defaultClientScript\" content=\"JavaScript\">");

	document.write("<meta http-equiv=\"Content-Language\" content=\"pt-br\">");
	document.write("<meta http-equiv=\"CODE_LANGUAGE\" content=\"C#\">");
	document.write("<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">");
	document.write("<meta name=\"ProgId\" content=\"FrontPage.Editor.Document\">");
	document.write("<title>.:: ...</title>");

}

function Topo()
{
      	document.write("Quero Alugar<br>");
     	document.write("       &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Atacadista</font></b></td>");
        document.write("        <td width=\"53%\" height=\"62\">");
        document.write(" <table border=\"0\" width=\"100%\" bgcolor=\"#FFFFFF\">                    <tr>");
        document.write("  <td width=\"25%\" bgcolor=\"#FF6600\" align=\"center\" bordercolor=\"#6699CC\"><b><font face=\"Verdana\" size=\"1\">&nbsp;");
        document.write("                Home</font></b></td>");
        document.write("              <td width=\"25%\" bgcolor=\"#FF6600\" align=\"center\" bordercolor=\"#6699CC\"><b><font face=\"Verdana\" size=\"1\">Sign In</font></b></td>");
        document.write("             <td width=\"25%\" bgcolor=\"#FF6600\" align=\"center\" bordercolor=\"#6699CC\"><b><font face=\"Verdana\" size=\"1\">Compras</font></b></td>");
        document.write("              <td width=\"25%\" bgcolor=\"#FF6600\" align=\"center\" bordercolor=\"#6699CC\"><b><font face=\"Verdana\" size=\"1\">Sign Out</font></b></td></tr></table>");
        document.write("          <p align=\"right\"><font face=\"Verdana\" size=\"2\"><b>Pesquisar:</b>");
        document.write("          </font><font face=\"Verdana\" size=\"1\">");
        document.write("          <input type=\"text\" name=\"pfPesquisa\" onkeypress=\"javascript:if (event.keyCode == 13) btPesquisar.click();\" size=\"20\" >");
        document.write("          <input type=\"button\" value=\"OK\" name=\"btPesquisar\" onclick=\"javascript:return Enviar(frmPrincipal,'pfPesquisa','P','default.asp'); \" >&nbsp;</font></p>");


}


function Mesclar(wValor)
{
	wV = "00" + wValor.toString();
	wJ = wV.length;
	wV = wV.substring(wJ-2,wJ);
	return wV;
}


function DataLonga()
{
//	var wMes 	= ["Janeiro","Fevereiro","Março","Abril","Maio","Junho","Julho","Agosto","Setembro","Outubro","Novembro","Dezembro"];
//	var wSemana 	= ["Domingo","Segunda","Terça","Quarta","Quinta","Sexta","Sábado"];

//	var wData = new Date();	
	
//	return wSemana[wData.getDay()] + ", " + Mesclar(wData.getDate()) + " de " + wMes[(wData.getMonth())] + " de " + wData.getFullYear();
		 	
}


function Atualizacao()
{

	document.write("05 de Janeiro de 2002");

}


function Rodape()
{
	document.write(" <font color=\"#6699CC\" size=\"1\" face=\"Verdana\"> Melhor visualiza&#231;&#227;o em PC com&nbsp;<br>");
	document.write("  modem 28kbps(+) resolu&#231;&#227;o&nbsp; 800x600(+) com Internet Explorer 5.0(+)&nbsp;<br>");
	document.write("  &copy copyright 1995-2002 by <a href=\"http://lugr\">lugr corporation</a>&nbsp;<br>");
	document.write("             Todos os direitos reservados</font>");


}


function search(pvalue,pS)
{
	for (wI = 0; wI < pvalue.length;wI ++)
	{
		if (pvalue.charAt(wI) == pS)
		{
			return wI;
		}	
	}
	return -1;
}	

function FormataDadoData(pForm, pCampo,pTeclaPres) {
	var wTecla = pTeclaPres.keyCode;
	wVr = pForm[pCampo].value;
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( "/", "" );
	wVr = wVr.replace( "/", "" );
	wVr = wVr.replace( "/", "" );
	
	wTam = wVr.length + 1;

	if ( wTecla != 9 && wTecla != 8 ){
		if ( wTam > 2 && wTam < 5 )
			pForm[pCampo].value = wVr.substr( 0, wTam - 2  ) + '/' + wVr.substr( wTam - 2, wTam );
		if ( wTam >= 5 && wTam <= 10 )
			pForm[pCampo].value = wVr.substr( 0, 2 ) + '/' + wVr.substr( 2, 2 ) + '/' + wVr.substr( 4, 4 ); 
	}			
}



function FormataDadoCPF(pForm,pCampo,pTeclaPres){
	var wTecla, wVr, wTam;	
	var pTamMax=14;
	var pPos1=3;
	var pPos2=7;
	var pPosTraco=12;

	wTecla = pTeclaPres.keyCode;
	wVr = pForm[pCampo].value;
	wVr = wVr.replace( "-", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( "/", "" );
	wTam = wVr.length ;
	
	if (wTam < pTamMax && wTecla != 8) { 
	   wTam = wVr.length + 1 ; 
	}

	if (wTecla == 8 ) { 
	   wTam = wTam - 1 ; 
	}

	if ( wTecla == 8 || wTecla == 88 || wTecla >= 48 && wTecla <= 57 || wTecla >= 96 && wTecla <= 105 ){
	
		if ( wTam <= 2 ){
	 		pForm[pCampo].value = wVr ;
		}

		if (wTam >= pPos1+1) 
	       		wVr = wVr.substr(0, pPos1) + '.' + wVr.substr(pPos1,wTam);			

		if (wTam >= pPos2) 
	       		wVr = wVr.substr(0, pPos2) + '.' + wVr.substr(pPos2,wTam);			

		if (wTam >= pPosTraco-2) 
	       		wVr = wVr.substr(0, pPosTraco-1) + '-' + wVr.substr(pPosTraco-1,wTam);			

		pForm[pCampo].value = wVr;	
	}
}


function VerificaSoCEP(pForm, pCampo) {
	var wVr, wTam, wSoma, wSoma2, i, j, wDig1, wDig2,
	    wVETOR_CC = new Array(9),
	    wVETOR_PESO = new Array(9);
	
	wVr = pForm[pCampo].value;
	wVr = wVr.replace( ".", "" );
    wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( "-", "" );
	wTam = wVr.length + 1;

	for (i = 0; i < wVr.length; i++) {
	   if (isNaN(wVr)){
	     if (wVr.charAt(i) != "." || wVr.charAt(i) != "-"){
	   //if (isNaN(parseInt(wVr.charAt(i))) ) {
  	     alert("O CEP informado contém dígitos inválidos. Corrija-o !!!");
	     pForm[pCampo].value = "";
	     pForm[pCampo].focus();
	     return false;
		 }
	   }
	 }
	 if (wTam < 9) {
	  alert("Nº de dígitos do CEP menor que o normal ou em branco. Redigite-o !!!");
	  pForm[pCampo].value = "";
	  pForm[pCampo].focus();
	  return false;
	}
	return true;
  } 



function VerificaCPF(pFrm,pCampo) {
	var wVr, wRe, wVrSEQ, wTam, wSoma, wSoma2, i, j, wDig1, wDig2,
	    wVETOR_CC = new Array(9),
	    wVETOR_PESO = new Array(9);

	var wVrCPF = pFrm[pCampo].value+"";
	
	wRe = ".";	
	while (search(wVrCPF,wRe) > 0)
		wVrCPF = wVrCPF.replace(wRe, "" );
	
	wRe = "-";
	while (wVrCPF.search(wRe) > 0)
		wVrCPF = wVrCPF.replace(wRe, "" );
		
	wTam = wVrCPF.length + 1;

    if (wTam < 11) {
	  alert("Nº de dígitos do CPF menor que o normal. Redigite !!!");	  
	  return false;
	}
    
	for (i = 0; i < wVrCPF.length; i++) {
	   if (isNaN(parseInt(wVrCPF.charAt(i))) ) {
  	     alert("O CPF contém dígitos inválidos. Corrija-o !!!"+wVrCPF.charAt(i));
	     return false;
	   }
	}
	
	if (wVrCPF == "11111111111" || wVrCPF == "22222222222" || wVrCPF == "33333333333" || wVrCPF == "44444444444" || wVrCPF == "55555555555" || 
	    wVrCPF == "66666666666" || wVrCPF == "77777777777" || wVrCPF == "88888888888" || wVrCPF == "99999999999") {
  	     alert("CPF Inválido. Redigite-o !!!");
	     return false;
	}
    wSoma = 0;
	wSoma2 = 0;
    j = 2;

    for (i = 0; i < 11; i++) {
	   wVETOR_CC[i] = wVrCPF.charAt(i);
	   wVETOR_PESO[i] = j;
	   j++; 
	} 
    i = 0;	  
    while (i < 9)  {
	   i++;
	   if (i < 10) {
          wSoma += wVETOR_CC[9 - i] * wVETOR_PESO[i - 1]; }
	   wSoma2 += wVETOR_CC[10 - i] * wVETOR_PESO[i - 1];
	}
	wDig1 = (wSoma * 10) % 11;
	wDig2 = (wSoma2 * 10) % 11;
	if (wDig1 == 10) { 
	    wDig1 = 0;
	}	
	if (wDig2 == 10) { 
	    wDig2 = 0;
	}		
    if (parseInt(wVrCPF.charAt(9)) != wDig1 || parseInt(wVrCPF.charAt(10)) != wDig2) {
  	     alert("CPF com Dígito Verificador inválido. Redigite-o !!!");
	     return false;
    }	
    
    return true;  

}

function FormataTEL(pForm, pCampo, pTeclaPres) {
	var wTecla = pTeclaPres.keyCode;
	var wTam;
	wVr = pForm[pCampo].value;
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( "-", "" );
	wVr = wVr.replace( "/", "" );
	wTam = wVr.length + 1;

	if ( wTecla != 9 && wTecla != 8 ){
		if ( wTam > 3 && wTam < 8 ) 
			pForm[pCampo].value = wVr.substr( 0, 3 ) + '-' + wVr.substr( 3, 4 );
		if ( wTam >= 8 && wTam <= 10 )
			pForm[pCampo].value = wVr.substr( 0, 4 ) + '-' + wVr.substr( 4, 4 ); 
	}			
}

function FormataValor(pForm, pCampo, pTamMax, pTeclaPres, pVirgula) {
	var wTecla = pTeclaPres.keyCode;
	wVr = pForm[pCampo].value;
	wVr = wVr.replace( "/", "" );
	wVr = wVr.replace( "/", "" );
	wVr = wVr.replace( ",", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wTam = wVr.length;


	if (wTam < pTamMax && wTecla != 8)
	   { wTam = wVr.length + 1 ; }

	if (wTecla == 8 ){	wTam = wTam - 1 ; }
		
	if ( wTecla == 8 || wTecla >= 48 && wTecla <= 57 || wTecla >= 96 && wTecla <= 105 ){
      if (pVirgula == 1) {
		if ( wTam <= 2 ){ 
	 		pForm[pCampo].value = wVr ; }
	 	if ( (wTam > 2) && (wTam <= 5) ){
		   pForm[pCampo].value = wVr.substr( 0, wTam - 2 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 6) && (wTam <= 8) ){
    	   pForm[pCampo].value = wVr.substr( 0, wTam - 5 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 9) && (wTam <= 11) ) {
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 8 ) + '.' + wVr.substr( wTam - 8, 3 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 12) && (wTam <= 14) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 11 ) + '.' + wVr.substr( wTam - 11, 3 ) + '.' + wVr.substr( wTam - 8, 3 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 15) && (wTam <= 17) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 14 ) + '.' + wVr.substr( wTam - 14, 3 ) + '.' + wVr.substr( wTam - 11, 3 ) + '.' + wVr.substr( wTam - 8, 3 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ;}
     } else { 
		if ( wTam <= 3 ){ 
	 		pForm[pCampo].value = wVr ; }
	 	if ( (wTam > 3) && (wTam <= 6) ){
		   pForm[pCampo].value = wVr.substr( 0, wTam - 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 7) && (wTam <= 9) ) {
    	   pForm[pCampo].value = wVr.substr( 0, wTam - 6 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 10) && (wTam <= 12) ) {
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 9 ) + '.' + wVr.substr( wTam - 9, 3 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 13) && (wTam <= 15) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 12 ) + '.' + wVr.substr( wTam - 12, 3 ) + '.' + wVr.substr( wTam - 9, 3 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 16) && (wTam <= 18) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 15 ) + '.' + wVr.substr( wTam - 15, 3 ) + '.' + wVr.substr( wTam - 12, 3 ) + '.' + wVr.substr( wTam - 9, 3 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ;}
	 }
	}		
	
}

function FormataValorDisplay(pForm, pCampo, pTamMax, pVirgula) {
	wVr = pForm[pCampo].value;
	wVr = wVr.replace( "/", "" );
	wVr = wVr.replace( "/", "" );
	wVr = wVr.replace( ",", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wTam = wVr.length;

      if (pVirgula == 1) {
		if ( wTam <= 2 ){ 
	 		pForm[pCampo].value = wVr ; }
	 	if ( (wTam > 2) && (wTam <= 5) ){
		   pForm[pCampo].value = wVr.substr( 0, wTam - 2 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 6) && (wTam <= 8) ){
    	   pForm[pCampo].value = wVr.substr( 0, wTam - 5 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 9) && (wTam <= 11) ) {
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 8 ) + '.' + wVr.substr( wTam - 8, 3 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 12) && (wTam <= 14) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 11 ) + '.' + wVr.substr( wTam - 11, 3 ) + '.' + wVr.substr( wTam - 8, 3 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ; }
	 	if ( (wTam >= 15) && (wTam <= 17) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 14 ) + '.' + wVr.substr( wTam - 14, 3 ) + '.' + wVr.substr( wTam - 11, 3 ) + '.' + wVr.substr( wTam - 8, 3 ) + '.' + wVr.substr( wTam - 5, 3 ) + ',' + wVr.substr( wTam - 2, wTam ) ;}
     } else { 
		if ( wTam <= 3 ){ 
	 		pForm[pCampo].value = wVr ; }
	 	if ( (wTam > 3) && (wTam <= 6) ){
		   pForm[pCampo].value = wVr.substr( 0, wTam - 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 7) && (wTam <= 9) ) {
    	   pForm[pCampo].value = wVr.substr( 0, wTam - 6 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 10) && (wTam <= 12) ) {
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 9 ) + '.' + wVr.substr( wTam - 9, 3 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 13) && (wTam <= 15) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 12 ) + '.' + wVr.substr( wTam - 12, 3 ) + '.' + wVr.substr( wTam - 9, 3 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ; }
	 	if ( (wTam >= 16) && (wTam <= 18) ){
	 		pForm[pCampo].value = wVr.substr( 0, wTam - 15 ) + '.' + wVr.substr( wTam - 15, 3 ) + '.' + wVr.substr( wTam - 12, 3 ) + '.' + wVr.substr( wTam - 9, 3 ) + '.' + wVr.substr( wTam - 6, 3 ) + '.' + wVr.substr( wTam - 3, wTam ) ;}
	 }
}

function FormataDadoCEP(pForm, pCampo, pTeclaPres) {
    //alert('aaa');
	var wTecla = pTeclaPres.keyCode;
	var wTam;
	wVr = pForm[pCampo].value;
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( "-", "" );
	wVr = wVr.replace( "/", "" );
	wTam = wVr.length + 1;

	if ( wTecla != 9 && wTecla != 8 )
	{			
		if (wTam >= 3) 
			wVr = wVr.substr( 0, 2  ) + '.' + wVr.substr(2, wTam );

		if ( wTam >= 6 )
			wVr = wVr.substr(0, 6) + '-' + wVr.substr(6,wTam);

		pForm[pCampo].value = wVr;				
	}			
}

function FormataDadoCEP2(pValor){
	var wVr = new String(pValor);
	wVr = wVr.replace( "-", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( ".", "" );
	wVr = wVr.replace( "/", "" );
	wVr = padLeft(wVr,'0',8);
	wVr = wVr.substr(0,2) + "." + wVr.substr(2,3) + "-" + wVr.substr(5);
	return wVr;	
}

function padLeft(str, pad, count) {
    while(str.length <count)
        str=pad+str;
    return str;
}

function SbrebowsMaiusculo(pForm, pCampo, pOperacao) {
   if (pOperacao == "+") {
     pForm[pCampo].value = pForm[pCampo].value.toUpperCase();
   } else {
     pForm[pCampo].value = pForm[pCampo].value.toLowerCase();
   }
}

function valida_inteiro(parametro)  //FUNCAO PARA VALIDACAO DE NÚMEROS INTEIROS, E ESPAÇOS EM BRANCO
{
	if (parametro.length != 0)
	{
		if (!verifica_branco(parametro))
		{
			return true;
		}
		
		teste_ponto = "false";
		tamanho_parametro = parametro.length;
		
		if (isNaN(parametro)) //valor digitado não é numérico
		{
			return false;
		}
		else //valor digitado é um numérico válido
		{	
			
			for (k = 0; k < tamanho_parametro; k++)
			{if ((parametro.charAt(k) == '.') || (parametro.charAt(k) == '-') || (parametro.charAt(k) == '+'))
				{
					teste_ponto = "true"; /*existe caracter ponto*/
				}
			}
			
			if (teste_ponto == "true") //encontrou caracter ponto(numero real)
			{
				return false;
			}
			else
			{
				return true;
			}
		}
	}
	else
	{
		return true;
	}
	
}

//-->