//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;
		l+="&handicape="+f.handicape.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;
		l+="&handicape="+f.handicape.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 debutChange() {
	f=document.frm;
	var a=strtoint(f.debutannee.options[f.debutannee.selectedIndex].text);
	f.a1.value=a; f.a2.value=a+1; f.a3.value=a+2;
	f.a4.value=a+3; f.a5.value=a+4; f.a6.value=a+5;
	calculer();
}

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;
		handicape=f.handicape.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);
		handicape=parseInt(f.handicape.value);
		duree=parseInt(eval("f.duree"+c+".value"));
	}
	var mensualite=calcMens(montant,duree,tauxInteret,tauxAssurance);
	var deductionMaxi;
	var assietteMaxi;
	if ((debutAnnee==2007)&&(debutMois<05)) {
		deductionMaxi=0;
		if (onglet==1) {
			f.deductionMaxi.value="";
			f.deductionMaxi2.value="";
		}
		assietteMaxi=0;
	} else {
		deductionMaxi=(couple==0)?750:1500;
		if (handicape==1) deductionMaxi*=2;
		deductionMaxi+=personne*100;
		deductionMaxi*=toMonnaie;
		if (onglet==1) {
			f.deductionMaxi.value=inttostr(deductionMaxi*2,0);
			f.deductionMaxi2.value=inttostr(deductionMaxi,0);
		}
		assietteMaxi=(couple==0)?3750:7500;
		if (handicape==1) assietteMaxi*=2;
		assietteMaxi+=personne*500;
		assietteMaxi*=toMonnaie;
	}
	
	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 assiette1=0;
	var assiette2=0;
	var monnaie=(f.monnaie.value=="0")?" F":" ¤";
	//var monnaie="";
	
	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;
		var assurance=((modeAssurance==1)?reste:montant)*tauxAssurance/1200;
		principal=mensualite-interet-assurance;
		reste-=principal;
		interetAn+=interet;
		assuranceAn+=assurance;
		remboursAn+=mensualite;
		capitalAn+=principal;
	
		if ((moisNum<deductionDuree*12)&&(((anneeCal==2007)&&(moisCal>=5))||(anneeCal>=2008))) {
			if (moisNum<12) {
				assiette1+=interet;
				assiette1=Math.min(assiette1,assietteMaxi);
			} else {
				assiette2+=interet;
				assiette2=Math.min(assiette1+assiette2,assietteMaxi)-assiette1;
			}
		}
		
		if (moisCal%12==0) {
			deductionAn=(assiette1*deductionPourcent1+assiette2*deductionPourcent2)/100;
			interetAn-=deductionAn;
			remboursAn-=deductionAn;

			v=(onglet==1)?deductionAn:((onglet==2)?interetAn:((onglet==3)?capitalAn:reste));
			sv=(v==0)?"-":(inttostr(v,0)+monnaie);
			eval("f.d"+ligne+c+".value='"+sv+"'");
			if(ligne<=5) t5+=v;
			t10+=v;
			
			interetAn=0;
			assuranceAn=0;
			deductionAn=0;
			remboursAn=0;
			capitalAn=0;
			assiette1=0;
			assiette2=0;
			
			ligne++;
			anneeCal++;
		}
		
		moisCal++;
		moisNum++;
	}
	if (onglet!=4) {
		if (onglet!=1) {
			sv=(t5==0)?"-":(inttostr(t5,0)+monnaie);
			eval("f.t5"+c+".value='"+sv+"'");
		}
		sv=(t10==0)?"-":(inttostr(t10,0)+monnaie);
		eval("f.t10"+c+".value='"+sv+"'");
	}
}
