var test=
0
var test_func=
0
var test_asp=
0
var silencio=
0
var mostraerro=
1
var test_s=
0
var qq_cpf=
0
so_ve_parametros=
0
extjs=1;
var modular=1;
var iiescola=1;
var mostra_carregando=1
coringa=";#|"
var p2=false;
var aw=0;
var ult_op=param=''
var w1=w2=dvv=0;
var locat=document.location.toString();
var url=(locat.substring(locat.lastIndexOf("/")+1,locat.indexOf(".asp")+4));
var euu=tI=0;
var c_aba=0;
var abaso1vez=true;
var semfocus=false;
var an=new Array();
var pg=new Array();
var ar=new Array();
var offset2=209;
var offset=-19;
var _pg="";
var rw;
var aleat=2152
//alert(url);

//window.onresize=function(){window.status='w:'+document.body.offsetWidth+', h:'+document.body.offsetHeight}

function ajaxv(nped,par,cmp,dir,func,u){ 
//	alert(par);
	if(u==null)u=url;
	ajax(nped,u,'exe=1&aw='+aw+par,cmp,dir,func); 
}


function sql(s,par,func,u) {
	if(s==null)return false;
	if(par==null)par=""
	if(u==null)u=url;
//	alert(s);
	ajax(0,u,'exe=1&aw='+aw+ ssql(s)+par,"",null,func); 
}
function retorna(s,cod,separa,par,func,u) {
	if(par==null)par=""
	if(u==null)u=url;
	ajax(0,u,'exe=1&aw='+aw+ '&q='+$v('q')+'&nx=1&a_1=gera_retorno&cod_1=' + escape(cod) +'&sql_1=' + escape(s) +'&separa_1=' + escape(separa) + par,"",null,func); 
}
function ssql(par,i) {
//alert(par)
	if(i==null)i=1;
	return '&q='+$v('q')+'&nx='+i+'&a_'+i+'=gera_sql&sql_'+i+'=' + escape(par)
}
function pcampos(vsql,nome,campos,par,func) {
	if(par==null)par=""
	if(func==null)func=""
	ajax(0,url,'exe=1&aw='+aw+ spcampos(vsql,nome,campos)+par,"",null,func); 
}
function spcampos(sql,nome,campos,nx) {
	if(nome==null)nome='form1';
	if(campos==null)campos='*';
	if(nx==null)nx='1';
	return '&q='+$v('q')+'&nx='+nx+'&a_'+nx+'=gera_campos&nome_'+nx+'=' + escape(nome)+'&sql_'+nx+'=' + escape(sql)+'&campos_'+nx+'=' + escape(campos)
}

function rec(nome,par,func,u) {
	var cc="";
	if(par==null)par="";
	if(u==null)u=url;
	if(par=="propar()")par=(propar(nome));	
	if(nome!=''){
		if(par.substring(0,1)=="!")par=propar(tiraesq(par));
		
		var ns=sv(nome);
		for(var i=0;i<ns.length;i++){
			if(ns[i]!="")if(eval(ns[i]+"_u")!=undefined){
				cc+=eval(ns[i]+"_u");
				if(par.indexOf(ns[i])<0)if($o(ns[i]))cc+="&"+ns[i]+"="+escape(sel(ns[i]));
			}
		}
	}
//	alert(cc);
	if(func==null)func=""
	if(func)if(pright(func)!=';')func=func+';'
	
	ajax(0,u,'exe=1&aw='+aw+ par + cc,nome,null,func); 
}

function ajax(nped,end,par,cmp,dir,func,erro1)
{	aok(nped);
	an[nped]++;
	var jax = XMLHTTPRequest();//createXMLHTTP();
	if(dir!=null){if($o(dir))dir=$o(dir); else dir=null;}

	if(par.indexOf("&modular=")<0)par+='&modular='+modular
	if(par.indexOf("&iescola=")<0)par+='&iescola='+iiescola
//alert(unescape(par));
	carregando(cmp,0,nped)
	gera_dvv(1)
//	if(test==1)alert(end+"?"+par);
	jax.open("post", end, true); 
    jax.setRequestHeader("Content-Type", "application/x-www-form-urlencoded");

    jax.onreadystatechange=function(){
	    if (jax.readyState==4){
		  var jh=jax.responseText;
		  //if(euu==1)alert(par);
		  //if(euu==1)alert(jh);

//		  alert(unescape(par));
//		  alert(jh);
jh=rpl(jh,'####','##')

		  if(test==1 && silencio==0)
		  alert(par + "\n\n"+jh)
		  	//if(jh.indexOf("select")>=0)$o('rodape').innerHTML=jh;
		if(test_s==1)$o('erro1').value=par + "\n\n"+jh;
			
	  	  if(test==1)if($o('erro1'))if($o('erro1').nodeName=="TEXTAREA"){$o('erro1').value=jh +"<BR><BR>-----<BR><BR>"+unescape(par);$o('erro1').style.display='block';}
	  	  
			if(mostraerro==1){
		  	if(jh.indexOf("erro '")>=0 || jh.indexOf("Erro ao executar")>=0 || jh.indexOf("ROBOTS")>=0 || jh.indexOf("/*-*/")>=0){
			  	if(test==1){
				  	if($o('erro')){
				  		if($o('erro').nodeName=="DIV")
					  	$o('erro').innerHTML=jh +"<BR><BR>-----<BR><BR>"+par;
					  	else
					  	$o('erro').value=jh +"<BR><BR>-----<BR><BR>"+par;
					}
				}else{
//					$o('erro').innerHTML=jh +"<BR><BR>-----<BR><BR>"+unescape(par);$o('erro').style.display='block';
//					$o('erro1').innerText.innerHTML==jh +"<BR><BR>-----<BR><BR>"+unescape(par);$o('erro1').style.display='block';

					if(erro1==null){	
						ajax(0,"erro.asp","exe=1&erro="+escape(jh+"/* ----- */"+par),null,null,null,1)
					}else{
					
						if(jh.indexOf("ODBC")>=0)
						jh='Falha na consulta, linha: '+jh.substring(jh.lastIndexOf("line ")+4,jh.length-8)
						else if(jh.indexOf("Erro ao executar")>=0)
						jh=jh.substring(jh.lastIndexOf("Erro'")-4,jh.length)
						else
						jh=jh.substring(jh.lastIndexOf("erro '")+53,jh.length)
						alert('Ocorreu um erro ao enviar os dados, notifique o administrador.\n\nDescrição:\n'+jh);
					}
				}
			}
			}



		  //$o('rodape').innerHTML=jh;
		  //if(url=='_exdom.asp')alert(jh);
		  
		  for(;jh.indexOf("###")>=0;)jh=jh.replace('###','@¦');
			if(dir){		
		  		if(dir.nodeName=='INPUT')
				  dir.value=jh;
				else
				  dir.innerHTML=jh;
	    	}else if(jh.indexOf('##')<0){
	    		//alert(cmp+"="+jh);
		        if(cmp)if($o(cmp)!=null)$o(cmp).innerHTML=jh
			//if(url=='_exdom.asp' || url=='turmas.asp')alert('++'+jh);
            }else{
	            _r=jh.split('##');
	            for(var i=0;i<_r.length;i++){
	            //_r[i]=_r[i].replace('@¦','###')

	            for(;_r[i].indexOf("@¦")>=0;)_r[i]=_r[i].replace('@¦','###');

//	            if(test==1)alert('func:'+_r[i]);
			    //if(url=='_exdom.asp')alert(_r[i]);
		            if(_r[i].length>0){
				        var _c=_r[i].split('**')
				        if(_c[0].substring(0,1)==' ')_c[0]=tiraesq(_c[0])
				        
				        if(_c[0].substring(0,1)=='!'){
					        _c[0]=_c[0].substring(1,_c[0].length)
							if(test_func==1){alert('exec: '+_c[0]);}
						    //if(test!=1)
							eval(_c[0]);
				        }else if(_c[0].substring(0,1)=='+'){
					        _c[0]=_c[0].replace('+','')
					        if(document.getElementById(_c[0])!=null)
						    document.getElementById(_c[0]).style.display=_c[1];
				        }else{

							if(_c[0]!="")if($o(_c[0])!=null){
								if($o(_c[0]).nodeName=="INPUT" || $o(_c[0]).nodeName=="SELECT")
								$o(_c[0]).value=_c[1];
								else{

									$o(_c[0]).innerHTML=_c[1];

								}
							}
						    
					    }
		            }
	            }
            }
			an[nped]--;
            gera_dvv(0);
		    carregando(cmp,1,nped);
			if(func!=null)if(func.length>0){
//				alert(func);
				eval(func);
			}
			efeitos();	

		}
	}
	//jax.send(par);
	var env='senha_ll1='+GetCookie('senha%5Fll1')+'&id_ll1='+GetCookie('id%5Fll1')+
		((par.substring(0,1)!='&')?'&':'')+par;
	jax.send(env);
}

function gera_listauto(o,e,sql,icampo,txt,larg,alt,minchar,url,rok,am) {
	if(url!=null)ajax_list_externalFile=url;
	if(minchar==null)minchar=0;
	if(rok==null)rok='ex';
	if(am==null)am='';
	ajax_showOptions(o,'nx=1&sql_1='+sql+'&icampo_1='+icampo+'&txt_1='+txt+'&a_1=gera_listauto'+am+'&'+rok,e,larg,alt,minchar);
}
function troca_td(ob,de,para) {
//alert(alu_td);
	var o=$o(ob).getElementsByTagName('tr')
	for(var i=0;i<o.length;i++){
		if(o[i].childNodes.length<=para)break;
		var a=o[i].childNodes[para].innerHTML;
		o[i].childNodes[para].innerHTML=o[i].childNodes[de].innerHTML;
		o[i].childNodes[de].innerHTML=a;
	}
}
function parametros_listauto(a1,a2,cc) {
	if(!a1 || a1=='')return false;
	if(cc==null)cc='$~'
	var d=a1.split(cc)
	var c=a2.split(';')
	for(var i=0;i<c.length;i++){
		if(c[i].substring(0,1)=="*"){
			c[i]=tiraesq(c[i]);
			if($o(c[i]))$o(c[i]).disabled=1
		}
		var v="";
		if(d.length>i)v=d[i];
		$c(c[i],v);
		//alert(c[i]+"-"+d[i]);
		
	}
}
function ver1(s,c,tira) {
	if(s.substring(0,1)==c){
		if(tira!=0)s=tiraesq(s);
		return true;
	}return false;
}

function numfoi(a) {
	if(!ar[a]){
		ar[a]=1;return true;
	}else return false;
}
function perg(s) {
	var a=sp(s);
	_pg="";
	for(var i=0;i<a.length;i++){
		var cod=a[i].split('|')[0];
		a[i]=a[i].split('|')[1];
		var pad=a[i].substring(a[i].lastIndexOf(":")+1,a[i].length)
		var p=a[i].substring(0,a[i].lastIndexOf(":"))
		var r="";
		if(r=prompt(p,pad)){
			pg[cod]=r;
			_pg+="&"+cod+"="+r
		}else{
			return false;
		}
	}
}
function $o(a) {
/*	if(typeof(a)=='string')if(a.indexOf(".")!=-1){
		var b=a.split(".");
		
		return Ext.query("table."+b[0]+" #"+b[1])[0]
	}*/
	return typeof(a)=="string"?document.getElementById(a):a;
	
}
function $oo(a) {
	var a=a.split(",")
	var o=new Array();
	for(var i=0;i<a.length;i++){
		if(typeof(a[i])!="string")
			o[i]=a[i]
		else if(document.getElementById(a[i]))
			o[i]=document.getElementById(a[i])
//		o[i]=(typeof(a[i])=="string"?document.getElementById(a[i]):a[i]);
	}
	return o;
}
function $f(a,b) {
	if(b!=null)bar.setActiveTab(b);
	if($o(a))document.getElementById(a).focus();
}
function $s(a,b) {
	if(b!=null)bar.setActiveTab(b);
	if($o(a))document.getElementById(a).select();
}

function $d(o,b) {
	var o=$oo(o);
	for(var i=0;i<o.length;i++){
		o[i].disabled=b;
	}	
}
function $h(o,b) {
	var o=$oo(o);
	for(var i=0;i<o.length;i++){
//		alert(o[i]);
		o[i].style.display=ef(b==1,'none','block');

	}	
}
function ec_sx(s) {
	s=rpl(s,';','$~')
	s=rpl(s,'=','$'+escape('%'))
	return s
}
function preenche(f,cmp,tipo,campos,padrao) {
	var ad=""
//	if(typeof(f)=="string")if(f.substring(f.length-1,f.length)=='.')ad=f;
	if(campos!=null)limpa_campos(campos,padrao); else limpa_campos(f,padrao);
	if(cmp=="" || cmp==undefined){
//		alert('Registro não encontrado.');okrec=0;set_novo();
		return false;
	}
	if(test==1)alert("p:"+cmp);
	var c1=ef(cmp.indexOf("$~")>=0,"$~",";");
	var c2=ef(cmp.indexOf("$%")>=0,"$%","=");

	if(tipo==0 || tipo==null)var a=cmp.split(c1);	else var a=cmp.split("&")

	for(var i=0;i<a.length;i++){
		var b=a[i].split(c2);

		if(b.length>1)b[1]=(unescape(b[1]));
		if(b[0]!=""){
			var o=$o(ad+b[0]); 
			if(o){
//		b[1]=unescape(b[1]);
				selecionai(o,b[1]);
				if(o.className=="f00" || o.className=="f00m")o.value=preal(b[1])
				if(o.className!='listauto')proscope_s(o)
				if(o.onblur!=null)o.onblur();
//		if(o.name=="iprop"){alert(b[1]);}

			}
		}
	}
}
function ext_sel(o,v) {
	o.setValue(v,false);
}
function ext_sel2(o,v,o2) {
	o.reset()
	if(o2){
		$c(o2,'');
		$c(o2+'_g','0');
	}
	if(sonum(v).length==v.length){
		o.setValue(v,false);
		$c(o2+'_g','0');
	}else{
		var i=o.store.find('text',v)
		if(i>=0){
			o.setValue(o.store.getAt(i).id);
		}else if(o2)$c(o2+'_g','1');
		if(o.getValue()=='0' || o.getValue()=='')o.setValue(v,false);
		
	}
	if(o2){
		$c(o2,o.getValue());
//		alert($o(o2).name+$o(o2).nodeName+$o(o2).value+"--"+o.getValue());
	}

//	alert($v('icid'));
}
function $_v(_o,o) {

	return _o.getValue()
}

function verobrigado(f,cmp) {
	var a=sv(cmp);
	for(var i=0;i<a.length;i++){
		if($o(a[i]))if($o(a[i]).value==""){
			$o(a[i]).select();
			var nome;
			if($o(a[i]).alt.length>0)nome=$o(a[i]).alt; else nome=$o(a[i]).name
			//alert('Todos os campos marcados com * (asterisco) são de preenchimento obrigatório.');
			alert('O campo \''+nome+'\' é de preenchimento obrigatório.');
			return false;
		}
	}
	return true
}


function onready(func){
	if(!($o("ok")==null)){
		func();
	}else{
		var func_rep = func;
		setTimeout(function(){ onready(func_rep) },100);
	}
}


function wonload(func){
	//if(typeof(func)=="string")func=eval(func);
	addEvent(window,'load',func);
}
function pleft(s,c) {
	if(s)return s.substring(0,c); else return undefined;
}
function prohtml(o,html) {
	o=$o(o)
	var s=o.value;
	if(!s)s=""
	if(html){
		s=rpl(s,"\n","<br>")
		s=rpl(s,"\r","")
		s=rpl(s,"'","`")
//		alert(s);
		return s
	}else{
		s=rpl(s,"<br>","\n")
//		alert(s);
		return s
	}
}
parscope=0
function parametros(op,tr) {
	op=$o(op)
	parscope=1
	if(!op)
		var o=sel_campos()
	else if(op.nodeName!='FORM')
		var o=sel_campos()
	else
		var o=op.elements;
		
	var s="";
	for(var i=0;i<o.length;i++){
		if(o[i].name!=null)if(o[i].className!='inv' && o[i].name.substring(0,2)!="c_" && o[i].alt!='.' && pleft(o[i].alt,2)!='te_'){
			n=o[i].name
			if(!n)n=o[i].id
			if(tr==1)if(o[i].name.substring(0,1)=="_")n=tiraesq(n)
			if(o[i].nodeName=="SELECT"){
				s+="&"+n+"="+escape(sel(o[i]).replace("'","´"));
			}else if(o[i].type!='button' && o[i].type!='submit' && o[i].type!='file' && o[i].name!='erro1'){
				if(o[i].scope)if(o[i].scope.substring(0,12)=='if(parscope)')eval(o[i].scope);
				if(ar["parscope"]!=null){
					s+="&"+n+"="+ escape(ar["parscope"])
				}else if(o[i].type=="checkbox"){
					if(o[i].checked || o[i].className.indexOf("desc_branco")<0)
					s+="&"+n+"="+ ((o[i].checked)?o[i].value:o[i].lang);
				}else if(o[i].type=="radio"){
					if(o[i].checked)
					s+="&"+n+"="+ o[i].value;
				}else if(o[i].className=="f00"){
					s+="&"+n+"="+escape(((o[i].value=='' && o[i].lang!='')?o[i].lang:o[i].value).replace(".",""));
				}else{
					s+="&"+n+"="+escape(((o[i].value=='' && o[i].lang!='')?o[i].lang:o[i].value).replace("'","´"));
				}
				ar["parscope"]=null;
			}
		}
	}
	parscope=0
	return s;
}
function pree_id(a) {
	if(!a)
		var o = sel_campos(); 
	else if($o(a).nodeName!='FORM')
		var o = sel_campos(); 
	else 
		var o = $o(a).elements;

	for(var i=0;i<o.length;i++){
		if(o[i].id=='')o[i].id=(o[i].name);
	}
}
function verobrigado_a(a) {
	var ext=(!a)

	var fr=$o(a);
	if(!fr)fr=document;
	var tr=fr.getElementsByTagName('tr');
	var t=''
	var w=0
	for(var l=0;l<tr.length;l++){
		if(tr[l].innerHTML.indexOf('=*')>0 || tr[l].innerHTML.indexOf('="*')>0 || tr[l].innerHTML.indexOf('(*)')>0 || tr[l].innerHTML.indexOf('>*<')>0){
			var td=tr[l].getElementsByTagName('td')
			w=0;
			for(var c=0;c<td.length;c++){
				if(td.length==4 && c==2 && w==1)w=0;
				if(td[c].innerHTML.indexOf('(*)')>0 || td[c].innerHTML.indexOf('>*<')>0 || td[c].lang=='*')w=1;

				var o=td[c].childNodes;
				//alert(td[c].innerHTML);
				for(var i=0;i<o.length;i++)if(o[i].nodeName=='#text')
						if(td[c].innerHTML.indexOf("<INPUT")<0 && td[c].innerHTML.indexOf("<SELECT")<0){t=td[c].innerHTML;break;}
				var o=td[c].getElementsByTagName('input');

				var nobr=0;	if(td[c].className)if(o[i])if(o[i].rel)if(o[i].rel.indexOf("nao_obrigado")!=-1)nobr=1;
				
				for(var i=0;i<o.length;i++){
					if(o[i].type=='text' || o[i].type=='password' || o[i].type=='radio' ){	
						if(o[i].rel)if(o[i].rel.indexOf("nao_obrigado")!=-1)nobr=1;
						
						if( !$v(o[i]) && w==1 && nobr==0){
							t=rpl(t,'<span class="c">*</span>')
							t=rpl(t,'<SPAN class=c>*</SPAN>')
							t=rpl(t,'<b>*</b>')
							t=rpl(t,'<B>*</B>')
							t=rpl(t,'<i>')
							t=rpl(t,'<I>')
							t=rpl(t,'&nbsp;')
							t=rpl(t,'</i>')
							t=rpl(t,'</I>')
							t=trimc(trimc(t,' '),':')
							t=rpl(t,'(*)')
							if(!o[i].disabled)focar(o[i]);
							if(!ext){alert('Preencha corretamente o campo \''+t+'\'.');}else 
								msg2('Preencha corretamente o campo \''+t+'\'.',null,o[i].id);
							return false;
						}
					}
				}
				var o=td[c].getElementsByTagName('select');
				for(var i=0;i<o.length;i++){
						if(( o[i].options.length==0 || escape(selt(o[i]))=='%A0') && w==1){
							t=rpl(t,'<span class="c">*</span>')
							t=rpl(t,'<SPAN class=c>*</SPAN>')
							t=rpl(t,'<b>*</b>')
							t=rpl(t,'&nbsp;')
							t=rpl(t,'<B>*</B>')
							t=trimc(trimc(t,' '),':')
							t=rpl(t,'(*)')
							if(!o[i].disabled)focar(o[i]);
							if(!ext){alert('Preencha corretamente o campo \''+t+'\'.');}else 
								msg2('Preencha corretamente o campo \''+t+'\'.',null,o[i].id);
							return false;
						}
				}
				
			}
		}
	}
	return true;
}
function parametros_sql(op,tr) {
	if(op.nodeName!='FORM')return false;
	var o=op.elements;//.getElementsByTagName('input')
	var s="";
	for(var i=0;i<o.length;i++){
		if(o[i].name!=null)if(o[i].className!='inv' && o[i].name.substring(0,2)!="c_"){
			n=o[i].name
			if(tr==1)if(o[i].name.substring(0,1)=="_")n=tiraesq(n)
			if(o[i].nodeName=="SELECT"){
				s+=","+n+"='"+escape(sel(o[i]).replace("'","´")) +"'";
			}else{
				if(o[i].type=="checkbox"){
					if(o[i].checked || o[i].className.indexOf("desc_branco")<0)
					s+=","+n+"='"+ ((o[i].checked)?o[i].value:o[i].lang)+"'";
				}if(o[i].type=="radio"){
					if(o[i].checked)
					s+=","+n+"='"+ o[i].value+"'";
				}else if(o[i].className=="f00"){
					s+=","+n+"='"+escape(((o[i].value=='' && o[i].lang!='')?o[i].lang:o[i].value).replace(".",""))+"'";
				}else{
					s+=","+n+"='"+escape(((o[i].value=='' && o[i].lang!='')?o[i].lang:o[i].value).replace("'","´"))+"'";
				}
			}
		}
	}
	s=trimc(s,',')
	return s;
}

function pro_wgrid(o,g,t) {
	//var a=[[''],['']];
	//var a=new Array(300,20)
	var a=new Array()
	var n=0;
	//a[2][2]=996
	//alert(a[2][2]);
//	$c('erro',t)
	var l=t.split("|||");
	for(var i=0;i<l.length-1;i++){
		var c=l[i].split("###")
		a[i]=new Array()
		for(var j=0;j<c.length-1;j++){
			//alert("i:"+i+" j:"+j+" "+c[j]);
			a[i][j]=c[j];

		}
	}
	if(t.length>7)n=l.length-1;
	alert(n+"::"+t);

	o.setRowCount(0);
	
	o.setCellText(a);	
	o.setRowCount(n);

//	o.setCellText(1);
//	var tt="";
/*	tt=o;
	tt=tt.replace('<SPAN style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; DISPLAY: block; BACKGROUND: #fff; LEFT: 10%; BORDER-LEFT: 1px solid; WIDTH: 80%; COLOR: #f00; BOTTOM: 25px; BORDER-BOTTOM: 1px solid; POSITION: absolute; HEIGHT: 20px; TEXT-ALIGN: center">ActiveWidgets 2.0 - Evaluation Version.</SPAN>',
	'<SPAN style="BORDER-RIGHT: 1px solid; BORDER-TOP: 1px solid; DISPLAY: block; BACKGROUND: #fff; LEFT: 10%; BORDER-LEFT: 1px solid; WIDTH: 80%; COLOR: #f00; BOTTOM: 25px; BORDER-BOTTOM: 1px solid; POSITION: absolute; HEIGHT: 20px; TEXT-ALIGN: center">---------</SPAN>')
*/	
	document.getElementById(g).innerHTML=o;
}
function ve_wd(o) {
	var tt="";
	tt=o.toString();
//	if(tt.indexOf("Evaluation")>=0)alert('eeeeeeeeee');
//$c('erro1',tt)
//	tt=tt.replace('ActiveWidgets 2.0 - Evaluation Version','.')
	return tt+"";
}
function table_scrollbottom(tb) {
	var dtt=document.getElementById("t_"+tb).parentNode;
	var tt=document.getElementById("t_"+tb);
	var trs=tt.getElementsByTagName('td')
	dtt.scrollTop=500;
	tt.parentNode.firstChild.firstChild.firstChild.style.top=dtt.scrollTop+'px';
}
function addrow(tb,txt) {
	var dtt=document.getElementById("t_"+tb).parentNode;
	var tt=document.getElementById("t_"+tb);
	var trs=tt.getElementsByTagName('td')
	var b=""
	var a=sx(txt)
	for(var i=0;i<a.length;i++){
		var c=a[i].split('&')
		for(var j=0;i<c.length;j++){
			b+="'"+c[j]+"',"
		}
	}
	b=trimc(b,',')
	alert("o_"+tb+".addNewRow(Array("+b+"));");
	eval("o_"+tb+".addNewRow(Array("+b+"));");
	dtt.scrollTop=400;
	tt.parentNode.firstChild.firstChild.firstChild.style.top=dtt.scrollTop+'px';
}

function ativatodos(op) {
	var o=op.elements;//.getElementsByTagName('input')
	for(var i=0;i<o.length;i++){
		if(o[i].disabled)o[i].disabled=false;
	}
}



function ptodos(op,t) {
	var a=null;
	var o=op.elements;//.getElementsByTagName('input')
	for(var i=0;i<o.length;i++){
		if(!o[i].disabled && o[i].value=="" && o[i].type=="text"){
			if(a==null)if(a=confirm('Deseja preencher os campos em branco com \''+t+'\'?'));else return false;
			if(a)o[i].value=t;
		}
	}
}
function msg2(m,func,o) {
	Ext.MessageBox.hide();
	Ext.MessageBox.show({title: 'Mensagem',msg: m,fn:func, width:300,buttons: Ext.MessageBox.OK});
}
function ext_confirm(m,func) {
	Ext.MessageBox.hide();
    Ext.MessageBox.confirm('Atenção!', m, func);
}
function sel_campos(f) {
//	var i=document.getElementsByTagName('input')
//	alert(i);
//	var s=document.getElementsByTagName('select')
	if(f==null)f=""; else f="table."+f+" "
	var i=Ext.query(f+'input')
	var s=Ext.query(f+'select')
	var t=Ext.query(f+'textarea')
	return i.concat(s,t)
}
usa_tab=0;
function focar(o) {
	var o=$o(o)
	if(usa_tab){
		var a=o.parentNode;
		for(var i=0;i==0;){
			if(!a)break;
			if(a.nodeName=='DIV' && a.rel=='painel'){
				bar.setActiveTab(a.scope);
//				alert(o.name);
				o.focus()
				break;
			}else{
				a=a.parentNode;
			}
		}
	}else o.focus()
}
function limpa_campos(op,padrao,ex_scope) {
	var a=null;var txt=false;
	if(op=='')return false;
	
	if(typeof(op)=='string'){
		if(op.indexOf(",")!=-1){
			var o=sv(op)
			txt=true;
		}else if(!$o(op)) var o=sel_campos();else var o=$o(op).elements
	}else if(!$o(op)) var o=sel_campos();else var o=$o(op).elements
		/*
	var op=$o(op)
	var txt=(!op.elements)
	var txt=(typeof(op))
	if(!txt)
		var o=op.elements;
	else
		var o=sv(op)
		*/
	for(var i=0;i<o.length;i++){
		if(txt)o[i]=$o(o[i])
//		alert(o[i].id +","+o[i].type);
		if(!o[i]){
		}else if(op=="*" && o[i].form){
		}else if(o[i].type=="text" || o[i].type=="password"|| o[i].nodeName=='TEXTAREA'){
			o[i].value="";
			if(padrao==1 && o[i].lang!="a")o[i].value=o[i].lang;
		}else if(o[i].type=="checkbox"){
			o[i].checked=(o[i].scope=="1");
		}else if(o[i].type=="radio"){
			if($v(o))if(o[i].onblur!=null)o[i].onblur();
		}else if(o[i].nodeName=="SELECT"){
			if(o[i].lang=="")selpri(o[i]);else selecionai(o[i],o[i].lang)
			proscope_s(o[i])
		}else if(o[i].type=="hidden" && o[i].className=="cmp"){
			o[i].value="";
		}else if(o[i].nodeName=="DIV"){
			o[i].innerHTML="";
			if(padrao==1 && o[i].lang!="a")o[i].innerHTML=o[i].lang;
		}else if(o[i].nodeName=="IMG"){
			o[i].src="";
			if(padrao==1 && o[i].lang!="a")o[i].src=o[i].lang;
		}
		if(ex_scope==1)if(o[i])if(o[i].className!='listauto')proscope_s(o[i])
	}
}
function aok(nped) {
	if(an[nped]==undefined)an[nped]=0;
}

function eef(cond,t) {
	if(cond)return t; else return "";
}
function ef(cond,t,t2) {
	if(cond)return t; else return t2;
}
function pright(s,c) {
	if(c==null)c=1;
	if(s)return s.substring(s.length-c,s.length);else return ""
}
function pleft(s,c) {
	if(c==null)c=1;
	if(s)return s.substring(0,c); else return ""
}

function carregando(cmp,lk,nped) {
	
//	window.status+=nped+((lk==0)?'.':',');
	if(lk==0){
		if(cmp!=null)if(cmp.length>0){
			cmps=sv(cmp);
			for(var i=0;i<cmps.length;i++){
				var car=(cmps[i].substring(0,1)=='!')
				if(car)cmps[i]=tiraesq(cmps[i]);
				if($o(cmps[i])!=null){
					if($o(cmps[i]).childNodes.length>0 && car==false){
						var o=$o(cmps[i]).childNodes;
						var a=0;
						for(var j=0;j<o.length;j++){
						//alert(o[j].nodeName);
							if(o[j].nodeName=='IMG'){
								o[j].style.filter='Alpha(Opacity=20)';
								a=1;_an(o[j],1);
							}
							if(o[j].type=='text' || o[j].nodeName=='SELECT' || o[j].type=='hidden'){
								o[j].disabled=true;a=1;

								_an(o[j],1);
							}
							//if(o[j].nodeName=='TABLE'){o[j].disabled=true;a=1;}
						}
						if($o(cmps[i]).nodeName=='A'){$o(cmps[i]).disabled=true;_an(cmps[i],1);}
						$o(cmps[i]).style.color='#ccc';//$o(cmps[i]).innerHTML="...";
						//alert("+"+cmps[i]);
					}else if($o(cmps[i]).nodeName=='DIV' || $o(cmps[i]).nodeName=='INPUT' || $o(cmps[i]).nodeName=='SELECT'){
						if($o(cmps[i]).type=='text')$o(cmps[i]).value='carregando...';
						if($o(cmps[i]).nodeName=='DIV')$o(cmps[i]).innerHTML='carregando...';else $o(cmps[i]).disabled=true;
						
						_an(cmps[i],1);
						$o(cmps[i]).disabled=true;
					}
				}
			}
		}
	}else{
		if(cmp!=null)if(cmp.length>0){
				cmps=sv(cmp)
				for(var i=0;i<cmps.length;i++){
					var car=(cmps[i].substring(0,1)=='!')
					if(car)cmps[i]=tiraesq(cmps[i]);
					if($o(cmps[i])!=null){
						if($o(cmps[i]).childNodes.length>0  && car==false){
							var o=$o(cmps[i]).childNodes;var a=0;
							for(var j=0;j<o.length;j++){
								if(o[j].nodeName=='IMG'){
									_an(o[j],-1);
									if(_an(o[j])==0)o[j].style.filter='';
									a=1;
								}
								if(o[j].type=='text' || o[j].nodeName=='SELECT'){
									_an(o[j],-1);
									//an[o[j].id]--;
									o[j].disabled=(_an(o[j])!=0);
									a=1; 
								}
								if(o[j].type=='text' && o[j].value=='carregando...')o[j].value=='';
								
							}
							if($o(cmps[i]).nodeName=='A'){_an(cmps[i],-1);$o(cmps[i]).disabled=(_an(cmps[i])!=0);}
							$o(cmps[i]).style.color='';//alert(cmps[i]);
						}else if($o(cmps[i]).nodeName=='DIV' || $o(cmps[i]).nodeName=='INPUT' || $o(cmps[i]).nodeName=='SELECT'){
							_an(cmps[i],-1);
							$o(cmps[i]).disabled=(_an(cmps[i])!=0); 
							if($o(cmps[i]).nodeName=='INPUT' && $o(cmps[i]).value=='carregando...')$o(cmps[i]).value='';
						}
					}
				}
			}
	}
}

function _an(s,a) {
	var o;
	if(a==null)a=0;
	if($o(s))o=$o(s);else if(s)o=s;
	if(o){
		var nom;
		if(o.id!=null && o.id!=undefined && o.id!=''){
			nom=o.id
		}else if(o.name!=null && o.name!=undefined && o.name!=''){
			nom=o.name
		}
		aok(nom);
		an[nom]+=a;
//		window.status+=((a>0)?'+':'-')+nom+an[nom];
		return an[nom];
	}
}

function gera_dvv(s,dh) {
	if(mostra_carregando==1){
	pegarxy();
	if(dvv==null || dvv==0){
		dvv=document.createElement('div');
		var dk=document.createTextNode('Carregando...');
		dvv.appendChild(dk);
		document.body.appendChild(dvv);
		dvv.className='dcarregando';
		dvv.setAttribute('id','dvv');
		if(endsite==null)endsite="http://www.queromeular.com.br"
		$o('dvv').innerHTML='<IMG SRC="'+endsite+'/i/ajax-loader.gif" WIDTH="16" HEIGHT="16"> Carregando...'
	}
	var a=0;
	if(dh==null){
		for(var i=0;i<an.length;i++){
			if(an[i]>0)a=1;
		}
	}else if(s==0){
//		a=1
//		for(var i=0;i<DHTMLSuite.variableStorage.ajaxObjects.length;i++){
//			if(DHTMLSuite.variableStorage.ajaxObjects[i].responseStatus!=null)a=0;
//			alert(DHTMLSuite.variableStorage.ajaxObjects[i].responseStatus);
		
	}else a=1
	dvv.style.display=(a==1)?'block':'none';
	if($o('sbm'))$o('sbm').disabled=(a==1);
	pegarxy();
//	window.status=an[0]
	}
}

window.onbeforeunload=function(){
	an[1]=1;gera_dvv();
}



function aaa(o) {alert(o.nodeName);}

function wr(ond,oq) {
	if($o(ond)){
		if($o(ond).nodeName=='INPUT')$o(ond).value=oq; else $o(ond).innerHTML=oq;
	}
}


function ac_links() {
	var o=document.getElementsByTagName('a');
	for(var i=0;i<o.length;i++){
		if(o[i].href.indexOf("http")!=-1 && (o[i].href.indexOf("queromeular.com.br")==-1 || o[i].href.indexOf("localhost")==-1))
			if(o[i].onclick==null){
			o[i].onclick=function(){
//				alert(this.id);
				ar['voltou']=0
				ajax(0,endsite+"/w_ac.asp","end="+escape(this.href)+"&de="+escape(url)+"&obs="+"__abrindo_blank",null,null,null);
				var f_lf_ex=function() {
					if(ar['voltou']!=1){
						ajax(0,endsite+"/w_ac.asp","end=.desc.&de="+escape(url)+"&obs="+"voltou",null,null,null);
						removeEvent(window,'focus',f_lf_ex);
						window.onfocus=function(){return true;}
						ar['voltou']=1
					}
				}
				addEvent(window,'focus',f_lf_ex)
			}

		}
	}
}

function efeitos() {

//return false;

/*	var imgs=document.getElementsByTagName('img');
	for(var i=0;i<imgs.length;i++){
		if(imgs[i].className.indexOf('alfa')>=0){
			var f=sonum(imgs[i].className);
			imgs[i].onmouseover=function(){this.style.filter='Alpha(Opacity=100)';}
			imgs[i].onmouseout=function(){this.style.filter='Alpha(Opacity='+f+')';}
			imgs[i].style.filter='Alpha(Opacity='+f+')';
			imgs[i].border='0';
		}
	}

	var imgs=document.getElementsByTagName('td');
	for(var i=0;i<imgs.length;i++){
		if(imgs[i].className.indexOf('trmudacor_claro')>=0){
			imgs[i].onmouseover=function(){if(this.className.indexOf(' c')<0);trcor(this,'#C6EBFD');}
			imgs[i].onmouseout=function(){if(this.className.indexOf(' c')<0);trcor(this,'white');}
			//imgs[i].onclick=function(){
			//	if(this.className.indexOf(' c')<0){this.className+=' c';trcor(this,'#9DDBFF');
			//	}else{ this.className=this.className.replace(' c','');trcor(this,'#C6EBFD');}
			//}
			
			//imgs[i].style.filter='Alpha(Opacity=25)';
			//imgs[i].border='0';
		}
	}
*/
	var o=document.getElementsByTagName('table');
	for(var i=0;i<o.length;i++){

		if(o[i].id=='formulario' ||  o[i].parentNode.className.substring(0,4)=='form'  ||  o[i].className.indexOf('f1')>=0 ||  o[i].className.indexOf('form_pop')>=0){
			var imgs=o[i].getElementsByTagName('input');
			for(var j=0;j<imgs.length;j++){

				if(imgs[j].className.indexOf('nmil')>=0){
					imgs[j].onkeydown= function(){return mascara(this,$mil);}
					if(imgs[j].onblur==null)imgs[j].onblur= function(){return fmil(this);}
				}else if(imgs[j].className.indexOf('nv')>=0){
//					imgs[j].onkeypress= function(){return knv(this.event,this);}
					if(imgs[j].onkeydown==null)imgs[j].onkeydown= function(){return mascara(this,$nv);}
				}else if(imgs[j].className.indexOf('cpf')>=0){
					imgs[j].onkeypress= function(){return mascara(this,$cpf);}
					imgs[j].maxLength=14;
//					imgs[j].onkeyup= function(){
//						if(event.keyCode>=96 && event.keyCode<=105)if(this.value.length==11)
//						if(!isCpf(this.value) && this.value.length>0){
//							this.value='';this.focus();alert('CPF inválido, tente novamente.');return false;}
//					}
					imgs[j].onblur= function(){
						if(!isCpf(this.value) && this.value.length>0){
							this.value='';this.focus();alert('CPF inválido, tente novamente.');return false;}
//						else{this.value=formatCpfCnpj(this.value);}
						}
				}else if(imgs[j].className.indexOf('rg')>=0){
					imgs[j].onkeydown= function(){return mascara(this,$rg);}
					imgs[j].maxLength=20
				}else if(imgs[j].className.indexOf('tel')>=0){
					imgs[j].onkeydown= function(){return mascara(this,$tel);}
					imgs[j].maxLength=14
				}else if(imgs[j].className.indexOf('f00m')>=0){
					if(imgs[j].onblur==null)imgs[j].onblur= function(){return f00(this);}
					if(imgs[j].onkeydown==null)imgs[j].onkeydown= function(){return mascara(this,$nv);}
//					if(imgs[j].onkeypress==null)imgs[j].onkeypress= function(){return knv(this.event,this,45);}
				}else if(imgs[j].className.indexOf('f00')>=0){
					if(imgs[j].onblur==null)imgs[j].onblur= function(){return f00(this);}
					if(imgs[j].onkeydown==null)imgs[j].onkeydown= function(){return mascara(this,$nv);}
//					if(imgs[j].onkeypress==null)imgs[j].onkeypress= function(){return knv(this.event,this);}
				}else if(imgs[j].className.indexOf('n ')>=0 || imgs[j].className=='n'){
					imgs[j].onkeypress= function(){return mascara(this,$num);};
				}else if(imgs[j].className.indexOf('data ')>=0 || imgs[j].className=='d'){
					//imgs[j].onkeypress= function(){return kd(event,this);}
					imgs[j].onkeypress= function(){return mascara(this,$data);}
					imgs[j].onblur= function(){return bd(this);}
					imgs[j].maxLength=10
					imgs[j].size=12

					//imgs[j].style.width=60
				}else if(imgs[j].className=='h'){
					imgs[j].onkeypress= function(){return kh(event,this);}
					imgs[j].onblur= function(){return bh(this);}
					imgs[j].maxLength=5
					imgs[j].size=6
					//imgs[j].style.width=60
				}else if(imgs[j].className.substring(0,2)=='rg'){
					imgs[j].onkeypress= function(){return krg(event);}
					imgs[j].onblur= function(){frg(this,event);}
					imgs[j].onfocus= function(){this.value=sonum(this.value,'Xx ');this.select();}
					imgs[j].maxLength=20
					imgs[j].size=13
					/*onfocus=""this.value=sonum(this.value,'Xx ');this.select();"" 
					onblur=""frg(this,event);"" 
					onkeypress=""return ((event.keyCode>=48 && event.keyCode<=57)
						 || event.keyCode==120 || event.keyCode==88 || event.keyCode==32 )""
					*/
				}

	  
//				if((imgs[j].type=="text" || imgs[j].type=="password") && imgs[j].className==""){
				//	imgs[j].className='txt';
					//if(!imgs[j].tabIndex)imgs[j].tabIndex=++tI;
//				}
				if(imgs[j].onclick==null && imgs[j].className.indexOf('nofx')<0 && imgs[j].type=="text")
//				imgs[j].onclick=function(){this.select();}
				if(imgs[j].onfocus==null && imgs[j].className.indexOf('nofx')<0 && imgs[j].type=="text")
				imgs[j].onfocus=function(){this.select();}
			}
/*
			var imgs=o[i].getElementsByTagName('select');
			for(var j=0;j<imgs.length;j++){
//				imgs[j].className='txt';
			}
*/			
			var imgs=o[i].getElementsByTagName('td');
			for(var j=0;j<imgs.length;j++){
				if(imgs[j].id.length>0){imgs[j].className='txtsb';}
			}
/*			var imgs=o[i].getElementsByTagName('div');
			for(var j=0;j<imgs.length;j++){
				if(imgs[j].className.indexOf('nao')<0)if(imgs[j].id.length>0){imgs[j].className='txtsb';}
			}
*/
		}
	}
}

function pro_aba() {
	if($o("aba") && (c_aba==0 || abaso1vez==false)){//&& c_aba++==0
		var o=$o("aba").getElementsByTagName('td');
		var ptira=($o("aba").className=="tiracol")
		var ond=$o("aba").href
		for(var i=0;i<o.length;i++){//alert(o[i].childNodes[0].nodeName);
			if(o[i].childNodes[0].nodeName!='INPUT' ){
				o[i].onmouseover=function(){ult_op=this.id;if(this.className!='ck'){this.className='sel';this.style.borderTop='#61A7FC solid 3px';}}
				o[i].onmouseout=function(){if(this.className!='ck'){this.className='nsel';this.style.borderTop='#aaa solid 3px';}}
				if(!ptira){
					o[i].onclick=function(){
						this.className='ck';this.style.borderTop='#EF9A4E solid 3px';
						var e=sv(this.href);
						for(var x=0;x<e.length;x++)	if($o(e[x]))$o(e[x]).style.display='block';
						
						var o=this.parentNode.childNodes;	
						for(var i=0;i<o.length;i++){
							if(o[i]!=this && o[i].childNodes[0].nodeName!='INPUT'){
								o[i].className='nsel';o[i].style.borderTop='#aaa solid 3px';
								var e=sv(o[i].href);
								for(var x=0;x<e.length;x++) if($o(e[x]))$o(e[x]).style.display='none';
							}
						}
						if(this.scope!="")eval(this.scope);
						wa('#'+this.href+"--");
						if(!semfocus)focus1de(this.href);
					}
				}else{
					o[i].onclick=function(){
						this.className='ck';this.style.borderTop='#EF9A4E solid 3px';
						var o=this.parentNode.childNodes;
						tiracol(ond,this.href)
						for(var i=0;i<o.length;i++){
							if(o[i]!=this && o[i].childNodes[0].nodeName!='INPUT'){
								o[i].className='nsel';o[i].style.borderTop='#aaa solid 3px';
							}
						}
						if(this.scope!="")eval(this.scope);
						wa('#'+this.href+"--");
					}
				}
				if(!ptira){
					var e=sv(o[i].href);
				/*	for(var x=0;x<1;x++){//0
						if(!$o(e[x]))o[i].disabled=true; else o[i].disabled=false;
						if($o(e[x]))if($o(e[x]).innerHTML=='')o[i].disabled=true; else o[i].disabled=false;
					}*/
				}
				o[i].style.backgroundColor='#F4F5F7'; 
/*				o[i].style.backgroundColor='#fff'; */
				o[i].style.border='#ccc solid 1px';
				o[i].style.borderTop='#aaa solid 3px';
				o[i].style.cursor='hand';
			}else{ 
/*				o[i].style.backgroundColor=(document.body.className=="bd_form_pop")?'#E2EBED':'#fff'*/
				o[i].style.backgroundColor='#fff'; 
				o[i].style.border='0';
				o[i].style.textAlign='right';
				o[i].style.cursor='hand';
			}
		}
		//if(c_aba==1){
			var locat=document.location.toString();
			var car=locat.indexOf("#")!=-1?(locat.substring(locat.indexOf("#")+1,locat.indexOf("--"))):'';
		//	alert(car);
		/*
			if(car){
				for(var i=0;i<o.length;i++)if(o[i].href==car)o[i].click();
			}else o[0].click();*/
		//}
	}
}

function adaba(t,h,w,pos) {
	//var xx=$o('aba').childNodes[0].childNodes[0].childNodes[2]; xx.innerHTML=11;
	//xx.setAttribute('href','a');
	var xx=$o('aba').childNodes[0].childNodes[0];
	var td1=document.createElement('TD');
	var txt1=document.createTextNode(t);
	td1.appendChild(txt1);
	if(pos==1)xx.appendChild(td1);
		else xx.insertBefore(td1,xx.childNodes[0]);
	td1.setAttribute('href',h);
	td1.setAttribute('width',w);
	td1.setAttribute('nowrap','nowrap');
}

 var MouseX = 0;
 var MouseY = 0;

  window.onscroll=pegarxy;
  
  function pegarxy(e) {
  	  MouseX=document.body.offsetWidth-112+offset;
	  MouseY=document.body.parentNode.scrollTop;
	  
//	  window.status=MouseY;
	  if(dvv!=null)if(dvv!=0){
		dvv.style.top=MouseY;
		dvv.style.left=MouseX;
	  }
  }


function navega(e,o) {
	var k=event.keyCode;
	alert(k);
}
function prenavega(f) {

}

function trcor(ob,c,cc) {
	ob.style.background=c;
	var o=ob.childNodes;
	if(o.length>-1){
	for(var i=0;i<o.length;i++){
		if(o[i].style)o[i].style.background=c;
		if(cc!=null){
			p=o[i].chidNodes;
			if(p.length>=0)for(var j=0;j<p.length;j++){
				p[j].style.color=cc;
			}
		}
	}
	}
}

function setdisplay(s,d) {
	if(d==0)d="none";	if(d==1)d="inline";
	var e=sv(s);
	for(var x=0;x<e.length;x++) if($o(e[x]))$o(e[x]).style.display=d;
}

function limpalinhas(ob,c) {	
	var o=ob.getElementsByTagName('tr')
	for(var i=0;i<o.length;i++)o[i].className=o[i].className.replace(' c','');
	
	var o=ob.getElementsByTagName('td')
	for(var i=0;i<o.length;i++){
		o[i].className=o[i].className.replace(' c','');
		if(o[i].style)o[i].style.background=c;
	}
}

function pintalinha(ob,c1,c2) {
	var th=ob.parentNode.parentNode;
	limpalinhas(th.parentNode,c2);
	if(c1==null){
		
	}else{
		if(th.className.indexOf(' c')<0){
			th.className+=' c';trcor(th,c1);//o.style.color='black';
		}else{ 
			th.className=th.className.replace(' c','');trcor(th,c2);//o.style.color='blue';
		}
	}
}

function trcort(ob,c,cc,b) {
	ob.style.color=c;
	var o=ob.childNodes;
	if(o.length>-1){
	for(var i=0;i<o.length;i++){
		
		if(o[i].style)o[i].style.color=c;
		if(o[i].hasChildNodes()){
			var p=o[i].childNodes;
			for(var j=0;j<p.length;j++){
				p[j].style.color=c;
				if(b==1)p[j].style.fontWeight='bold';
				if(p[j].hasChildNodes())if(p[j].firstChild.nodeName=="A"){
					p[j].firstChild.style.color=c;
					if(b==1)p[j].firstChild.style.fontWeight='bold';
				}
			}
		}
	}
	}
}

function tiracol(ob,colname,sit,inic) {
	var o=$o(ob);
	if(o.nodeName!='TABLE')return false;
	if(inic==null)inic=0;
	if(sit==null)sit=0;
	
	var o=o.getElementsByTagName('tr')
	var t=o[inic].childNodes.length;
	
	//var cl=colname.split(',');
	colname=','+colname+',';
	
	/*if(cl.length>1)
	cl=null;*/
	sit=-1;
	
	for(var i=inic;i<o.length;i++){
		var p=o[i].childNodes;
		if(sit<0)for(var j=0;j<p.length;j++)
			p[j].style.display=(colname.indexOf(','+o[inic].childNodes[j].id+',')<0)?'none':'block';
		
		//if(p.length>=t && sit>=0)p[c].style.display=(sit==0)?'none':'block';
	}
}

//---------------CEP---------------------------------------------------------------------------------
function kcep(event){
	var keyCode = event.keyCode ? event.keyCode : event.which ? event.which : event.charCode;
	var caract = new RegExp(/[0-9]+$/i);
	var caract = caract.test(String.fromCharCode(keyCode));
	
	if(!caract){
	//alert("Caracter inválido: " +String.fromCharCode(keyCode));
	keyCode=0;
	return false;
	}
}
xmlcep_retorno=function(a){
	//0 rua, 1 bairro, 2 cidade, 3 UF
	$c("end",a[0])
	$c("endereco",a[0])
	$c("bairro",a[1])
	$c("cidade",a[2])
	$c("uf",a[3])
}

aq=""
var fxmlcep_retorno;
function xmlcep(th,par,func,mostra_carregando) {
	if(buscar_o_cep==0)return false;
	
	if(ar['ajaxv:cep']==1)return false;

	if(func==null || func==undefined)fxmlcep_retorno=xmlcep_retorno; else fxmlcep_retorno=func;
	
	if(th!=null && typeof(th)!="string"){
		var a=(th.name.substring(0,1)=='r')?'r':'';
		if(th.value=="")return false;
		if(th.value.length!=9)return false;
		var cep=th.value
	}else{
		var a=""
		var cep=th
	}
	var cmp=a+"end,"+a+"endereco,"+a+"bairro,"+a+"cidade"
//	if(mostra_carregando==0)cmp="";
	
	if(par==null)par="";
	if(aq==1)if(!(confirm('O endereço já está definido, deseja sobrescrevê-lo com o do CEP digitado?'))){
			ultimo($o('"+a+"endereco'));ultimo($o('"+a+"end'));return false;}

		ar['ajaxv:cep']=1;
		ajaxv(1,"&a="+a+"&aq="+aq+"&xmlcep="+cep+par , cmp,null,
		"$f('numero');ar['ajaxv:cep']=0;")
		setTimeout("if(ar['ajaxv:cep'==1]){ar['ajaxv:cep']=0;fxmlcep_retorno(['-1','','','']);$d('"+cmp+"',0);}",4000);
		//,"ultimo($o('"+a+"endereco'));ultimo($o('"+a+"end'));"

}

function addEvent(obj, evt, func) {
//var obj=$o(ob)
  if (obj.attachEvent) {
    return obj.attachEvent(("on"+evt), func);
  } else if (obj.addEventListener) {
    obj.addEventListener(evt, func, true);
    return true;
  }
  return false;
}
function removeEvent( obj, type, fn ) {
  if ( obj.detachEvent ) {
    obj.detachEvent( 'on'+type, fn );
  } else {
    obj.removeEventListener( type, fn, false ); }
} 

function focus1de(s,branco) {
return false;
	if(branco==null)branco=1;
	var ob=$o(sv(s)[0]);
	if(ob.nodeName!="FORM")ob=ob.parentNode;
	if(ob.nodeName!="FORM")ob=ob.parentNode;
	if(ob.nodeName=="FORM"){
	var e=ob.elements;
	//for(var j=0;j<=1;j++){
		for(var x=0;x<e.length;x++){
			if(!e[x].disabled)if(e[x].type == "text" || e[x].type == "password" || e[x].nodeName=="SELECT") { 
				var v=true;
				
				if(branco==true)v=(e[x].value=='')
				if(v){e[x].click();if(e[x].nodeName=="SELECT")e[x].focus();else e[x].select(); return false;}
				return false;
			}
		}
//		var e=ob.getElementsByTagName('select');
//	}
	}
}

function focus1(branco){
	var o=document.getElementsByTagName('form');var f=0;
	for(var i=0;i<o.length;i++){
		o[i].click();
		o[i].focus();
		var e=o[i].elements;
		for (var x =0; x < e.length; x++) { 
			if (e[x].type == "text" || e[x].type == "password" || e[x].nodeName=="SELECT") { //event.keyCode==13 || 
						/*e[x].onkeydown=function(){if(event.keyCode==9){
								prox(this);
								return false;
							}
						}*/
						var v=true;
						if(branco==true)v=(e[x].value=='')
						if(v){e[x].click();if(e[x].nodeName=="SELECT")e[x].focus();else e[x].select(); return false;}
			} 
		}
	}
}

function focus2() {
	focus1(true)
}


function loadef(){	window.addEvent(window,"load",efeitos);	return false;}

function loadfocus(){
	window.addEvent(window,"load",focus1);
	return false;
}
function loadfocus2(){
	window.addEvent(window,"load",focus2);
	return false;
}

/*
if(url=='_exdom.asp' || url=='_membros2.asp')window.addEvent(
  window,
  "load",
  function(){
	alert('OK.');
  	if($o("cep")!=null)$o("cep").onblur=function(){xmlcep(this);}
  	if($o("rcep")!=null)$o("rcep").onblur=function(){xmlcep(this);}
  }
);
*/

//window.addEvent(  window,  "load",  efeitos);

function prox(ob) {
	var o=document.all;
	for(var i=ob.sourceIndex+1;i<o.length;i++){
		if(o[i].nodeName=='INPUT' || o[i].nodeName=='SELECT'){
			if(o[i].focus())o[i].focus()
			if(o[i].select())o[i].select();
			return false;
		}
	}

}

function dec(s) {
	s=s.replace('+',' ');s=s.replace('+',' ');s=s.replace('+',' ');s=s.replace('+',' ');s=s.replace('+',' ');s=s.replace('+',' ');
	 return unescape(s);
 }
function em_ou() {
	var k=arguments[0];
	if(!k)return false;
	if(k.length==0)return false;
	
	var o=arguments;
	for(var i=1;i<o.length;i++){
		if(o[i]==k){ return true;}
	}
}
function k_ou() {
	var k=arguments[0];
	if(!k)return false;

	var o=arguments;
	for(var i=1;i<o.length;i++){
		if(o[i]==k.keyCode){ return true;}
	}
}
function foca(s) {
return false;
	var o=$o(s)
	if(o)if(o.nodeName=="SELECT")o.focus(); else if(em_ou(o.type,"text","password"))o.select();
	return false;
}
function zera(s,fecha) {
	if(s!=null)if($o(s))$o(s).focus();
	if(fecha==1)if(w1!=0)if(w1!=null && w1!=undefined)if(!w1.closed){w1.close();}
	if(fecha==1)if(w2!=0)if(w2!=null && w2!=undefined)if(!w2.closed){w2.close();}
	w1=0;
	w2=0;
}
function fecha() {	
//window.opener = window;	window.close(); 
window.open('','_self');
window.close();
}

function fecha_ie7() {
	window.opener='X';
	window.open('','_parent','');
	window.close();
}

function wcr(end,wd,hg,nm) {
	if(!wd)wd=700;
	if(!hg)hg=450;
	if(nm==null)nm=end.substring(0,end.length<5?end.length:4)
	nm=nm.replace('.','')

	w2=window.open(end,nm,
	'width='+wd+',height='+hg+',top='+((screen.height/2)-(hg/2)-50)+',left='+((screen.width/2)-(wd/2))+
	',menubar=yes,scrollbars=yes,resizable=yes,status=yes,location=no,tollbar=no');
	if(w2!=0)setTimeout(function(){ w2.focus();}, 600);
	w2.focus();
}
function alert2(msg,func) {
	Ext.MessageBox.show({title: 'Mensagem',msg: msg, 
			width:300,buttons: Ext.MessageBox.OK,
			fn:func});
}
function w(end,wd,hg,nm,cfg) {
	if(typeof(end)!="string")end=end.href;
	if(end.indexOf('/')!=-1)end=(end.substring(end.lastIndexOf("/")+1,end.indexOf(".asp")+4))
	
	var nome=end.substring(0,end.length<7?end.length:6)
	nome=nome.replace('.','')
	nome=nome.replace('_','')+"3333"

	if(cfg==null)cfg=',menubar=no,scrollbars=yes,resizable=yes,status=yes,location=no,tollbar=no';

	w1=window.open(end,nome,'width='+wd+',height='+hg+',top='+
		((screen.height/2)-(hg/2)-15)+',left='+((screen.width/2)-(wd/2)-15)+
		cfg);
	if(w1!=0)setTimeout(function(){ w1.focus();}, 600);
	w1.focus();

/*	w1.onbeforeunload=function(){	window.opener.zera();	}*/
	document.onmousemove= function(){
		if(w1!=0)if(w1!=null && w1!=undefined)if(!w1.closed)if(document.hasFocus()){w1.focus();return false;}
	}
}
function wfit2(end,wd,hg,nm,cfg,f) {
	return wfit(end,wd,hg,nm,",menubar=no,scrollbars=no,resizable=yes,status=yes,location=no,tollbar=no",0)
}

function wfit(end,wd,hg,nm,cfg,f) {
	if(typeof(end)!="string")end=end.href;
	if(end.indexOf('/')!=-1)end=(end.substring(end.lastIndexOf("/")+1,end.indexOf(".asp")+4))

	var nome=end.substring(0,end.length<7?end.length:6)
	nome=nome.replace('.','')
	nome=nome.replace('_','')+"3333"

	if(cfg==null)cfg=',menubar=no,scrollbars=no,resizable=no,status=yes,location=no,tollbar=no';

	w1=window.open(end,nome,'width='+wd+',height='+hg+',top='+
		((screen.height/2)-(hg/2)-40)+',left='+((screen.width/2)-(wd/2)-15)+
		cfg);
	if(w1!=0)setTimeout(function(){ w1.focus();}, 600);
	if(w1!=0)setTimeout(function(){ w1.focus();}, 20);


/*	w1.onbeforeunload=function(){	window.opener.zera();	}*/
	if(f!=0){
	document.onmousemove= function(){
//		if(w1!=0)if(w1!=null && w1!=undefined)if(!w1.closed)if(document.hasFocus()){w1.focus();return false;}
//		if(w1!=0)alert(w1);
		setTimeout(function () {if(w1!=0)if(w1!=null){w1.focus();return false;}},500)

	}
	}
	return false;
}

exec_aofechar=0;
ar["w2"]=0;

function wb(end,wd,hg,cfg,nome,h_offset,volta,alias,fecha_se_sair) {

	if(typeof(end)!="string")end=end.href;
	if(h_offset==null)h_offset=0
	if(alias==null)alias="w2"
	var a_ex=(end.indexOf("http")!=-1 && (end.indexOf("queromeular.com.br")==-1 && end.indexOf("localhost")==-1));
	if(nome==null){
		nome=end.substring(0,end.length<15?end.length:14)
		nome=nome.replace('.','')
		nome=nome.replace('.asp','')
		nome=nome.replace('=','')
		nome=nome.replace('//','')
		nome=nome.replace('/','')
		nome=nome.replace(':','')
		nome=nome.replace('?','')
		nome=nome.replace('&','')
	}
//	if(a_ex)nome="_blank";

//	if(a_ex)ajax(0,endsite+"/w_ac.asp","end="+escape(end)+"&de="+url+"&obs="+"__abrindo",null,null,null);

	if(cfg==null)cfg=',menubar=no,scrollbars=yes,resizable=yes,status=yes,location=no,tollbar=no';
	var lg="";
	var tpp=((screen.height/2)-(hg/2)-40+h_offset);
	if(tpp<0)tpp=0;
	if(wd!=null && hg!=null)lg='width='+wd+',height='+hg+',top='+
		tpp+',left='+((screen.width/2)-(wd/2)-15);
	if(ar[alias]!=0 && ar[alias] && nome!="_blank"){
		if(fecha_se_sair==1){
			ar[alias].close();
		}else{
			wd=10;hg=4;
			ar[alias]=window.open('about:blank',nome,'width='+wd+',height='+hg+',top='+
				((screen.height/2)-(hg/2)-h_offset)+',left='+((screen.width/2)-(wd/2)-15)+
				",menubar=no,scrollbars=no,resizable=no,status=no,location=no,tollbar=no");
			ar[alias].close();
		}
	}
	ar[alias]=window.open(end,nome,lg+cfg);

	if(a_ex)ajax(0,endsite+"/w_ac.asp","end="+escape(end)+"&de="+url+"&obs="+"__aberto",null,null,null);

	if(ar[alias]!=0)setTimeout(function(){ ar[alias].focus();}, 100);
	if(nome.indexOf('http')==-1 && volta!=0)addEvent(ar[alias],'unload',function() {zera();this.focus();});
	if(fecha_se_sair==1)addEvent(window,'unload',function() {ar[alias].close();ar[alias]=0;});
	ar[alias].focus();
	
	ar['voltou']=0
	if(a_ex)var f_a_ex=function() {
			if(ar['voltou']!=1){
				ajax(0,endsite+"/w_ac.asp","end="+escape(end)+"&de="+url+"&obs="+"voltou",null,null,null);
				removeEvent(window,'focus',f_a_ex);
				ar[alias]=0;
				ar['voltou']=1;
			}
		}
	if(a_ex)addEvent(window,'focus',f_a_ex);
	return false;
}
function wa(end,wd,hg) {
	window.open(end,'_self');
}

function proscope_s(g) {

	var o=$o(g);
	if(!o)return false;
//	if(o.name=="icid")if(ar[o.name+":scope"])if(ar[o.name+":scope"].length>2){alert(ar[o.name+":scope"]);}
	if(o.scope){
		if(o.scope.length>2){
//			alert("exec:"+o.scope);
			eval(o.scope);
		}
	}else if(ar[o.name+":scope"]){

		if(ar[o.name+":scope"].length>2)eval(ar[o.name+":scope"]);
	}
	
	return true;
}
function propar(g,vg) {
	var a=sv(g)
	var par=""
	for(var i=0;i<a.length;i++){
		var v=$v(a[i]);
		
		if(vg==1)v=(v.split(';'))[0];
		
		if($o(a[i]))par+= "&" + $o(a[i]).name + "=" + v;
	}
	//alert(par);
	return par;
}
function selecionai(g,s,c,ii,primeiro) {
	var o=$o(g)
	if(!o)return false;
	if((o.nodeName=='TEXTAREA' || o.nodeName=='INPUT') && o.className!='estatico'){
			if(o.type=="checkbox"){
				o.checked=(s==o.value)
/*				var a=s+', '
				var ob=eval("o.form."+o.name)
				if(ob)if(ob.length)for(var i=0;i<ob.length;i++){
					ob[i].checked=(a.indexOf(ob[i].value+', ')>=0)
				}//else alert(s+'='+o.value+':'+o.name);
*/		
			}else if(o.type=="radio"){
/*				var ob=eval("document."+o.form.name+"."+o.name);
				if(ob)if(ob.length)for(var i=0;i<ob.length;i++){
					ob[i].checked=(ob[i].value==s)
				}//else alert(s+'='+o.value+':'+o.name);*/
				for(var i=1;i<10;i++){
					var a=$o(o.name + eef(i>1,"_"+i));
					if(a)a.checked=(a.value==s); else break;
				}
			}else{
				o.value=s;
//	if(o.nodeName=='TEXTAREA')alert(o.name+s);
			}
	}else if(o.nodeName=='SELECT'){
			for(var i=0;i<o.length;i++){
				var vv=0;
				if(o.name.substring(0,1)=='i')if(sp(o.options[i].value))if(sp(o.options[i].value)[0]==s)var vv=1;
				if(o.options[i].value==s || vv==1){
					o.selectedIndex=i;	
					if(primeiro==1)break;
				}
				if(c!=null && ii!=null)if(o.options[i].value.split(c)[ii]==s || vv==1){
					o.selectedIndex=i;	
					if(primeiro==1)break;
				}
			}
	}else if(o.nodeName=='DIV'){
			o.innerHTML=s;
	}else if(o.nodeName=='IMG'){
			o.src=s;
	}
/*	if(o.name=='icontrato')alert(o.value);*/
	//alert(o.name);
	var o=$o('t_'+o.name)
	if(o)if(o.nodeName=='DIV'){
			o.innerHTML=s;
//			alert(s);
	}

	return true;
}
function limpa_file(f) {
		var o=$o(f).elements;
		var cm=""
//		for(var i=0;i<o.length;i++)if(o.type=='file'){
//			alert(o.value);
//		}
		
		if(ar["jq_files"]!=null && ar["jq_files"]!=''){
			var j=sv(trimc(ar["jq_files"],','))
			for(var i=0;i<j.length;i++){
				if($o(j[i]))$o(j[i]).click();
			}
		}
		


		var a=new Array();
		for(var i=0;i<o.length;i++){
			a["f:"+o[i].name]=$v(o[i].name)
			cm+=o[i].name+","//+o[i].value+","
		}	
		
		
		var c=sv(trimc(cm,","))
		$o('breset').click()
		for(var i=0;i<c.length;i++)if(c[i]){
			selecionai(c[i],a["f:"+c[i]])

		}
		for(var i=0;i<c.length;i++)a["f:"+c[i]]=null;
//		alert(cm);
}
function tem_arq() {
		var o=trimc(ar["jq_files"],",").split(",");
		for(var i=0;i<o.length;i++)if($o(o[i])){
//			alert($o(o[i]).innerHTML);
			return true;
		}
		return false;
}
function selecionai_t(g,s) {
	var o;
	if($o(g))o=$o(g);else if(g)o=g; else return false;
	if(o.nodeName=='INPUT' && o.className!='estatico'){
			if(o.type=="checkbox"){
				o.checked=(s==o.value)
			}else{
				o.value=s;
			}
	}else if(o.nodeName=='SELECT'){
			for(var i=0;i<o.length;i++){
				if(o.options[i].text==s)o.selectedIndex=i;	
			}
	}
	//alert(o.name);
	var o=$o('t_'+o.name)
	if(o)if(o.nodeName=='DIV'){
			o.innerHTML=s;
//			alert(s);
	}
	return true;
}

function selecionais(g,s) {
	var o;
	if($o(g))o=$o(g);else if(g)o=g; else return false;
	if(o.nodeName=='INPUT'){
			o.value=s;
	}else{

			for(var i=0;i<o.length;i++){
				if(o.options[i].value.substring(0,s.length)==s){o.selectedIndex=i;	return true;}
			}
	}
	return false;
}


function sortSelect(obj) {
	obj=$o(obj)
	var o = new Array();
	for (var i=0; i<obj.options.length; i++) {
		o[o.length] = new Option( obj.options[i].text, obj.options[i].value, obj.options[i].defaultSelected, obj.options[i].selected) ;
	}
	o = o.sort( 
		function(a,b) { 
			if ((a.text+"") < (b.text+"")) { return -1; }
			if ((a.text+"") > (b.text+"")) { return 1; }
			return 0;
		} 
	);

	for (var i=0; i<o.length; i++) {
		obj.options[i] = new Option(o[i].text, o[i].value, o[i].defaultSelected, o[i].selected);
	}
}
function sel2txt() {
	var a=arguments;
	for(var i=0;i<a.length;i++){
		var o;
		if($o(a[i]))o=$o(a[i]);else if(a[i])o=a[i]; else return false;
		if(!$o('dv_'+o.id)){
			var d=document.createElement('div');
			var t=document.createTextNode($v(o,1));
			d.appendChild(t);
			o.parentNode.appendChild(d);
			d.className='sq';
			d.style.color='blue';
			d.setAttribute('id','dv_'+o.id);
			o.style.display='none';
		}else{
			$c('dv_'+o.id,$v(o,1))
		}
	}
}
function arqr(a,o,iv,it,qr,sl,ab) {
//arqr(arbai,'ibai',0,2,'qr[i][1]==$v(\'icid\')',$v('ibai'))
		o=$o(o)
		deltudo(o)
		add(o,' ','0')
		if(ab)add(o,ab[0],ab[1])
		for(var i=0;i<a.length;i++){
	//		alert(qr+"  "+eval(qr)+"     "+a[i][1]);
			if(eval(qr))add(o,a[i][it],a[i][iv]) 
		}

	
}
function ext_arqr(a,o,iv,it,qr,sl) {
		if(ar['ar:'+sl]==qr)return false;
		var z=new Array()
		for(var i=0;i<a.length;i++){
	//		alert(qr+"  "+eval(qr)+"     "+a[i][1]);
			if(eval(qr))z=z.concat([ [a[i][iv],a[i][it]] ])
//			if(!ext)add(o,a[i][it],a[i][iv]) 
		}
		ar['ar:'+sl]=qr;
		o.store.loadData(z);
		o.setValue('')
}
function selprocura(g,s) {
	var o;
	if($o(g))o=$o(g);else if(g)o=g; else return false;
	for(var i=0;i<o.length;i++){
		if(o.options[i].value==s)return i;	
	}
	return -1;
}

function iseligual_t(g,s) {
	var o=$o(g);
	if(!o)return false;
	
	for(var i=0;i<o.length;i++){
		if(o.options[i].text==s)return i;	
	}
	return -1;
}

function sel_i(o,i) {
	o=$o(o)
	o.selectedIndex=i;
}
function selprocura_t(g,s,selec) {
	var o=$o(g);
	for(var i=0;i<o.length;i++){
//		if(test==1 && o.options[i].text.indexOf('Jardim da')!=-1)alert(s+"--"+o.options[i].text+"="+o.options[i].text.indexOf(s));
		if(o.options[i].text.indexOf(s)!=-1){
			if(selec)o.selectedIndex=i;
			return i;	
		}
	}
	return -1;
}
function sel_instr(g,s) {
	var o=$o(g);
	for(var i=0;i<o.length;i++){
		if(o.options[i].value.indexOf(s)!=-1){o.selectedIndex=i;return i;	}
	}
	return -1;
}
function gera_selnum(s,de,ate,sel_padrao) {
	var o;
	if($o(s))o=$o(s);else if(s)o=s;
	if(o){
		deltudo(o);
		for(var i=de;i<=ate;i++){
			o.options[o.length] = new Option( i, i, false, false);
		}
		selecionai(o,sel_padrao)
	}
}


function pprompt(s,v,c) {
	if(c==null)c="[|';"
	var a=prompt(s,v)
	if(a!='' && a!=undefined)for(i=0;i<c.length;i++){
		if(a.indexOf(c.substring(i,i+1))!=-1){
		alert('Caractere inválido para este campo. ('+c.substring(i,i+1)+')');
		return false;
		}
	}
	/*
	if(a)if(a.indexOf(";")>=0){alert('Caractere inválido para este campo. (;)');return false;}
	if(a)if(a.indexOf("[")>=0){alert('Caractere inválido para este campo. ([)');return false;}
	if(a)if(a.indexOf("|")>=0){alert('Caractere inválido para este campo. ([)');return false;}
	*/
	if(a==""){alert('Preencha corretamente todos os dados solicitados.');return false;}
	return a
}

function k_del(o,ev,sodel) {

	if(ev.keyCode==46){
		if($o(o).length>0)deleta(o);
	}else if(ev.keyCode==13){
		if(sodel!=1)altera(o,p2);
	}
}
function deleta(th) {
	var i=th.selectedIndex;
	del(th,-2);
	if(i>=$o(th).length)i=$o(th).length-1;
	th.selectedIndex=i;
	mudou=1;
}

function deltudo(s) {
	var sl=$o(s);
	if(sl)if(sl.nodeName=="SELECT")for(var i=sl.length-1;i>=0;i--){sl.options[i]=null;}
}
function add(s,t,v,n) {

	var o=$o(s);
	if(n==null)n=-1;
	if(n==-1){
		o.options[o.length] = new Option( t, v, false, false); 		//for(i=0;i<hh.length;i++)o.turno.options[i] = new Option( hh[i], hh[i], false, false);
	}else{
		o.options[o.length] = new Option( "", "", false, false); 
		for(var i=o.length-1;i>=n;i--)if(i>0){
			o.options[i].value=o.options[i-1].value;
			o.options[i].text=o.options[i-1].text;
		}
		o.options[n].value=v;
		o.options[n].text=t;
		//for(i=0;i<hh.length;i++)o.turno.options[i] = new Option( hh[i], hh[i], false, false);
	}
}
//function del(sl,i) {	sl.options[i]=null;}



function sel(s) {
	var o=$o(s)
	var b="";
	if(o.selectedIndex>=0)b=o.options[o.selectedIndex].value
	return b;
}

function selo(s) {
	var o;
	if($o(s))o=$o(s);else if(s)o=s;
	var b="";
	if(o.selectedIndex>=0)b=o.options[o.selectedIndex]
	return b;
}

function selt(s) {
	var o;
	if($o(s))o=$o(s);else if(s)o=s;
	if(o.selectedIndex==-1)return "";
//	alert(o.selectedIndex);
//return "";

	var b=o.options[o.selectedIndex].text;
	return b;
}
function alt(s,t,v) {
	var o;
	if($o(s))o=$o(s);else if(s)o=s;
	if(t!=null)o.options[o.selectedIndex].text=t;
	if(v!=null)o.options[o.selectedIndex].value=v;
}
function sel0(s) {
	var o=$o(s);
	return o.options[0];
}
function selu(s) {
	var o;
	if($o(s))o=$o(s);else if(s)o=s;
	return o.options[o.length-1];
}
function selult(s) {
	var o;
	if($o(s))o=$o(s);else if(s)o=s;
	o.selectedIndex=o.length-1;
}
function selpri(s) {
	var o;
	if($o(s))o=$o(s);else if(s)o=s;
	o.selectedIndex=0;
}

function del(s,i) {
	s=$o(s)
	if(i==-2){
		//for(var j=0;j<s.length;j++)if(s.options[i].selected){j=i;break;}
		i=s.selectedIndex;
	}
	if(i>=0)s.options[i] = null;
}
function selectall(obj) {
	var iMax = 500;	var iMaxCounter = obj.options.length;
	if (iMaxCounter > iMax) iMaxCounter = iMax;
	for (var i=0; i<iMaxCounter; i++) 	obj.options[i].selected = true;
}
function ultimo(ob) {
	if(!ob)return false;
	ob.disabled=false;
	ob.value+=" "
	setTimeout(function() {	
		var o=ob.createTextRange();
		var l=ob.value.length;
		o.moveStart("character", l-1); 
	    o.moveEnd("character", l); 
		o.select();
	},10);
}
function trimc(s,c) {
	if(s.substring(0,1)==c)s=s.substring(1,s.length)
	if(s.substring(s.length-1,s.length)==c)s=s.substring(0,s.length-1)
	return s;
}

function tira2(i,v,a,b) {
	var s=""
	var x=y=-1;
	if(a && b && v){
		v=v.substring(i,v.length)
		x=v.indexOf(a)
		if(x!=-1){
			x+=a.length;
			v=v.substring(x,v.length)
			y=v.indexOf(b)
			s=v.substring(0,y)
		}
	}
	return s
}

function tiraesq(s) {
	return s.substring(1,s.length)
}
function tiradir(s) {
	return s.substring(0,s.length-1)
}
function splitsel(sl,cr){
	var b="";
	if(cr==null)cr="|"
	//	alert(sl.length);
	if(sl!=null)
	for(var i=0;i<sl.length;i++){//alert(sl.options[i].value);
		b=b + sl.options[i].value
		if(i<sl.length-1)b+=cr;
	}
//	alert(b);
	return b;
}
function joinsel(sl,s){
	var o;
	if($o(sl))o=$o(sl);else if(sl)o=s;
	if(o!=null)
		var sa=trimc(s,'|').split('|')
		for(var i=0;i<sa.length;i++){//alert(sl.options[i].value);
			add(o,sa[i],sa[i])
	}
	return true;
}
function splitnsel(p,n){
	var a="";
	for(var i=1;i<=n;i++){
		if($o(p+i)!=null){
			a+=splitsel($o(p+i))
			if(i<n)a+='#';
		}
	}
	return a;
}

function cr(s) {
	if(s==null)return "";
	for(var i=0;i<coringa.length;i++)s=s.replace(coringa.substring(i,i+1),'');
	return s
}


function sv(s) {	return s.split(',');   }
function sx(s) {	return s.split('$~');   }

function sx_(s,p) {	var a=s.split('$~');if(a.length>p)return a[p];else return '';   }

function sp(s) {	
	if(s!=null && s!= undefined){
		if(s!='')return s.split(';'); else return null;
	}else return null;  
}



function $c(obj,t,ve_nao_atu) {
	var o=$o(obj)
/*	if(t!=null && o){
		if(o.nodeName=="DIV" || o.nodeName=="SPAN")
		o.innerHTML=t;
		else
		o.value=t;
	}*/
	if(!o)return false;
	if(ve_nao_atu==1)if(o.rel)if(o.rel.indexOf('nao_atualiza')!=-1)return false;
	selecionai(o,t);
	
}
function $v(g,force_txt) {
	var o=$o(g);
	var t="";
	if(o)t=o.type;
	if((t=="checkbox" || t=="radio") ){ //&& o.form
		var r=""
		for(var i=1;i<10;i++){
			var a=$o(o.name + eef(i>1,"_"+i));
			if(a){
				if(t=="checkbox"){
					if(a.checked)r+=a.value+"|";else if(a.lang)r+=a.lang+"|"
				}else{
					if(a.checked)return a.value;
				}
				
			} else break;
		}
		return trimc(r,'|').replace('|',', ')
	}
	if(o){
		if(t=="checkbox" || t=="radio"){
			if(o.length)for(var i=0;i<o.length;i++){
				if(o[i].checked){return o[i].value;}
			}else{
				if(o.checked)return o.value;else return o.lang;
			}
			return "";			
		}else if(o.nodeName=='INPUT'){
			return o.value
		}else if(o.nodeName=='SELECT'){
			if(force_txt==1)return selt(o); else return sel(o)
		}else if(o.nodeName=='IMG'){
			return o.src;
		}else{
			return o.innerHTML;
		}
	}else return "";
	
}
function $t(g) {
	return $v(g,1)
}
function $n(g,force_txt) {
	return fnum($v(g,force_txt))
}
function rf(a) {
	if(a==null || a==undefined || a=='')return 0;else return 1;
}
function $e(s) {
	return eval("f."+s)
}


function rn(s){
  var v=0;
  if(isNaN(parseFloat(s))!=1)
  v=parseFloat(s.toString().replace( ",", "." ));
  return v;
}

function r$(avm){
	if(avm=='NaN' || avm=='' || avm==null)return "0,01"

	avm=avm.replace(".",",");
	var avm1=avm2="";
	if(avm.indexOf(',')!=-1){
	avm1=avm.substr(0,avm.indexOf(','));
	avm2=avm.substr(avm.indexOf(',')+1,2);
	if(avm2.length==1) avm2+="0";
	}else{
	avm1=avm.substr(0,avm.length);
	avm2="00";
	}
	var aux="";
	var i=avm1.length-3;
	for(;i>=0;i-=3)
	{
		if(i==avm1.length-3) aux=avm1.substr(i,3) + aux;
		else   aux=avm1.substr(i,3) + "." + aux;
	}
	if(avm1.length<3)  aux=avm1.substr(0,i+3) + aux;
	else if(i>-3)  aux=avm1.substr(0,i+3) + "." + aux;
	aux=aux.replace('-.','-');
	return aux+","+avm2
}

function sonum(s,am) {
	var a=s;var b='';
	perm="0123456789";
	if(am!=null)perm+=am;
	for(i=0;i<a.length;i++){
		if(perm.indexOf(a.substring(i,i+1))>=0)b=b+a.substring(i,i+1);

	}
	return b;
}
function cint(s) {
	return parseInt(fnum(s))
}
function cint0(s) {
	if(s!=null && s!=undefined)return parseInt(fnum(s));else return 0;
}
function ehnum(s,am) {
	var a=s;var b='';
	perm="0123456789,";
	if(am!=null)perm+=am;
	
	if(a==null || a==undefined)return false;
	if(a.length==0)return false;
	
	for(i=0;i<a.length;i++){
		if(perm.indexOf(a.substring(i,i+1))==-1)return false;
	}
	return true;
}
function rnd(n) {
	return (Math.round(n*100))/100
}

function fnum(s){
  var v=0;
  if(isNaN(parseFloat(s))!=1)
  v=parseFloat(s.toString().replace( ",", "." ));
  return v;
}

//________________COOKIES___________________________________________________________________
var ou=new Array();
function mostra(n) {
	if(parseInt(n)>ou[ou.length-1])n=1;
	if(document.getElementById('di'+ n).style.display=='none'){
			document.getElementById('di'+ n).style.display='block';
//			document.getElementById('e'+ n).style.backgroundimage='url(\'i/mais.gif\')';
		}else{
			document.getElementById('di'+ n).style.display='none';
//			document.getElementById('e'+ n).style.background='url(\'i/-.gif\') 0px 2px no-repeat';

			}
	for(var i=0;i<ou.length;i++){
		if(ou[i]!=n){
		document.getElementById('di' + ou[i]).style.display='none';
//		document.getElementById('e'+ n).style.background='url(\'i/-.gif\') 0px 2px no-repeat';
		}
	}
	SetCookie('esc',n)
}

/*var expdate = new Date ();
 FixCookieDate (expdate); // Correct for Mac date bug - call only once for given Date object!
 expdate.setTime (expdate.getTime() + (365 * 24 * 60 * 60 * 1000)); // valido por um ano
*/

function getCookieVal (offset) { 
  var endstr = document.cookie.indexOf (";", offset); 
  if (endstr == -1) 
    endstr = document.cookie.length; 
  return (document.cookie.substring(offset, endstr)); 
} 
  

function GetCookie (name) { 
  var arg = name + "="; 
  var alen = arg.length; 
  var clen = document.cookie.length; 
  var i = 0; 
  while (i < clen) { 
    var j = i + alen; 
    if (document.cookie.substring(i, j) == arg) 
      return getCookieVal (j); 
    i = document.cookie.indexOf(" ", i) + 1; 
    if (i == 0) break; 
  } 
  return null; 
} 
  

function SetCookie (name, value, expires) { 
  document.cookie = name + "=" + (value) + ((expires == null) ? "" : ("; expires=" + expires.toGMTString())); 
} 
  
function DeleteCookie (name) { 
  var exp = new Date(); 
  var cval = GetCookie (name); 
  document.cookie = name + "=" + cval + "; expires=" + exp.toGMTString(); 
} 

//if(GetCookie('esc')!=null)mostra(GetCookie('esc'));else mostra(1)



//_______________FORMATAÇÃO VALIDAÇÃO DE CAMPOS_____________________________________________

function barrar(objEvent) 
{
	 
	 var t="'\"<>";
	 v=0;
	 var k = objEvent.keyCode;   
	 
	 
	 if(t.indexOf(String.fromCharCode(k))!=-1) v=1;

	 if(v==1){
	 	alert('Caractere inválido para este campo, digite somente números e letras sem acento.');
	 	return false;
	 }
	 
	 return true;
}

function soaceita(ob,t) {
	var a=t;
	t=","+t+","
	if(ob.value=="" || ob.value==" ")return false;
	
	if(t.indexOf(","+ob.value+",")>=0){
		mudou=1
		return true;
	}else{
		alert('Valor inválido para este campo. Entre somente com um dos seguintes valores: '+a.replace(',',', '));
		ob.value=""
		ob.select();
		return false;
	}
}
	
function soletrasm(objEvent) 
{
	 var t="qwertyuiopasdfghjklçzxcvbnmQWERTYUIOPASDFGHJKLÇZXCVBNM0123456789";
	 v=0;
 	 objEvent.keyCode=String.fromCharCode(objEvent.keyCode).toLowerCase().charCodeAt();
	 var k = objEvent.keyCode;   
	 if(t.indexOf(String.fromCharCode(k))==-1) v=1;
//	 if(obj.value.indexOf(bb)!=-1 && bb==String.fromCharCode(k)) return false;
	 if(v==1){
	 	alert('Caractere inválido para este campo, digite somente números e letras sem acento.');
	 	return false;
	 }
	 return true;
}

function vermodelo(o,m){
		if(o==null)return false;
		if(o.name)t=o.value;else t=o
		e=0;
		if(t=="") return true;
		if(t.length!=m.length)e=1;
		if(e==0)
		for(var i=0;i<t.length;i++){
	 		//alert(t.charCodeAt(i));
			k=t.charCodeAt(i);
			j=m.charCodeAt(i);
			if(j==47 && k!=j)e=1;
			if(j==48)
			if(k>=48 && k<=57);else e=1;

			//if(t.indexOf(String.fromCharCode(iKeyCode)) alert('as');
	 	}
		if(e==1){
			//alert('Digite a data conforme o modelo: '& m)
			return false;
		}else return true;
	
}


function nk() {
	var k=arguments[0].keyCode;
//	alert(k);
	var o=arguments;
	for(var i=1;i<o.length;i++){
		if(o[i]==k){ return false;}
	}
}
function knv(ev,txt,c) 
{
//alert(ev.keyCode);
 if(txt.value.indexOf(',')!=-1 && ev.keyCode==44) return false;
 var o=arguments;
 for(var i=2;i<o.length;i++)if(ev.keyCode==o[i])return true;
 
 if((ev.keyCode>=48 && ev.keyCode<=57) || ev.keyCode==44 || ev.keyCode==13) return true;
 return false;
}


function kn(e,c) {

	var t="0123456789";
	if(c!=null)t+=c;
	var k = e.keyCode;
	return (t.indexOf(String.fromCharCode(k))>=0 || e.keyCode==13)
}

function k00(ev,tx){
	if(tx.value.indexOf(',')!=-1 && ev.keyCode==44)return false; 
	return (((ev.keyCode>=48 && ev.keyCode<=57) || ev.keyCode==44));
}

function f00(tx){
	if(tx.value==""){tx.value="";return false;}

	if(tx.value.substring(0,1)==',')tx.value='0'+tx.value;
	tx.value=preal(tx.value.replace('.',''));
	tx.value=trimc(tx.value,",")
	if(tx.value.indexOf(',')==-1)tx.value+=',00';
}
function fmil(tx){
	if(tx.value==""){tx.value="";return false;}
	tx.value=rpl(tx.value,".","")
	tx.value=preal(tx.value.replace('.',''));
	tx.value=tx.value.replace(",00","");
}

function fbr(dt) {
	var d=(dt.getDate()).toString()
	var m=(dt.getMonth()+1).toString()
	if(d.length==1)d="0"+d
	if(m.length==1)m="0"+m
	return d+'/'+m+'/'+dt.getFullYear()
	
}

function preal(avm,nao_p){
	//avm=document.form1.valor_maq_eqto.value.toString();
	if(avm=="")return "";
	if(avm=='NaN' || avm==undefined)return "0,00"
	avm=avm.toString();
	avm=avm.replace(".",",");
	var a=""
	for(var i=0;i<avm.length;i++){
		var c=avm.substring(i,i+1)
		if(avm.substring(0,i-1).indexOf(',')!=-1 && c==',')c=""
		a=a+c
	}
	avm=a
	var avm1=avm2="";
	if(avm.indexOf(',')!=-1){
		avm1=avm.substr(0,avm.indexOf(','));
		avm2=avm.substr(avm.indexOf(',')+1,2);
		if(avm2.length==1 && nao_p!=1) avm2+="0";
	}else{
		avm1=avm.substr(0,avm.length);
		avm2="00";
	}
	var aux="";
	var i=avm1.length-3;
	for(;i>=0;i-=3)
	{
		if(i==avm1.length-3) aux=avm1.substr(i,3) + aux;
		else   aux=avm1.substr(i,3) + "." + aux;
		//alert(i);
	}
	if(avm1.length<3)  aux=avm1.substr(0,i+3) + aux;
	else if(i>-3)  aux=avm1.substr(0,i+3) + "." + aux;
	//alert(i);
	aux=aux.replace('-.','-');
	aux=aux+","+avm2
	return aux
}


/*onclick="this.select()" onblur="f00(this);"
  onKeyPress="return k00(event,this);"
  */

//cdata  
function kd(ev,tx) {
	if(ev.keyCode>=48 && ev.keyCode<=57){
		if(tx.value.length==2)tx.value+='/';
		if(tx.value.length==5)tx.value+='/';
	
		if(tx.value.length==1 || tx.value.length==4){
			tx.value+=String.fromCharCode(ev.keyCode);
			ev.keyCode=47;
		}
		return true;
	}else if(ev.keyCode==13){
		if(bd(tx))return true;
		return false;
	}else return false;
}
function bd(tx) {
	if(tx==null)return false;
	if(vermodelo(tx,'00/00/0000')==false){
		if(tx.nodeName){tx.value='';tx.focus();}
		alert('Digite a data conforme o modelo: 10/08/1988');
		return false;
	}else return true;
}
/*MAXLENGTH="10" 
onclick=""this.select();"" onblur=""bd(this)"" k=""return kd(event,this)""

	  onclick="this.select();" 
	  onblur="bd(this)" 
	  onKeyPress="return kd(event,this)">
 */
function kh(ev,tx) {
	if(ev.keyCode>=48 && ev.keyCode<=57){
		if(tx.value.length==2)tx.value+='/';
	
		if(tx.value.length==1 ){
			tx.value+=String.fromCharCode(ev.keyCode);
			ev.keyCode=58;
		}
		return true;
	}else if(ev.keyCode==13){
		if(bh(tx))return true;
		return false;
	}else return false;
}
function bh(tx) {
	if(vermodelo(tx,'00:00')==false){
		tx.value='';
		tx.focus();
		alert('Digite a hora conforme o modelo: 15:30');
		return false;
	}else return true;
}
function krg(ev) {
	return ((ev.keyCode>=48 && ev.keyCode<=57) || ev.keyCode==120 || ev.keyCode==88 || ev.keyCode==32 || ev.keyCode==13)
}
//_________________________ DATA ______________________________________________________________________

function mascara(o,f,e){
//	if(e!=null){if(e.keyCode==9 || e.keyCode==16)return false;}
    v_obj=o
    v_fun=f
    setTimeout("execmascara()",5)
    return true;
}

function execmascara(){
    v_obj.value=v_fun(v_obj.value)
}

function leech(v){
    v=v.replace(/o/gi,"0")
    v=v.replace(/i/gi,"1")
    v=v.replace(/z/gi,"2")
    v=v.replace(/e/gi,"3")
    v=v.replace(/a/gi,"4")
    v=v.replace(/s/gi,"5")
    v=v.replace(/t/gi,"7")
    return v
}

function $sonumeros(v){
    return v.replace(/\D/g,"")
}

function $telefone(v){
	v=sonum(v,"-")
    v=v.replace(/\D/g,"")                 //Remove tudo o que não é dígito
    v=v.replace(/^(\d\d)(\d)/g,"($1) $2") //Coloca parênteses em volta dos dois primeiros dígitos
    v=v.replace(/(\d{4})(\d)/,"$1-$2")    //Coloca hífen entre o quarto e o quinto dígitos
    return v
}

function $mil(v){
	v=sonum(v,".")
    v=v.replace(/\D/g,"")                    //Remove tudo o que não é dígito
    v=preal(v).replace(",00","")
    return v
}
function $nv(v){
	var p=(v.indexOf(',')!=-1)
	v=sonum(v,".,")
	v=preal(rpl(v,".",""),1)
	if(!p)v=v.replace(",00","")
    return v
}
function $num(v){
	if(v)v=sonum(v)
    return v
}

function $rg(v){
	v=sonum(v,".-")
	v=rpl(v,"-",",")
	if(v=="")return ""
	v=rpl(preal(rpl(v,".",""),1).replace(",00",""),",","-")
    return v
}
function $cpf(v){
	v=sonum(v,".-")
    v=v.replace(/\D/g,"")                    //Remove tudo o que não é dígito
    v=v.replace(/(\d{3})(\d)/,"$1.$2")       //Coloca um ponto entre o terceiro e o quarto dígitos
    v=v.replace(/(\d{3})(\d)/,"$1.$2")       //Coloca um ponto entre o terceiro e o quarto dígitos
                                             //de novo (para o segundo bloco de números)
    v=v.replace(/(\d{3})(\d{1,2})$/,"$1-$2") //Coloca um hífen entre o terceiro e o quarto dígitos
    return v
}

function $data(v){
    v=v.replace(/D/g,"")                //Remove tudo o que não é dígito
    v=v.replace(/^(\d{2})(\d)/,"$1/$2")       
	v=v.replace(/^(\d{2})\/(\d{2})(\d)/,"$1/$2/$3")
    return v
}

function $cep(v){
    v=v.replace(/D/g,"")                //Remove tudo o que não é dígito
    v=v.replace(/^(\d{5})(\d)/,"$1-$2") //Esse é tão fácil que não merece explicações
    return v
}
function $tel(v){
	v=sonum(v)
	if(v.length>8)
    v=v.replace(/^(\d{2})(\d{4})(\d)/,"($1) $2-$3")
    else
    v=v.replace(/^(\d{4})(\d)/,"$1-$2")

    return v
}
function $cnpj(v){
    v=v.replace(/\D/g,"")                           //Remove tudo o que não é dígito
    v=v.replace(/^(\d{2})(\d)/,"$1.$2")             //Coloca ponto entre o segundo e o terceiro dígitos
    v=v.replace(/^(\d{2})\.(\d{3})(\d)/,"$1.$2.$3") //Coloca ponto entre o quinto e o sexto dígitos
    v=v.replace(/\.(\d{3})(\d)/,".$1/$2")           //Coloca uma barra entre o oitavo e o nono dígitos
    v=v.replace(/(\d{4})(\d)/,"$1-$2")              //Coloca um hífen depois do bloco de quatro dígitos
    return v
}


//_________________________CPF RG______________________________________________________________________
/**
 * @author Márcio d'Ávila
 * @version 1.01, 2004
 *
 * PROTÓTIPOS:
 * método String.lpad(int pSize, char pCharPad)
 * método String.trim()
 *
 * String unformatNumber(String pNum)
 * String formatCpfCnpj(String pCpfCnpj, boolean pUseSepar, boolean pIsCnpj)
 * String dvCpfCnpj(String pEfetivo, boolean pIsCnpj)
 * boolean isCpf(String pCpf)
 * boolean isCnpj(String pCnpj)
 * boolean isCpfCnpj(String pCpfCnpj)
 */


NUM_DIGITOS_CPF  = 11;
NUM_DIGITOS_CNPJ = 14;
NUM_DGT_CNPJ_BASE = 8;


/**
 * Adiciona método lpad() à classe String.
 * Preenche a String à esquerda com o caractere fornecido,
 * até que ela atinja o tamanho especificado.
 */
String.prototype.lpad = function(pSize, pCharPad)
{
	var str = this;
	var dif = pSize - str.length;
	var ch = String(pCharPad).charAt(0);
	for (; dif>0; dif--) str = ch + str;
	return (str);
} //String.lpad


/**
 * Adiciona método trim() à classe String.
 * Elimina brancos no início e fim da String.
 */
String.prototype.trim = function()
{
	return this.replace(/^\s*/, "").replace(/\s*$/, "");
} //String.trim


/**
 * Elimina caracteres de formatação e zeros à esquerda da string
 * de número fornecida.
 * @param String pNum
 * 	String de número fornecida para ser desformatada.
 * @return String de número desformatada.
 */
function unformatNumber(pNum)
{
	return String(pNum).replace(/\D/g, "").replace(/^0+/, "");
} //unformatNumber


/**
 * Formata a string fornecida como CNPJ ou CPF, adicionando zeros
 * à esquerda se necessário e caracteres separadores, conforme solicitado.
 * @param String pCpfCnpj
 * 	String fornecida para ser formatada.
 * @param boolean pUseSepar
 * 	Indica se devem ser usados caracteres separadores (. - /).
 * @param boolean pIsCnpj
 * 	Indica se a string fornecida é um CNPJ.
 * 	Caso contrário, é CPF. Default = false (CPF).
 * @return String de CPF ou CNPJ devidamente formatada.
 */
function formatCpfCnpj(pCpfCnpj, pUseSepar, pIsCnpj)
{
	if (pIsCnpj==null) pIsCnpj = false;
	if (pUseSepar==null) pUseSepar = true;
	var maxDigitos = pIsCnpj? NUM_DIGITOS_CNPJ: NUM_DIGITOS_CPF;
	var numero = unformatNumber(pCpfCnpj);

	if(pCpfCnpj=='')return '';

	numero = numero.lpad(maxDigitos, '0');
	if (!pUseSepar) return numero;

	if (pIsCnpj)
	{
		reCnpj = /(\d{2})(\d{3})(\d{3})(\d{4})(\d{2})$/;
		numero = numero.replace(reCnpj, "$1.$2.$3/$4-$5");
	}
	else
	{
		reCpf  = /(\d{3})(\d{3})(\d{3})(\d{2})$/;
		numero = numero.replace(reCpf, "$1.$2.$3-$4");
	}
	return numero;
} //formatCpfCnpj


/**
 * Calcula os 2 dígitos verificadores para o número-efetivo pEfetivo de
 * CNPJ (12 dígitos) ou CPF (9 dígitos) fornecido. pIsCnpj é booleano e
 * informa se o número-efetivo fornecido é CNPJ (default = false).
 * @param String pEfetivo
 * 	String do número-efetivo (SEM dígitos verificadores) de CNPJ ou CPF.
 * @param boolean pIsCnpj
 * 	Indica se a string fornecida é de um CNPJ.
 * 	Caso contrário, é CPF. Default = false (CPF).
 * @return String com os dois dígitos verificadores.
 */
function dvCpfCnpj(pEfetivo, pIsCnpj)
{
	if (pIsCnpj==null) pIsCnpj = false;
	var i, j, k, soma, dv;
	var cicloPeso = pIsCnpj? NUM_DGT_CNPJ_BASE: NUM_DIGITOS_CPF;
	var maxDigitos = pIsCnpj? NUM_DIGITOS_CNPJ: NUM_DIGITOS_CPF;
	var calculado = formatCpfCnpj(pEfetivo, false, pIsCnpj);
	calculado = calculado.substring(2, maxDigitos);
	var result = "";

	for (j = 1; j <= 2; j++)
	{
		k = 2;
		soma = 0;
		for (i = calculado.length-1; i >= 0; i--)
		{
			soma += (calculado.charAt(i) - '0') * k;
			k = (k-1) % cicloPeso + 2;
		}
		dv = 11 - soma % 11;
		if (dv > 9) dv = 0;
		calculado += dv;
		result += dv
	}

	return result;
} //dvCpfCnpj


/**
 * Testa se a String pCpf fornecida é um CPF válido.
 * Qualquer formatação que não seja algarismos é desconsiderada.
 * @param String pCpf
 * 	String fornecida para ser testada.
 * @return <code>true</code> se a String fornecida for um CPF válido.
 */
function isCpf(pCpf)
{
	if(qq_cpf==1)return 1;
	var numero = formatCpfCnpj(pCpf, false, false);
	var base = numero.substring(0, numero.length - 2);
	var digitos = dvCpfCnpj(base, false);
	var algUnico, i;

	// Valida dígitos verificadores
	if (numero != base + digitos) return false;

	/* Não serão considerados válidos os seguintes CPF:
	 * 000.000.000-00, 111.111.111-11, 222.222.222-22, 333.333.333-33, 444.444.444-44,
	 * 555.555.555-55, 666.666.666-66, 777.777.777-77, 888.888.888-88, 999.999.999-99.
	 */
	algUnico = true;
	for (i=1; i<NUM_DIGITOS_CPF; i++)
	{
		algUnico = algUnico && (numero.charAt(i-1) == numero.charAt(i));
	}

	return (!algUnico);
} //isCpf


/**
 * Testa se a String pCnpj fornecida é um CNPJ válido.
 * Qualquer formatação que não seja algarismos é desconsiderada.
 * @param String pCnpj
 * 	String fornecida para ser testada.
 * @return <code>true</code> se a String fornecida for um CNPJ válido.
 */
function isCnpj(pCnpj)
{
	var numero = formatCpfCnpj(pCnpj, false, true);
	var base = numero.substring(0, NUM_DGT_CNPJ_BASE);
	var ordem = numero.substring(NUM_DGT_CNPJ_BASE, 12);
	var digitos = dvCpfCnpj(base + ordem, true);
	var algUnico;

	// Valida dígitos verificadores
	if (numero != base + ordem + digitos) return false;

	/* Não serão considerados válidos os CNPJ com os seguintes números BÁSICOS:
	 * 11.111.111, 22.222.222, 33.333.333, 44.444.444, 55.555.555,
	 * 66.666.666, 77.777.777, 88.888.888, 99.999.999.
	 */
	algUnico = numero.charAt(0) != '0';
	for (i=1; i<NUM_DGT_CNPJ_BASE; i++)
	{
		algUnico = algUnico && (numero.charAt(i-1) == numero.charAt(i));
	}
	if (algUnico) return false;

	/* Não será considerado válido CNPJ com número de ORDEM igual a 0000.
	 * Não será considerado válido CNPJ com número de ORDEM maior do que 0300
	 * e com as três primeiras posições do número BÁSICO com 000 (zeros).
	 * Esta crítica não será feita quando o no BÁSICO do CNPJ for igual a 00.000.000.
	 */
	if (ordem == "0000") return false;
	return (base == "00000000"
		|| parseInt(ordem, 10) <= 300 || base.substring(0, 3) != "000");
} //isCnpj


/**
 * Testa se a String pCpfCnpj fornecida é um CPF ou CNPJ válido.
 * Se a String tiver uma quantidade de dígitos igual ou inferior
 * a 11, valida como CPF. Se for maior que 11, valida como CNPJ.
 * Qualquer formatação que não seja algarismos é desconsiderada.
 * @param String pCpfCnpj
 * 	String fornecida para ser testada.
 * @return <code>true</code> se a String fornecida for um CPF ou CNPJ válido.
 */
function isCpfCnpj(pCpfCnpj)
{
	var numero = pCpfCnpj.replace(/\D/g, "");
	if (numero.length > NUM_DIGITOS_CPF)
		return isCnpj(pCpfCnpj)
	else
		return isCpf(pCpfCnpj);
} //isCpfCnpj


function formatar(src, mask) 
{
  var i = src.value.length;
  var saida = mask.substring(0,1);
  var texto = mask.substring(i)
if (texto.substring(0,1) != saida) 
  {
	src.value += texto.substring(0,1);
  }
}

function formatar2(src, mask) 
{
  var i = src.length;
  var saida = mask.substring(0,1);
  var texto = mask.substring(i)
  var b="";
if (texto.substring(0,1) != saida) 
  {
	b+= texto.substring(0,1);
  }
  return b;
}
/* 

Exemplos:
CEP
OnKeyPress="formatar(this, '#####-###')"
CPF
OnKeyPress="formatar(this, '###.###.###-##')"
DATA
OnKeyPress="formatar(this, '##/##/####')"
*/

function frg(f,e) 
{
  var j = f.value.length;
  
  b=""; a="";
  a=f.value;//+String.fromCharCode(event.keyCode);
  a=a.replace('.','');
  a=a.replace('-',''); /* a=a.replace('.','');
  a=a.replace('-','');  a=a.replace('.','');
  a=a.replace('-','');  a=a.replace('.','');
  a=a.replace('-','');  a=a.replace('.','');
  a=a.replace('-','');  a=a.replace('.','');
  a=a.replace('-','');  a=a.replace('.','');
  a=a.replace('-','');  a=a.replace('.','');
  a=a.replace('-','');  a=a.replace('.','');
  a=a.replace('-','');  a=a.replace('.','');
  a=a.replace('-','');  a=a.replace('.','');
  a=a.replace('-','');  a=a.replace('.','');
  a=a.replace('-','');*/
  if(a.substring(a.length-1,a.length)==' '){a=a.replace(' ','');a=a.replace(' ','');a+=' ';}else {a=a.replace(' ','');a=a.replace(' ','');}
  
 ma='##.##.##.##-#'
  
  n=ma.length;
  for(i=j;i>=0;i--){
  	  if(ma.substring(n-1,n)!='#')c=ma.substring(n-1,n);else c="";
  	  b=a.substring(i-1,i)+c +b;
  	  n--;
  }
  if(b.substring(0,1)=='.' || b.substring(0,1)=='-')b=b.substring(1,b.length)
  if(b.substring(b.length-1,b.length)==' '){b=b.replace('-','');b=b.replace(' ','')+' ';}
  f.value=b;
  /* var saida = mask.substring(0,1);
  var texto = mask.substring(i)
if (texto.substring(0,1) != saida) 
  {
	src.value += texto.substring(0,1);
  }*/
}
/*
RG <input name="rg" type="text" maxlength="16" size="15" 
onfocus="this.value=sonum(this.value,'Xx ');this.select();" 
onblur="frg(this,event);" 
onkeypress="return ((event.keyCode>=48 && event.keyCode<=57) || event.keyCode==120 || event.keyCode==88 || event.keyCode==32 )">

CPF <input name="cpf" type="text" maxlength="16" size="15" 
onblur="if(!isCpf(this.value) && this.value.length>0){this.focus();alert('CPF inválido, tente novamente.');this.value='';return false;}else{this.value=formatCpfCnpj(this.value);enviaPage('_exec.asp', 'GET', 'true', 'd_cpf','acao=vcpf&ver=0&tb=qua&iescola=1&q=0&cpf='+this.value)}"  onKeyPress="if(event.keyCode>=48 && event.keyCode<=57){if(this.value.length==3)this.value+='.';if(this.value.length==7)this.value+='.';if(this.value.length==11)this.value+='-';if(this.value.length==2 || this.value.length==6){this.value+=String.fromCharCode(event.keyCode);event.keyCode=46;} if(this.value.length==10){this.value+=String.fromCharCode(event.keyCode);event.keyCode=45}; } else return false;">
<i id="d_cpf" style="color:red" ></i><input type="hidden" name="vcpf" value="0">
*/


function createXMLHTTP() 
            {
                        var ajax;
                        try 
                        {
                                   ajax = new ActiveXObject("Microsoft.XMLHTTP");
                        } 
                        catch(e) 
                        {
                                   try 
                                   {
                                               ajax = new ActiveXObject("Msxml2.XMLHTTP");
                                               alert(ajax);
                                   }
                                   catch(ex) 
                                   {
                                               try 
                                               {
                                                           ajax = new XMLHttpRequest();
                                               }
                                               catch(exc) 
                                               {
                                                            alert("Esse browser não tem recursos para uso do Ajax");
                                                            ajax = null;
                                               }
                                   }
                                   return ajax;
                        }
            
            
                           var arrSignatures = ["MSXML2.XMLHTTP.5.0", "MSXML2.XMLHTTP.4.0",
                                                                                      "MSXML2.XMLHTTP.3.0", "MSXML2.XMLHTTP",
                                                                                      "Microsoft.XMLHTTP"];
                           for (var i=0; i < arrSignatures.length; i++) 
                           {
                                               try 
                                               {
                                                           var oRequest = new ActiveXObject(arrSignatures[i]);
                                                           return oRequest;
                                               } 
                                               catch (oError) 
                                               {
                                       }
                           }
                        
                                      throw new Error("MSXML is not installed on your system.");
            }
            
function XMLHTTPRequest() {
  try {
    return new XMLHttpRequest(); // FF, Safari, Konqueror, Opera, ...
  } catch(ee) {
    try {
      return new ActiveXObject("Msxml2.XMLHTTP"); // activeX (IE5.5+/MSXML2+)
    } catch(e) {
      try {
        return new ActiveXObject("Microsoft.XMLHTTP"); // activeX (IE5+/MSXML1)
      } catch(E) {
        return false; // doesn't support
      }
    }
  }
}
function testa(a) {
test=1;silencio=a;
}
function rpl(c,a,b) {
	if(!c)return "";
	var s="";s=c;
	if(b==null)b=""
	for(;s.indexOf(a)>=0;)s=s.replace(a,b);
	return s;
}
function tirar(c,a,b) {
	if(!c)return false;
	var s="";s=c;
	if(b==null)b=""
	for(var i=0;i<a.length;i++)for(;s.indexOf(a.substring(i,i+1))>=0;)s=s.replace(a.substring(i,i+1),b);
	return s;
}

function enviaPage(url, metodo, modo, tagId, parametros)
{
    goAjax( url+"?"+parametros+"&rnd"+ Math.random() , metodo, modo , tagId); 
}
function goAjax(url, metodo, modo, tagRetorno, parametros) {
	try{
	    xmlhttp = new XMLHttpRequest();
	}catch(ee){
	    try{
	        xmlhttp = new ActiveXObject("Msxml2.XMLHTTP");
	    }catch(e){
	        try{
	            xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
	        }catch(E){
	            xmlhttp = false;
	        }
	    }
	}
        document.getElementById(tagRetorno).innerHTML='...'

            if(metodo == "GET") {
                xmlhttp.open("GET", url, modo);
            } else {        
                xmlhttp.open("POST", url, modo);
                xmlhttp.setRequestHeader("Content-Type", "application/x-www-form-urlencoded; charset=iso-8859-1");
                xmlhttp.setRequestHeader("Cache-Control", "no-store, no-cache, must-revalidate");
                xmlhttp.setRequestHeader("Cache-Control", "post-check=0, pre-check=0");
                xmlhttp.setRequestHeader("Pragma", "no-cache");
            }    
            
            xmlhttp.onreadystatechange = function() {
                if(xmlhttp.readyState == 4) {
                    retorno=xmlhttp.responseText
		   
                    retorno=retorno.replace(/\+/g," ")
		            retorno=unescape(retorno)
if(test==1)alert(retorno+'\n\n------\n\n'+parametros);
		            //alert(retorno);
					if(retorno.indexOf('##')<0  )
	                    document.getElementById(tagRetorno).innerHTML=retorno
                    else{
                    	_r=retorno.split('##')
                    	for(var i=0;i<_r.length;i++){
                    		if(_r[i].length>0){
	                    		var _c=_r[i].split('**')
	                    		
	                    		if(_c[0].substring(0,1)=='!'){
							        _c[0]=_c[0].substring(1,_c[0].length)
								    eval(_c[0]);
								    
						        }else if(_c[0].substring(0,1)=='+'){
	                    			_c[0]=_c[0].replace('+','')
	                    			if(document.getElementById(_c[0])!=null)
		                    		document.getElementById(_c[0]).style.display=_c[1];
	                    		}else{
									if(document.getElementById(_c[0])!=null)
		                    		document.getElementById(_c[0]).innerHTML=_c[1];
		                    	}
                    		}
                    	}
                    }
                }
            }
            if(metodo == "GET") {
                xmlhttp.send(null);
            } else {        
                xmlhttp.send(parametros);
            }
}

function bdata(tx) {
	if(vermodelo(tx,'00/00/0000')==false){
		tx.value='';
		tx.focus();
		alert('Digite a data conforme o modelo: 10/08/1988');
		return false;
	}else return true;
}
function vertecla00(ev,tx){
	if(tx.value.indexOf(',')!=-1 && ev.keyCode==44)return false; 
	return (((ev.keyCode>=48 && ev.keyCode<=57) || ev.keyCode==44));
}



function procol(s) {
//	ar['a']=1;	ar['b']=5;	s='abcwww[a]xz[b]';	alert(s);
	var a=b=0;
	var q=w=e=z=x='';
	z='[';x=']'
//	alert(s);
	for(var i=0;i<s.length;i++){
		a=s.indexOf(z);
		if(a==-1)break;
		b=s.indexOf(x,a);
		q=s.substring(0,a)
		w=s.substring(a+1,b)
		e=s.substring(b+1,s.length)
		var aa=ar[w];
		if(aa==undefined | aa==null)aa="";
		s=q+aa+e;
	}
	return s;
}
	function enviaf_p(o,func,ver_obr) {
		var v=""
		var o=$o(o);
		if($o('bsubmit'))$o('bsubmit').blur();

		if(ver_obr!=0)if(!verobrigado_a(o.name))return false;
		
		if(func!=null)v=func(o.name);
		
		if(v){
			var d=v.split("|");
			if(d.length>1){
				if(d[0]!='')$o(d[0]).focus();
				alert(d[1]);
			}else alert(d[0]);
			return false;
		}

		if($o('bsubmit'))$o('bsubmit').value='Carregando...';
		if($o('bsubmit'))$o('bsubmit').disabled=1;
		return true;
	}

	function enviaj_p(o,func,ver_obr,par,f2,ext) {
		if(ext==null)if(typeof(o)=="string")if(o.indexOf(".")!=-1)ext=true;else ext=(o=="")
		evok=0;
		var v=""
		$o('bsubmit').blur();


		var n;
		var o=$o(o);
		if(o)n=o.name; else o="";

		if(ver_obr!=0)if(!verobrigado_a(o))return false;
		
		if(func!=null)v=func(n);
		
		if(v){
			var d=v.split("|");
			if(d.length>1){
				if(d[0]!='')focar(d[0])
				if(!ext)alert(d[1]);else msg2(d[1])
			}else if(!ext)alert(d[0]);else msg2(d[0])
			return false;
		}
		if(so_ve_parametros==1){alert(parametros(o));return false;}
		$o('bsubmit').value='Carregando...';
		$o('bsubmit').disabled=1;
		rec("",par+"&vs="+test_asp+"&nx=1&a_1=exe_dados&tb_1="+$v("tb")+parametros(o)
/*			+eef(ehnum($v('ipag')),ssql('update pagamentos set situacao=2,datapag=STR_TO_DATE(\''+$v("data")+'\',\'%d/%m/%Y\') where ipag='+$v('ipag'),2))*/
/*			+spcampos('<%=tb%>'+ ad1 +' order by <%=icampo%> desc',null,null,2)*/
			,"returnv='1';" + ef(f2==null,"set_pergunta();",f2))
		return true;
	}
	
	
function desativa() {
	window.onbeforeunload=function(){an[1]=1;gera_dvv();}	
	window.onunload=function(){}
}

function ts_mostra(sl) {
	sl=$o(sl)
	var r=$o(sl.alt)
	var rv=$v(sl.alt)
	var v=sl.rel.split(",")
	var t=sl.lang;
	

	
	deltudo(sl)
	var rvl=rv.split("´#")
	for(var i=0;i<rvl.length;i++)if(rvl[i]){
		var rvlc=rvl[i].split("´~")
		for(var j=0;j<rvlc.length;j++){
			var rvlcn=rvlc[j].split("´^");
			ar[rvlcn[0]]=rvlcn[1];
//			alert(rvlcn[0]);
		}
		var tp=procol(t);
		add(sl,tp,rvl[i])
	}
	
	if(sl.scope)eval(sl.scope)
}

function ts_le(sl,func) {
	sl=$o(sl)
	var r=$o(sl.alt)
	var rv=$v(sl.alt)
	var v=sl.rel.split(",")
	var t=sl.lang;
	var st=sel(sl)
	
	if(func!=null)func(sl);
//	alert("le:"+st);
		var rvlc=st.split("´~")
		for(var j=0;j<rvlc.length;j++){
			var b=rvlc[j].split("´^");
			if(b[0]!="")if($o(b[0])){
				var o=$o(b[0]); 
				selecionai(o,b[1]);
				if(o.className=="f00" || o.className=="f00m")o.value=preal(b[1])
				if(o.className!='listauto')proscope_s(o)

			}
//			ar[rvlcn[0]]=rvlcn[1];
//			alert(rvlcn[0]);
		}
}

function ts_grava(sl) {
	sl=$o(sl)
	var r=$o(sl.alt)
	var rv=$v(sl.alt)
	var v=sl.rel.split(",")
	var t=sl.lang;

	if(sl.selectedIndex==-1){
		sl.focus();
		alert(''+ef(sl.name=='ft_e',"Selecione algum arquivo para alterar. Caso queira um novo arquivo clique em \'Procurar\'.",
		"Selecione algum registro para alterar. Caso queira um novo registro clique em \'Adicionar\'.")+'');
		limpa_campos(sl.rel)

		return false;
	}

	var tt=""
	for(var i=0;i<v.length;i++){
		tt+=v[i]+"´^"+$v(v[i])+"´~"
		ar[v[i]]=$v(v[i])
	}
//	alert('gr:'+sl.selectedIndex+"="+procol(t));
	alt(sl,procol(t),tt);
	
	ts_salva(sl)

}

function ts_salva(sl) {
	sl=$o(sl)
	var r=$o(sl.alt)
	var rv=$v(sl.alt)
	var v=sl.rel.split(",")
	var t=sl.lang;
	
	if(sl.scope)eval(sl.scope)
	
	$c(r,splitsel(sl,"´#")+"´#")
//	alert(r.value);

}

function ts_add(sl) {
	sl=$o(sl)
	var r=$o(sl.alt)
	var rv=$v(sl.alt)
	var v=sl.rel.split(",")
	var t=sl.lang;
	var u=-1;
	u=selprocura_t(sl,"Novo Registro ");
	
	if(u!=-1){
		sl.selectedIndex=u;
		alert('Já foi criado um novo registro e este não foi preenchido');
	return false;}
	
	limpa_campos(sl.rel)
	var tt=""
	for(var i=0;i<v.length;i++){
		tt+=v[i]+"´^"+$v(v[i])+"´~"
		ar[v[i]]=$v(v[i])
	}
//	alert(rv);

//	$c(r,rv+tt+"´#")
//	ts_mostra(sl);
	add(sl,"","")
	selult(sl)
	alt(sl,"Novo Registro (Altere os campos ao lado)")
	$d(sl.rel,0)
}

function ts_del(sl,func,fl) {
	sl=$o(sl)
	var r=$o(sl.alt)
	var rv=$v(sl.alt)
	var v=sl.rel.split(",")
	var t=sl.lang;
	
	if(func!=null)func(sel(sl),fl)


	if(sel(sl).indexOf(v[0]+"´^´~")==-1){
		var od=sl.alt.split("_");
		od[2]="del";
		od[3]=null;
		od=tiradir(od.join("_"));
		$c(od,$v(od)+sel(sl).split("´~")[0]+"´~")
//		alert($v(od));		
	}

	del(sl,-2);
	ts_salva(sl)
	limpa_campos(sl.rel)	
	selult(sl)
	sl.onchange();
}


function zfrase(th,tp) {//i
	var n=tiraesq(th.name)
	if($o("i"+n).selectedIndex!=0){
//		var s=sx(th.options[th.selectedIndex].value)[1];
		var s=th.options[th.selectedIndex].value;
		if(selprocura("s"+n,s)==-1){
			add("s"+n,s,s);
			selpri(th)
			zjunta(th);
			//mudou=1;
		}else if(tp==null)
			alert('Item já inserido');
	}
}

function zjunta(th) {
	var t=tiraesq(th.name)
	if($o(t)){
		var a=splitsel($o('s'+t));
/*		a=a.replace(';','¥');
		a=a.replace(';','¥');
		a=a.replace(';','¥');
		a=a.replace(';','¥');*/
		$o(t).value=a;
	}
//	alert($v(t)+'=='+t);
}
function zsepara() {
	var o=document.getElementsByTagName('select');
	for(var i=0;i<o.length;i++){
		if(o[i].name.substring(0,1)=="s")if(o[i].className.indexOf("slt")!=-1){
			var t=tiraesq(o[i].name)
			deltudo(o[i])
//			alert($v(t));

			if($v(t).length>0)joinsel(o[i].name,$v(t))
		}
	}
	return true;
}

function f_add(th) {//b
	var n=tiraesq(th.name);
	var o=$o("s"+n)
	var a=pprompt("Digite a frase do novo item:","Novo item","|");
	if(!a)return false;
	add(o,a,a)
	zjunta(th)
	mudou=1
}

function zalt(th) {//s
	th=$o(th)
	var n=tiraesq(th.name)
	//var o=$o("s"+n)
	var a=pprompt("Digite a frase do item a ser alterado:",sel(th),"|")
	if(!a)return false;
	alt(th,a,a)
	zjunta(th)
	mudou=1
}


function f_cima(g) {
	g=$o(g)
	if(g.selectedIndex<1)return false;
	var o=g.options[g.selectedIndex-1];
	var t=o.text
	var v=o.value
//	if(sp(sel(g))[1]=="1" && sp(v)[1]=="0")return false;
	g.options[g.selectedIndex-1].text=selt(g)
	g.options[g.selectedIndex-1].value=sel(g)
	g.options[g.selectedIndex].text=t
	g.options[g.selectedIndex].value=v
	g.selectedIndex--;
//	sort_fx(g)
	g.focus()
}
function f_baixo(g) {
	g=$o(g)
	var l=g.length
	if(g.selectedIndex<0)return false;
	if(g.selectedIndex==l-1)return false;
	var o=g.options[g.selectedIndex+1];
	var t=o.text
	var v=o.value

	g.options[g.selectedIndex+1].text=selt(g)
	g.options[g.selectedIndex+1].value=sel(g)
	g.options[g.selectedIndex].text=t
	g.options[g.selectedIndex].value=v
	g.selectedIndex++;
//	sort_fx(g)
	g.focus()
}
function f_del(g) {
	g=$o(g)
	del(g,-2)
	selult(g)
}