function abre(url,janela,larg,alt,scroll,pos1,pos2){window.open(url,janela,'toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars='+scroll+',resizable=no,copyhistory=no,top='+pos1+',left='+pos2+',screenY='+pos1+',screenX='+pos2+',width='+larg+',height='+alt);}
function mascaraInteiro(){if(event.keyCode<48||event.keyCode>57){event.returnValue=false;return false;}
return true;}
function formataCampo(campo,Mascara,evento){var boleanoMascara;var Digitato=evento.keyCode;exp=/\-|\.|\/|\(|\)| /g
campoSoNumeros=campo.value.toString().replace(exp,"");var posicaoCampo=0;var NovoValorCampo="";var TamanhoMascara=campoSoNumeros.length;;if(Digitato!=8){for(i=0;i<=TamanhoMascara;i++){boleanoMascara=((Mascara.charAt(i)=="-")||(Mascara.charAt(i)==".")
||(Mascara.charAt(i)=="/"))
boleanoMascara=boleanoMascara||((Mascara.charAt(i)=="(")
||(Mascara.charAt(i)==")")||(Mascara.charAt(i)==" "))
if(boleanoMascara){NovoValorCampo+=Mascara.charAt(i);TamanhoMascara++;}else{NovoValorCampo+=campoSoNumeros.charAt(posicaoCampo);posicaoCampo++;}}
campo.value=NovoValorCampo;return true;}else{return true;}}
function MascaraCep(cep){if(mascaraInteiro(cep)==false){event.returnValue=false;}
return formataCampo(cep,'00000-000',event);}
function MascaraCPF(cpf){if(mascaraInteiro(cpf)==false){event.returnValue=false;}
return formataCampo(cpf,'000.000.000-00',event);}
function MM_openBrWindow(theURL,winName,features){window.open(theURL,winName,features);}
function MM_swapImgRestore(){var i,x,a=document.MM_sr;for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++)x.src=x.oSrc;}
function MM_preloadImages(){var d=document;if(d.images){if(!d.MM_p)d.MM_p=new Array();var i,j=d.MM_p.length,a=MM_preloadImages.arguments;for(i=0;i<a.length;i++)
if(a[i].indexOf("#")!=0){d.MM_p[j]=new Image;d.MM_p[j++].src=a[i];}}}
function MM_findObj(n,d){var p,i,x;if(!d)d=document;if((p=n.indexOf("?"))>0&&parent.frames.length){d=parent.frames[n.substring(p+1)].document;n=n.substring(0,p);}
if(!(x=d[n])&&d.all)x=d.all[n];for(i=0;!x&&i<d.forms.length;i++)x=d.forms[i][n];for(i=0;!x&&d.layers&&i<d.layers.length;i++)x=MM_findObj(n,d.layers[i].document);if(!x&&d.getElementById)x=d.getElementById(n);return x;}
function MM_swapImage(){var i,j=0,x,a=MM_swapImage.arguments;document.MM_sr=new Array;for(i=0;i<(a.length-2);i+=3)
if((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x;if(!x.oSrc)x.oSrc=x.src;x.src=a[i+2];}}
function erro(msg){alert(msg);return false;}
function erro_focus(msg,obj){alert(msg);obj.focus();return false;}
function dataValida(data){dias=new Array(31,28,31,30,31,30,31,31,30,31,30,31);d=data.split(/\//);if(d.length<3)return false;if(d[2]<1900)return false;if(d[1]<1||d[1]>12)return false;dm=dias[d[1]-1];if(d[1]==2){if(d[2]%4==0)dm=29;}
if(d[0]<1||d[0]>dm)return false;return true;}
function emailValido(mail){return mail.match(/[0-9A-Za-z\.\_\-]+\@{1,1}[0-9A-Za-z\_\-]+\.{1,1}[0-9A-Za-z\_\-]+/);}
function vazio(valor){s=new String(valor);s=s.replace(/^ +/,'');s=s.replace(/ +$/,'');return s.length==0;}
function idValido(id){s=new String(id);validos=new String('abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_');valido=true;for(i=0;i<s.length;i++)valido=valido&&validos.indexOf(s.charAt(i))!=-1;return valido&&!vazio(id);}
function submitForm(cmd,frm){if(!frm){frm=document.forms[0];}
frm.cmd.value=cmd;frm.submit();}
function confirmar(msg,cmd){if(confirm(msg))
location.href=(cmd);}
function fillSelectFromArray(selectCtrl,itemArray,defaultItem){var i,j;if(itemArray!=null){for(i=selectCtrl.options.length;i>=0;i--){selectCtrl.options[i]=null;}
j=0;for(i=0;i<itemArray.length;i++){selectCtrl.options[j]=new Option(itemArray[i][0]);if(itemArray[i][1]!=null){selectCtrl.options[j].value=itemArray[i][1];if(itemArray[i][1]==defaultItem){selectCtrl.options[j].selected=true;}}
j++;}}}
function fillSelectFromArray1(selectCtrl,itemArray,defaultItem){var i,j;if(itemArray!=null){for(i=selectCtrl.options.length;i>=0;i--){selectCtrl.options[i]=null;}
j=0;for(i=0;i<itemArray.length;i++){selectCtrl.options[j]=new Option(itemArray[i][0]);if(itemArray[i][1]!=null){selectCtrl.options[j].value=itemArray[i][1];if(itemArray[i][1]==defaultItem){selectCtrl.options[j].selected=true;}}
j++;}}}
function valida_CGC_CPF(cgc_cpf){ok=true
if((cgc_cpf.length==14||cgc_cpf.length==11)&&(cgc_cpf!="00000000000"&&cgc_cpf!="00000000000000"))
{val_cgc_cpf=cgc_cpf.substring(0,cgc_cpf.length-2)
val_cgc_cpf=val_cgc_cpf+dig_cgc_cpf(val_cgc_cpf)
val_cgc_cpf=val_cgc_cpf+dig_cgc_cpf(val_cgc_cpf)
if(cgc_cpf!=val_cgc_cpf){ok=false}}
else{ok=false}
return ok}
function dig_cgc_cpf(cgc_cpf){soma=0
for(var i=0;i<cgc_cpf.length;i++){if(cgc_cpf.length>=12)
k=(2+i%8)
else
k=(i+2)
soma=soma+parseInt(cgc_cpf.charAt(cgc_cpf.length-i-1))*k}
dig=((10*soma)%11)%10
digito=dig.toString()
return digito}
function InicializarIndices()
{if(document.CargaInicial==null)
{document.CargaInicial=false;var ctrlAnterior=null;var IndAnt=0;for(var i=0;i<formcad.elements.length;i++)
{var e=formcad.elements[i];if(e.type!="hidden"&&e.type!="image")
{if(ctrlAnterior!=null)
ctrlAnterior.IndicePosterior=i;ctrlAnterior=e;e.Indice=i;e.IndiceAnterior=IndAnt;}}}}
function SetarFoco(ind){InicializarIndices();if(isNaN(ind)&&formcad.elements[ind].type!="hidden")
formcad.elements[ind].focus();else
for(;ind<formcad.elements.length;ind++)
if(formcad.elements[ind].type!="hidden")
break;if(ind<=formcad.elements.length)
formcad.elements[ind].focus();}
function LimparCampo(ind)
{if(isNaN(ind))
formcad.elements[ind].value="";else if(ind!=-1)
for(var i=ind;i<formcad.elements.length;i++)
if(formcad.elements[i].type=="text"||formcad.elements[i].type=="password")
{formcad.elements[i].value="";break;}
else
for(var i=0;i<formcad.elements.length;i++)
if(formcad.elements[i].type=="text"||formcad.elements[i].type=="password")
formcad.elements[i].value="";}
function QualNavegador()
{var s=navigator.appName;if(s=="Microsoft Internet Explorer")
return"IE";else if(s=="Netscape")
return"NE";else
return"";}
function QualVersao()
{var s=navigator.appVersion;if(QualNavegador()=="IE")
{var i=s.search("MSIE");s=s.substring(i+5);i=s.search(".");return parseInt(s.substring(0,i+1));}
else if(QualNavegador()=="NE")
return parseInt(s.substring(0,1));else
return 0;}
function SetarEvento(ctrl,Tam,Tipo,AutoSkip)
{var s=QualNavegador();if(s.length==0)
return;if(s=="IE"&&QualVersao()>6)
return;if(s=="NE"&&QualVersao()>4)
return;if(ctrl.onkeypress==null)
{if(AutoSkip==null)
AutoSkip=true;if(Tipo!=null)
Tipo.toUpperCase();ctrl.Tam=Tam;ctrl.Tipo=Tipo;ctrl.AutoSkip=true;ctrl.Saltar=false;InicializarIndices();ctrl.onkeypress=ValidarTecla;if(QualNavegador()=="IE"&&QualVersao()>=5)
ctrl.onkeyup=SaltarCampo;}}
function SaltarCampo(ctrl)
{if(ctrl==null)
ctrl=this;if(ctrl.AutoSkip&&ctrl.Saltar)
if(ctrl.Saltar)
{ctrl.Saltar=false;if(ctrl.IndicePosterior!=null)
SetarFoco(ctrl.IndicePosterior);}}
function ValidarTecla(evnt)
{var tk;var c;var tkce;var ce;tk=((QualNavegador()=="IE")?event.keyCode:evnt.which);c=String.fromCharCode(tk);c=c.toUpperCase();tkce=((QualNavegador()=="IE")?event.keyCode:evnt.which);ce=String.fromCharCode(tkce);ce=ce.toUpperCase();if(tk<32)
return true;if(tk>127)
return false;switch(this.Tipo)
{case"D":if(c<"0"||c>"9")
return false;break;case"N":if((c<"0"||c>"9")&&(c!="."&&c!=","))
return false;if((c==",")&&((this.value.search(",")>-1)||(this.value.length==0)))
return false;if((c==".")&&(this.value.length==0))
return false;break;case"C":if(c<"A"||c>"Z")
return false;break;case"CE":if(tkce<33)
return true;if(tkce>127)
return false;if(ce<"A"||ce>"Z")
return false;break;default:break;}
this.Saltar=(this.value.length==this.Tam-1);if(((QualNavegador()=="IE")&&QualVersao()<5)||(QualNavegador()!="IE"))
SaltarCampo(this);return true;}
function formcadataData(ctrl,formcadn,campo,teclapres){var tecla=teclapres.keyCode;vr=document.formcad[formcadn][campo].value;vr=vr.replace(/\./gi,"");vr=vr.replace(/\//gi,"");vr=vr.replace(/\-/gi,"");tam=vr.length;if(tecla!=9&&tecla!=8){if(tam<=1){if(tecla==109||tecla==111||tecla==189||tecla==191){document.formcad[formcadn][campo].value=vr;}}
else if(tam>=2&&tam<=3)
document.formcad[formcadn][campo].value=vr.substr(0,2)+'/'+vr.substr(2,tam);else if(tam==4)
document.formcad[formcadn][campo].value=vr.substr(0,2)+'/'+vr.substr(2,2)+'/';else if(tam>4)
document.formcad[formcadn][campo].value=vr.substr(0,2)+'/'+vr.substr(2,2)+'/'+vr.substr(4,tam);}
if(tam==8){ctrl.Saltar=false;if(ctrl.IndicePosterior!=null)
SetarFoco(ctrl.IndicePosterior);}}