// JavaScript Document
var ca;
function Servico(compet,janela) {
	if(compet==0) {
  		alert('Informe a competência ou a data de emissão');
		document.fdemo.compet.focus();
		return;
	}
	window.open('aliq.php?anocomp='+compet+'&janela='+janela,'_serv','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,height=450,width=550,left=30,top=80');
}

function geraVen(campo) {
	//return;
	if(campo.value=="") {return false;}
	var comp = campo.value.split("/");
	var vant = document.fdemo.venctoreal.value;
		
	dcompet = '10';
	//dcompet = '10';			
	//if(comp[0]=='12') { comp[0]=1; comp[1]=parseFloat(comp[1])+1; }
	//else comp[0] = parseFloat(comp[0])+1;
	mcompet = parseFloat(comp[0]);
	acompet = parseFloat(comp[1]);
	if(document.fdemo.natureza.value=="Soc. Simples Prof. Lib." && (_anoComp < 2004 || document.fdemo.rectri.checked)) {
		if((mcompet)%3 != 0) {
			alert('Para Sociedade Simples de Profissional Liberal anterior ao ano de 2004 ou em virtude de Liminar Judicial o recolhimento é tirmestral, sendo válido apenas para as competências de Março, Junho, Setembro e Dezembro');
			campo.value="";
			document.fdemo.venctoreal.value="";
			campo.focus();
			return false;
		} else {
			 //document.fdemo.aliq.readOnly = false;
			document.fdemo.rect.readOnly = true;
			document.fdemo.imposto.readOnly=false;
        	document.fdemo.rect.value=0.00;
        	document.fdemo.aliq.value=0.00;
		}
		if(mcompet==12) {
			//acompet++;
			mcompet=1;
		}
		else { 
			mcompet++; 
		}
		var compet = new Date('0 '+ a_month[mcompet]+' '+acompet);
		cmes = pad(compet.getMonth()+1,2,'0');
		//canoc = compet.getYear();
		canoc = acompet;
	} else {//else aki
		if(document.fdemo.transp.checked) {
			if(document.fdemo.quinzena.value==1) {
                // if acrescentado por Rubens em 05/08/2008 em função do dia 20/07/2008 cair no domingo
				var compet = new Date('20'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "07/2008")
                   var compet = new Date('21'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "06/2009")
                   var compet = new Date('22'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "09/2009")
                   var compet = new Date('21'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "11/2009")
   				   var compet = new Date('23'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "12/2009")
                   var compet = new Date('21'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "02/2010")
                   var compet = new Date('22'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "03/2010")
                   var compet = new Date('22'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "06/2010")
                   var compet = new Date('21'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "11/2010")
                   var compet = new Date('22'+ a_month[mcompet]+' '+acompet);
				cmes = parseInt(compet.getMonth());
				//canoc = parseInt(compet.getYear());
				canoc = acompet;				
				if(cmes==12) {
					cmes=1;
					canoc++;
				} else { cmes++; }
				cmes = pad(cmes,2,'0');
			} else { //Segunda Quinzena
				if(mcompet==12) {
			    	acompet++;
				    mcompet=1;
			    } else { mcompet++; }
   				var compet = new Date('05'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "03/2009")
   				   var compet = new Date('06'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "06/2009")
   				   var compet = new Date('06'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "08/2009")
   				   var compet = new Date('08'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "11/2009")
   				   var compet = new Date('07'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "05/2010")
   				   var compet = new Date('07'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "08/2010")
   				   var compet = new Date('06'+ a_month[mcompet]+' '+acompet);
    	        if (campo.value == "11/2010")
   				   var compet = new Date('06'+ a_month[mcompet]+' '+acompet);
				cmes = parseInt(compet.getMonth());
				//canoc = parseInt(compet.getYear());
				canoc = acompet;				
				if(cmes==12) {
					cmes=1;
					canoc++;
				} else { cmes++; }
				cmes = pad(cmes,2,'0');
			}
		} else {
			if(mcompet==12) {
				acompet++;
			  	mcompet=1;
			} else { mcompet++; }
		    var compet = new Date(dcompet+' '+ a_month[mcompet]+' '+acompet);
			cmes = parseInt(compet.getMonth());
			//canoc = parseInt(compet.getYear());
			canoc = acompet;			
			if(cmes==12) {
				cmes=1;
				canoc++;
			} else { cmes++; }
			cmes = pad(cmes,2,'0');
		}
	}
	cdia = pad(compet.getDate(),2,'0');
	//if (campo.value == "06/2005"){cdia = "11";}  //*** Alteração para vencimento diferente do dia 10
	if (campo.value == "08/2005"){cdia = "12";}  //*** Alteração para vencimento diferente do dia 10
	if (campo.value == "11/2005"){cdia = "12";}  //*** Alteração para 	
	if (cdia == "31" && campo.value == "12/2005") {cdia = "30";}
	if (campo.value == "01/2006"){
		alert("Excepcionalmente neste mês o vencimento será dia 20/02/2006");
		cdia = "20";}  //*** Alteração para 		
	if (campo.value == "05/2006"){cdia = "12";}  //*** Alteração para 	
	if (campo.value == "08/2006"){cdia = "11";}  //*** Alteração para 	
	if (campo.value == "09/2006")
	   {
		alert("Excepcionalmente tendo em vista a greve dos bancos a data de recolhimento do ISS competência 09/2006 fica prorrogado até o dia 17/10/2006");
        cdia = "17";}  //*** Alteração para 	
	if (campo.value == "11/2006"){cdia = "11";}  //*** Alteração para 	
	if (campo.value == "01/2007"){cdia = "12";}  //*** Alteração para 	
	if (campo.value == "02/2007"){cdia = "12";}  //*** Alteração para 	
	if (campo.value == "05/2007"){cdia = "11";}  //*** Alteração para 	
	if (campo.value == "10/2007"){cdia = "12";}  //*** Alteração para 	
	if (campo.value == "01/2008"){cdia = "11";}  //*** Alteração para 	
	if (campo.value == "04/2008"){cdia = "12";}  //*** Alteração para 	
	if (campo.value == "07/2008"){cdia = "11";}  //*** Alteração para 	
	if (campo.value == "08/2008")
       if (! document.fdemo.transp.checked && !document.fdemo.rectri.checked) // Só muda se não for transporte Perm./Cons. Transporte Coletivo    
          cdia = "10";   	               // pois neste caso o vencimento é diferente dia 5 mês subsequente se 1a Quinzena
	                                       // dia 20 do mês se 2a quinzena
	if (campo.value == "12/2008"){cdia = "12";}  //*** Alteração para 
    
    /*	
	if (campo.value == "03/2009")                //*** Alteração para 	
       if (! document.fdemo.transp.checked && !document.fdemo.rectri.checked) // Só muda se não for transporte Perm./Cons. Transporte Coletivo    
          cdia = "13";   	               // pois neste caso o vencimento é diferente dia 5 mês subsequente se 1a Quinzena
	if (campo.value == "04/2009")          //*** Alteração para 	
       if (! document.fdemo.transp.checked && !document.fdemo.rectri.checked) // Só muda se não for transporte Perm./Cons. Transporte Coletivo    
          cdia = "11";   	               // pois neste caso o vencimento é diferente dia 5 mês subsequente se 1a Quinzena
	if (campo.value == "09/2009")          //*** Alteração para 	
       if (! document.fdemo.transp.checked && !document.fdemo.rectri.checked) // Só muda se não for transporte Perm./Cons. Transporte Coletivo    
          cdia = "13";   	               // pois neste caso o vencimento é diferente dia 5 mês subsequente se 1a Quinzena
	if (campo.value == "12/2009")          //*** Alteração para 	
       if (! document.fdemo.transp.checked && !document.fdemo.rectri.checked) // Só muda se não for transporte Perm./Cons. Transporte Coletivo    
          cdia = "11";   	               // pois neste caso o vencimento é diferente dia 5 mês subsequente se 1a Quinzena
	*/
    
    if (! document.fdemo.transp.checked && !document.fdemo.rectri.checked) // Só muda se não for transporte Perm./Cons. Transporte Coletivo    
 	{
        if (campo.value == "03/2009") cdia = "13";
        if (campo.value == "04/2009") cdia = "11";
        if (campo.value == "09/2009") cdia = "13";
        if (campo.value == "12/2009") cdia = "11";
        
        if (campo.value == "03/2010") cdia = "12";
        if (campo.value == "06/2010") cdia = "12";
        if (campo.value == "09/2010") cdia = "11";

        if (campo.value == "03/2011") cdia = "11";
        if (campo.value == "06/2011") cdia = "11";
        if (campo.value == "08/2011") cdia = "12";
        if (campo.value == "11/2011") cdia = "12";
    }

	if(canoc < 100) { canoc = parseInt("19"+canoc); }
	var ccalc = parseInt(canoc +""+ cmes +""+ cdia);
    
	document.fdemo.venctoreal.value = cdia+"/"+cmes+"/"+canoc; // Joga o vencimento calculado no campo correspondente
	
    if(vant != "" && document.fdemo.venctoreal.value != vant) {
		document.getElementById("destvcto").style.visibility="visible"
		tm = setTimeout('document.getElementById("destvcto").style.visibility="hidden"', 8000);
	}
}

function SomaT() {
	var frm=document.fdemo;
	
	if(frm.vencto.value=="") {
		return;
	}
  
	if(frm.rect.value) {
		var rec = frm.rect.value.replace(".","");
	  	rec = rec.replace(".","");
	  	rec = rec.replace(".","");
	  	rec = parseFloat(rec.replace(",","."));
	}
	else {
	  	var rec = 0.00;
	}
	
	if(frm.aliq.value) {
	  	var ali = frm.aliq.value.replace(".","");
	  	ali = parseFloat(ali.replace(",","."));
	}
	else {
	  	var ali = 0.00;
	}

	if(frm.vindice.value) {
	  	var ind = frm.vindice.value.replace(".","");
	  	ind = parseFloat(ind.replace(",","."));
	}
	else {
	  	var ind = 0.00;
	}

	if(frm.vmulta.value) {
	  	var mul = frm.vmulta.value.replace(".","");
	  	mul = parseFloat(mul.replace(",","."));
	}
	else {
	  	var mul = 0.00;
	}

	if(frm.vmora.value) {
	  	var mor =frm.vmora.value.replace(".","");
	  	mor = parseFloat(mor.replace(",","."));
	}
	else {
	  	var mor = 0.00;
	}

	if (frm.natureza.value=="Soc. Simples Prof. Lib." && (_anoComp < 2004 || frm.rectri.checked)) {
		//if(frm.vmora.value) { 							// linha alterada dia 11/10/2007
        if(frm.imposto.value) {
	    	var imp = frm.imposto.value.replace(".","");
	    	imp = parseFloat(imp.replace(",","."));
	  	}
	  	else {
	    	var imp = 0.00;
	 	}
	}	
	//else {

	if(  frm.natureza.value == "Acréscimos Legais"
      || frm.natureza.value == "Retido na Fonte"
      || frm.natureza.value == "Substituição Tributária")
    {
        if(frm.imposto.value) { 							// linha adicionada dia 11/10/2007
	    	var imp = frm.imposto.value.replace(".","");
	    	var imp = imp.replace(".","");
	    	imp = parseFloat(imp.replace(",","."));
	  	} 													// linha adicionada dia 11/10/2007
	  	else { 												// linha adicionada dia 11/10/2007
	    	var imp = 0.00; 								// linha adicionada dia 11/10/2007
	 	} 													// linha adicionada dia 11/10/2007

		var mindice = ind;
	}		

	if (frm.natureza.value!="Acréscimos Legais") {
		if (!(frm.natureza.value=="Soc. Simples Prof. Lib." && (_anoComp < 2004 || frm.rectri.checked)) && frm.natureza.value!="Retido na Fonte" && frm.natureza.value!="Substituição Tributária") {
        	var imp = parseFloat(rec * ali / 100);
		    frm.imposto.value = imp.toFixed(2).replace(".",",");
		}
		// Os indices eram anteriormente 5%, 10% e 15%, foram alterados para 2%, 5% e 10% respectivamente conforme
        // nova redação dada pela LM 3841/03 do CTM
	    if(ndias < 1) {
	    	vmul = 0.00
	    }
	    else if(ndias > 0 && ndias <31) {
	      	vmul = 0.02
	    }
	    else if(ndias > 30 && ndias <61) {
	      	vmul = 0.05
	    }
	    else if(ndias > 60) {
	      	vmul = 0.10
	    }
        // O valor dos juros também foram alterados conforme 
        // nova redação dada pela LM 3841/03 do CTM
        // Era 1% ao mês passou para 0,5%
	    //vmor = Math.ceil(ndias/30);
	    vmor = Math.ceil(ndias/30)/2;
	    ind = imp*cormonet;
	    mul = (ind) * vmul;
	    mor = (ind) * (vmor/100);
	    //mor = parseInt(mor*100);
	    mor = parseFloat(mor*100);
	    mor = parseFloat(mor/100);
	    mul = parseInt(mul*100);
	    mul = parseFloat(mul/100);
	    ind = parseInt(ind*100);
	    ind = parseFloat(ind/100);
	    var mindice = ind-imp;
	    if(mindice <0) mindice=0;
	}

	var vtot = parseFloat(imp.toFixed(2)) + parseFloat(mul.toFixed(2)) + parseFloat(mindice.toFixed(2)) + parseFloat(mor.toFixed(2));
	//var vtot = imp + mul + mindice + mor;	
	//alert(vtot +"="+ imp.toFixed(2) +"+"+ mul.toFixed(2) +"+"+ mindice.toFixed(2) +"+"+ mor.toFixed(2));
	
    if(frm.natureza.value!="Acréscimos Legais") {
    	frm.aindice.value = cormonet.toFixed(4).replace(".",",");
    	frm.vindice.value = mindice.toFixed(2).replace(".",",");
    	frm.amulta.value = (vmul*100).toFixed(1).replace(".",",");
    	frm.amora.value = vmor.toFixed(1).replace(".",",");
    	frm.vmulta.value = mul.toFixed(2).replace(".",",");
    	frm.vmora.value = mor.toFixed(2).replace(".",",");
	}
    
    if(isNaN(vtot))
    	alert('Erro ao calcular o total.');
    
  	//frm.total.value = vtot.toFixed(2).replace(".",",");
    valorFinal = vtot.toFixed(2).replace(".",",");
    frm.total.value = separaMilhar(valorFinal);
}

function separaMilhar(num)
{
	var numero = num + "";
	numero = numero.split(",");
	if(numero.length == 2)
    {
    	var newNumero = "";
        cont = 0;
        for(var i=0; i<numero[0].length; i++)
        {
        	newNumero = numero[0].charAt(numero[0].length-1 - i) + newNumero;
            cont++;
            if(cont==3)
            {
            	newNumero = "." + newNumero;
                cont = 0;
            }
        }
        return newNumero + "," + numero[1];
    }
    return num;
}

function modulo11(numero) {
  var soma = 0;
	var fator = 2;
	for(var i=numero.length-1;i>=0;i--) {
		soma += parseInt(numero.substr(i,1)) * fator;
		fator++;
		if(fator==10) { fator=2; }
	}
	soma = 11 - (soma % 11);
	if(soma >= 10) soma = 0;
	
	return soma;
	
}
function verInscM(campo) {
  //alert(inscricao)
	var inscricao = campo.value;
	if(inscricao=="") { return; }
	aux = campo.value.length;
    if (aux != 9) {
      alert("A Inscrição do responsável deve conter 9 dígitos");
      campo.value="";
	  campo.focus();
	  return;
    } 
	var retorno = modulo11(inscricao.substr(0,8));
	if((inscricao.substr(8,1) != retorno) || (inscricao=="000000000")) {
	  	alert("Inscrição inválida");
		campo.value=""
		campo.focus()
		return;
	}
	return;
}

function AcLegais(campo){
	var frm=document.fdemo;
	var natureza = campo.value;
	if(natureza=="Acréscimos Legais"){
		frm.aindice.value=1;
		frm.amulta.value=1;
		frm.amora.value=1;
	}
	else if (frm.movimento.value==0)
	{
		frm.aindice.value ="";
		frm.amulta.value  ="";
		frm.amora.value   ="";				
	}
}