function Vazio(campo)
{
    if(campo.value == "")
    return true;
    else
    return false;
}



function RadioNaoSelecionado(campo)
{
    if(campo.length)
    {
        for(var i = 0;  i < campo.length; i++)
        {
            if(campo[i].checked)
                return false;
        }

        return true;
    }
    else
    {
        if(campo.checked)
            return false;
        else
            return true;
    }
}


function NaoSelecionado(campo)
{
    if(campo.options)
    {
    if(campo.options[campo.selectedIndex].value == "-1")

        return true;

    else

        return false;
    }
    else if(campo.value)
    {
        return Vazio(campo);
    }
    else
        return true;
}



function Inteiro(texto)

{   

    if(texto.length == 0)

        return false; 

        

    for (var i=0; i < texto.length; i++)

    {

        if (!CaracterNumerico(texto.charAt(i)))

            return false;

    }

    

    return true;

}

function Inteiro1(texto)
{  
    if(texto=="0.0")
    {
          return true;
    }
    else
    {
        if(texto.length == 0)
            return false; 

        

    for (var i=0; i < texto.length; i++)

    {
        if (texto.charAt(i) != ".")
        if (!CaracterNumerico(texto.charAt(i)))

            return false;

    }

    

    return true;
}
}



function CaracterNumerico(caracter)

{ 

    return (caracter >= "0" && caracter <=  "9" ? true : false );

}



function DataValida(dia, mes, ano)

{ 

    if (!Inteiro(dia) || !Inteiro(mes) || !Inteiro(ano))

        return false;

        

    var t_dia = parseInt(dia,10);

    var t_mes = parseInt(mes,10);

    var t_ano = parseInt(ano,10);

    

    return ((t_dia < 1 || t_dia > DiasMes(t_mes, t_ano)) || (t_mes < 1 || t_mes > 12) || (t_ano < 1900) ? false : true );

}



function DiasMes( p_mes, p_ano )

{

  var t_dias_nor  = [31,28,31,30,31,30,31,31,30,31,30,31];

  var t_dias_bis  = [31,29,31,30,31,30,31,31,30,31,30,31];



  return ( Bissexto(p_ano) ? t_dias_bis[p_mes-1] : t_dias_nor[p_mes-1] );

}



function Bissexto( p_ano )

{

  return ( p_ano%4==0 ? (p_ano%100==0 ?  (p_ano%400==0 ? true : false) : true) : false);

}



function Email(p_parm)

{
    return ( p_parm.indexOf("@") > 0 && p_parm.indexOf("@") != p_parm.length - 1 ? true : false );
}   



function CEP( p_parm ) 
{
    var re_cep = /\d{5}\-\d{3}/;
    
    p_parm = p_parm.replace("-", "");
    
    return ( p_parm.length == 9 ? ( p_parm.substr("-") != "" ? ( re_cep.test(p_parm) ? true : false ): false 
            ) : ( (p_parm.length == 8 || p_parm.length == 5)  && Inteiro(p_parm) ? true : false ) );
}

function Telephone( p_parm ) 
{
    p_parm = p_parm.replace("(", "");
    p_parm = p_parm.replace(")", "");
    p_parm = p_parm.replace(" ", "");
    p_parm = p_parm.replace("-", "");
    
    if(p_parm.length < 10)
    {
        return false;
    }
    return (Inteiro(p_parm) ? true : false);
}

function CNPJ( p_parm ) 
{
    var re_cnpj = /\d{2}\.\d{3}\.\d{3}\/\d{4}\-\d{2}/;
    
    p_parm = p_parm.replace(".", "");
    p_parm = p_parm.replace(".", "");
    p_parm = p_parm.replace("/", "");
    p_parm = p_parm.replace("-", "");
        
    var t_formato = ( p_parm.length == 18 ? ( re_cnpj.test(p_parm) ? true : false )
                        : ( p_parm.length == 14 && Inteiro(p_parm) ? true : false ) );
    
    if ( !t_formato ) 
    {
        return false;
    }
    // calcula dígitos verificadores 99.999.999/0001-XY
    else
    {
        var i, j, k, t_soma=0, t_digito=0, t_resto=0;
        
        // primeiro digito X
        for (i=5,k=0; i>1; i--,k++)
        {
            t_soma += Number(p_parm.charAt(k))*i;
        }
        
        for (i=9; i>1; i--,k++)
        {
            t_soma += Number(p_parm.charAt(k))*i;
        }
        
        t_resto = t_soma % 11;
        
        t_digito = ( t_resto < 2 ? 0 : (11-t_resto) );
        
        if ( p_parm.charAt(12) != t_digito ) 
        {
            return false;
        }
        
        // segundo digito Y
        for (t_soma=0,i=6,k=0; i>1; i--,k++)
        {
            t_soma += Number(p_parm.charAt(k))*i;
        }
        
        for (i=9; i>2; i--,k++)
        {
            t_soma += Number(p_parm.charAt(k))*i;
        }
        
        t_soma += t_digito * 2;
        
        t_resto = t_soma % 11;
        
        t_digito = ( t_resto < 2 ? 0 : (11-t_resto) );
        
        if ( p_parm.charAt(13) != t_digito ) 
        {
            return false;
        }
    }
    return true;
}



function CPF( p_parm ) 
{
    p_parm = p_parm.replace(".", "");
    p_parm = p_parm.replace(".", "");
    p_parm = p_parm.replace("-", "");
    
    var re_cpf = /\d{3}\.\d{3}\.\d{3}\-\d{2}/;
    var t_formato = ( p_parm.length == 14 ? ( re_cpf.test(p_parm) ? true : false )
                    : ( p_parm.length == 11 && Inteiro(p_parm) ? true : false ) );
    
    if ( !t_formato ) 
    {
        return false;
    }
    // calcula dígitos verificadores 999.999.999-XY
    else
    {
        var i, j, k, t_soma1=0, t_soma2=0, t_digito=0, t_resto=0;
        
        // primeiro digito X
        for (i=10,j=11,k=0; i>1; i--,j--,k++)  
        {
            t_soma1 += Number(p_parm.charAt(k))*i;
            t_soma2 += Number(p_parm.charAt(k))*j;
        }
        
        t_resto = t_soma1 % 11;
        
        t_digito = ( t_resto < 2 ? 0 : (11-t_resto) );
        
        if ( p_parm.charAt(9) != t_digito ) 
        {
            return false;
        }
        
        // segundo digito Y
        t_soma2 += t_digito * 2;
        
        t_resto = t_soma2 % 11;
        
        t_digito = ( t_resto < 2 ? 0 : (11-t_resto) );
        
        if ( p_parm.charAt(10) != t_digito ) 
        {
            return false;
        }
    }
    return true;
}

function fnFormataValor(campo)
{
    var valor = campo.value;
    campo.value = fnFormataDinheiro(valor);
}

function fnFormataDinheiro(txt_valor)
{
    var valor = txt_valor;
    valor = valor.replace(".","").replace(",","");

    // TIRA CARACTERES INVÁLIDOS
    var temp_valor = "";
    for(var i = 0; i < valor.length; i++)
    {
        if(valor.charAt(i) >= '0' && valor.charAt(i) <= '9')
            temp_valor = temp_valor + valor.charAt(i);
    }
    
    valor = temp_valor;
    var tamanho = valor.length;
        
    if(tamanho > 2)
    {
        var centavos = valor.substring(valor.length - 2,valor.length);
        var inteiro = valor.substring(0,valor.length - 2);
        var inteiroFormatado = "";

        var cont = 0;
        for(var i = inteiro.length - 1; i >= 0; i--)
        {
            inteiroFormatado = inteiro.charAt(i) + inteiroFormatado;
            cont++;

            if(cont == 3 && i > 0)
            {
                inteiroFormatado = "." + inteiroFormatado;
                cont = 0;
            }
        }                   
        temp_valor =  inteiroFormatado + "," + centavos;
    }    
    return temp_valor ;
}


function LimpaValor(valor)
{
    var temp_valor = "";
    for(var i = 0; i < valor.length; i++)
    {
        if(valor.charAt(i) >= '0' && valor.charAt(i) <= '9')
            temp_valor = temp_valor + valor.charAt(i);
    }
    return temp_valor;
}
/*** 
* Descrição.: formata um campo do formulário de 
* acordo com a máscara informada... 
* Parâmetros: - objForm (o Objeto Form) 
* - strField (string contendo o nome 
* do textbox) 
* - sMask (mascara que define o 
* formato que o dado será apresentado, 
* usando o algarismo "9" para 
* definir números e o símbolo "!" para 
* qualquer caracter... 
* - evtKeyPress (evento) 
* Uso.......: <input type="textbox" 
* name="xxx"..... 
* onkeypress="return txtBoxFormat(document.rcfDownload, 'str_cep', '99999-999', event);"> 
* Observação: As máscaras podem ser representadas como os exemplos abaixo: 
* CEP -> 99.999-999 
* CPF -> 999.999.999-99 
* CNPJ -> 99.999.999/9999-99 
* Data -> 99/99/9999 
* Tel Resid -> (99) 999-9999 
* Tel Cel -> (99) 9999-9999 
* Processo -> 99.999999999/999-99 
* C/C -> 999999-! 
* E por aí vai... 
***/

function txtBoxFormat(objForm, strField, sMask, evtKeyPress) 
{
    var i, nCount, sValue, fldLen, mskLen,bolMask, sCod, nTecla;
        
    if(document.all) 
    { // Internet Explorer
        nTecla = evtKeyPress.keyCode; 
    }
    else if(document.layers) 
    { // Nestcape
        nTecla = evtKeyPress.which;
    }
    
    sValue = objForm[strField].value;
    
    // Limpa todos os caracteres de formatação que
    // já estiverem no campo.
    while (sValue.indexOf("-") != -1)
    {
        sValue = sValue.toString().replace( "-", "" );
    }
    
    while (sValue.indexOf(".") != -1)
    {
        sValue = sValue.toString().replace( ".", "" );
    }
    
    while (sValue.indexOf("/") != -1)
    {
        sValue = sValue.toString().replace( "/", "" );
    }
    
    while (sValue.indexOf("(") != -1)
    {
        sValue = sValue.toString().replace( "(", "" );
    }
    
    while (sValue.indexOf(")") != -1)
    {
        sValue = sValue.toString().replace( ")", "" );
    }
    
    while (sValue.indexOf(" ") != -1)
    {
        sValue = sValue.toString().replace( " ", "" );
    }
    
    fldLen = sValue.length;
    mskLen = sMask.length;
    
    i = 0;
    nCount = 0;
    sCod = "";
    mskLen = fldLen;
    
    while (i <= mskLen) 
    {
        bolMask = ((sMask.charAt(i) == "-") || (sMask.charAt(i) == ".") || (sMask.charAt(i) == "/"))
        bolMask = bolMask || ((sMask.charAt(i) == "(") || (sMask.charAt(i) == ")") || (sMask.charAt(i) == " "))
        
        if (bolMask) 
        {
            sCod += sMask.charAt(i);
            mskLen++; 
        }
        else 
        {
            sCod += sValue.charAt(nCount);
            nCount++;
        }
        i++;
    }
        
    objForm[strField].value = sCod;
    
    if(sCod.length >= sMask.length)
    {
        return false;
    }
    
    if (nTecla != 8) 
    { // backspace
        if (sMask.charAt(i-1) == "9") 
        { // apenas números...
            return ((evtKeyPress > 47) && (evtKeyPress < 58)); 
        } // números de 0 a 9
        else 
        { // qualquer caracter...
            return true;
        } 
    }
    else 
    {
        return true;
    }
}
   
function fnFormataDecimal(campo, numCasas)
{
    var valor = campo.value;
    campo.value = fnFormataValorDecimal(valor, numCasas);
}

function fnFormataValorDecimal(txt_valor, numCasas)
{
    var valor = txt_valor;
    valor = valor.replace(".","").replace(",","");

    // TIRA CARACTERES INVÁLIDOS
    var temp_valor = "";
    for(var i = 0; i < valor.length; i++)
    {
        if(valor.charAt(i) >= '0' && valor.charAt(i) <= '9')
            temp_valor = temp_valor + valor.charAt(i);
    }
    
    valor = temp_valor;
    var tamanho = valor.length;
    
    if(tamanho > numCasas)
    {
        var centavos = valor.substring(valor.length - numCasas,valor.length);
        var inteiro = valor.substring(0,valor.length - numCasas);
        var inteiroFormatado = "";

        var cont = 0;
        for(var i = inteiro.length - 1; i >= 0; i--)
        {
            inteiroFormatado = inteiro.charAt(i) + inteiroFormatado;
            cont++;

            if(cont == 3 && i > 0)
            {
                inteiroFormatado = "." + inteiroFormatado;
                cont = 0;
            }
            
                
        }                   

        temp_valor =  inteiroFormatado + "," + centavos;
    }
    
    return temp_valor;
}


var OrdZero = '0'.charCodeAt(0);

function CharToInt(ch)
{
    return ch.charCodeAt(0) - OrdZero;
}

function IntToChar(intt)
{
    return String.fromCharCode(intt + OrdZero);
}

function CheckIEAC(ie)
{
    if (ie.length != 13)
    return false;
    var b = 4, soma = 0;

    for (var i = 0; i <= 10; i++)
    {
        soma += CharToInt(ie.charAt(i)) * b;
        --b;
        if (b == 1) 
        { 
            b = 9; 
        }
    }
    dig = 11 - (soma % 11);
    if (dig >= 10) 
    { 
        dig = 0; 
    }
    resultado = (IntToChar(dig) == ie.charAt(11));
    if (!resultado) 
    { 
        return false; 
    }

    b = 5;
    soma = 0;
    for (var i = 0; i <= 11; i++)
    {
        soma += CharToInt(ie.charAt(i)) * b;
        --b;
        if (b == 1) 
            { b = 9; }
    }
    dig = 11 - (soma % 11);
    if (dig >= 10) 
        { dig = 0; }
    if (IntToChar(dig) == ie.charAt(12)) 
        { return true; } 
    else 
        { return false; }
} //AC

function CheckIEAL(ie)
{
    if (ie.length != 9)
        return false;
    var b = 9, soma = 0;
    for (var i = 0; i <= 7; i++)
    {
        soma += CharToInt(ie.charAt(i)) * b;
        --b;
    }
    soma *= 10;
    dig = soma - Math.floor(soma / 11) * 11;
    if (dig == 10) 
        { dig = 0; }
    return (IntToChar(dig) == ie.charAt(8));
} //AL

function CheckIEAM(ie)
{
if (ie.length != 9)
  return false;
var b = 9, soma = 0;
for (var i = 0; i <= 7; i++)
{
  soma += CharToInt(ie.charAt(i)) * b;
  b--;
}
if (soma < 11) { dig = 11 - soma; } 
else { 
   i = soma % 11;
   if (i <= 1) { dig = 0; } else { dig = 11 - i; }
}
return (IntToChar(dig) == ie.charAt(8));
} //am

function CheckIEAP(ie)
{
if (ie.length != 9)
  return false;
var p = 0, d = 0, i = ie.substring(1, 8);
if ((i >= 3000001) && (i <= 3017000))
{
  p =5;
  d = 0;
}
else if ((i >= 3017001) && (i <= 3019022))
{
  p = 9;
  d = 1;
}
b = 9;
soma = p;
for (var i = 0; i <= 7; i++)
{
  soma += CharToInt(ie.charAt(i)) * b;
  b--;
}
dig = 11 - (soma % 11);
if (dig == 10)
{
   dig = 0;
}
else if (dig == 11)
{
   dig = d;
}
return (IntToChar(dig) == ie.charAt(8));
} //ap

function CheckIEBA(ie)
{
if (ie.length != 8)
  return false;
die = ie.substring(0, 8);
var nro = new Array(8);
var dig = -1;
for (var i = 0; i <= 7; i++)
{
  nro[i] = CharToInt(die.charAt(i));
}
var NumMod = 0;
if (String(nro[0]).match(/[0123458]/))
   NumMod = 10;
else
   NumMod = 11;
b = 7;
soma = 0;
for (i = 0; i <= 5; i++)
{
  soma += nro[i] * b;
  b--;
}
i = soma % NumMod;
if (NumMod == 10)
{
  if (i == 0) { dig = 0; } else { dig = NumMod - i; }
}
else
{
  if (i <= 1) { dig = 0; } else { dig = NumMod - i; }
}
resultado = (dig == nro[7]);
if (!resultado) { return false; }
b = 8;
soma = 0;
for (i = 0; i <= 5; i++)
{
  soma += nro[i] * b;
  b--;
}
soma += nro[7] * 2;
i = soma % NumMod;
if (NumMod == 10)
{
  if (i == 0) { dig = 0; } else { dig = NumMod - i; }
}
else 
{
  if (i <= 1) { dig = 0; } else { dig = NumMod - i; }
}
return (dig == nro[6]);
} //ba

function CheckIECE(ie)
{
if (ie.length > 9)
  return false;
die = ie;
if (ie.length < 9)
{
  while (die.length <= 8)
   die = '0' + die;
}
var nro = Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(die[i]);
b = 9;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--; 
}
dig = 11 - (soma % 11);
if (dig >= 10)
  dig = 0;
return (dig == nro[8]);
} //ce

function CheckIEDF(ie)
{
if (ie.length != 13)
  return false;
var nro = new Array(13);
for (var i = 0; i <= 12; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 4;
soma = 0;
for (i = 0; i <= 10; i++)
{
  soma += nro[i] * b;
  b--;
  if (b == 1)
   b = 9;
}
dig = 11 - (soma % 11);
if (dig >= 10)
  dig = 0;
resultado = (dig == nro[11]);
if (!resultado)
  return false;  
b = 5;
soma = 0;
for (i = 0; i <= 11; i++)
{
  soma += nro[i] * b;
  b--;
  if (b == 1)
   b = 9;
}
dig = 11 - (soma % 11);
if (dig >= 10)
  dig = 0;
return (dig == nro[12]);
}
// CHRISTOPHE T. C. <wG @ codingz.info>
function CheckIEES(ie)
{
if (ie.length != 9)
  return false;
var nro = new Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i)); 
b = 9;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;
}
i = soma % 11;
if (i < 2)
  dig = 0;
else
  dig = 11 - i;
return (dig == nro[8]);
}

function CheckIEGO(ie)
{
if (ie.length != 9)
  return false;
s = ie.substring(0, 2);
if ((s == '10') || (s == '11') || (s == '15'))
{
  var nro = new Array(9);
  for (var i = 0; i <= 8; i++)
   nro[i] = CharToInt(ie.charAt(i));
  n = Math.floor(ie / 10);
  if (n = 11094402)
  {
   if ((nro[8] == 0) || (nro[8] == 1))
return true;
  }
  b = 9;
  soma = 0;
  for (i = 0; i <= 7; i++)
  {
   soma += nro[i] * b;
   b--;
  }
  i = soma % 11;
  if (i == 0)
   dig = 0;
  else
  {
   if (i == 1)
   {
if ((n >= 10103105) && (n <= 10119997))
  dig = 1;
else
  dig = 0;
   }
   else
dig = 11 - i;
  }
  return (dig == nro[8]);
}
}

function CheckIEMA(ie)
{
if (ie.length != 9)
  return false;
var nro = new Array(9); 
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 9;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;
}
i = soma % 11;
if (i <= 1)
  dig = 0;
else
  dig = 11 - i;
return (dig == nro[8]);
}

function CheckIEMT(ie)
{
if (ie.length < 9)
  return false;
die = ie;
if (die.length < 11)
{
  while (die.length <= 10)
   die = '0' + die;
  var nro = new Array(11);
  for (var i = 0; i <= 10; i++)
   nro[i] = CharToInt(die[i]);
  b = 3;
  soma = 0;
  for (i = 0; i <= 9; i++)
  {
   soma += nro[i] * b;
   b--;
   if (b == 1)
b = 9;
  }
  i = soma % 11;
  if (i <= 1)
   dig = 0;
  else
   dig = 11 - i;
  return (dig == nro[10]);
}
} //muito

function CheckIEMS(ie)
{
if (ie.length != 9)
  return false;
if (ie.substring(0,2) != '28')
  return false;
var nro = new Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 9;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;
}
i = soma % 11;
if (i <= 1)
  dig = 0;
else
  dig = 11 - i;
return (dig == nro[8]);
} //ms

function CheckIEPA(ie)
{
if (ie.length != 9)
  return false;
if (ie.substring(0, 2) != '15')
  return false;
var nro = new Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 9;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;
}
i = soma % 11;
if (i <= 1)
  dig = 0;
else
  dig = 11 - i;
return (dig == nro[8]);
} //pra

function CheckIEPB(ie)
{
if (ie.length != 9)
  return false;
var nro = new Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 9;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;  
}
i = soma % 11;
if (i <= 1)
  dig = 0;
else
  dig = 11 - i;
return (dig == nro[8]);
} //pb

function CheckIEPR(ie)
{
if (ie.length != 10)
  return false;
var nro = new Array(10);
for (var i = 0; i <= 9; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 3;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;
  if (b == 1)
   b = 7;
}
i = soma % 11;
if (i <= 1)
  dig = 0;
else
  dig = 11 - i;
resultado = (dig == nro[8]);
if (!resultado)
  return false;
b = 4;
soma = 0;
for (i = 0; i <= 8; i++)
{
  soma += nro[i] * b;
  b--;
  if (b == 1)
   b = 7;
}
i = soma % 11;
if (i <= 1)
  dig = 0;
else
  dig = 11 - i;
return (dig == nro[9]);
} //pr

function CheckIEPE(ie)
{
if (ie.length != 14)
  return false;
var nro = new Array(14);
for (var i = 0; i <= 13; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 5;
soma = 0;
for (i = 0; i <= 12; i++)
{
  soma += nro[i] * b;
  b--;
  if (b == 0)
   b = 9;
}
dig = 11 - (soma % 11);
if (dig > 9)
  dig = dig - 10;
return (dig == nro[13]);
} //pe

function CheckIEPI(ie)
{
if (ie.length != 9)
  return false;
var nro = new Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 9;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;
}
i = soma % 11;
if (i <= 1)
  dig = 0;
else
  dig = 11 - i;
return (dig == nro[8]);
} //pi

function CheckIERJ(ie)
{
if (ie.length != 8)
  return false;
var nro = new Array(8);
for (var i = 0; i <= 7; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 2;
soma = 0;
for (i = 0; i <= 6; i++)
{
  soma += nro[i] * b;
  b--;
  if (b == 1)
   b = 7;
}
i = soma % 11;
if (i <= 1)
  dig = 0;
else
  dig = 11 - i;
return (dig == nro[7]);
} //rj
// CHRISTOPHE T. C. <wG @ codingz.info>
function CheckIERN(ie)
{
if (ie.length != 9)
  return false;
var nro = new Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 9;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;
}
soma *= 10;
dig = soma % 11;
if (dig == 10)
  dig = 0;
return (dig == nro[8]);
} //rn

function CheckIERS(ie)
{
if (ie.length != 10)
  return false;
i = ie.substring(0, 3);
if ((i >= 1) && (i <= 467))
{
  var nro = new Array(10);
  for (var i = 0; i <= 9; i++)
   nro[i] = CharToInt(ie.charAt(i));
  b = 2;
  soma = 0;
  for (i = 0; i <= 8; i++)
  {
   soma += nro[i] * b;
   b--;
   if (b == 1)
b = 9;
  }
  dig = 11 - (soma % 11);
  if (dig >= 10)
   dig = 0;
  return (dig == nro[9]);
} //if i&&i
} //rs

function CheckIEROantiga(ie)
{
if (ie.length != 9)
  return false;
var nro = new Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 6;
soma = 0;
for (i = 3; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;
}
dig = 11 - (soma % 11);
if (dig >= 10)
  dig = dig - 10;
return (dig == nro[8]);
} //ro-antiga


function CheckIERO(ie)
{
var i = 1, y = 6, x = 0, z = 0;
var s = '';
for (var j = 0; j <= (ie.length - 1); j++)
  if (String(ie[j]).match(/[0123456789]/))
   s += ie[j];
if (s.length == 14)
  for (var i = 0; i < (14 - s.length); i++)
   s = '0' + s;
for (i = 0; i <= (s.length - 2); i++)
{
  x = s[i] * y;
  z += x;
  if (y > 2)
   y--;
  else
   y = 9;
}
x = z % 11;
y = 11 - x;
if (y == s[13])
  return true;
else
  return false; 
} //ro nova

function CheckIERR(ie)
{
if (ie.length != 9)
  return false;
if (ie.substring(0,2) != '24')
  return false;
var nro = new Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i));
var soma = 0;
var n = 0;
for (i = 0; i <= 7; i++)
  soma += nro[i] * ++n;
dig = soma % 9;
return (dig == nro[8]);
} //rr

function CheckIESC(ie)
{
if (ie.length != 9)
  return false;
var nro = new Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 9;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;
}
i = soma % 11;
if (i <= 1)
  dig = 0;
else
  dig = 11 - i;
return (dig == nro[8]);
} //sc

// CHRISTOPHE T. C. <wG @ codingz.info>

function CheckIESP(ie)
{
if (((ie.substring(0,1)).toUpperCase()) == 'P')
{
  s = ie.substring(1, 9);
  var nro = new Array(12);
  for (var i = 0; i <= 7; i++)
   nro[i] = CharToInt(s[i]);
  soma = (nro[0] * 1) + (nro[1] * 3) + (nro[2] * 4) + (nro[3] * 5) +
   (nro[4] * 6) + (nro[5] * 7) + (nro[6] * 8) + (nro[7] * 10);
  dig = soma % 11;
  if (dig >= 10)
   dig = 0;
  resultado = (dig == nro[8]);
  if (!resultado)
   return false;
}
else
{
  if (ie.length < 12)
   return false;
  var nro = new Array(12);
  for (var i = 0; i <= 11; i++)
   nro[i] = CharToInt(ie.charAt(i));
  soma = (nro[0] * 1) + (nro[1] * 3) + (nro[2] * 4) + (nro[3] * 5) +
   (nro[4] * 6) + (nro[5] * 7) + (nro[6] * 8) + (nro[7] * 10);
  dig = soma % 11;
  if (dig >= 10)
   dig = 0;
  resultado = (dig == nro[8]);
  if (!resultado)
   return false;
  soma = (nro[0] * 3) + (nro[1] * 2) + (nro[2] * 10) + (nro[3] * 9) +
   (nro[4] * 8) + (nro[5] * 7) + (nro[6] * 6)  + (nro[7] * 5) +
   (nro[8] * 4) + (nro[9] * 3) + (nro[10] * 2);
  dig = soma % 11;
  if (dig >= 10)
   dig = 0;
  return (dig == nro[11]);
}
} //sp

function CheckIESE(ie)
{
if (ie.length != 9)
  return false;
var nro = new Array(9);
for (var i = 0; i <= 8; i++)
  nro[i] = CharToInt(ie.charAt(i));
b = 9;
soma = 0;
for (i = 0; i <= 7; i++)
{
  soma += nro[i] * b;
  b--;
}
dig = 11 - (soma % 11);
if (dig >= 10)
  dig = 0;
return (dig == nro[8]);
} //se

//Em modificação. Estou aguardando retorno da sintegra(site fora do ar) sobre este algoritmo pois mudou  
function CheckIETO(ie)
{
if (ie.length != 11)
  return false;
s = ie.substring(2, 2);
if ((s == '01') || (s == '02') || (s == '03') || (s == '99'))
{
  var nro = new Array(11);
  for (var i = 0; i <= 10; i++)
   nro[i] = CharToInt(ie.charAt(i));
  b = 9;
  soma = 0;
  for (i = 0; i <= 9; i++)
  {
   if ((i != 3) && (i != 4))
   {
soma += nro[i] * b;
b--;
   }
  }
  i = soma % 11;
  if (i <= 1)
   dig = 0;
  else
   dig = 11 - i;
  return (dig == nro[10]);
}
} //to

function CheckIEMG(ie)
{
if (ie.substring(0,2) == 'PR')
  return true;
if (ie.substring(0,5) == 'ISENT')
  return true;
if (ie.length != 13)
  return false;
dig1 = ie.substring(11, 12);
dig2 = ie.substring(12, 13);
insc = ie.substring(0, 3) + '0' + ie.substring(3, 11);
npos = 11;
i = 1;
ptotal = 0;
psoma = 0;
while (npos >= 0)
{
  i++; 
  psoma = CharToInt(insc[npos]) * i;  
  if (psoma >= 10)
   psoma -= 9;
  ptotal += psoma;
  if (i == 2)
   i = 0;
  npos--;
} 
nresto = ptotal % 10;
if (nresto == 0)
  nresto = 10;
nresto = 10 - nresto; 
if (nresto != CharToInt(dig1))
  return false;
npos = 11;
i = 1;
ptotal = 0;
while (npos >= 0)
{
  i++;
  if (i == 12)
   i = 2;
  ptotal += CharToInt(ie[npos]) * i;
  npos--;
}
nresto = ptotal % 11;
if ((nresto == 0) || (nresto == 1))
  nresto = 11;
nresto = 11 - nresto;  
return (nresto == CharToInt(dig2));
}

function CheckIE(ie, estado)
{
ie = ie.replace(/\./g, '');
ie = ie.replace(/\\/g, '');
ie = ie.replace(/\-/g, '');
ie = ie.replace(/\//g, '');
if ((ie == 'ISENTO') || (estado == 'TO'))
  return true;
switch (estado)
{
  case 'MG': return CheckIEMG(ie); break;
  case 'AC': return CheckIEAC(ie); break;
  case 'AL': return CheckIEAL(ie); break;
  case 'AM': return CheckIEAM(ie); break;
  case 'AP': return CheckIEAP(ie); break;
  case 'BA': return CheckIEBA(ie); break;
  case 'CE': return CheckIECE(ie); break;
  case 'DF': return CheckIEDF(ie); break;
  case 'ES': return CheckIEES(ie); break;
  case 'GO': return CheckIEGO(ie); break;
  case 'MA': return CheckIEMA(ie); break;
  case 'muito': return CheckIEMT(ie); break;
  case 'MS': return CheckIEMS(ie); break;
  case 'pra': return CheckIEPA(ie); break;
  case 'PB': return CheckIEPB(ie); break;
  case 'PR': return CheckIEPR(ie); break;
  case 'PE': return CheckIEPE(ie); break;
  case 'PI': return CheckIEPI(ie); break;
  case 'RJ': return CheckIERJ(ie); break;
  case 'RN': return CheckIERN(ie); break;
  case 'RS': return CheckIERS(ie); break;
  case 'RO': return ((CheckIEROantiga(ie)) || (CheckIERO(ie))); break;
  case 'RR': return CheckIERR(ie); break;
  case 'SC': return CheckIESC(ie); break;
  case 'SP': return CheckIESP(ie); break;
  case 'SE': return CheckIESE(ie); break;
  case 'TO': return CheckIETO(ie); break;  
}
}