//############################################ INDEX #############################################
// ## ARQUIVO: FUNCOES.JS
//############################ Alert de Mensagem Enviada ##################################
function MensagemEnviada()
{

	if(Form1.txtDestNome.value!="" || Form1.txtDestEmail.value!="" || Form1.txtRemeNome.value!="" || Form1.txtRemeEmail.value!="" || Form1.txtRemeAssunto.value!="")
	{
	alert('Mensagem enviada com sucesso!');
	window.close();
	}
}
//########################################################################################


//############################ Para fechar uma janela ##################################
function FechaJanela()
{
window.close();
}
//########################################################################################

//############################ Seleciona texto da caixa ##################################
function Seleciona(objeto)
{
campo = eval (objeto);

campo.select();
}
//########################################################################################

//##################### Bloqueia clique c/ botao direito #################################
function BlockClickRight()
{
	alert('PRODTY 2006 - Direitos Reservados');
	return false;
}
//#######################################################################################

//#################################### Confirmação para fechar jamela ###################
function BlockFechar()
{
	var a=confirm('Deseja realmente sair?');
	return a;
}
//#######################################################################################

//########################### Só aceita digitação de numero #############################
function Numero(objeto)
{
campo = eval (objeto);

if (window.event.keyCode >= 48 && window.event.keyCode <= 57)
		{	
				
		}
		else
		{ 
			window.event.keyCode = 0;
		} 
}
//######################################################################################

//########################## permite digitação de numeros decimais ########################
function NumeroDecimal(objeto)
{
campo = eval (objeto);

if ((window.event.keyCode >= 48 && window.event.keyCode <= 57)|| window.event.keyCode == 44 || window.event.keyCode == 46)
		{				
		}
		else
		{ 
			window.event.keyCode = 0;
		}		
		if(window.event.keyCode == 44 || window.event.keyCode == 46)
		{			
			if(campo.value.search(',')==-1)
			{			
				campo.value =campo.value+",";
				window.event.keyCode = 0;
			}
			else
			{
				window.event.keyCode = 0;
			}			
		}	
}
//######################################################################################

//################### valida numeros decimais ##########################################

function ValidaEmBranco(objeto)
{
	campo = eval (objeto);
	if(campo.value=="")
	{
	campo.value="0";
	}
}

function ValidaDecimal(objeto,casas)
{
campo = eval (objeto);
var decima="";
var inteiro="";
var posicaoVirgula=campo.value.search(',');
var cont=0;


	if(posicaoVirgula!=-1)
	{
	//já existe virgula
		decima=campo.value.substring(posicaoVirgula,campo.value.length);
		inteiro=campo.value.substring(0,posicaoVirgula);
		
		cont=decima.length;
		if(decima.length>casas+1)
		{
			decima=decima.substring(0,casas+1);
		}
		else
		{			
			for(cont;cont<=casas;cont++)
			{			
				decima=decima+"0";
			}		
		}		
		if(posicaoVirgula==0)
		{
		decima="0"+decima;		
		}		
	}
	else
	{
		inteiro=campo.value;
		decima=",";
		for (i=0; i<casas;i++)
		{
			decima=decima+"0";
		}
	}		
	if(campo.value=="")
	{
		inteiro="0";
	}	
	campo.value=inteiro+decima;
}
//######################################################################################

//################### coloca pontuação de milhar #######################################
function ValidaMilhar(objeto)
{
campo = eval (objeto);


var posicaoVirgula=campo.value.search(',');
var decima;
var inteiro;

if(posicaoVirgula!=-1)
{
inteiro=campo.value.substring(0,posicaoVirgula);
decima=campo.value.substring(posicaoVirgula,campo.value.length);
}
else
{
inteiro=campo.value;
decima="";
}

var inteiro=inteiro.replace('.','');
inteiro=inteiro.replace('.','');
inteiro=inteiro.replace('.','');
inteiro=inteiro.replace('.','');
inteiro=inteiro.replace('.','');
inteiro=inteiro.replace('.','');
inteiro=inteiro.replace('.','');

var tamInt=inteiro.length;

var vezes=Math.floor(tamInt/3);
var resto=tamInt%3;
var temp="";


temp=inteiro;
	if((tamInt>3 && tamInt<6) && (resto==1 || resto==2))
	{
	//alert('');
	temp=inteiro.substring(0,resto)+"."+inteiro.substring(resto,inteiro.length);		
	}
	else
	{	
		if(tamInt>=6)
		{
			
			for (var i=0;i<vezes;i++)
			{
				if((resto==1 || resto==2)&& i==0)
				{	
				temp=inteiro.substring(0,resto);
				temp=temp+"."+inteiro.substr(resto,3);
				}
				else
				{			
				if(resto==1 || resto==2&& i!=0)
				{
				temp=temp+"."+inteiro.substr((i*3)+resto,3);
				
				}
				else
				{
				
					if(resto==0 && i==0)
					{
						temp=inteiro.substr(0,3);
					//alert('3');
					}
					else
					{
					//alert('4');
						temp=temp+"."+inteiro.substr(i*3,3);
					
					}
				}
				
				
				}
					

			}
			
		}
	}
	campo.value=temp+decima;
	//objeto.style.text-align="right";

}
//######################################################################################

//################### consistencia para nº neg. até -100 ################################
function NumeroNeg(objeto)
{
campo = eval (objeto);

if ((window.event.keyCode >= 48 && window.event.keyCode <= 57) || window.event.keyCode == 45 || window.event.keyCode == 44|| window.event.keyCode == 43)
		{ 
			if(campo.value.substr(0,1)=="-" && window.event.keyCode == 45)
			{
				window.event.keyCode = 0;
			}
			else
			{
				if(window.event.keyCode == 45)
				{
				window.event.keyCode = 0;
				campo.value ='-'+campo.value; 
			
				}
			}
			
				
		}
		else
		{ 
			window.event.keyCode = 0;
		}
		
		//valida valores menores que -100 
		var valor=campo.value.replace(',','.');
		if(valor<-100)
		{
		window.event.keyCode = 0;
		alert("nao e possivel valores menores que -100");
		campo.value="0";
		}
		
		//botao de positivo
		if(window.event.keyCode == 43)
		{
		window.event.keyCode = 0;
		campo.value=campo.value.replace('-','');
		}
		
		
		
		if(campo.value.search(',')==-1)
		{
			if ((campo.value.length == 4 && campo.value.substr(0,1)=="-")||(campo.value.length == 3 && campo.value.substr(0,1)!="-"))
			{
			
				if(window.event.keyCode == 44)
				{
				window.event.keyCode = 0;
				}
			campo.value =campo.value+",";
			
			}
		}
		else
		{
		
			var tam=campo.value.length;
			
			var max=campo.value.indexOf(',');
			max=max+3;
			
			if(max<=tam)
			{
			window.event.keyCode = 0;
			}
		}		
}
//######################################################################################

//######################## Tira separador de milhar ####################################
function TiraSeparadorMilhar(numero)
		{			
			//campo = eval (objeto);
			//numero=campo.value;
			//alert('1');
			numero=numero.replace(".","");
			numero=numero.replace(".","");
			numero=numero.replace(".","");
			numero=numero.replace(".","");
			numero=numero.replace(".","");
			return numero;
		}
//######################################################################################

//######################## Troca caracter , por . ######################################		
function TrocaVirgulaPorPonto(numero)
	{
	//campo = eval (objeto);
	//numero=campo.value;
	numero=numero.replace(",",".");
	return numero;
	
	}
//######################################################################################

//######################## Troca caracter . por , ######################################	
function TrocaPontoPorVirgula(numero)
	{
	//campo = eval (objeto);
	//numero=campo.value;
	numero=numero.replace(".",",");
	return numero;
	
	}
//######################################################################################

//############################ funcao cria a mascara de Cep ############################
function MascaraCep(objeto)
{
campo = eval (objeto);
	//so permite numeros
	if (window.event.keyCode >= 48 && window.event.keyCode <= 57)
	{
		if (campo.value.length == 5)
		{
		campo.value = campo.value + '-'
		}
	}
	else
	{ 
			window.event.keyCode = 0;
	} 
}
//######################################################################################

//função que aplica mascara em campo hora
function MascaraHora(formato,objeto)
{
campo = eval (objeto); 

	if (formato=='HHMM')
	{ 
	separador = ':'; 
	conjunto1 = 2; 
	
	
	if (window.event.keyCode >= 48 && window.event.keyCode <= 57)
		{ 
		if (campo.value.length == conjunto1)
			{ 
				campo.value = campo.value + separador; 
			} 
		}
		else
		{ 
			window.event.keyCode = 0;
		} 
	} 
}
//funcao que valida hora
function ValidaHora(objeto)
{
campo = eval (objeto);

	if (campo.value.substr(0,2)>23)
	{
	alert("A hora deve estar entre 00 e 23");
	campo.value="";
	}
	else
	{
		if (campo.value.substr(3,2)>59)
		{
		alert("Os minutos devem estar entre 00 e 59");
		temp=campo.value.substr(0,2);
		campo.value=temp;
		
		}
	}
}
//############################ funcao cria a mascara de Tel ############################
function MascaraTel(objeto)
{
campo = eval (objeto);
	//so permite numeros
	if (window.event.keyCode >= 48 && window.event.keyCode <= 57)
	{
		if (campo.value.length == 4)
		{
		campo.value = campo.value + '-'
		}
	}
	else
	{ 
		window.event.keyCode = 0;
	} 
}
//######################################################################################

//############################# Insere mascara de valor decimal ########################	
function MascaraValorMoeda(fld, e) 
{ 
var milSep = "";// ** aqui iria o separador de milhar 
var decSep = ","; //** separador de decimal
var sep = 0; 
var key = ''; 
var i = j = 0; 
var len = len2 = 0; 
var strCheck = '0123456789'; 
var aux = aux2 = ''; 
var whichCode = (window.Event) ? e.which : e.keyCode; 

if (whichCode == 13) 
return true; 

key = String.fromCharCode(whichCode); 

if (strCheck.indexOf(key) == -1) 
return false; 

len = fld.value.length; 

for (i = 0; i < len; i++) 
if ((fld.value.charAt(i) != '0') && (fld.value.charAt(i) != decSep)) 
break; 

aux = ''; 

for (; i < len; i++) 
if (strCheck.indexOf(fld.value.charAt(i))!=-1) 
aux += fld.value.charAt(i); 

aux += key; 
len = aux.length; 

if (len == 0) 
fld.value = ''; 

if (len == 1) 
fld.value = '0'+ decSep + '0' + aux; 

if (len == 2) 
fld.value = '0'+decSep + aux; 

if (len > 2){ 
aux2 = ''; 

for (j = 0, i = len - 3; i >= 0; i--){ 
if (j == 3){ 
aux2 += milSep; 
j = 0; 
} 
aux2 += aux.charAt(i); 
j++; 
} 

fld.value = ''; 
len2 = aux2.length; 

for (i = len2 - 1; i >= 0; i--) 
fld.value += aux2.charAt(i); 
fld.value += decSep + aux.substr(len - 2, len); 
} 

return false; 
}
//######################################################################################

function Multiplica(a,b,objeto)
{
 
 campo = eval (objeto);
 campoA = eval (a);
 campoB = eval (b);
 
 var valAInteiro=campoA.value.substring(0,2);
 var valADecimal=campoA.value.substr(3,2)/60;
 //alert(valAInteiro);
 //alert(valADecimal);
 var valA=parseFloat(valAInteiro)+parseFloat(valADecimal);
 Prd_04_04Dec=valA;
 Form1.txtPrd_04_04Dec.value=Prd_04_04Dec;
 Form1.txtPrd_04_04Dec.value=TrocaPontoPorVirgula(valA.toString());

 
 //alert(valA);
 var calB=campoB.value.replace('.','');
 
 var c;
 
 if(campoA.value=="" && campoB.value=="")
	{
	c=0;
	}
	else
	{ 
	c = valA * calB;
	}  
 campo.value=c;
 campo.value=TrocaPontoPorVirgula(campo.value);
 ValidaDecimal(Form1.txtPrd_14_04,2);
 ValidaDecimal(Form1.txtPrd_04_04Dec,2);
 
}

// calcula com objetos *** retorna na text box
function Porcento(a,b,objeto)
{
 
 campo = eval (objeto);
 campoA = eval (a);
 campoB = eval (b);
 retorno=campo.value;
 valorA=campoA.value;
 valorB=campoB.value;

 retorno="";
 valorA=valorA.replace('.','');
 
 valorB=valorB.replace('.','');
 
 valorA=valorA.replace(',','.');
 valorB=valorB.replace(',','.');
 
 if(campoA.value=="" && campoB.value=="")
	{
	campo.value=0;
	}
	else
	{ 
	if(campoB.value=="" && campoB.value==0)
	{
	 campo.value=valorA;
	 
	 }
	 else
	 {
	
	
	retorno =valorA*(1+(valorB/100));
	
	
	campo.value=retorno;
	campo.value=campo.value.replace('.',',');
	
	ValidaDecimal(campo,2);
	ValidaMilhar(campo);
	
	}
	} 
}

function RepeteEncargos()
{

	Form1.txtMao_06_06.value=Form1.txtMao_04_06.value;
	Form1.txtMao_08_06.value=Form1.txtMao_04_06.value;
	Form1.txtMao_10_06.value=Form1.txtMao_04_06.value;
	Form1.txtMao_12_06.value=Form1.txtMao_04_06.value;
	Form1.txtMao_14_06.value=Form1.txtMao_04_06.value;
	Form1.txtMao_16_06.value=Form1.txtMao_04_06.value;
	
	Porcento(Form1.txtMao_04_04,Form1.txtMao_04_06,Form1.txtMao_04_08);
	Porcento(Form1.txtMao_06_04,Form1.txtMao_06_06,Form1.txtMao_06_08);
	Porcento(Form1.txtMao_08_04,Form1.txtMao_08_06,Form1.txtMao_08_08);
	Porcento(Form1.txtMao_10_04,Form1.txtMao_10_06,Form1.txtMao_10_08);
	Porcento(Form1.txtMao_12_04,Form1.txtMao_12_06,Form1.txtMao_12_08);
	Porcento(Form1.txtMao_14_04,Form1.txtMao_14_06,Form1.txtMao_14_08);
	Porcento(Form1.txtMao_16_04,Form1.txtMao_16_06,Form1.txtMao_16_08);
	
	//ValidaDecimal(Form1.txtMao_04_08,2);
	//ValidaMilhar(Form1.txtMao_04_08);
	//ValidaDecimal(Form1.txtMao_06_08,2);
	//ValidaMilhar(Form1.txtMao_06_08);
	//ValidaDecimal(Form1.txtMao_08_08,2);
	//ValidaMilhar(Form1.txtMao_08_08);
	//ValidaDecimal(Form1.txtMao_10_08,2);
	//ValidaMilhar(Form1.txtMao_10_08);
	//ValidaDecimal(Form1.txtMao_12_08,2);
	//ValidaMilhar(Form1.txtMao_12_08);
	//ValidaDecimal(Form1.txtMao_14_08,2);
	//ValidaMilhar(Form1.txtMao_14_08);
	//ValidaDecimal(Form1.txtMao_16_08,2);
	//ValidaMilhar(Form1.txtMao_16_08);	
	
}

function round(number,X)
 {
// rounds number to X decimal places, defaults to 2
X = (!X ? 2 : X);
return Math.round(number*Math.pow(10,X))/Math.pow(10,X);
}

function formatCurrency(num) {
num = num.toString().replace(/\$|\,/g,'');

if(isNaN(num))
num = "0";
sign = (num == (num = Math.abs(num)));
num = Math.floor(num*100+0.50000000001);
cents = num%100;
num = Math.floor(num/100).toString();
if(cents<10)
cents = "0" + cents;
for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
num = num.substring(0,num.length-(4*i+3))+''+  // entre estas aspas ia o separador de milhar
num.substring(num.length-(4*i+3));
return (((sign)?'':'-') + num + ',' + cents);
}

//funcao que formata numero com 4 casas decimais
function Convert4Casas(num) {
num = num.toString().replace(/\$|\,/g,'');

if(isNaN(num))
num = "0";
sign = (num == (num = Math.abs(num)));
num = Math.floor(num*10000+0.50000000001);
cents = num%10000;
num = Math.floor(num/10000).toString();


if(cents<10)
{
cents = "000" + cents;
}
else
{
if(cents<100)
{cents = "00" + cents;}
else
{if(cents<1000){
cents = "0" + cents;}
}
}
for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
num = num.substring(0,num.length-(4*i+5))+''+  // entre estas aspas ia o separador de milhar
num.substring(num.length-(4*i+5));
return (((sign)?'':'-') + num + ',' + cents);
}


// calcula com objetos *** retorna na text box
function Porcento(a,b,objeto)
{
 
 campo = eval (objeto);
 campoA = eval (a);
 campoB = eval (b);
 retorno=campo.value;
 valorA=campoA.value;
 valorB=campoB.value;
 retorno=retorno.replace(',','.');
 valorA=valorA.replace(',','.');
 valorB=valorB.replace(',','.');
 
 if(campoA.value=="" && campoB.value=="")
	{
	campo.value=0;
	}
	else
	{ 
	if(campoB.value=="" && campoB.value==0)
	{
	 campo.value=formatCurrency(valorA);
	 }
	 else
	 {
	
	
	retorno =valorA*(1+(valorB/100));
	campo.value=formatCurrency(retorno); 
	}
	}  
 
 
 
}
// retorna um numero
function PorcenNum(a,b)
{
//alert('a-'+a);
//alert('b-'+b);
 
 
 var c;
 
 
 if(a=="" && b=="")
	{
	c=0;
	return c;
	}
	else
	{ 
	if(b=="" || b==0)
	{
	 
	 return a=a.replace(',','.');
	 }
	 else
	 {
	a=a.replace(',','.');
	b=b.replace(',','.');
	
	c =a*(1+(b/100));
	
	return c; 
	}
	} 
}


// ********** variaveis globais *****
var fatMulti=0;
var fatDiv=0;
var fatDpr=1;


 

//********* caixa de aguarde

		function AbreAguarde()

		{

		document.all.pleasewaitScreen.style.pixelTop = (document.body.scrollTop + 50);

		document.all.pleasewaitScreen.style.visibility="visible";

		window.setTimeout('FechaAgarde()',5000);

		}	

		

		function FechaAgarde()

		{

		//lengthy_calculation();

		document.all.pleasewaitScreen.style.visibility="hidden";

		}
// *********** caixa de aguarde
		
		





//********** Inicio ***  Processos ****		
		function ValidaPrc_04_04()
		{
		 		  
		 if(Form1.txtPrc_04_04.value=="" && Form1.txtPrc_04_04.value==0)
		 {
				fatMulti=0;
				fatDiv=0;
				
		 }
		 else
		 {
			fatMulti=1;
			if(Form1.txtPrc_04_04.value=="0")
			{
			fatDiv=0;
			}
			else
			{
			fatDiv=1/TiraSeparadorMilhar(Form1.txtPrc_04_04.value);
			} 			
		 }		
		
		// *** consistencias necessária para otimizacao do calculo
		if(Form1.txtEng_04_04.value!="" || Form1.txtEng_04_04.value!="0,00")
		{
		
		CalcEng_04();
		}
		if(Form1.txtEng_06_06.value!="" || Form1.txtEng_06_06.value!="0,00")
		{
		
		CalcEng_06();
		}
		if((Form1.txtMao_04_04.value!="" || Form1.txtMao_04_04.value!="0") && (Form1.txtMao_04_06.value!="" || Form1.txtMao_04_06.value!="0"))
		{
		CalcMao_04();
		}
		
		if((Form1.txtMao_06_04.value!="" || Form1.txtMao_06_04.value!="0") && (Form1.txtMao_06_06.value!="" || Form1.txtMao_06_06.value!="0"))
		{
		CalcMao_06();
		}
		
		if((Form1.txtMao_08_04.value!="" || Form1.txtMao_08_04.value!="0") && (Form1.txtMao_08_06.value!="" || Form1.txtMao_08_06.value!="0"))
		{
		CalcMao_08();
		}
		
		if((Form1.txtMao_10_04.value!="" || Form1.txtMao_10_04.value!="0") && (Form1.txtMao_10_06.value!="" || Form1.txtMao_10_06.value!="0"))
		{
		CalcMao_10();
		}
		
		if((Form1.txtMao_12_04.value!="" || Form1.txtMao_12_04.value!="0") && (Form1.txtMao_12_06.value!="" || Form1.txtMao_12_06.value!="0"))
		{
		CalcMao_12();
		}
		
		if((Form1.txtMao_14_04.value!="" || Form1.txtMao_14_04.value!="0") && (Form1.txtMao_14_06.value!="" || Form1.txtMao_14_06.value!="0"))
		{
		CalcMao_14();
		}
		
		if((Form1.txtMao_16_04.value!="" || Form1.txtMao_16_04.value!="0") && (Form1.txtMao_16_06.value!="" || Form1.txtMao_16_06.value!="0"))
		{
		CalcMao_16();
		}
		
		if((Form1.txtFlx_04_04.value!="" || Form1.txtFlx_04_04.value!="0") && (Form1.txtFlx_04_06.value!="" || Form1.txtFlx_04_06.value!="0"))
		{
		CalcFlxAcu();
		}
		
		
		 
		
		}
		
	
		
//********** Fim ***  Processos	
		
// ********** Inicio ************** Investimentos ***
function CalcInv()
{
CalcInv_04();
CalcInv_06();
CalcInv_08();
CalcInv_10();
CalcInv_12();

}

	function CalcInv_04()
	{
	 var Qtd = TiraSeparadorMilhar(Form1.txtInv_04_06.value);
	 var vlrUnit = TiraSeparadorMilhar(Form1.txtInv_04_08.value);
	 var Ajus = TrocaVirgulaPorPonto(Form1.txtInv_04Ajus.value);
	 var Fator = TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_04Fat.value));
	 var Ajustado=PorcenNum(vlrUnit,Ajus);
	 
	 var CustoItem=Ajustado*Qtd*Fator;
	 		
	Form1.txtInv_04CstItem.value=CustoItem;
	
	InvSoma();
	
	ValidaMilhar(Form1.txtInv_04CstItem);
	ValidaDecimal(Form1.txtInv_04CstItem,2); 
	}
	
	function CalcInv_06()
	{
	 var Qtd = TiraSeparadorMilhar(Form1.txtInv_06_06.value);
	 var vlrUnit = TiraSeparadorMilhar(Form1.txtInv_06_08.value);
	 var Ajus = TrocaVirgulaPorPonto(Form1.txtInv_06Ajus.value);
	 var Fator = TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_06Fat.value));
	 var Ajustado=PorcenNum(vlrUnit,Ajus);
	 
	 var CustoItem=Ajustado*Qtd*Fator;
	 		
	 Form1.txtInv_06CstItem.value=CustoItem;
	
	InvSoma(); 
	
	ValidaMilhar(Form1.txtInv_06CstItem);
	ValidaDecimal(Form1.txtInv_06CstItem,2);
	}
	
	function CalcInv_08()
	{
	 var Qtd = TiraSeparadorMilhar(Form1.txtInv_08_06.value);
	 var vlrUnit = TiraSeparadorMilhar(Form1.txtInv_08_08.value);
	 var Ajus = TrocaVirgulaPorPonto(Form1.txtInv_08Ajus.value);
	 var Fator = TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_08Fat.value));
	 var Ajustado=PorcenNum(vlrUnit,Ajus);
	 
	 var CustoItem=Ajustado*Qtd*Fator;
	 		
	 Form1.txtInv_08CstItem.value=CustoItem;
	InvSoma();
	
	ValidaMilhar(Form1.txtInv_08CstItem);
	ValidaDecimal(Form1.txtInv_08CstItem,2); 
	}
	
	function CalcInv_10()
	{
	 var Qtd = TiraSeparadorMilhar(Form1.txtInv_10_06.value);
	 var vlrUnit = TiraSeparadorMilhar(Form1.txtInv_10_08.value);
	 var Ajus = TrocaVirgulaPorPonto(Form1.txtInv_10Ajus.value);
	 var Fator = TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_10Fat.value));
	 var Ajustado=PorcenNum(vlrUnit,Ajus);
	 
	 var CustoItem=Ajustado*Qtd*Fator;
	 		
	 Form1.txtInv_10CstItem.value=CustoItem;
	InvSoma();
	
	ValidaMilhar(Form1.txtInv_10CstItem);
	ValidaDecimal(Form1.txtInv_10CstItem,2);  
	}
	
	function CalcInv_12()
	{
	 var Qtd = TiraSeparadorMilhar(Form1.txtInv_12_06.value);
	 var vlrUnit = TiraSeparadorMilhar(Form1.txtInv_12_08.value);
	 var Ajus = TrocaVirgulaPorPonto(Form1.txtInv_12Ajus.value);
	 var Fator = TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_12Fat.value));
	 var Ajustado=PorcenNum(vlrUnit,Ajus);
	 
	 var CustoItem=Ajustado*Qtd*Fator;
	 		
	Form1.txtInv_12CstItem.value=CustoItem;
	InvSoma();
	
	ValidaMilhar(Form1.txtInv_12CstItem);
	ValidaDecimal(Form1.txtInv_12CstItem,2);  	 
	}
	
	function InvSoma()
	
	{
	 a=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_04CstItem.value));
	 b=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_06CstItem.value));
	 c=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_08CstItem.value));
	 d=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_10CstItem.value));
	 e=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_12CstItem.value));
			 
	 if (a=="")
	 {
	 a=0;
	 }
	 if (b=="")
	 {
	 b=0;
	 }
	 if (c=="")
	 {
	 c=0;
	 }
	 if (d=="")
	 {
	 d=0;
	 }
	 if (e=="")
	 {
	 e=0;
	 }
	 
	 f=parseFloat(a)+parseFloat(b)+parseFloat(c)+parseFloat(d)+parseFloat(e) ;
	 
	 Form1.txtInv_14CstItem.value=f;
	 ValidaMilhar(Form1.txtInv_14CstItem);
	 ValidaDecimal(Form1.txtInv_14CstItem,2);
	  
	 Form1.txtDpr_04_06.value=Form1.txtInv_14CstItem.value;
	 
	 CustUtl();
	 
	 if(Form1.txtDpr_04_10.value!="" || Form1.txtDpr_04_10.value!=""!=0)
	 {
	 CalcDpr_04();
	 }
	 if(Form1.txtDpr_06_10.value!="" || Form1.txtDpr_06_10.value!=0)
	 {
	 CalcDpr_06();
	 }
	 
	 
	} 

// ********** Fim ************** Investimentos ***

// ********** Inicio ************** Utilzação ***		
		function CalcUtl_04_04()
		{ 	   
		  
		   Form1.txtUtl_04_04.value = (Form1.txtPrdDc_10_04.value/Form1.txtPrdDc_08_04.value)*fatDiv;
		   
		   Form1.txtUtl_04_04.value=TrocaPontoPorVirgula(Form1.txtUtl_04_04.value);
		   ValidaMilhar(Form1.txtUtl_04_04);
		   ValidaDecimal(Form1.txtUtl_04_04,2);		   
		}
		
		function CalcUtl_04_06()
		{	
			  utl=Form1.txtInv_04_04.value	    
		  if(utl=="0" || utl=="")
		  { 
		   Form1.txtUtl_04_06.value ="0,00";		  
		  }
		  else
		  {
		   utl_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtUtl_04_04.value));
		   
		   inv_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_04_04.value));
		  
		   Form1.txtUtl_04_06.value=round (utl_04_04/inv_04_04*100,5);
		   Form1.txtUtl_04_06.value=TrocaPontoPorVirgula(Form1.txtUtl_04_06.value);
		   ValidaMilhar(Form1.txtUtl_04_06);
		   ValidaDecimal(Form1.txtUtl_04_06,4);	
		   		   
		  }
		}
		
		function CustUtl()
		{
		a=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtInv_14CstItem.value));
		
		b=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtUtl_04_06.value));
		
		c=a*( b/100)*fatMulti;
		Form1.txtUtl_04CstItem.value=c;
		
		Form1.txtUtl_04CstItem.value=TrocaPontoPorVirgula(Form1.txtUtl_04CstItem.value);
		
		ValidaMilhar(Form1.txtUtl_04CstItem);
		ValidaDecimal(Form1.txtUtl_04CstItem,2);		
		
		Form1.txtUtl_06CstItem.value=Form1.txtUtl_04CstItem.value;
				
		}			

// ********** Fim ************** Utilzação

//****** Inicio *************** Depreciação

function ValidaInv_04_04()
{
 if(Form1.txtInv_04_04.value=="" ||	Form1.txtInv_04_04.value==0)
 {
   fatDpr=1;
 }
 else
 {
   fatDpr=TiraSeparadorMilhar(Form1.txtInv_04_04.value)*Form1.txtPrdDc_08_04.value;
   
 }

}

function CalcDpr_04()
{
  ValidaInv_04_04();
  
    
  dpr_04_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_04_06.value));
  dpr_04_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_04_08.value));
  dpr_04_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_04_10.value));
  utl_04_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtUtl_04_06.value));
  dpr_04Ajus=TrocaVirgulaPorPonto(Form1.txtDpr_04Ajus.value);
  dpr_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_04Fat.value));
        
 if( Form1.txtDpr_04_10.value=="" || Form1.txtDpr_04_10.value==0)
   {  
  
   Form1.txtDpr_04_12.value=Convert4Casas(0);
   Form1.txtDpr_04CstItem.value=Convert4Casas(0);
   }
  else
  {
	 var dpr_04_12=((dpr_04_06-dpr_04_08)/(dpr_04_10*fatDpr))*fatDiv*(utl_04_06/100);
	 
	 Form1.txtDpr_04_12.value=Convert4Casas(dpr_04_12);
	 	 	 
	 var Ajustado=PorcenNum(Form1.txtDpr_04_12.value,dpr_04Ajus);
	 
	 ValidaMilhar(Form1.txtDpr_04_12);
	 
	 var CustoItem=Ajustado*dpr_04Fat;
	
	Form1.txtDpr_04CstItem.value=Convert4Casas(CustoItem);
	
	ValidaMilhar(Form1.txtDpr_04CstItem);
	
	}	 

 DprSoma();
 CalcAcumulado();
 
if((Form1.txtEst_04_04.value!="" || Form1.txtEst_04_04.value!="0,00") && (Form1.txtEst_04_06.value!="" || Form1.txtEst_04_06.value!="0"))
{
CalcEst_04();
}

if((Form1.txtEst_06_04.value!="" || Form1.txtEst_06_04.value!="0,00") && (Form1.txtEst_06_06.value!="" || Form1.txtEst_06_06.value!="0"))
{
CalcEst_06();
}

}

function CalcDpr_06()
{ 
   ValidaInv_04_04();
 
  dpr_06_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06_04.value));
  dpr_06_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06_06.value));
  dpr_06_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06_08.value));
  dpr_06_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06_10.value));
  utl_04_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtUtl_04_06.value));
  dpr_06Ajus=TiraSeparadorMilhar(Form1.txtDpr_06Ajus.value);
  dpr_06Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06Fat.value));
       
   if( Form1.txtDpr_06_10.value=="" || Form1.txtDpr_06_10.value==0)
   {
   Form1.txtDpr_06_12.value=Convert4Casas(0);
   Form1.txtDpr_06CstItem.value=Convert4Casas(0);
   }
   else
   {
	 var dpr_06_12=(((dpr_06_06-dpr_06_08)*dpr_06_04/100)/(dpr_06_10*fatDpr))*fatDiv*(utl_04_06/100);
		 
	 Form1.txtDpr_06_12.value=Convert4Casas(dpr_06_12);
	 dpr_06_12=Form1.txtDpr_06_12.value;
	
	var Ajustado=PorcenNum(dpr_06_12,dpr_06Ajus);
	 
	 ValidaMilhar(Form1.txtDpr_06_12);
	 
	 var CustoItem=Ajustado*dpr_06Fat;
		
	Form1.txtDpr_06CstItem.value=Convert4Casas(CustoItem);
	
	ValidaMilhar(Form1.txtDpr_06CstItem);   
	  
   }
    DprSoma();
    CalcAcumulado();
}

function DprSoma()
{
	 a=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_04CstItem.value));
	 b=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06CstItem.value));
	 
	 	 
	 if (a=="")
	 {
	 a=0;
	 }
	 if (b=="")
	 {
	 b=0;
	 }
	 	 
	 c=parseFloat(a)+parseFloat(b);
	 
	 Form1.txtDpr_08CstItem.value=Convert4Casas(c);
	 
	 ValidaMilhar(Form1.txtDpr_08CstItem);   	
}
//******* Fim *************** Depreciação 

//******* Inicio *************** Energia
function CalcEng_04()
{
Eng_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_04_04.value));
EngDc_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEngDc_04_04.value));
Eng_04Ajus=TrocaVirgulaPorPonto(Form1.txtEng_04Ajus.value);
Eng_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_04Fat.value));

var Eng_04_08=EngDc_04_04*(Eng_04_04*0.736)*fatDiv;

Form1.txtEng_04_08.value=Convert4Casas(Eng_04_08);

var Ajustado=PorcenNum(Form1.txtEng_04_08.value,Eng_04Ajus);

ValidaMilhar(Form1.txtEng_04_08);
	 
var CustoItem=Ajustado*Eng_04Fat;

Form1.txtEng_04CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtEng_04CstItem);

EngSoma();
CalcAcumulado();
}

function CalcEng_06()
{
Eng_06_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_06_06.value));
EngDc_06_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEngDc_06_04.value));
Eng_06Ajus=TrocaVirgulaPorPonto(Form1.txtEng_06Ajus.value);
Eng_06Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_06Fat.value));

var Eng_06_08=EngDc_06_04*Eng_06_06*fatDiv;

Form1.txtEng_06_08.value=Convert4Casas(Eng_06_08);

var Ajustado=PorcenNum(Form1.txtEng_06_08.value,Eng_06Ajus);

ValidaMilhar(Form1.txtEng_06_08);
	 
var CustoItem=Ajustado*Eng_06Fat;

Form1.txtEng_06CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtEng_06CstItem);

EngSoma();
CalcAcumulado();
}

function EngSoma()
{
	 a=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_04CstItem.value));
	 b=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_06CstItem.value));
	 	 
	 if (a=="")
	 {
	 a=0;
	 }
	 if (b=="")
	 {
	 b=0;
	 }
	 	 
	 c=parseFloat(a)+parseFloat(b);
	 
	 Form1.txtEng_08CstItem.value=Convert4Casas(c);
	 
	 ValidaMilhar(Form1.txtEng_08CstItem);	
}
//******* Fim *************** Energia

//******* Inicio *************** Ferramental

function CalcFer()
{
 PrdDc_10_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrdDc_10_04.value));
 FerDc_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFerDc_04_04.value));
 FerDc_06_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFerDc_04_04.value));
 FerDc_08_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFerDc_04_04.value));
 Fer_04_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_04_08.value));
 
 Fer_04Ajus=TrocaVirgulaPorPonto(Form1.txtFer_04Ajus.value);
 Fer_06Ajus=TrocaVirgulaPorPonto(Form1.txtFer_06Ajus.value);
 Fer_08Ajus=TrocaVirgulaPorPonto(Form1.txtFer_08Ajus.value);
 
 Fer_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_04Fat.value));
 Fer_06Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_06Fat.value)); 
 Fer_08Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_08Fat.value));
 
 Fer_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_04_04.value));
 Fer_06_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_06_04.value));
 Fer_08_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_08_04.value));
 
 var Fer_04_06=Fer_04_04/(FerDc_04_04*PrdDc_10_04);
 var Fer_06_06=Fer_06_04/(FerDc_06_04*PrdDc_10_04);
 var Fer_08_06=Fer_08_04/(FerDc_08_04*PrdDc_10_04);
 
 Form1.txtFer_04_06.value=Convert4Casas(Fer_04_06);
 
 Form1.txtFer_06_06.value=Convert4Casas(Fer_06_06);
 
 Form1.txtFer_08_06.value=Convert4Casas(Fer_08_06);
  
var Ajustado=PorcenNum(Form1.txtFer_04_06.value,Fer_04Ajus);

var CustoItem=Ajustado*Fer_04Fat;

Form1.txtFer_04CstItem.value=Convert4Casas(CustoItem);

var Ajustado2=PorcenNum(Form1.txtFer_06_06.value,Fer_06Ajus);

var CustoItem2=Ajustado2*Fer_06Fat;
Form1.txtFer_06CstItem.value=Convert4Casas(CustoItem2);

var Ajustado3=PorcenNum(Form1.txtFer_08_06.value,Fer_08Ajus);

var CustoItem3=Ajustado3*Fer_08Fat;
Form1.txtFer_08CstItem.value=Convert4Casas(CustoItem3);
 
 
 if(Fer_04_04=="" || Fer_04_04==0)
 {
 Fer_04_04=Convert4Casas(0);
 }
 if(Fer_06_04=="" || Fer_06_04==0)
 {
 Fer_06_04=Convert4Casas(0);
 }
 if(Fer_08_04=="" || Fer_08_04==0)
 {
 Fer_08_04=Convert4Casas(0);
 }
 
 Form1.txtFer_10_04.value=parseFloat(Fer_04_04)+parseFloat(Fer_06_04)+parseFloat(Fer_08_04);
 
 ValidaDecimal(Form1.txtFer_10_04,2);
 ValidaMilhar(Form1.txtFer_10_04);
  
 ValidaMilhar(Form1.txtFer_04_06);
 ValidaMilhar(Form1.txtFer_06_06);
 ValidaMilhar(Form1.txtFer_08_06);
 ValidaMilhar(Form1.txtFer_04CstItem);
 ValidaMilhar(Form1.txtFer_06CstItem);
 ValidaMilhar(Form1.txtFer_08CstItem); 
 
 if(Fer_04_08=="" || Fer_04_08==0)
 {
  CalcFerRateio();
  }

FerSoma();
CalcAcumulado();
}


function CalcFerRateio()
{
 PrdDc_10_04=TrocaVirgulaPorPonto(Form1.txtPrdDc_10_04.value);
 PrdDc_12_04=TrocaVirgulaPorPonto(Form1.txtPrdDc_12_04.value);
  
 a=PrdDc_10_04*PrdDc_12_04;
 
 Form1.txtFer_04_08.value=a;
 Form1.txtFer_06_08.value=a;
 Form1.txtFer_08_08.value=a;
 
 ValidaMilhar(Form1.txtFer_04_08);
 ValidaMilhar(Form1.txtFer_06_08);
 ValidaMilhar(Form1.txtFer_08_08);  
}

function FerSoma()
{
	 a=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_04CstItem.value));
	 b=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_06CstItem.value));
	 c=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_08CstItem.value));
		 	 
	 if (a=="")
	 {
	 a=0;
	 }
	 if (b=="")
	 {
	 b=0;
	 }
	 
	 if (c=="")
	 {
	 c=0;
	 }
	 	 
	 d=parseFloat(a)+parseFloat(b)+parseFloat(c);
	 
	 Form1.txtFer_10CstItem.value=Convert4Casas(d);
	 
	 ValidaMilhar(Form1.txtFer_10CstItem);
}

//******* Fim *************** Ferramental

//******* Inicio *************** Material ******
function CalcMat()
{
 Mat_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMat_04_04.value));
 Mat_04_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMat_04_06.value));
 Mat_04_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMat_04_08.value));
 MatDc_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMatDc_04_04.value));
 MatDc_04_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMatDc_04_06.value));
 MatDc_04_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMatDc_04_08.value));
 Mat_04Ajus=TrocaVirgulaPorPonto(Form1.txtMat_04Ajus.value);
 Mat_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMat_04Fat.value));
 
 if( ((Mat_04_04=="" || Mat_04_04==0) || (Mat_04_06=="" || Mat_04_06==0)) || (Mat_04_08=="" || Mat_04_08==0))
 {
  Form1.txtMat_04_10.value=Convert4Casas(0);
  Form1.txtMat_04CstItem.value=Convert4Casas(0);
  Form1.txtMat_06CstItem.value=Convert4Casas(0);
 }  
  else
  {
 
 var Mat_04_10=(MatDc_04_04*(MatDc_04_06/1000000)*MatDc_04_08*Mat_04_04*Mat_04_06)/Mat_04_08;
 
 Form1.txtMat_04_10.value=Convert4Casas(Mat_04_10); 
 
var Ajustado=PorcenNum(Form1.txtMat_04_10.value,Mat_04Ajus);
var CustoItem=Ajustado*Mat_04Fat;
Form1.txtMat_04CstItem.value=Convert4Casas(CustoItem);
Form1.txtMat_06CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtMat_04_10);
ValidaMilhar(Form1.txtMat_04CstItem);
ValidaMilhar(Form1.txtMat_06CstItem);

}
 CalcAcumulado();
}

//******* Fim *************** Material ******

//******* Inicio *************** Mão de Obra ******

 // atenção este usa a validação do prc_04_04  a variavel fatDiv
 function CalcMao()
 {
 CalcMao_04();
 CalcMao_06();
 CalcMao_08();
 CalcMao_10();
 CalcMao_12();
 CalcMao_14();
 CalcMao_16(); 
 }

function CalcMao_04()
{

Mao_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_04_04.value));
Mao_04_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_04_06.value));
MaoDc_04_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMaoDc_04_08.value));
Mao_04Ajus=TrocaVirgulaPorPonto(Form1.txtMao_04Ajus.value);
Mao_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_04Fat.value));

var Mao_04_08=MaoDc_04_08*Mao_04_04*(Mao_04_06/60)*fatDiv;
Form1.txtMao_04_08.value=Convert4Casas(Mao_04_08);

Mao_04_08=Form1.txtMao_04_08.value;

var Ajustado=PorcenNum(Form1.txtMao_04_08.value,Mao_04Ajus);
var CustoItem=Ajustado*Mao_04Fat;
Form1.txtMao_04CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtMao_04_08);
ValidaMilhar(Form1.txtMao_04CstItem);

MaoSoma();
CalcAcumulado();
}

function CalcMao_06()
{
Mao_06_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_06_04.value));
Mao_06_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_06_06.value));
MaoDc_06_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMaoDc_06_08.value));

Mao_06Ajus=TrocaVirgulaPorPonto(Form1.txtMao_06Ajus.value);
Mao_06Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_06Fat.value));

var Mao_06_08=MaoDc_06_08*Mao_06_04*(Mao_06_06/60)*fatDiv;
Form1.txtMao_06_08.value=Convert4Casas(Mao_06_08);

var Ajustado=PorcenNum(Form1.txtMao_06_08.value,Mao_06Ajus);
var CustoItem=Ajustado*Mao_06Fat;
Form1.txtMao_06CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtMao_06_08);
ValidaMilhar(Form1.txtMao_06CstItem);

MaoSoma();
CalcAcumulado();
}

function CalcMao_08()
{

Mao_08_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_08_04.value));
Mao_08_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_08_06.value));
MaoDc_08_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMaoDc_08_08.value));
Mao_08Ajus=TrocaVirgulaPorPonto(Form1.txtMao_08Ajus.value);
Mao_08Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_08Fat.value));

var Mao_08_08=MaoDc_08_08*Mao_08_04*(Mao_08_06/60)*fatDiv;
Form1.txtMao_08_08.value=Convert4Casas(Mao_08_08);

var Ajustado=PorcenNum(Form1.txtMao_08_08.value,Mao_08Ajus);
var CustoItem=Ajustado*Mao_08Fat;
Form1.txtMao_08CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtMao_08_08);
ValidaMilhar(Form1.txtMao_08CstItem);

MaoSoma();
CalcAcumulado();
}

function CalcMao_10()
{
Mao_10_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_10_04.value));
Mao_10_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_10_06.value));
MaoDc_10_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMaoDc_10_08.value));
Mao_10Ajus=TrocaVirgulaPorPonto(Form1.txtMao_10Ajus.value);
Mao_10Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_10Fat.value));

var Mao_10_08=MaoDc_10_08*Mao_10_04*(Mao_10_06/60)*fatDiv;
Form1.txtMao_10_08.value=Convert4Casas(Mao_10_08);

var Ajustado=PorcenNum(Form1.txtMao_10_08.value,Mao_10Ajus);
var CustoItem=Ajustado*Mao_10Fat;
Form1.txtMao_10CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtMao_10_08);
ValidaMilhar(Form1.txtMao_10CstItem);

MaoSoma();
CalcAcumulado();
}

function CalcMao_12()
{
Mao_12_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_12_04.value));
Mao_12_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_12_06.value));
MaoDc_12_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMaoDc_12_08.value));
Mao_12Ajus=TrocaVirgulaPorPonto(Form1.txtMao_12Ajus.value);
Mao_12Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_12Fat.value));

var Mao_12_08=MaoDc_12_08*Mao_12_04*(Mao_12_06/60)*fatDiv;
Form1.txtMao_12_08.value=Convert4Casas(Mao_12_08);

var Ajustado=PorcenNum(Form1.txtMao_12_08.value,Mao_12Ajus);
var CustoItem=Ajustado*Mao_12Fat;
Form1.txtMao_12CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtMao_12_08);
ValidaMilhar(Form1.txtMao_12CstItem);

MaoSoma();
CalcAcumulado();
}

function CalcMao_14()
{
Mao_14_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_14_04.value));
Mao_14_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_14_06.value));
MaoDc_14_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMaoDc_14_08.value));
Mao_14Ajus=TrocaVirgulaPorPonto(Form1.txtMao_14Ajus.value);
Mao_14Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_14Fat.value));

var Mao_14_08=MaoDc_14_08*Mao_14_04*(Mao_14_06/60)*fatDiv;
Form1.txtMao_14_08.value=Convert4Casas(Mao_14_08);

var Ajustado=PorcenNum(Form1.txtMao_14_08.value,Mao_14Ajus);
var CustoItem=Ajustado*Mao_14Fat;
Form1.txtMao_14CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtMao_14_08);
ValidaMilhar(Form1.txtMao_14CstItem);

Form1.txtQld_04_06.value=Form1.txtMao_14_08.value;

MaoSoma();
CalcAcumulado();
}

function CalcMao_16()
{
Mao_16_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_16_04.value));
Mao_16_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_16_06.value));
MaoDc_16_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMaoDc_16_08.value));
Mao_16Ajus=TrocaVirgulaPorPonto(Form1.txtMao_16Ajus.value);
Mao_16Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_16Fat.value));

var Mao_16_08=MaoDc_16_08*Mao_16_04*(Mao_16_06/60)*fatDiv;
Form1.txtMao_16_08.value=Convert4Casas(Mao_16_08);

var Ajustado=PorcenNum(Form1.txtMao_16_08.value,Mao_16Ajus);
var CustoItem=Ajustado*Mao_16Fat;
Form1.txtMao_16CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtMao_16_08);
ValidaMilhar(Form1.txtMao_16CstItem);

MaoSoma();
CalcAcumulado();
}

function MaoSoma()
{
	 a=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_04CstItem.value));
	 b=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_06CstItem.value));
	 c=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_08CstItem.value));
	 d=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_10CstItem.value));
	 e=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_12CstItem.value));
	 f=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_14CstItem.value));
	 g=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_16CstItem.value));
	 	 	 
	 if (a=="")
	 {
	 a=0;
	 }
	 if (b=="")
	 {
	 b=0;
	 }
	 
	 if (c=="")
	 {
	 c=0;
	 }
	 if (d=="")
	 {
	 d=0;
	 }
	 if (e=="")
	 {
	 e=0;
	 }
	 
	 if (f=="")
	 {
	 f=0;
	 }
	 
	 if (g=="")
	 {
	 g=0;
	 }
	 	 
	 h=parseFloat(a)+parseFloat(b)+parseFloat(c)+parseFloat(d)+parseFloat(e)+parseFloat(f)+parseFloat(g);
	 
	 Form1.txtMao_18CstItem.value=Convert4Casas(h);
	 ValidaMilhar(Form1.txtMao_18CstItem);
}
//******* Fim *************** Mão de Obra ******

//******* Inicio *************** Produtividade ******
function CalcPrd()
{
Prd_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrd_04_04.value));
Prd_04Ajus=TrocaVirgulaPorPonto(Form1.txtPrd_04Ajus.value);
Prd_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrd_04Fat.value));

var Ajustado=Prd_04_04*(Prd_04Ajus/100);
var CustoItem=Ajustado*Prd_04Fat;

Form1.txtPrd_04CstItem.value=Convert4Casas(CustoItem);
Form1.txtPrd_06CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtPrd_04CstItem);
ValidaMilhar(Form1.txtPrd_06CstItem);

CalcAcumulado();
}
//******* Fim *************** Produtividade ******

//******* Inicio *************** Flexibilidade ******
function CalcFlx()
{
 Flx_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFlx_04_04.value));
 Flx_04_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFlx_04_06.value));
 Flx_04Ajus=TrocaVirgulaPorPonto(Form1.txtFlx_04Ajus.value);
 Flx_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFlx_04Fat.value));
 Prc_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrc_04_04.value));
 Prd_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrd_04_04.value));
  
 if(Flx_04_04=="" || Flx_04_04==0)
 {
 Form1.txtFlx_04_08.value=Convert4Casas(0);
 Form1.txtFlx_04CstItem.value=Convert4Casas(0);
 Form1.txtFlx_06CstItem.value=Convert4Casas(0);
 }
 else
 {
 var Flx_04_08=((Flx_04_06/60)*Prc_04_04*Prd_04_04)/Flx_04_04;
 Form1.txtFlx_04_08.value=Convert4Casas(Flx_04_08);
 
 var Ajustado=PorcenNum(Form1.txtFlx_04_08.value,Flx_04Ajus);

var CustoItem=Ajustado*Flx_04Fat;

Form1.txtFlx_04CstItem.value=Convert4Casas(CustoItem);
Form1.txtFlx_06CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtFlx_04_08);
ValidaMilhar(Form1.txtFlx_04CstItem);
ValidaMilhar(Form1.txtFlx_06CstItem); 
} 
 


}



//################## AVISO ################################################
// função criada para recalcular toda vez que houver mudancas no prd_04_04
// não é necessário neste caso fazer a soma já que a soma sera feita logo
// apos a chamada da funcao no calculo do acumulado
// sem esta o programa entraria em looping infinito							*/
function CalcFlxAcu()
{
CalcFlx();
CalcAcumulado();  
}
//******* Fim *************** Flexibilidade ******
 

//******* Inicio *************** Estoque ******
/* Usa custo de peça da produtividade,
 valor total, valor residual e numero de anos da depreciação */

function CalcEst_04()
{
 Est_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_04_04.value));
 Est_04_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_04_06.value));
 Est_04_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_04_10.value));
 Est_04Ajus=TrocaVirgulaPorPonto(Form1.txtEst_04Ajus.value);
 Est_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_04Fat.value));
 Dpr_06_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06_06.value));
 Dpr_06_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06_08.value));
 Dpr_06_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06_10.value));
 Prd_06CstItem=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrd_06CstItem.value));
 PrdDc_08_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrdDc_08_04.value));
 PrdDc_14_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrdDc_14_04.value));
 
 if (Dpr_06_10=="" || Dpr_06_10==0)
 {
  Form1.txtEst_04_08.value=Convert4Casas(0);
  Form1.txtEst_04CstItem.value=Convert4Casas(0);
  
 }
 else
 { 	
	var a=(Dpr_06_06-Dpr_06_08)*(Est_04_04/100);
	var b=(PrdDc_08_04*PrdDc_14_04*Dpr_06_10);
	
	Est_04_08=(a/b)*fatDiv;	
	
		
	Form1.txtEst_04_12.value=Convert4Casas(Est_04_08+((Prd_06CstItem*(Est_04_10/100))*(Est_04_06/30)));
	Form1.txtEst_04_08.value=Convert4Casas(Est_04_08);
	
var Ajustado=PorcenNum(Form1.txtEst_04_12.value,Est_04Ajus);

var CustoItem=Ajustado*Est_04Fat;

Form1.txtEst_04CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtEst_04_08);
ValidaMilhar(Form1.txtEst_04_12);
ValidaMilhar(Form1.txtEst_04CstItem);   
 
 }
EstSoma();
}

function CalcEst_06()
{
 Est_06_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_06_04.value));
 Est_06_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_06_06.value));
 Est_06_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_06_10.value));
 Est_06Ajus=TrocaVirgulaPorPonto(Form1.txtEst_06Ajus.value);
 Est_06Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_06Fat.value));
 Dpr_06_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06_06.value));
 Dpr_06_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06_08.value));
 Dpr_06_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06_10.value));
 Prd_06CstItem=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrd_06CstItem.value));
 PrdDc_08_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrdDc_08_04.value));
 PrdDc_14_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrdDc_14_04.value));
 
 if (Dpr_06_10=="" || Dpr_06_10==0)
 {
  Form1.txtEst_04_08.value=Convert4Casas(0);
  Form1.txtEst_04CstItem.value=Convert4Casas(0);
  
 }
 else
 { 	
	var a=(Dpr_06_06-Dpr_06_08)*(Est_06_04/100);
	var b=(PrdDc_08_04*PrdDc_14_04*Dpr_06_10);
	
	Est_06_08=(a/b)*fatDiv;		
	
		
	Form1.txtEst_06_12.value=Convert4Casas(Est_06_08+((  Prd_06CstItem  *(Est_06_10/100))*(Est_06_06/30)));
	
	Form1.txtEst_06_08.value=Convert4Casas(Est_06_08);
	
var Ajustado=PorcenNum(Form1.txtEst_06_12.value,Est_04Ajus);

var CustoItem=Ajustado*Est_06Fat;

Form1.txtEst_06CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtEst_06_08);
ValidaMilhar(Form1.txtEst_06_12);
ValidaMilhar(Form1.txtEst_06CstItem); 
 
 }
EstSoma();
}

function EstSoma()
{
	 a=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_04CstItem.value));
	 b=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_06CstItem.value));
		 
	 a=a.replace(',','.');
	 b=b.replace(',','.');
	 
	 
	 	 
	 if (a=="")
	 {
	 a=0;
	 }
	 if (b=="")
	 {
	 b=0;
	 }
	 	 	 
	 c=parseFloat(a)+parseFloat(b);
	 
	 Form1.txtEst_08CstItem.value=Convert4Casas(c);
	 ValidaMilhar(Form1.txtEst_08CstItem);
}

function CalcEst_04Acu()
{
CalcEst_04();
CalcAcumulado();
}
function CalcEst_06Acu()
{
CalcEst_06();
CalcAcumulado();
}
//******* Fim *************** Estoque ******

//******* Inicio *************** Qualidade ******
function CalcQld_04()
{
Qld_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_04_04.value));
Qld_04Ajus=TrocaVirgulaPorPonto(Form1.txtQld_04Ajus.value);
Qld_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_04Fat.value));
Mao_16CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_16CstAcu.value));

Form1.txtQld_04_06.value=Convert4Casas((Qld_04_04/100)*Mao_16CstAcu);

 var Ajustado=PorcenNum(Form1.txtQld_04_06.value,Qld_04Ajus);

var CustoItem=Ajustado*Qld_04Fat;

Form1.txtQld_04CstItem.value=Convert4Casas(CustoItem);
ValidaMilhar(Form1.txtQld_04_06);
ValidaMilhar(Form1.txtQld_04CstItem);
QldSoma();

}

function CalcQld_06()
{
Qld_06_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_06_04.value));
Qld_06Ajus=TrocaVirgulaPorPonto(Form1.txtQld_06Ajus.value);
Qld_06Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_06Fat.value));
Mao_16CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_16CstAcu.value));

Form1.txtQld_06_06.value=Convert4Casas((Qld_06_04/100)*Mao_16CstAcu);

 var Ajustado=PorcenNum(Form1.txtQld_06_06.value,Qld_06Ajus);

var CustoItem=Ajustado*Qld_06Fat;

Form1.txtQld_06CstItem.value=Convert4Casas(CustoItem);
ValidaMilhar(Form1.txtQld_06_06);
ValidaMilhar(Form1.txtQld_06CstItem);
QldSoma();
}

function QldSoma()
{
	 a=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_04CstItem.value));
	 b=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_06CstItem.value));
	 
	 if (a=="")
	 {
	 a=Convert4Casas(0);
	 }
	 if (b=="")
	 {
	 b=Convert4Casas(0);
	 }
	 	 	 
	 c=parseFloat(a)+parseFloat(b);
	 
	 Form1.txtQld_08CstItem.value=Convert4Casas(c);
	 ValidaMilhar(Form1.txtQld_08CstItem);
}

function CalcQld_04Acu()
{
CalcQld_04();
CalcAcumulado();
}

function CalcQld_06Acu()
{
CalcQld_06();
CalcAcumulado();
}
//******* Fim ****************** Qualidade ******

//******* Inicio *************** Manutenção ******

function CalcMnt()
{
	CalcMnt_04Acu();
	CalcMnt_06Acu();
	CalcMnt_08Acu();
	CalcMnt_10Acu();
	MntSoma();
}
// *************** Manutenção 04 ****** 
 function CalcMnt_04()
{
	if(Form1.rblMnt_04[0].checked)
	{
		CalcMnt_04Porcen();
	}
	else
	{
		CalcMnt_04Valor();
	}
	MntSoma();	
}

 function CalcMnt_04Porcen()
{
	Mnt_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_04_04.value));
	Mnt_04Ajus=TrocaVirgulaPorPonto(Form1.txtMnt_04Ajus.value);
	Mnt_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_04Fat.value));
	Qld_06CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_06CstAcu.value));

	Form1.txtMnt_04_06.value=Convert4Casas(Qld_06CstAcu*(Mnt_04_04/100));

	var Ajustado=PorcenNum(Form1.txtMnt_04_06.value,Mnt_04Ajus);

	var CustoItem=Ajustado*Mnt_04Fat;
	//alert(Ajustado);
	Form1.txtMnt_04CstItem.value=Convert4Casas(CustoItem);
	ValidaMilhar(Form1.txtMnt_04_06);
	ValidaMilhar(Form1.txtMnt_04CstItem);	
}

 function CalcMnt_04Valor()
{
	Mnt_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_04_04.value));
	Mnt_04Ajus=TrocaVirgulaPorPonto(Form1.txtMnt_04Ajus.value);
	Mnt_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_04Fat.value));
	Qld_06CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_06CstAcu.value));
	PrdDc_10_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrdDc_10_04.value));
	
	Form1.txtMnt_04_06.value=Convert4Casas(Mnt_04_04/PrdDc_10_04);

	var Ajustado=PorcenNum(Form1.txtMnt_04_06.value,Mnt_04Ajus);

	var CustoItem=Ajustado*Mnt_04Fat;

	Form1.txtMnt_04CstItem.value=Convert4Casas(CustoItem);
	ValidaMilhar(Form1.txtMnt_04_06);
	ValidaMilhar(Form1.txtMnt_04CstItem);
}

function CalcMnt_04Acu()
{
	CalcMnt_04();
	CalcAcumulado();
}

// *************** Manutenção 06 ******
function CalcMnt_06()
{
	if(Form1.rblMnt_06[0].checked)
	{
		CalcMnt_06Porcen();
	}
	else
	{
		CalcMnt_06Valor();
	}
	MntSoma();	
}

 function CalcMnt_06Porcen()
{
	Mnt_06_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_06_04.value));
	Mnt_06Ajus=TrocaVirgulaPorPonto(Form1.txtMnt_06Ajus.value);
	Mnt_06Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_06Fat.value));
	Mnt_04CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_04CstAcu.value));

	Form1.txtMnt_06_06.value=Convert4Casas(Mnt_04CstAcu*(Mnt_06_04/100));

	var Ajustado=PorcenNum(Form1.txtMnt_06_06.value,Mnt_06Ajus);

	var CustoItem=Ajustado*Mnt_06Fat;

	Form1.txtMnt_06CstItem.value=Convert4Casas(CustoItem);
	ValidaMilhar(Form1.txtMnt_06_06);
	ValidaMilhar(Form1.txtMnt_06CstItem);	
}

 function CalcMnt_06Valor()
{
	Mnt_06_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_06_04.value));
	Mnt_06Ajus=TrocaVirgulaPorPonto(Form1.txtMnt_06Ajus.value);
	Mnt_06Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_06Fat.value));
	Mnt_04CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_04CstAcu.value));
	PrdDc_10_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrdDc_10_04.value));
	
	Form1.txtMnt_06_06.value=Convert4Casas(Mnt_06_04/PrdDc_10_04);

	var Ajustado=PorcenNum(Form1.txtMnt_06_06.value,Mnt_06Ajus);

	var CustoItem=Ajustado*Mnt_06Fat;

	Form1.txtMnt_06CstItem.value=Convert4Casas(CustoItem);
	ValidaMilhar(Form1.txtMnt_06_06);
	ValidaMilhar(Form1.txtMnt_06CstItem);
}

function CalcMnt_06Acu()
{
	CalcMnt_06();
	CalcAcumulado();
}

// *************** Manutenção 08 ******
function CalcMnt_08()
{
	if(Form1.rblMnt_08[0].checked)
	{
		CalcMnt_08Porcen();
	}
	else
	{
		CalcMnt_08Valor();
	}
	MntSoma();	
}

 function CalcMnt_08Porcen()
{
	Mnt_08_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_08_04.value));
	Mnt_08Ajus=TrocaVirgulaPorPonto(Form1.txtMnt_08Ajus.value);
	Mnt_08Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_08Fat.value));
	Mnt_06CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_06CstAcu.value));

	Form1.txtMnt_08_06.value=Convert4Casas(Mnt_06CstAcu*(Mnt_08_04/100));

	var Ajustado=PorcenNum(Form1.txtMnt_08_06.value,Mnt_08Ajus);

	var CustoItem=Ajustado*Mnt_08Fat;

	Form1.txtMnt_08CstItem.value=Convert4Casas(CustoItem);
	ValidaMilhar(Form1.txtMnt_08_06);
	ValidaMilhar(Form1.txtMnt_08CstItem);	
}

 function CalcMnt_08Valor()
{
	Mnt_08_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_08_04.value));
	Mnt_08Ajus=TrocaVirgulaPorPonto(Form1.txtMnt_08Ajus.value);
	Mnt_08Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_08Fat.value));
	Mnt_06CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_06CstAcu.value));
	PrdDc_10_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrdDc_10_04.value));
	
	Form1.txtMnt_08_06.value=Convert4Casas(Mnt_08_04/PrdDc_10_04);

	var Ajustado=PorcenNum(Form1.txtMnt_08_06.value,Mnt_08Ajus);

	var CustoItem=Ajustado*Mnt_08Fat;

	Form1.txtMnt_08CstItem.value=Convert4Casas(CustoItem);
	ValidaMilhar(Form1.txtMnt_08_06);
	ValidaMilhar(Form1.txtMnt_08CstItem);
}

function CalcMnt_08Acu()
{
	CalcMnt_08();
	CalcAcumulado();
}

// *************** Manutenção 10 ******
function CalcMnt_10()
{
	if(Form1.rblMnt_10[0].checked)
	{
		CalcMnt_10Porcen();
	}
	else
	{
		CalcMnt_10Valor();
	}
	MntSoma();	
}

 function CalcMnt_10Porcen()
{
	Mnt_10_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_10_04.value));
	Mnt_10Ajus=TrocaVirgulaPorPonto(Form1.txtMnt_10Ajus.value);
	Mnt_10Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_10Fat.value));
	Mnt_08CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_08CstAcu.value));

	Form1.txtMnt_10_06.value=Convert4Casas(Mnt_08CstAcu*(Mnt_10_04/100));

	var Ajustado=PorcenNum(Form1.txtMnt_10_06.value,Mnt_10Ajus);

	var CustoItem=Ajustado*Mnt_10Fat;

	Form1.txtMnt_10CstItem.value=Convert4Casas(CustoItem);
	ValidaMilhar(Form1.txtMnt_10_06);
	ValidaMilhar(Form1.txtMnt_10CstItem);	
}

 function CalcMnt_10Valor()
{
	Mnt_10_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_10_04.value));
	Mnt_10Ajus=TrocaVirgulaPorPonto(Form1.txtMnt_10Ajus.value);
	Mnt_10Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_10Fat.value));
	Mnt_08CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_08CstAcu.value));
	PrdDc_10_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrdDc_10_04.value));
	
	Form1.txtMnt_06_06.value=Convert4Casas(Mnt_06_04/PrdDc_10_04);

	var Ajustado=PorcenNum(Form1.txtMnt_06_06.value,Mnt_10Ajus);

	var CustoItem=Ajustado*Mnt_10Fat;

	Form1.txtMnt_10CstItem.value=Convert4Casas(CustoItem);
	ValidaMilhar(Form1.txtMnt_10_06);
	ValidaMilhar(Form1.txtMnt_10CstItem);
}

function CalcMnt_10Acu()
{
	CalcMnt_10();
	CalcAcumulado();
}

function MntSoma()
{
	 a=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_04CstItem.value));
	 b=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_06CstItem.value));
	 c=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_08CstItem.value));
	 d=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_10CstItem.value));
	 
	 if (a=="")
	 {
	 a=Convert4Casas(0);
	 }
	 if (b=="")
	 {
	 b=Convert4Casas(0);
	 }
	 if (c=="")
	 {
	 c=Convert4Casas(0);
	 }
	 if (d=="")
	 {
	 d=Convert4Casas(0);
	 }
	 	 	 
	 e=parseFloat(a)+parseFloat(b)+parseFloat(c)+parseFloat(d);
	 
	 Form1.txtMnt_12CstItem.value=Convert4Casas(e);
	 ValidaMilhar(Form1.txtMnt_08CstItem);
}

//******* Fim *************** Manutenção ******

//******* Inicio ****************** Incremento de Produção ******
function CalcIpr()
{
 var result=0;
 
 Ipr_04_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtIpr_04_04.value));
 Ipr_04_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtIpr_04_06.value));
 Ipr_04_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtIpr_04_08.value));
 Ipr_06_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtIpr_06_10.value));
 Ipr_04_12=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtIpr_04_12.value));
 Ipr_06_12=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtIpr_06_12.value));
 
 fator=0;
 fator=(parseFloat(Ipr_04_04)+parseFloat(Ipr_04_06))-parseFloat(Ipr_04_08);
 
 if(parseFloat(Ipr_04_08)==0)
 {
 result=0;
 }
 else
 {
  if(parseFloat(Ipr_04_04)>=parseFloat(Ipr_04_08))
  {
  result=0;
  }
  else
  {
	a=parseFloat(Ipr_04_04)+parseFloat(Ipr_04_06);
	
	if(a<parseFloat(Ipr_04_08))
	{
		result=Ipr_04_06;
	}
	else
	{
	  result=parseFloat(Ipr_04_08)-parseFloat(Ipr_04_04);
	}
  }
 
 }
  Form1.txtIpr_04_14.value=(result*Ipr_04_12);
  result=0;
  
  if(Ipr_06_10<=0)
  {
   result=0;
  }
  else
  {
	if(Ipr_04_04>=(parseFloat(Ipr_04_06)+parseFloat(Ipr_06_10)))
	{
	result=0;
	}
	else
	{
	if(((parseFloat(Ipr_04_04)+parseFloat(Ipr_04_06))-parseFloat(fator))<=0)
	{
	result=0;
	}
	else
	{
		if(fator<=Ipr_06_10)
		{
		result=fator;
		}
		else
		{
		 result=Ipr_06_10;
		}
	}
	}
  }

Form1.txtIpr_06_14.value=(result*Ipr_06_12);

Form1.txtIpr_08_14.value=(parseFloat(Form1.txtIpr_04_14.value)+parseFloat(Form1.txtIpr_06_14.value));

Form1.txtIpr_04_14.value=TrocaPontoPorVirgula(Form1.txtIpr_04_14.value);
Form1.txtIpr_06_14.value=TrocaPontoPorVirgula(Form1.txtIpr_06_14.value);
Form1.txtIpr_08_14.value=TrocaPontoPorVirgula(Form1.txtIpr_08_14.value);

ValidaDecimal(Form1.txtIpr_04_14,2);
ValidaDecimal(Form1.txtIpr_06_14,2);
ValidaDecimal(Form1.txtIpr_08_14,2);

ValidaMilhar(Form1.txtIpr_04_14,2);
ValidaMilhar(Form1.txtIpr_06_14,2);
ValidaMilhar(Form1.txtIpr_08_14,2);

}


//******* Fim ****************** Incremento de Produção ******


//******* Inicio ****************** Outros Benefícios Intangíveis ******
function CalcObi_04()
{
Cst_04CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtCst_04CstAcu.value));
Obi_04Ajus=TrocaVirgulaPorPonto(Form1.txtObi_04Ajus.value);
Obi_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_04Fat.value));

var Ajustado=Cst_04CstAcu*(Obi_04Ajus/100);
var CustoItem=Ajustado*Obi_04Fat;

Form1.txtObi_04CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtObi_04CstItem);

ObiSoma();
CalcAcumulado();

}

function CalcObi_06()
{
Obi_04CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_04CstAcu.value));
Obi_06Ajus=TrocaVirgulaPorPonto(Form1.txtObi_06Ajus.value);
Obi_06Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_06Fat.value));

var Ajustado=Obi_04CstAcu*(Obi_06Ajus/100);
var CustoItem=Ajustado*Obi_06Fat;

Form1.txtObi_06CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtObi_06CstItem);

ObiSoma();
CalcAcumulado();
}

function CalcObi_07()
{
Obi_06CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_06CstAcu.value));
Obi_07Ajus=TrocaVirgulaPorPonto(Form1.txtObi_07Ajus.value);
Obi_07Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_07Fat.value));

var Ajustado=Obi_06CstAcu*(Obi_07Ajus/100);
var CustoItem=Ajustado*Obi_07Fat;

Form1.txtObi_07CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtObi_07CstItem);

ObiSoma();
CalcAcumulado();
}

function CalcObi_08()
{
Obi_06CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_06CstAcu.value));
Obi_08Ajus=TrocaVirgulaPorPonto(Form1.txtObi_08Ajus.value);
Obi_08Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_08Fat.value));

var Ajustado=Obi_06CstAcu*(Obi_08Ajus/100);
var CustoItem=Ajustado*Obi_08Fat;

Form1.txtObi_08CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtObi_08CstItem);

ObiSoma();
CalcAcumulado();
}

function CalcObi_10()
{
Obi_08CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_08CstAcu.value));
Obi_10Ajus=TrocaVirgulaPorPonto(Form1.txtObi_10Ajus.value);
Obi_10Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_10Fat.value));

var Ajustado=Obi_08CstAcu*(Obi_10Ajus/100);
var CustoItem=Ajustado*Obi_10Fat;

Form1.txtObi_10CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtObi_10CstItem);

ObiSoma();
CalcAcumulado();

}

function CalcObi_12()
{
Obi_10CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_10CstAcu.value));
Obi_12Ajus=TrocaVirgulaPorPonto(Form1.txtObi_12Ajus.value);
Obi_12Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_12Fat.value));

var Ajustado=Obi_10CstAcu*(Obi_12Ajus/100);
var CustoItem=Ajustado*Obi_12Fat;

Form1.txtObi_12CstItem.value=Convert4Casas(CustoItem);

ValidaMilhar(Form1.txtObi_12CstItem);

ObiSoma();
CalcAcumulado();
}

function ObiSoma()
{
	 a=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_04CstItem.value));
	 b=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_06CstItem.value));
	 c=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_08CstItem.value));
	 d=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_10CstItem.value));
	 e=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_12CstItem.value));
	 
	 g=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_07CstItem.value));
	
	 if (a=="")
	 {
	 a="0,0000";
	 }
	 if (b=="")
	 {
	 b="0,0000";
	 }
	 if (c=="")
	 {
	 c="0,0000";
	 }
	 if (d=="")
	 {
	 d="0,0000";
	 }
	 if (e=="")
	 {
	 e="0,0000";
	 }
	 
	 if (g=="")
	 {
	 g="0,0000";
	 }	 	 	 
	 
	 f=parseFloat(a)+parseFloat(b)+parseFloat(c)+parseFloat(d)+parseFloat(e)+parseFloat(g);
	 
	 Form1.txtObi_14CstItem.value=Convert4Casas(f);
	 
	 ValidaMilhar(Form1.txtObi_14CstItem);
	 }
//******* Fim ****************** Outros Benefícios Intangíveis ******

//******* Inicio ****************** Outros Benefícios Intangíveis ******


//******* Inicio *********** Complemento para preço de venda ******

 function CalcCmp()
 {
 CalcCmp_04();
 CalcCmp_06();
 CalcCmp_08();
 }
function CalcCmp_04()
{
 Csi_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtCsi_04CstAcu.value));
 Cmp_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtCmp_04_04.value));
 Cmp_04Fat=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtCmp_04Fat.value));
  
 var valor=(parseFloat(Csi_04)+parseFloat(Cmp_04))*Cmp_04Fat;
 
 Form1.txtCmp_04CstAcu.value=Convert4Casas(valor);
 
 ValidaMilhar(Form1.txtCmp_04CstAcu);
}

function CalcCmp_06()
{
 Cmp_04Acu=TrocaVirgulaPorPonto(Form1.txtCmp_04CstAcu.value);
 Cmp_06=TrocaVirgulaPorPonto(Form1.txtCmp_06_04.value);
 Cmp_06Fat=TrocaVirgulaPorPonto(Form1.txtCmp_06Fat.value);
  
 var valor=PorcenNum(Cmp_04Acu,Cmp_06)*Cmp_06Fat;
 
 Form1.txtCmp_06CstAcu.value=Convert4Casas(valor);
 ValidaMilhar(Form1.txtCmp_06CstAcu);
 
}

function CalcCmp_08()
{
 Cmp_06Acu=TrocaVirgulaPorPonto(Form1.txtCmp_06CstAcu.value);
 Cmp_08=TrocaVirgulaPorPonto(Form1.txtCmp_08_04.value);
 Cmp_08Fat=TrocaVirgulaPorPonto(Form1.txtCmp_08Fat.value);
  
 var valor=Cmp_06Acu*Cmp_08*Cmp_08Fat;
 
 Form1.txtCmp_08CstAcu.value=Convert4Casas(valor);
 ValidaMilhar(Form1.txtCmp_08CstAcu);
}


//******* Fim *********** Complemento para preço de venda ******

function CalcAcumulado()
{

//todos os custos dos itens
var Acumulador=0;
//***** Depreciação *****************************
txtDpr_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_04CstItem.value));
txtDpr_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06CstItem.value));

Form1.txtDpr_04CstAcu.value=Convert4Casas(txtDpr_04);
Acumulador=parseFloat(txtDpr_04)+parseFloat(txtDpr_06);
Form1.txtDpr_06CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtDpr_04CstAcu);
ValidaMilhar(Form1.txtDpr_06CstAcu);
//***** Depreciação *****************************


//****** Energia *******************************

txtEng_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_04CstItem.value));
txtEng_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_06CstItem.value));

Acumulador=Acumulador+parseFloat(txtEng_04);
Form1.txtEng_04CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtEng_06);
Form1.txtEng_06CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtEng_04CstAcu);
ValidaMilhar(Form1.txtEng_06CstAcu);
//****** Energia *******************************

//****** Ferramental *******************************
txtFer_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_04CstItem.value));
txtFer_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_06CstItem.value));
txtFer_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_08CstItem.value));

Acumulador=Acumulador+parseFloat(txtFer_04);
Form1.txtFer_04CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtFer_06);
Form1.txtFer_06CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtFer_08);
Form1.txtFer_08CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtFer_04CstAcu);
ValidaMilhar(Form1.txtFer_06CstAcu);
ValidaMilhar(Form1.txtFer_08CstAcu);

//****** Ferramental *******************************

//****** Material *******************************
txtMat_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMat_04CstItem.value));

Acumulador=Acumulador+parseFloat(txtMat_04);
Form1.txtMat_04CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtMat_04CstAcu);
//****** Material *******************************

//****** Mão de Obra *******************************
txtMao_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_04CstItem.value));
txtMao_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_06CstItem.value));
txtMao_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_08CstItem.value));
txtMao_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_10CstItem.value));
txtMao_12=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_12CstItem.value));
txtMao_14=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_14CstItem.value));
txtMao_16=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_16CstItem.value));

Acumulador=Acumulador+parseFloat(txtMao_04);
Form1.txtMao_04CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtMao_06);
Form1.txtMao_06CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtMao_08);
Form1.txtMao_08CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtMao_10);
Form1.txtMao_10CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtMao_12);
Form1.txtMao_12CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtMao_14);
Form1.txtMao_14CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtMao_16);
Form1.txtMao_16CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtMao_04CstAcu);
ValidaMilhar(Form1.txtMao_06CstAcu);
ValidaMilhar(Form1.txtMao_08CstAcu);
ValidaMilhar(Form1.txtMao_10CstAcu);
ValidaMilhar(Form1.txtMao_12CstAcu);
ValidaMilhar(Form1.txtMao_14CstAcu);
ValidaMilhar(Form1.txtMao_16CstAcu);

//****** Mão de Obra *******************************

//****** Produtividade *******************************
txtPrd_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrd_04CstItem.value));

Form1.txtPrd_04_04.value=Form1.txtMao_16CstAcu.value;

		//******** e necessário chamar esta função aqui por depender deste valor acima
		CalcFlx();
		CalcEst_04();
		CalcEst_06();		

Acumulador=Acumulador+parseFloat(txtPrd_04);
Form1.txtPrd_04CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtPrd_04CstAcu);

//****** Produtividade *******************************

//****** Flexibilidade ******************************
txtFlx_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFlx_04CstItem.value));

Acumulador=Acumulador+parseFloat(txtFlx_04);
Form1.txtFlx_04CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtFlx_04CstAcu);

//****** Flexibilidade ******************************

//****** Estoque ************************************

txtEst_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_04CstItem.value));
txtEst_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_06CstItem.value));

Acumulador=Acumulador+parseFloat(txtEst_04);
Form1.txtEst_04CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtEst_06);
Form1.txtEst_06CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtEst_04CstAcu);
ValidaMilhar(Form1.txtEst_06CstAcu);

CalcQld_04();
CalcQld_06();

//****** Estoque ************************************

//****** Qualidade ************************************
txtQld_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_04CstItem.value));
txtQld_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_06CstItem.value));

Acumulador=Acumulador+parseFloat(txtQld_04);
Form1.txtQld_04CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtQld_06);
Form1.txtQld_06CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtQld_04CstAcu);
ValidaMilhar(Form1.txtQld_06CstAcu);

//****** Qualidade ************************************

//****** Manutenção *******************************
txtMnt_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_04CstItem.value));
txtMnt_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_06CstItem.value));
txtMnt_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_08CstItem.value));
txtMnt_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_10CstItem.value));


Acumulador=Acumulador+parseFloat(txtMnt_04);
Form1.txtMnt_04CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtMnt_06);
Form1.txtMnt_06CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtMnt_08);
Form1.txtMnt_08CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtMnt_10);
Form1.txtMnt_10CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtMnt_04CstAcu);
ValidaMilhar(Form1.txtMnt_06CstAcu);
ValidaMilhar(Form1.txtMnt_08CstAcu);
ValidaMilhar(Form1.txtMnt_10CstAcu);

//****** Manutenção *******************************

//****** Custo ***********************************
Form1.txtCst_04CstAcu.value=Convert4Casas(Acumulador);

//****** Custo ***********************************

//****** Outros Benefícios Intangíveis ***********************************
txtObi_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_04CstItem.value));
txtObi_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_06CstItem.value));
txtObi_07=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_07CstItem.value));
txtObi_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_08CstItem.value));
txtObi_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_10CstItem.value));
txtObi_12=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_12CstItem.value));

Acumulador=Acumulador+parseFloat(txtObi_04);
Form1.txtObi_04CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtObi_06);
Form1.txtObi_06CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtObi_07);
Form1.txtObi_07CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtObi_08);
Form1.txtObi_08CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtObi_10);
Form1.txtObi_10CstAcu.value=Convert4Casas(Acumulador);

Acumulador=Acumulador+parseFloat(txtObi_12);
Form1.txtObi_12CstAcu.value=Convert4Casas(Acumulador);

ValidaMilhar(Form1.txtObi_04CstAcu);
ValidaMilhar(Form1.txtObi_06CstAcu);
ValidaMilhar(Form1.txtObi_07CstAcu);
ValidaMilhar(Form1.txtObi_08CstAcu);
ValidaMilhar(Form1.txtObi_10CstAcu);
ValidaMilhar(Form1.txtObi_12CstAcu);

//****** Outros Benefícios Intangíveis ***********************************

// ******** Custo após intangíveis *********************************

Form1.txtCsi_04CstAcu.value=Convert4Casas(Acumulador);
ValidaMilhar(Form1.txtCsi_04CstAcu);
CalcCmp();
// ******** Custo após intangíveis *********************************

PorcenAcumulado();
}

//******* Fim *********** calculo do Acumulado ****** 


//******* Inicio *********** calculo do Acumulado ******

function PorcenAcumulado()
{

Csi_04CstAcu=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtCsi_04CstAcu.value));

if(Csi_04CstAcu==0 || Csi_04CstAcu=="")
{
 Csi_04CstAcu=1;
}
//***** Depreciação *****************************
txtDpr_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_04CstItem.value));
txtDpr_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_06CstItem.value));
txtDpr_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtDpr_08CstItem.value));

Form1.txtDpr_04Porcen.value=Convert4Casas((txtDpr_04/Csi_04CstAcu)*100);
Form1.txtDpr_06Porcen.value=Convert4Casas((txtDpr_06/Csi_04CstAcu)*100);
Form1.txtDpr_08Porcen.value=Convert4Casas((txtDpr_08/Csi_04CstAcu)*100);
//***** Depreciação *****************************


//****** Energia *******************************

txtEng_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_04CstItem.value));
txtEng_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_06CstItem.value));
txtEng_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEng_08CstItem.value));

Form1.txtEng_04Porcen.value=Convert4Casas((txtEng_04/Csi_04CstAcu)*100);
Form1.txtEng_06Porcen.value=Convert4Casas((txtEng_06/Csi_04CstAcu)*100);
Form1.txtEng_08Porcen.value=Convert4Casas((txtEng_08/Csi_04CstAcu)*100);

//****** Energia *******************************

//****** Ferramental *******************************
txtFer_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_04CstItem.value));
txtFer_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_06CstItem.value));
txtFer_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_08CstItem.value));
txtFer_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFer_10CstItem.value));

Form1.txtFer_04Porcen.value=Convert4Casas((txtFer_04/Csi_04CstAcu)*100);
Form1.txtFer_06Porcen.value=Convert4Casas((txtFer_06/Csi_04CstAcu)*100);
Form1.txtFer_08Porcen.value=Convert4Casas((txtFer_08/Csi_04CstAcu)*100);
Form1.txtFer_10Porcen.value=Convert4Casas((txtFer_10/Csi_04CstAcu)*100);
//****** Ferramental *******************************

//****** Material *******************************
txtMat_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMat_04CstItem.value));
txtMat_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMat_06CstItem.value));

Form1.txtMat_04Porcen.value=Convert4Casas((txtMat_04/Csi_04CstAcu)*100);
Form1.txtMat_06Porcen.value=Convert4Casas((txtMat_06/Csi_04CstAcu)*100);

//****** Material *******************************

//****** Mão de Obra *******************************
txtMao_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_04CstItem.value));
txtMao_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_06CstItem.value));
txtMao_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_08CstItem.value));
txtMao_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_10CstItem.value));
txtMao_12=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_12CstItem.value));
txtMao_14=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_14CstItem.value));
txtMao_16=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_16CstItem.value));
txtMao_18=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMao_18CstItem.value));

Form1.txtMao_04Porcen.value=Convert4Casas((txtMao_04/Csi_04CstAcu)*100);
Form1.txtMao_06Porcen.value=Convert4Casas((txtMao_06/Csi_04CstAcu)*100);
Form1.txtMao_08Porcen.value=Convert4Casas((txtMao_08/Csi_04CstAcu)*100);
Form1.txtMao_10Porcen.value=Convert4Casas((txtMao_10/Csi_04CstAcu)*100);
Form1.txtMao_12Porcen.value=Convert4Casas((txtMao_12/Csi_04CstAcu)*100);
Form1.txtMao_14Porcen.value=Convert4Casas((txtMao_14/Csi_04CstAcu)*100);
Form1.txtMao_16Porcen.value=Convert4Casas((txtMao_16/Csi_04CstAcu)*100);
Form1.txtMao_18Porcen.value=Convert4Casas((txtMao_18/Csi_04CstAcu)*100);

//****** Mão de Obra *******************************

//****** Produtividade *******************************
txtPrd_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrd_04CstItem.value));
txtPrd_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtPrd_06CstItem.value));

Form1.txtPrd_04Porcen.value=Convert4Casas((txtPrd_04/Csi_04CstAcu)*100);
Form1.txtPrd_06Porcen.value=Convert4Casas((txtPrd_06/Csi_04CstAcu)*100);
//****** Produtividade *******************************

//****** Flexibilidade ******************************
txtFlx_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFlx_04CstItem.value));
txtFlx_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtFlx_06CstItem.value));

Form1.txtFlx_04Porcen.value=Convert4Casas((txtFlx_04/Csi_04CstAcu)*100);
Form1.txtFlx_06Porcen.value=Convert4Casas((txtFlx_06/Csi_04CstAcu)*100);

//****** Flexibilidade ******************************

//****** Estoque ************************************

txtEst_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_04CstItem.value));
txtEst_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_06CstItem.value));
txtEst_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtEst_08CstItem.value));

Form1.txtEst_04Porcen.value=Convert4Casas((txtEst_04/Csi_04CstAcu)*100);
Form1.txtEst_06Porcen.value=Convert4Casas((txtEst_06/Csi_04CstAcu)*100);
Form1.txtEst_08Porcen.value=Convert4Casas((txtEst_08/Csi_04CstAcu)*100);

//****** Estoque ************************************

//****** Qualidade ************************************
txtQld_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_04CstItem.value));
txtQld_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_06CstItem.value));
txtQld_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtQld_08CstItem.value));

 Form1.txtQld_04Porcen.value=Convert4Casas((txtQld_04/Csi_04CstAcu)*100);
 Form1.txtQld_06Porcen.value=Convert4Casas((txtQld_06/Csi_04CstAcu)*100);
 Form1.txtQld_08Porcen.value=Convert4Casas((txtQld_08/Csi_04CstAcu)*100);
//****** Qualidade ************************************

//****** Manutenção *******************************
txtMnt_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_04CstItem.value));
txtMnt_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_06CstItem.value));
txtMnt_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_08CstItem.value));
txtMnt_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_10CstItem.value));
txtMnt_12=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtMnt_12CstItem.value));

Form1.txtMnt_04Porcen.value=Convert4Casas((txtMnt_04/Csi_04CstAcu)*100);
Form1.txtMnt_06Porcen.value=Convert4Casas((txtMnt_06/Csi_04CstAcu)*100);
Form1.txtMnt_08Porcen.value=Convert4Casas((txtMnt_08/Csi_04CstAcu)*100);
Form1.txtMnt_10Porcen.value=Convert4Casas((txtMnt_10/Csi_04CstAcu)*100);
Form1.txtMnt_12Porcen.value=Convert4Casas((txtMnt_12/Csi_04CstAcu)*100);

//****** Manutenção *******************************

//****** Outros Benefícios Intangíveis ***********************************
txtObi_04=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_04CstItem.value));
txtObi_06=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_06CstItem.value));
txtObi_07=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_07CstItem.value));
txtObi_08=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_08CstItem.value));
txtObi_10=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_10CstItem.value));
txtObi_12=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_12CstItem.value));
txtObi_14=TrocaVirgulaPorPonto(TiraSeparadorMilhar(Form1.txtObi_14CstItem.value));

Form1.txtObi_04Porcen.value=Convert4Casas((txtObi_04/Csi_04CstAcu)*100);
Form1.txtObi_06Porcen.value=Convert4Casas((txtObi_06/Csi_04CstAcu)*100);
Form1.txtObi_07Porcen.value=Convert4Casas((txtObi_07/Csi_04CstAcu)*100);
Form1.txtObi_08Porcen.value=Convert4Casas((txtObi_08/Csi_04CstAcu)*100);
Form1.txtObi_10Porcen.value=Convert4Casas((txtObi_10/Csi_04CstAcu)*100);
Form1.txtObi_12Porcen.value=Convert4Casas((txtObi_12/Csi_04CstAcu)*100);
Form1.txtObi_14Porcen.value=Convert4Casas((txtObi_14/Csi_04CstAcu)*100);

//****** Outros Benefícios Intangíveis ***********************************

// ******** Porcentagem após intangíveis *********************************
Dpr_08Porcen=TrocaVirgulaPorPonto(Form1.txtDpr_08Porcen.value);
Eng_08Porcen=TrocaVirgulaPorPonto(Form1.txtEng_08Porcen.value);
Fer_10Porcen=TrocaVirgulaPorPonto(Form1.txtFer_10Porcen.value);
Mat_06Porcen=TrocaVirgulaPorPonto(Form1.txtMat_06Porcen.value);
Mao_18Porcen=TrocaVirgulaPorPonto(Form1.txtMao_18Porcen.value);
Prd_06Porcen=TrocaVirgulaPorPonto(Form1.txtPrd_06Porcen.value);
Flx_06Porcen=TrocaVirgulaPorPonto(Form1.txtFlx_06Porcen.value);
Est_08Porcen=TrocaVirgulaPorPonto(Form1.txtEst_08Porcen.value);
Qld_08Porcen=TrocaVirgulaPorPonto(Form1.txtQld_08Porcen.value);
Mnt_12Porcen=TrocaVirgulaPorPonto(Form1.txtMnt_12Porcen.value);
Obi_14Porcen=TrocaVirgulaPorPonto(Form1.txtObi_14Porcen.value);

var valor=parseFloat(Dpr_08Porcen)+parseFloat(Eng_08Porcen)+parseFloat(Fer_10Porcen)+parseFloat(Mat_06Porcen)+parseFloat(Mao_18Porcen)+parseFloat(Prd_06Porcen)+parseFloat(Flx_06Porcen)+parseFloat(Est_08Porcen)+parseFloat(Qld_08Porcen)+parseFloat(Mnt_12Porcen)+parseFloat(Obi_14Porcen);

Form1.txtCsi_04Porcen.value=formatCurrency(valor);

// ******** Porcentagem após intangíveis *********************************

}

//******* Fim *********** calculo de Porcentagens ******