function verfonte(){
   if (event.button==2){ window.alert('O código fonte deste site não pode ser exibido.\n\Mas solicite você informação para o endereço:\n\             webasp@aspcondo.com.br\n\n\     Clique em Ok, para continuar navegando.')}
}

function FormataValor(campo,tammax,casas,teclapres) {
   var tecla=teclapres.keyCode;
   if (document.frm[campo].value.length<tammax) {
      vr=document.frm[campo].value;
      if ((tecla>=96 && tecla<=105) || (tecla>=48 && tecla<=57)) {
         while (vr.indexOf(".")>=0) {vr=vr.replace(".","");}
         while (vr.indexOf(" ")>=0) {vr=vr.replace(" ","");}
         while (vr.length<tammax-3) {vr=" "+vr;}
         if (vr.length>=casas) {vr=vr.substr(0,vr.length-casas+1)+"."+vr.substr(vr.length-casas+1,vr.length);}
      }
      if (tecla==8) {vr="";}
      document.frm[campo].value=vr;
   }
}

function FormataMesRef(campo,tammax,teclapres) {
   var tecla=teclapres.keyCode;
   if (document.frm[campo].value.length<tammax) {
      vr=document.frm[campo].value;
      if ((tecla>=96 && tecla<=105) || (tecla>=48 && tecla<=57)) {
         while (vr.indexOf("/")>=0) {vr=vr.replace("/","");}
         if (vr.length>=2) {vr=vr.substr(0,2)+"/"+vr.substr(2,vr.length);}
      }
      document.frm[campo].value=vr;
   }
}

function FormataTelefone(campo,tammax,teclapres) {
   var tecla=teclapres.keyCode;
   if (document.frm[campo].value.length<tammax) {
      vr=document.frm[campo].value;
      if ((tecla>=96 && tecla<=105) || (tecla>=48 && tecla<=57)) {
         while (vr.indexOf(")")>=0) {vr=vr.replace(")","");}
         while (vr.indexOf("(")>=0) {vr=vr.replace("(","");}
         while (vr.indexOf("-")>=0) {vr=vr.replace("-","");}
         if (vr.length>=1) {vr="("+vr;}
         if (vr.length>=3) {vr=vr.substr(0,3)+")"+vr.substr(3,vr.length);}
         if (vr.length>=9) {vr=vr.substr(0,vr.length-3)+"-"+vr.substr(vr.length-3,vr.length);}
      }
      document.frm[campo].value=vr;
   }
}

function FormataData(campo,tammax,teclapres) {
   var tecla=teclapres.keyCode;
   if (document.frm[campo].value.length<tammax) {
      vr=document.frm[campo].value;
      if ((tecla>=96 && tecla<=105) || (tecla>=48 && tecla<=57)) {
         while (vr.indexOf("/")>=0) {vr=vr.replace("/","");}
         if (vr.length>=2) {vr=vr.substr(0,2)+"/"+vr.substr(2,vr.length);}
         if (vr.length>=5) {vr=vr.substr(0,5)+"/"+vr.substr(5,vr.length);}
      }
      document.frm[campo].value=vr;
   }
}

function AnoData(campo) {
   if (document.frm[campo].value.length==7) {document.frm[campo].value=document.frm[campo].value.substr(0,6)+"200"+document.frm[campo].value.substr(6,document.frm[campo].value.length);}
   if (document.frm[campo].value.length==8) {document.frm[campo].value=document.frm[campo].value.substr(0,6)+"20"+document.frm[campo].value.substr(6,document.frm[campo].value.length);}
   if (document.frm[campo].value.length==9) {document.frm[campo].value=document.frm[campo].value.substr(0,6)+"2"+document.frm[campo].value.substr(6,document.frm[campo].value.length);}
}

function FormataCNPJ(campo,tammax,teclapres) {
   var tecla=teclapres.keyCode;
   if (document.frm[campo].value.length<tammax) {
      vr=document.frm[campo].value;
      if ((tecla>=96 && tecla<=105) || (tecla>=48 && tecla<=57)) {
         while (vr.indexOf(".")>=0) {vr=vr.replace(".","");}
         while (vr.indexOf("/")>=0) {vr=vr.replace("/","");}
         while (vr.indexOf("-")>=0) {vr=vr.replace("-","");}
         if (vr.length>=2) {vr=vr.substr(0,2)+"."+vr.substr(2,vr.length);}
         if (vr.length>=6) {vr=vr.substr(0,6)+"."+vr.substr(6,vr.length);}
         if (vr.length>=10) {vr=vr.substr(0,10)+"/"+vr.substr(10,vr.length);}
         if (vr.length>=15) {vr=vr.substr(0,15)+"-"+vr.substr(15,vr.length);}
      }
      document.frm[campo].value=vr;
   }
}

function FormataCPF(campo,tammax,teclapres) {
   var tecla=teclapres.keyCode;
   if (document.frm[campo].value.length<tammax) {
      vr=document.frm[campo].value;
      if ((tecla>=96 && tecla<=105) || (tecla>=48 && tecla<=57)) {
         while (vr.indexOf(".")>=0) {vr=vr.replace(".","");}
         while (vr.indexOf("-")>=0) {vr=vr.replace("-","");}
         if (vr.length>=9) {vr=vr.substr(0,9)+"-"+vr.substr(9,vr.length);}
      }
      document.frm[campo].value=vr;
   }
}

function FormataRG(campo,tammax,teclapres) {
   var tecla=teclapres.keyCode;
   if (document.frm[campo].value.length<tammax) {
      vr=document.frm[campo].value;
      if ((tecla>=96 && tecla<=105) || (tecla>=48 && tecla<=57)) {
         while (vr.indexOf(".")>=0) {vr=vr.replace(".","");}
         while (vr.indexOf("-")>=0) {vr=vr.replace("-","");}
         if (vr.length>=2) {vr=vr.substr(0,1)+"."+vr.substr(1,vr.length);}
         if (vr.length>=5) {vr=vr.substr(0,5)+"."+vr.substr(5,vr.length);}
         if (vr.length>=9) {vr=vr.substr(0,9)+"-"+vr.substr(9,vr.length);}
      }
      document.frm[campo].value=vr;
   }
}

function FormataCEP(campo,tammax,teclapres) {
   var tecla=teclapres.keyCode;
   if (document.frm[campo].value.length<tammax) {
      vr=document.frm[campo].value;
      if ((tecla>=96 && tecla<=105) || (tecla>=48 && tecla<=57)) {
         while (vr.indexOf(".")>=0) {vr=vr.replace(".","");}
         while (vr.indexOf("-")>=0) {vr=vr.replace("-","");}
         if (vr.length>=5) {vr=vr.substr(0,5)+"-"+vr.substr(5,vr.length);}
      }
      document.frm[campo].value=vr;
   }
}
