var ie=document.getElementById && document.all
var ns=document.getElementById && !(document.all)

var fora=window.location.search
var frmu
var buscclaras
var buscdesemp
var est="TSE"
var estINSS
var busc
var buscTJAL
var buscTJSP
var CNPJ
var CPF
var tempX
var tempY
var flagCNPJ=false
var flagCPF=false
var dev
var xx=document.getElementsByTagName('div')
var strBusca
var mens="Este estado não proporciona\nbusca por CPF."
var este
var EsteAno
var EsteMes
var EsteDia

var flag=new Array()
var url=new Array()
var m=new Array()
var leg=new Array()

var leg=[
'',
'ABRE',
'DEU NO JORNAL',
'MUNICÍPIOS SC',
'CÂMARA',
'CÂMARA|Viagens',
'CÂMARA|Verbas',
'SENADO',
'SENADO | CPIs',
'MPF',
'STF | Processos',
'STF | Acórdãos',
'STJ/TJs|Processos',
'STJ/TJs | Jurispr.',
'TRFs | Jurispr.',
'TSE | TREs',
'TST',
'CVM',
'TCU/TCEs/TCMs',
'PROC. ADM.',
'SIORG',
'DEVEDORES INSS',
'SINTEGRA',
'SRF | CNPJ',
'SRF | CPF',
'Diários Oficiais'
]
//'CND/Prev. Soc.',

var mens=[
'',
'Quem financiou quem nas eleições de 2004. Estatísticas e outras informações. Os dados das eleições de 2002 são acessíveis a partir dali. Projeto da Transparência Brasil.',
'Banco de dados com noticiário sobre corrupção publicado em 63 jornais e revistas de todos os estados, desde janeiro de 2004. Projeto da Transparência Brasil.',
'Empresas participantes de todas as licitações realizadas nos 293 municípios de Santa Catarina desde 1997. Valores, quantitativos, distribuição. Projeto da Transparência Brasil com o Tribunal de Contas do estado. Busca por nome ou CNPJ.',
'Documentos da Câmara dos Deputados. Projetos de lei, pronunciamentos, notícias. (Inclui mais do que apenas deputados). Portal da Câmara.',
'Despesas com viagens de deputados federais. Portal da Câmara.',
'Verbas de gabinete, mês a mês, de deputados federais. Portal da Câmara.',
'Documentos do Senado Federal. Projetos de lei, pronunciamentos, notícias. (Inclui mais do que apenas senadores). SICON-Sistema de Informações do Congresso Nacional, Prodasen.',
'Relatórios de Comissões Parlamentares de Inquérito do Senado e Comissões Parlamentares Mistas. Sistema de Informações Legislativas do Senado.',
'Processos de interesse do Ministério Público Federal. Portal da Procuradoria Geral da República.',
'Processos em andamento no Supremo Tribunal Federal. Portal do Tribunal.',
'Acórdãos (decisões) do Supremo Tribunal Federal. Portal do Tribunal.',
'Caso nenhum estado seja selecionado, leva a processos que correm no Superior Tribunal de Justiça em que a pessoa/empresa buscada é interessada. Portal do Tribunal. Caso um estado esteja selecionado, leva aos processos que correm ou correram em segunda instância no Tribunal de Justiça correspondente.',
'Caso nenhum estado seja selecionado, leva à jurisprudência do Superior Tribunal de Justiça em que a pessoa/empresa buscada é interessada. Portal do Tribunal. Caso um estado esteja selecionado, leva à jurisprudência do Tribunal de Justiça correspondente. Nem todos os estados oferecem um serviço de busca livre.',
'Jurisprudência unificada dos tribunais regionais federais. Conselho de Justiça Federal.',
'Processos que correm no Tribunal Superior Eleitoral e nos Tribunais Regionais Eleitorais. Para acessar estes últimos é necessário assinalar um estado na caixa de opções. Portal do Tribunal Superior Eleitoral. Como se trata de um serviço centralizado no TSE, todos os estados são atendidos pelo mesmo servidor.',
'Processos que correm no Tribunal Superior do Trabalho. Portal do Tribunal.',
'Decisões da Comissão de Valores Mobiliários. Portal da Comissão.',
'Decisões e processos de Tribunais de Contas. Quando não se escolhe um estado, a busca é feita no Tribunal de Contas da União. Escolhendo-se um estado, é realizada no TC correspondente, quando este possibilita busca (nem todos oferecem esse serviço). Em três casos, podem-se selecionar Tribunais de Municípios e/ou de capitais (RJ e SP).',
'Procedimentos administrativos federais, incluindo a Receita Federal. Portal da RedeGoverno, do Ministério do Planejamento.',
'Sistema de Informações Organizacionais do Governo Federal. Fornece os cargos e as datas de nomeação e exoneração de pessoas no governo federal. Portal da RedeGoverno, do Ministério do Planejamento.',
'Devedores da Previdência Social. O registro é atualizado de tempos em tempos. Portal do Ministério da Previdência. Busca por nome, CNPJ e estado.',
'Sistema Integrado de Informações Sobre Operações Interestaduais com Mercadorias e Serviços. Busca por CNPJ; em algus estados, por CPF; em dois estados (RN e RS), também por razão social. Mantido pelas Secretarias Estaduais da Fazenda. Consulta os dados do estado assinalado na caixa de opções. Em alguns estados, o formulário inclui uma verificação de código alfanumérico, sendo necessário reintroduzir o CNPJ na caixa que se apresentar.',
'Consulta do CNPJ de empresas. Secretaria da Receita Federal.',
'Consulta do CGC de pessoas físicas. Secretaria da Receita Federal.'
//'Diários Oficiais da União e de estados.'
]

EsteAno=new Date().getFullYear()
EsteMes=new Date().getMonth()+1
EsteDia=new Date().getDate()

var total=mens.length

function entra(){
	searchA = 'strBusca='
	if (fora.indexOf(searchA)!=-1) {
		indexA = fora.indexOf(searchA) + searchA.length;
		strBusca = fora.substring(indexA);
		strBusca=decode_utf8(strBusca)
		strBusca=unescape(strBusca)
		strBusca=strBusca.replace(/\+/g," ")
		z('strBusca').value=strBusca
		preenche()
	}
}

function detecta(i){
	for (n=1;n<total;n++){
		if(xx[n+1].innerHTML.substring(94,xx[n+1].innerHTML.length-4)==i){return n}
	}
}

if (ns) {
	document.captureEvents(Event.MOUSEMOVE)
}

document.onmousemove = getMouseXY;
var tempX = 0;
var tempY = 0;
function getMouseXY(e) {
	if (ie) {
		tempX = event.clientX + document.body.scrollLeft;
		tempY = event.clientY + document.body.scrollTop;
	}
	else {
		tempX = e.pageX;
		tempY = e.pageY;
	}  
	if (tempX < 0){tempX = 0;}
	if (tempY < 0){tempY = 0;}  
	if (tempX > 400){tempX = tempX-220;}
	return true
}

function ms(i){
	with(z('descricao')){
		innerHTML=mens[i]
		style['visibility']='visible'
		style['top']=tempY+10
		style['left']=tempX+10
	}

	with(z('sombra')){
		innerHTML=mens[i]
		style['visibility']='visible'
		style['top']=tempY+16
		style['left']=tempX+16
	}

}

function f(){
	z('descricao').style['visibility']='hidden'
	z('sombra').style['visibility']='hidden'
}

function z(i){
	return document.getElementById(i)
}

function ch(b,n){
	z('frm'+n).src=b
}

function limpa(i){
	ch('',i)
}

function escr(t,n){
	z('frm'+n).innerHTML = t
}

function reseta(){
//	document.location.reload()
	z("pronto").style.visibility="hidden"
	for (n=1;n<total;n++) {xx[n+1].style.backgroundColor='#900000';limpa(n)}
	flagCNPJ=false
	flagCPF=false
	busc=""
	est=""
	CNPJ=""
	CPF=""
	vars()
	ch('abre.html',1)
	xx[2].innerHTML='<a href="javascript:me(1)" onFocus=blur() class=prim onMouseOver="ms(1)" onMouseout="f()">ABRE</a>'
	z('frm1').style['visibility']='visible'
}

function vars(){
busc=busc.replace(/\"/g,"")
busc=busc.replace(/\+/g," ")
CNPJ=z('strCNPJ').value
CNPJ=limpa_CNPJ(CNPJ)
if(CNPJ.length>14){CNPJ=CNPJ.substring(CNPJ.length - 14)}
if(CNPJ.length<14){CNPJ="CNPJ"}
if(CNPJ.length==14){flagCNPJ=true}
z('strCNPJ').value=CNPJ

CPF=z('strCPF').value
CPF=limpa_CNPJ(CPF)
if(CPF.length>11){CPF=CPF.substring(CPF.length - 11);flagCPF=true}
z('strCPF').value=CPF

transfTJAL(busc)

buscclaras=busc.replace(/ /g," e ")

buscstf=busc.replace(/ /g," adj ")
buscsen='"'+busc+'"'
buscsen1=busc.replace(/ /g,"+")
buscdesemp=" "+busc
buscmpf=busc.toUpperCase()
buscTJSPesp=escape(separa(busc))
busctcu=(ns)?encode_utf8(busc):busc
busctcu='"'+busctcu+'"'
buscrs=busc.toUpperCase()
busctjmg=encode_utf8(busc)
tiracentos(buscrs)
buscTJSP=tiracentos(busc)

if (est=='TSE'){nomeTrib=est;siglaTrib='tse'}
else{nomeTrib='TRE-'+est;siglaTrib=est.toLowerCase()}

}

function preenche(){

z("pronto").style.visibility="visible"

xx[2].innerHTML='<a href="javascript:parent.me(1)" onFocus=blur() class=prim onMouseOver="parent.ms(1)" onMouseout="parent.f()">ÀS CLARAS</a>'

for(n=2;n<total+1;n++) {xx[n].style.backgroundColor='#900000'}

//me(1)

//flag[1]=1
flagCNPJ=false
flagCPF=false

for (n=1;n<total;n++){flag[n]=0}

busc=z('strBusca').value

vars()

if (flagCNPJ){

flagCPF=false

dev='http://www.previdencia.gov.br/devedores/consdeved.asp?checkcnpj=on&cnpj='+CNPJ+'&cei=&cpf=&razao=&uf='

desemp='http://www.licitassist.org.br/desempenho/empresa.asp?rsocial=&CNPJ='+CNPJ+'&ano=1997_2004&p=Pesquisar'
}

else{
dev='http://www.previdencia.gov.br/devedores/consdeved.asp?cnpj=&cei=&cpf=&razao='+busc+'&checkmeio=on&uf='

desemp='http://www.licitassist.org.br/desempenho/empresa.asp?rsocial='+buscdesemp+'&CNPJ=&ano=1997_2004&p=Pesquisar'
}

url=[
'abre.html',
'http://www.asclaras.org.br/2004/busca.php?strBusca='+buscclaras,
'http://www.deunojornal.org.br/busca.php?assunto=0&palavra=%22'+busc+'%22',
desemp,
'http://www2.camara.gov.br/search?SearchableText='+buscsen+'&modo=0',
'http://www.camara.gov.br/internet/MissaoOficial/PainelPesquisa2.asp?NomeAPesquisar='+buscmpf+'&InicioSelecaoUsuario=&TerminoSelecaoUsuario=&Button=Pesquisar',
'', //Câmara verbas
'', //Senado
'http://webthes.senado.gov.br/bin/gate.exe?f=tocn&p_toc=tocn&p_doc=recordn&p_d=SILN&p_op_all=E&p_SortBy1=DINV&p_Ascend1=no&p_SortBy2=SASS&p_Ascend2=no&p_lang=english&expr=ALL&p_s_ALL=%40DOCN+E+Comissoes%5BNV01%5D+E+CPI%5BNV02%5D+E+Comissoes%5BNV03%5D+E+Relatorios%5BNV05%5D+E+'+buscsen1+'&p_search=search&a_search=ENTRA&p_L=50',
'ram/mpf.html',
'', //STF Processos
'', //STF Acórdãos
'', //STJ/TJs Processos
'', //STJ/TJs Jurisprudência
'http://www.jf.gov.br/juris/resultado.jsp?index=0&l=10&action=simples.jsp&TRF1=TRF1&TRF2=TRF2&TRF3=TRF3&TRF4=TRF4&TRF5=TRF5&JEFF=JEFF&livre='+buscclaras,
'http://www.tse.gov.br/sadJudSadpPush/Pesquisa.do?comboTribunal='+est+'&acao=pesquisarNomeParte&siglaTribunal='+siglaTrib+'&nomeTribunal='+nomeTrib+'&tipoPesquisa=divPartes&numProcesso='+busc+'&numProtocolo=&nomeParte='+busc+'&tipoConsultaNomeParte=me&nomeAdvogado=&tipoConsultaNomeAdvogado=in&numOrigem=&nomeMunicipio=',

'http://brs02.tst.gov.br/cgi-bin/nph-brs?d=BUNO&s1='+buscclaras+'&sect1=1&s2=&s3=&s4=&s5=&s6=&s9=&s10=&s11=&s12=&s20=&s21=&s7=&s24=&s8=&s13=&s14=&s15=&s16=&s17=&s18=&s19=&s25='+buscclaras+'&s22=&s23=&s26=&pg1=&pg2=&pg3=&pg4=&pg5=&pg6=&pg7=&pg8=&pg9=&pg10=&pg11=&pg12=&pg13=&pg14=&pg15=&pg16=&pg17=&pg18=&pg19=&pg20=&pg21=&pg22=&pg23=&pg24=&sect2=1&sect2=1&sect2=1&sect2=1&sect2=1&u=http%3A%2F%2Fwww.tst.gov.br%2Fjurisprudencia%2Fn_brs%2Fn_nspit%2Fn_nspitgen_un.html&p=1&r=0&f=S&l=0',
'', //CVM
'', //TCU/TCEs
'http://www.protocolo.redegoverno.gov.br/Consultas/ConsNomeCPFCNPJ.asp?Tx_Dados='+busc+'&Tipo=2',
'ram/siorg.html',
'', //Devedores INSS
'', //Sintegra
'http://www.receita.fazenda.gov.br/PessoaJuridica/CNPJ/cnpjreva/Cnpjreva_Solicitacao2.asp?cnpj='+CNPJ,
'http://www.receita.fazenda.gov.br/Aplicacoes/ATCTA/cpf/inicialConsultaPublica.asp'
//'' Diários Oficiais
]

//ch('http://www.asclaras.org.br/2004/busca.php?strBusca='+buscclaras,1)
}

function me(i){
	este=i
	z("pronto").style.visibility="hidden"
	xx[i+1].style.backgroundColor='#003366'

	z('frm'+i).style['visibility']='visible'
	for (n=1;n<total;n++){if(n!=i){z('frm'+n).style['visibility']='hidden';if(n==9){(ie)?limpa(n):null;(ie)?flag[n]=0:null}}}
	if (flag[i]==0){
		flag[i]=1
		if(url[i]!=''){ch(url[i],i)}
		if (i==6){ch('forms/formDeputados.htm',0)}
		if (i==7){ch('forms/PesqSen.htm',0)}
		if (i==10){ch('forms/stfFrom.htm',0)}
		if (i==11){ch('forms/frmPesquisaLivre.htm',0)}
		if (i==12){ch('forms/tribs.htm',0)}
		if (i==13){ch('forms/acordaos.htm',0)}
		if (i==17){ch('forms/cvmsrc.htm',0)}
		if (i==18){limpa(i);ch('forms/tcontas.htm',0)}
		if (i==21){if(est=="TSE"){estINSS=""};ch('forms/inss.htm',0)}
		if (i==22){limpa(i);ch('forms/sintegra.htm',0)}
		if (i==25){ch('forms/diarios.htm',0)}
	}
}


function encode_utf8(txt) {
	txt = txt.replace(/\r\n/g,"\n");
	var utftext = "";
	for(var n=0; n<txt.length; n++){
		var c=txt.charCodeAt(n);
		if (c<128)
		utftext += String.fromCharCode(c);
		else if((c>127) && (c<2048)) {
			utftext += String.fromCharCode((c>>6)|192);
			utftext += String.fromCharCode((c&63)|128);}
			else {
				utftext += String.fromCharCode((c>>12)|224);
				utftext += String.fromCharCode(((c>>6)&63)|128);
				utftext += String.fromCharCode((c&63)|128);}
		}
	return utftext;
}

function decode_utf8(txt) {
	var plaintext = ""; var i=0; var c=c1=c2=0;
	while(i<txt.length){
		c = txt.charCodeAt(i);
		if (c<128) {
	 		plaintext += String.fromCharCode(c);
		i++;}
		else if((c>191) && (c<224)) {
			c2 = txt.charCodeAt(i+1);
			plaintext += String.fromCharCode(((c&31)<<6) | (c2&63));
			i+=2;}
			else {
				c2 = txt.charCodeAt(i+1); c3 = txt.charCodeAt(i+2);
				plaintext += String.fromCharCode(((c&15)<<12) | ((c2&63)<<6) | (c3&63));
				i+=3;}
	}
             return plaintext;
}

function limpa_CNPJ(i){
	i=i.replace(/\./g,"")
	i=i.replace(/\//g,"")
	i=i.replace(/\-/g,"")
	return i
}

function props(){
	var comp = document.busca.UnidFed.length
	var indice = document.busca.UnidFed.selectedIndex
	est = document.busca.UnidFed.options[indice].text
	estINSS=est
	if(est=='' || est=='Federação'){est='TSE';estINSS=''}
}

function pinta(i){document.busca.elements[i].select()}

function transfTJAL(j){
	buscTJAL=""
	for (i=0;i < j.length;i++){
		if( ((j.charAt(i)).search(/[a-z]/gi) > -1) || ((j.charAt(i)).search(/[0-9]/g) > -1) || ((j.charAt(i)).search(/[à-ï]/gi) > -1) || ((j.charAt(i)).search(/[ñ-ö]/gi) > -1) || ((j.charAt(i)).search(/[ù-ÿ]/gi) > -1) || ((j.charAt(i)).search(/[\,\&\-\.\/\\]/) > -1) || ((j.charAt(i)).search(/[''']/) > -1)|| ((j.charAt(i)).search(/[' ']/) > -1)  ){
			buscTJAL += j.charAt(i);
			}		
	}
}

function atalho() {
	if(este==12||este==13||este==15||este==18||este==21||este==22){props();preenche();me(este)}
}

var acentos=new Array()
var semAcentos=new Array()

semAcentos=['A','A','A','A','A','E','E','E','E','I','I','I','I','O','O','O','O','O','U','U','U','U','C']
acentos=['Á','À','Â','Ã','Ä','É','È','Ê','Ë','Í','Ì','Î','Ï','Ó','Ò','Ô','Õ','Ö','Ú','Ù','Û','Ü','Ç']

function tiracentos(j){
	j=j.toUpperCase()
	j=j.split('')
		for (m=0;m<j.length;m++){
		for (n=0;n<23;n++){
			if (j[m]==acentos[n]) j[m]=semAcentos[n]
		}
		}
	j=j.join('')
	return j
}

function separa(j){
	var k=j.split(' ')
	for (n=0;n<k.length;n++){
		k[n]='"'+k[n]+'"'
	}
	k=k.join(',')
	k='(('+k+'))'
	return k
}

function mb()
{
    if ((typeof window.sidebar == "object") && (typeof window.sidebar.addSearchEngine == "function"))
    {
        window.sidebar.addSearchEngine(
            "http://www.transparencia.org.br/multi/src/mb.src",
            "http://www.transparencia.org.br/multi/src/mb.gif",
            "multiBusca",
            "Buscador múltiplo" );
    }
    else
    {
        alert("A busca a partir da barra de ferramentas não funciona com este navegador.");
    }
}
