// abre janela popup
function AbrePopup(url,nomejanela,altura,largura)
{
var novajanela = open(url,nomejanela,'scrollbars=yes, height='+altura+', width='+largura+', top='+((screen.height - altura)/2)+', left='+((screen.width - largura)/2));
return false;
}
// redireciona pagina
function AbreJanela(pURL)
{
window.location.replace(pURL);
}
// exemplo do uso
//
function AcessoBase(pUrl,pCampoChave1,pDelimitador1,pCampoChave2,pDelimitador2,pCampoChave3,pDelimitador3,pPermiteParametroNull)
{
vStr = "";
vCampoChave1 = "";
vCampoChave2 = "";
vCampoChave3 = "";
if (pCampoChave1.length!=0)
vCampoChave1 = eval("document.pagina." + pCampoChave1 + ".value");
else
vCampoChave1 ="";
if (pCampoChave2.length!=0)
vCampoChave2 = eval("document.pagina." + pCampoChave2 + ".value");
else
vCampoChave2 ="";
if (pCampoChave3.length!=0)
vCampoChave3 = eval("document.pagina." + pCampoChave3 + ".value");
else
vCampoChave3 ="";
//pUrl = surClienteCadastro.php?sc=w0dddddddddddw11w2Razaow3SSCw402877302000178w9
if ((pPermiteParametroNull=="0") ||
((pPermiteParametroNull=="1") && (vCampoChave1.length>0)) ||
((pPermiteParametroNull=="1") && (vCampoChave2.length>0)) ||
((pPermiteParametroNull=="1") && (vCampoChave2.length>0)))
{
vStr = pUrl+
vCampoChave1+
pDelimitador1+
vCampoChave2+
pDelimitador2+
vCampoChave3+
pDelimitador3;
window.location = vStr;
}
return true;
}
//validar data de nascimento
function ck_data(pCampo)
{
verro = 0; // 0-deu erro, 1-data ok
array_mes = ["02","04","06","09","11"];
vCampo = eval("document.pagina." + pCampo + ".value");
dia = vCampo.substr(0,2);
mes = vCampo.substr(3,2);
ano = vCampo.substr(6,4);
if (vCampo.length!=0)
{
if (vCampo.length>9)
{
if(parseInt(vCampo.substr(6,10)) % 4==0)
tpano="bissexto";
else
tpano="";
verro=1;
if ((dia<1) || (dia>31) || (mes<1) || (mes>12))
verro=0;
if (verro>0)
{
for(x=0; x < array_mes.length; x++)
if (mes == array_mes[x] && dia>30)
verro=0;
}
if (verro>0)
{
if (tpano!="bissexto" && dia>28 && mes==2)
verro=0;
}
if (verro>0)
{
if (tpano=="bissexto" && dia>29 && mes==2)
verro=0;
}
if (verro>0)
{
if (ano<1900)
verro=0;
}
}
if (verro>0)
{
if (vCampo.length>10)
{
spa = vCampo.substr(10,1);
hor = vCampo.substr(11,2);
sp1 = vCampo.substr(13,1);
min = vCampo.substr(14,2);
sp2 = vCampo.substr(16,1);
seg = vCampo.substr(17,2);
tam = vCampo.substr(11,8);
qtd = tam.length;
if ((spa!=" ") || (sp1!=":") || (sp2!=":") || (hor>24) || (min>59) || (seg>59) || (hor<0)|| (min<0) || (seg<0) || (qtd<8))
verro=0;
}
}
}
else
verro=1;
if (verro>0)
return true;
else
{
alert("Formato de data invalido!");
vCampo=eval("document.pagina." + pCampo + ".focus()");
return false;
}
}
// permite somente numeros
function ck_soNum(pCampo)
{
var charCode = (navigator.appName == "Netscape") ? event.which : event.keyCode;
var_caracter = String.fromCharCode(charCode);
vCampo="";
if ((var_caracter>="0") && (var_caracter<="9"))
{
return true;
}
else
{
return false;
}
}
// permite somente caracteres (nao acentos)
function uppercase()
{
key = window.event.keyCode;
if ((key > 0x60) && (key < 0x7B))
window.event.keyCode = key-0x20;
}
// permite somente caracteres (nao acentos)
function ck_soString(pCampo)
{
var charCode = (navigator.appName == "Netscape") ? event.which : event.keyCode;
var_caracter = String.fromCharCode(charCode);
vCampo="";
if (((var_caracter>="0") && (var_caracter<="9")) ||
((var_caracter>="a") && (var_caracter<="z")) ||
((var_caracter>="A") && (var_caracter<="Z")) ||
(var_caracter==" ") ||
(var_caracter=="/") ||
(var_caracter==".") ||
(var_caracter==",") ||
(var_caracter=="-") ||
(var_caracter=="_"))
{
key = window.event.keyCode;
if ((key > 0x60) && (key < 0x7B))
window.event.keyCode = key-0x20;
return true;
}
else
{
return false;
}
}
// checa email valido - (.@)
function ck_email(pCampo)
{
var vemail="";
vemailok=0;
vCampo="";
vemail= eval("document.pagina." + pCampo + ".value");
// localiza o . e @ dentro do campo email
if (vemail.indexOf(".")>=0)
{vemailok=vemailok+1};
if (vemail.indexOf("@")>=0)
{vemailok=vemailok+1};
if ((vemailok<2) && (vemail.length!=0))
{
pmsg="Email "+vemail+" incorreto; digite novamente !!!!"
alert(pmsg);
vCampo=eval("document.pagina." + pCampo + ".focus()");
vCampo=eval("document.pagina." + pCampo + ".select()");
return false;
}
else
{
return true;
}
}
function ConfirmaTransacao(mensagem1,mensagem2,urlConfirma,urlCancela)
{
mensagem=mensagem1+'\n\n'+mensagem2;
alert(mensagem);
location = urlConfirma;
/*
mensagem=mensagem1+'\n\n'+mensagem2+'\n\n'+'Confirma a Transação ?';
if ( confirm(mensagem) !="0")
{
location = urlConfirma
}
else
{
location = urlCancela
}
*/
}
// ********************************************************************************************* -->
// checa cpf
function CPFOK(vCampo)
{
var vRetorno=1;
if (vCampo.length==11)
{
vRetorno=0;
var i;
s = vCampo;
var c = s.substr(0,9);
var dv = s.substr(9,2);
var d1 = 0;
for (i = 0; i < 9; i++)
{
d1 += c.charAt(i)*(10-i);
}
if (d1 == 0)
{vRetorno=1}
if (vRetorno==0)
{
d1 = 11 - (d1 % 11);
if (d1 > 9) d1 = 0;
if (dv.charAt(0) != d1)
{vRetorno=1}
if (vRetorno==0)
{
d1 *= 2;
for (i = 0; i < 9; i++)
{
d1 += c.charAt(i)*(11-i);
}
d1 = 11 - (d1 % 11);
if (d1 > 9) d1 = 0;
if (dv.charAt(1) != d1)
{
vRetorno=1;
}
}
}
}
return(vRetorno);
}
// ********************************************************************************************* -->
// valida CNPJ
function isNUMB(c)
{
if((cx=c.indexOf(","))!=-1)
{
c = c.substring(0,cx)+"."+c.substring(cx+1);
}
if((parseFloat(c) / c != 1))
{
if(parseFloat(c) * c == 0)
{
return(1);
}
else
{
return(0);
}
}
else
{
return(1);
}
}
// faz parte da funcao CNPJ
// ********************************************************************************************* -->
function LIMP(c)
{
while((cx=c.indexOf("-"))!=-1)
{
c = c.substring(0,cx)+c.substring(cx+1);
}
while((cx=c.indexOf("/"))!=-1)
{
c = c.substring(0,cx)+c.substring(cx+1);
}
while((cx=c.indexOf(","))!=-1)
{
c = c.substring(0,cx)+c.substring(cx+1);
}
while((cx=c.indexOf("."))!=-1)
{
c = c.substring(0,cx)+c.substring(cx+1);
}
while((cx=c.indexOf("("))!=-1)
{
c = c.substring(0,cx)+c.substring(cx+1);
}
while((cx=c.indexOf(")"))!=-1)
{
c = c.substring(0,cx)+c.substring(cx+1);
}
while((cx=c.indexOf(" "))!=-1)
{
c = c.substring(0,cx)+c.substring(cx+1);
}
return(c);
}
// Checa CNPJ
// ********************************************************************************************* -->
function VerifyCNPJ(CNPJ)
{
CNPJ = LIMP(CNPJ);
if(isNUMB(CNPJ) != 1)
{
return(0);
}
else
{
if(CNPJ == 0)
{
return(0);
}
else
{
g=CNPJ.length-2;
if(RealTestaCNPJ(CNPJ,g) == 1)
{
g=CNPJ.length-1;
if(RealTestaCNPJ(CNPJ,g) == 1)
{
return(1);
}
else
{
return(0);
}
}
else
{
return(0);
}
}
}
}
// faz parte da checa CNPJ
// ********************************************************************************************* -->
function RealTestaCNPJ(CNPJ,g)
{
var VerCNPJ=0;
var ind=2;
var tam;
for(f=g;f>0;f--)
{
VerCNPJ+=parseInt(CNPJ.charAt(f-1))*ind;
if(ind>8)
{
ind=2;
}
else
{
ind++;
}
}
VerCNPJ%=11;
if(VerCNPJ==0 || VerCNPJ==1)
{
VerCNPJ=0;
}
else
{
VerCNPJ=11-VerCNPJ;
}
if(VerCNPJ!=parseInt(CNPJ.charAt(g)))
{
return(0);
}
else
{
return(1);
}
}
// checa CNPJ - retorna 0 (CNPJ errado), 1 (CNPJ - OK)
// ********************************************************************************************* -->
function CNPJOK(vCampo)
{
var vRetorno=2;
if (vCampo.length==14)
if (VerifyCNPJ(vCampo)==1)
{vRetorno=0;}
return(vRetorno);
}
// checa CNPJ e CPF - retorna 0 (CNPJ/CPF errado), 1 (CNPJ/CPF - OK)
//
// ********************************************************************************************* -->
function CPFCNPJOK(pCampo)
{
var vRetorno=0;
vcCampo="";
vpCampo=eval("document.pagina." + pCampo + ".value");
if (vpCampo.length>0)
{
vRetorno=CPFOK(vpCampo);
if (vRetorno>0)
{
vRetorno=CNPJOK(vpCampo);
}
if (vRetorno==0)
{
return true;
}
else
{
alert("CPF/CNPJ inválido");
vcCampo=eval("document.pagina." + pCampo + ".select()");
vcCampo=eval("document.pagina." + pCampo + ".focus()");
return false;
}
}
}