//function parentDo() {
//	if (window.parent.length!=0) {
//		parent.iFrameHeight();
//	}
//}

function ongletClick(ong) {
	f=document.frm;

	l="index.php?id_apporteur="+f.id_apporteur.value+"&param="+f.param.value+"&ong="+ong+"&mnn="+f.monnaie.value;

	l+="&mnt="+strtoint(f.montant.value);
	l+="&txi1="+strtofloat(f.tauxInteret1.value);
	l+="&txi2="+strtofloat(f.tauxInteret2.value);
	l+="&txi3="+strtofloat(f.tauxInteret3.value);
	l+="&txi4="+strtofloat(f.tauxInteret4.value);
	
	l+="&txa="+strtofloat(f.tauxAssurance.value);

	if (onglet==1) {
		l+="&debm="+(f.debutmois.selectedIndex+1);
		l+="&deba="+f.debutannee.options[f.debutannee.selectedIndex].text;
		l+="&dur1="+f.duree1.options[f.duree1.selectedIndex].text;
		l+="&dur2="+f.duree2.options[f.duree2.selectedIndex].text;
		l+="&dur3="+f.duree3.options[f.duree3.selectedIndex].text;
		l+="&dur4="+f.duree4.options[f.duree4.selectedIndex].text;
		l+="&couple="+f.couple.selectedIndex;
		l+="&pers="+f.personne.selectedIndex;
	} else {
		l+="&debm="+f.debutmois.value;
		l+="&deba="+f.debutannee.value;
		l+="&dur1="+f.duree1.value;
		l+="&dur2="+f.duree2.value;
		l+="&dur3="+f.duree3.value;
		l+="&dur4="+f.duree4.value;
		l+="&couple="+f.couple.value;
		l+="&pers="+f.personne.value;
	}

	location=l;
	return false;
}

function convertClick() {
	f=document.frm;
	monnaie=1-f.monnaie.value;
	f.monnaie.value=monnaie;
	coeff=(monnaie==1)?1/pariteEuro:pariteEuro;

	f.montant.value=inttostr(Math.round(strtoint(f.montant.value)*coeff));

	return ongletClick(onglet);
}

function dureeChange(i) {
	f=document.frm;
	var d=eval("f.duree"+i+".options[f.duree"+i+".selectedIndex].text");
	var t=eval("f.tauxInteretDef"+d+".value");
	eval("f.tauxInteret"+i+".value=floattostr(t)");
	calcCol(i);
}

function calcCoefPret(i,duree) {
	return Math.pow(1+i,duree);
}

function calcMens(mnt,dur,txi,txa) {
	mis=dur*12;
	if (modeAssurance==1) {
		txm=(txi+txa)/1200;
		prw=calcCoefPret(txm,mis);
		result=mnt*prw*txm/(prw-1);
	} else {
		txm=txi/1200;
		prw=calcCoefPret(txm,mis);
		result=mnt*(prw*txm/(prw-1)+txa/1200);
	}
	return result;
}

function calculer() {
	calcCol(1);
	calcCol(2);
	calcCol(3);
	calcCol(4);
}

function calcCol(c) {
	f=document.frm;
	var montant=strtoint(f.montant.value);
	var tauxInteret=eval("strtofloat(f.tauxInteret"+c+".value)");
	var tauxAssurance=strtofloat(f.tauxAssurance.value);
	var debutMois, debutAnnee, couple, personne, duree;
	if (onglet==1) {
		debutMois=f.debutmois.selectedIndex+1;
		debutAnnee=parseInt(f.debutannee.options[f.debutannee.selectedIndex].text);
		couple=f.couple.selectedIndex;
		personne=f.personne.selectedIndex;
		duree=eval("f.duree"+c+".options[f.duree"+c+".selectedIndex].text");
	} else {
		debutMois=parseInt(f.debutmois.value);
		debutAnnee=parseInt(f.debutannee.value);
		couple=parseInt(f.couple.value);
		personne=parseInt(f.personne.value);
		duree=parseInt(eval("f.duree"+c+".value"));
	}
	var mensualite=calcMens(montant,duree,tauxInteret,tauxAssurance);
	var deductionMaxi;
	if ((debutAnnee==2007)&&(debutMois<05)) {
		deductionMaxi=0;
		if (onglet==1) {
			f.deductionMaxi.value="";
			f.deductionMaxi2.value="";
		}
	} else {
		deductionMaxi=((couple==0)?750:1500)+personne*100;
		if (onglet==1) {
			f.deductionMaxi.value=inttostr(deductionMaxi*2,0);
			f.deductionMaxi2.value=inttostr(deductionMaxi,0);
		}
	}
	var plafondMensuel=deductionMaxi/12;
	
	var reste=montant;
	var t5=0;
	var t10=0;
	var v,sv;
	var interetAn=0;
	var assuranceAn=0;
	var deductionAn=0;
	var remboursAn=0;
	var capitalAn=0;
	
	var anneeCal=debutAnnee;
	var moisCal=debutMois;
	var moisNum=0;
	var ligne=1;
	var derniereLigne=(onglet==1)?6:10;
	
	while (ligne<=derniereLigne) {
		var interet=reste*tauxInteret/1200;
//alert("interet="+interet);		
		var assurance=((modeAssurance==1)?reste:montant)*tauxAssurance/1200;
		principal=mensualite-interet-assurance;
		reste-=principal;
		interetAn+=interet;
		assuranceAn+=assurance;
		remboursAn+=mensualite;
		capitalAn+=principal;
	
//	if ((c==2) && (ligne==1))
//		if confirm("hhh")
//			sdfsedf=222;
//if ((c==2) && (ligne<3)) alert("reste="+reste+" tauxInteret="+tauxInteret+" tauxAssurance="+tauxAssurance+" mensualite="+mensualite+" principal="+principal+" interet="+interet+" interetAn="+interetAn+" montant="+montant+" reste="+reste);

		if ((moisNum<deductionDuree*12)&&(((anneeCal==2007)&&(moisCal>=5))||(anneeCal>=2008))) {
			var deductionPourcent=((moisNum<12)?deductionPourcent1:deductionPourcent2)/100;
			var plafMens=((moisNum<12)?2:1)*plafondMensuel;
			var montantDeduction=Math.min(interet*deductionPourcent,plafMens);
			deductionAn+=montantDeduction;
			interetAn-=montantDeduction;
			remboursAn-=montantDeduction;
		}
		
		if (moisCal%12==0) {
			v=(onglet==1)?deductionAn:((onglet==2)?interetAn:((onglet==3)?capitalAn:reste));
			sv=(v==0)?"-":(inttostr(v,0));
			eval("f.d"+ligne+c+".value='"+sv+"'");
			if(ligne<=5) t5+=v;
			t10+=v;
			
			interetAn=0;
			assuranceAn=0;
			deductionAn=0;
			remboursAn=0;
			capitalAn=0;
			
			ligne++;
			anneeCal++;
		}
		
		moisCal++;
		moisNum++;
	}
	if (onglet!=4) {
		if (onglet!=1) {
			sv=(t5==0)?"-":(inttostr(t5,0));
			eval("f.t5"+c+".value='"+sv+"'");
		}
		sv=(t10==0)?"-":(inttostr(t10,0));
		eval("f.t10"+c+".value='"+sv+"'");
	}
}

