if (window.Event)
  document.captureEvents (Event.MOUSEUP);

function nocontextmenu() {
  event.cancelBubble = true;
  event.returnValue = false;
  return false;
  }

function norightclick(e) {
  if (window.Event) {
    if (e.which == 2 || e.which == 3)
      return false;
    }
  else
  if (event.button == 2 || event.button == 3) {
    event.cancelBubble = true;
    event.returnValue = false;
    return false;
    }
  }
  if (document.layers) {
    document.captureEvents(Event.MOUSEDOWN);
  }
  document.oncontextmenu = nocontextmenu;
  document.onmousedown = norightclick;
  document.onmouseup = norightclick;

function disableselect (e) {
  return false
  }

function reEnable(){
  return true
  }
//document.onselectstart=new Function ("return false")
if (window.sidebar){
  document.onmousedown=disableselect
  document.onclick=reEnable
  }

function CvtLetra(CampoIn) {
  ListConv = "ÁA,ÀA,ÄA,ÂA,ÃA,ÅA,ÉE,ÈE,ËE,ÊE,ÍI,ÌI,ÏI,ÎI,ÓO,ÒO,ÖO,ÔO,ÕO,ÚU,ÙU,ÜU,ÛU,ÇC,ÑN,"
  ListConv = ListConv + "ÝY,áa,àa,äa,âa,ãa,åa,ée,èe,ëe,êe,íi,ìi,ïi,îi,óo,òo,öo,ôo,õo,úu,ùu,"
  ListConv = ListConv + "üu,ûu,çc,ñn,ýy,ÿy,Ø ,ø ,Þ ,Ð ,þ ,ð ,Æ ,ß ,æ ,¼ ,½ ,¡ ,¾ ,£ ,© ,¥ ,"
  ListConv = ListConv + "® ,§ ,ª ,¤ ,¹ ,² ,³ ,¦ ,« ,¬ ,¯ ,­ ,µ ,º ,¶ ,´ ,· ,¨ ,° ,± ,¸ ,» ,"
  ListConv = ListConv + "¿ ,× ,¢ ,÷ ,< ,> ,& ";
  ListLetr = "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789.,:;/\<>[]{}()";
  var CampoOut = "";
  CampoIn.value = Trim(CampoIn.value, "");
  tammax = CampoIn.value.length;
  for (Posi = 0; Posi < tammax; Posi++) {
    letra = CampoIn.value.substr(Posi, 1);
    tammaxl = ListConv.length;
      for (Posil = 0; Posil < tammaxl; Posil++) {
        letral = ListConv.substr(Posil, 1);
        letracvt = ListConv.substr(Posil + 1, 1);
        if (letra == letral) {
          letra = letracvt;
	  break;
          }
          Posil = Posil + 2;
        }
      tammaxl = ListLetr.length;
      for (Posil = 0; Posil < tammaxl; Posil++) {
        letral = ListLetr.substr(Posil, 1);
	if (letra == letral) {
          break;
          }
        }
//      if (Posil == tammaxl) {
//        letra = " ";
//        }
      CampoOut = CampoOut + letra;
    }
  CampoIn.value = CampoOut;
  CampoIn.value = Trim(CampoIn.value, "");
  CampoIn.value = CampoIn.value.toUpperCase();
  }


function CompZero(Campo, Tammax) {
Vr = Campo.value;
Tam = Vr.length;
if (Tam > 0) {
  Pos = Tammax - Tam;
  CampoI = "";
  for (i = 1; i <= Pos; i++) {
    CampoI = CampoI + "0";
    }
  CampoI = CampoI + Campo.value.substr(0, Tam);
  Campo.value = CampoI;
  }
}

function Trim(CampoI, Opcao)
{
  var Tama, Posi, Posf;
  if (Opcao != "R")
  {
    Tama = CampoI.length;
    for (Posi = 0; Posi < Tama; Posi++) {
      if (CampoI.substr(Posi, 1) != " ") {
        break
      }
    }
    CampoI = CampoI.substr(Posi, Tama - Posi);
  }
  if (Opcao != "L")
  {
    Tama = CampoI.length;
    for (Posf = Tama - 1; Posf >= 0; Posf--) {
      if (CampoI.substr(Posf, 1) != " ") {
        break
      }
    }
    CampoI = CampoI.substr(0, Posf + 1);
  }
  return (CampoI);
}

function daysInFebruary(strAno) {
  return (((strAno % 4 == 0) && ((!(strAno % 100 == 0)) || (strAno % 400 == 0))) ? 29 : 28 );
  }

function DaysArray(n) {
  for (var i = 1; i <= n; i++) {
    this[i] = 31
    if (i==4 || i==6 || i==9 || i==11) {this[i] = 30 }
    if (i==2) {this[i] = 29 }
    }
  return this
  }

function ConsData(strDia, strMes, strAno) {
  if (isNumeric(strDia) == false ||
      isNumeric(strMes) == false ||
      isNumeric(strAno) == false) {
    return false;
    }
  if (strAno.value < 01 || strAno.value.length != 4 ||
      strMes.value < 01 || strMes.value > 12  ||
      strDia.value < 01 || strDia.value > 31) {
    return false
    }
  var daysInMonth = DaysArray(12);
  date = new Date();
  strDiaHj = date.getDate();
  if (strDiaHj < 10) {
    strDiaHj = "0" + strDiaHj;
    }
  strMesHj = date.getMonth() + 1;
  if (strMesHj < 10) {
    strMesHj = "0" + strMesHj;
    }
  strAnoHj = date.getFullYear();
  strDatHj = strAnoHj + "." + strMesHj + "." + strDiaHj;
  strData = strAno.value + strMes.value + strDia.value;
  if ((strMes.value == 02 && strDia.value > daysInFebruary(strAno.value)) ||
      (strDia.value > daysInMonth[strMes.value])) {
    return false
    }
  return strDatHj;
  }

function ConsDtna(strDia, strMes, strAno) {
  var strDthj = ConsData(strDia, strMes, strAno);
  if (strDthj == false) {
    alert("Data de Nascimento inválida");
    return false;
    }
  strData = strAno.value + "." + strMes.value + "." + strDia.value;
  if (strData > strDthj) {
    alert("Data de Nascimento e Atual conflitantes");
    return false
    }
  strDhaa = (strDthj.substr(0, 4) - 16);
  strDtmn = strDhaa + strDthj.substr(4, 6);
  if (strData > strDtmn) {
    alert("Data de Nascimento inferior a 16 anos");
    return false
    }
  return true
  }

function ConsDtoc(strDia, strMes, strAno, strTipo) {
  var strDthj = ConsData(strDia, strMes, strAno);
  if (strTipo == "S") {
    AnoExpi = 9 } else {
    AnoExpi = 5 }
  if (strDthj == false) {
    alert("Data de Ocorrência inválida");
    return false;
    }
  strData = strAno.value + "." + strMes.value + "." + strDia.value;
  if (strData > strDthj) {
    alert("Data de Ocorrência e Atual conflitantes");
    return false
    }
  strDhaa = (strDthj.substr(0, 4) - AnoExpi);
  strDtmn = strDhaa + strDthj.substr(4, 6);
  if (strData < strDtmn) {
    alert("Data de Ocorrência superior a " + AnoExpi + " anos");
    return false
    }
  return true
  }

function FmtNfon(Campo, Opcao) {
  Vr = Campo.value;
  Tam = Vr.length;
  if (Opcao == "I" || Opcao == "*") {
    CampoI = "";
    for (Posi = 0; Posi <= Tam; Posi++) {
      if (Campo.value.substr(Posi, 1) != "-") {
        CampoI = CampoI + Campo.value.substr(Posi, 1)
       }
      }
    Campo.value = CampoI;
    Tam = Campo.value.length;
    }
  if ((Opcao == "F" || Opcao == "*") && Tam > 4) {
    Prfx = Tam - 4;
    CampoI = "";
    CampoI = Campo.value.substr(0, Prfx) + "-" + Campo.value.substr(Prfx, 4);
    Campo.value = CampoI;
    }
  if (Opcao == "I") {
    Campo.focus();
    Campo.select();
    }
  }

function isFieldBlank(theField) {
  if (theField.value == "")
    return true;
  else
    return false;
  }

function Numero(e) {
  if (document.all) // Internet Explorer
    var Numy = event.keyCode;
  else if(document.layers) // Nestcape
    var Numy = e.which;
  if (Numy > 47 && Numy < 58) // numeros de 0 a 9
    return true;
  else {
    if (Numy != 8 && Numy != 13) // backspace e enter
      event.keyCode = 0;
    else
      return true;
    }
  }

function ConsCPF(Campo)
{
  if (isFieldBlank(Campo) == true) {
    alert("Número do CPF não informado");
    return false;
  }
  if ((Campo.value.length) > 11) {
    alert("Número do CPF inválido");
    Campo.focus();
    Campo.select();
    return false;
  }
  if (isNumeric(Campo) == false) {
    alert("Número do CPF inválido");
    Campo.focus();
    Campo.select();
    return false;
  }
  var i;
  var d1 = 0;
  var c0 = "00000000000";
  var s = c0.substr(0, 11-Campo.value.length) +
          Campo.value.substr(0, Campo.value.length);
  var c = s.substr(0,09);
  var dv = s.substr(09,2);
  for (i = 0, p = 10; i < 09; i++, p--)
  {
    d1 += c.charAt(i)*(p);
  }
  if (d1 == 0){
    alert("Número do CPF inválido");
    return false;
  }
  d1 = 11 - (d1 % 11);
  if (d1 > 9) d1 = 0;
  if (dv.charAt(0) != d1)
  {
    alert("Número do CPF inválido");
    return false;
  }
  c = s.substr(0,10);
  d1 = 0;
  for (i = 0, p = 11; i < 10; i++, p--)
  {
    d1 += c.charAt(i)*(p);
  }
  d1 = 11 - (d1 % 11);
  if (d1 > 9) d1 = 0;
  if (dv.charAt(1) != d1)
  {
    alert("Número do CPF inválido");
    return false;
  }
  Campo.value = s;
  return true;
}

function ConsCNPJ(Campo)
{
  if (isFieldBlank(Campo) == true) {
    alert("Número do CNPJ não informado");
    Campo.focus();
    Campo.select();
    return false;
  }
  var i;
  var d1 = 0;
  var c0 = "00000000000000";
  var s = c0.substr(0, 14-Campo.value.length) + Campo.value.substr(0, Campo.value.length);
  var c = s.substr(0,12);
  var dv = s.substr(12,2);
  for (i = 0, p = 5; i < 12; i++)
  {
    d1 += c.charAt(i)*(p);
    p--;
    if (p < 2) p = 9;
  }
  if (d1 == 0){
    alert("Número do CNPJ inválido");
    Campo.focus();
    Campo.select();
    return false;
  }
  d1 = 11 - (d1 % 11);
  if (d1 > 9) d1 = 0;
  if (dv.charAt(0) != d1)
  {
    alert("Número do CNPJ inválido");
    Campo.focus();
    Campo.select();
    return false;
  }
  c = s.substr(0,13);
  d1 = 0;
  for (i = 0, p = 6; i < 13; i++)
  {
    d1 += c.charAt(i)*(p);
    p--;
    if (p < 2) p = 9;
  }
  d1 = 11 - (d1 % 11);
  if (d1 > 9) d1 = 0;
  if (dv.charAt(1) != d1)
  {
    alert("Número do CNPJ inválido");
    Campo.focus();
    Campo.select();
    return false;
  }
  Campo.value = s;
  return true;
}

function ConsEmai(Campo)
{
  if (Campo.value == "") {
    alert("E-mail não informado");
    return false;
  }
  else
  {
    prim = Campo.value.indexOf("@")
    if(prim < 2) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf("@",prim + 1) != -1) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf(".") < 1) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf(" ") != -1) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf("zipmeil.com") > 0) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf("hotmeil.com") > 0) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf(".@") > 0) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf("@.") > 0) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf(".com.br.") > 0) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf("/") > 0) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf("[") > 0) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf("]") > 0) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf("(") > 0) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf(")") > 0) {
      alert("E-mail inválido");
      return false;
    }
    if(Campo.value.indexOf("..") > 0) {
      alert("E-mail inválido");
      return false;
    }
  }
  return true;
}

function isNumeric(Campo) {
  tammax = Campo.value.length;
  for (Posi = 0; Posi < tammax; Posi++) {
    Numx = Campo.value.substr(Posi, 1);
    if (Numx != "0" && Numx != "1" && Numx != "2" && Numx != "3" &&
        Numx != "4" && Numx != "5" && Numx != "6" && Numx != "7" &&
        Numx != "8" && Numx != "9") {
        return false; }
    }
  return true;
  }

function VerDocs(CampoIn) {
  blnCPF = false;
  blnRG = false;
  blnCP = false;
  blnRNE = false;
  blnTE = false;
  blnCIE = false;
  blnCF = false;
  blnOAB = false;
  blnRE = false;
  blnCRM = false;
  blnPAS = false;
  blnCRC = false;
  blnCR = false;
  blnCNH = false;
  blnIMA = false;
  blnIME = false;
  blnIMM = false;
  tammax = CampoIn.length;
  for (Posi = 0; Posi < tammax; Posi++) {
    letra = CampoIn.substr(Posi, 1);
    if (letra == "A")  {
	blnCPF = true; }
    if (letra == "B")  {
	blnRG = true;  }
    if (letra == "C")  {
	blnCP = true;  }
    if (letra == "D")  {
	blnRNE = true; }
    if (letra == "E")  {
	blnTE = true;  }
    if (letra == "F")  {
	blnCIE = true; }
    if (letra == "H")  {
	blnCF = true;  }
    if (letra == "I")  {
	blnOAB = true; }
    if (letra == "J")  {
	blnRE = true;  }
    if (letra == "K")  {
	blnCRM = true; }
    if (letra == "L")  {
	blnPAS = true; }
    if (letra == "M")  {
	blnCRC = true; }
    if (letra == "N")  {
	blnCR = true;  }
    if (letra == "O")  {
	blnCNH = true; }
    if (letra == "P")  {
	blnIMA = true; }
    if (letra == "Q")  {
	blnIME = true; }
    if (letra == "R")  {
	blnIMM = true; }
    }
  }