function ongletClick(ong) {
	f=document.frm;
	if (strtoint(f.revenus.value)<=0) {
		f.revenus.focus();
		alert("Veuillez indiquez vos revenus annuels.");
	} else {
		l="index.php?id_apporteur="+document.frm.id_apporteur.value;
		l+="&onglet="+ong;
		l+="&monnaie="+f.monnaie.value;
		l+="&param="+f.param.value;
		l+="&montantProjet="+strtoint(f.montantProjet.value);
		l+="&fraisNotaire="+strtoint(f.fraisNotaire.value);
		l+="&apport="+strtofloat(f.apport.value);
		l+="&montantPret="+strtoint(f.montantPret.value);
		l+="&duree="+strtoint(f.duree.value);
		l+="&dureeAug="+strtoint(f.dureeAug.value);
		l+="&taux="+strtofloat(f.taux.value);
		l+="&tauxAug="+strtofloat(f.tauxAug.value);
		l+="&tauxAugDur="+strtofloat(f.tauxAugDur.value);
		l+="&revenus="+strtoint(f.revenus.value);
		l+="&endettement="+strtofloat(f.endettement.value);
		l+="&fraisGarantie="+strtoint(f.fraisGarantie.value);
		l+="&tauxAssurance="+strtofloat(f.tauxAssurance.value);
		onglet=document.frm.onglet.value;
		if ((onglet==1)||(onglet==9)) {
			l+="&etudier="+(f.etudier[0].checked?0:1);
			l+="&typeProjet="+f.typeProjet.selectedIndex;
			l+="&apportType="+f.apportType.selectedIndex;
		} else {
			l+="&etudier="+f.etudier.value;
			l+="&typeProjet="+f.typeProjet.value;
			l+="&apportType="+f.apportType.value;
		}
		location=l;
	}
	return false;
}

function convertClick() {
	f=document.frm;
	onglet=f.onglet.value;
	monnaie=f.monnaie.value;
	coeff=(monnaie==0) ? 1/pariteEuro : pariteEuro;
	f.monnaie.value=1-monnaie;
	f.montantProjet.value=inttostr(Math.round(strtoint(f.montantProjet.value)*coeff));
	f.fraisNotaire.value=inttostr(Math.round(strtoint(f.fraisNotaire.value)*coeff));
	f.fraisGarantie.value=inttostr(Math.round(strtoint(f.fraisGarantie.value)*coeff));
	if (f.apportType.selectedIndex==0)
		f.apport.value=inttostr(Math.round(strtoint(f.apport.value)*coeff));
	f.montantPret.value=inttostr(Math.round(strtoint(f.montantPret.value)*coeff));
	f.revenus.value=inttostr(Math.round(strtoint(f.revenus.value)*coeff));
	return ongletClick(onglet);
}

function calcClick(o) {
	onglet=document.frm.onglet.value;
	return ongletClick((onglet==9)?9:o);
}

function etudierClick() {
	crd=document.frm.etudier[1].checked;
	document.frm.montantProjet.disabled=crd;
	document.frm.montantProjet.className=crd?"fdclair":"";
	if (crd) document.frm.montantProjet.value="";
}

function montantProjetChange() {
	if (document.frm.typeProjet.selectedIndex==1) {
		calcNotaire();
		notaireChange();
	} else {
		calcGarantie();
		garantieChange();
	}
}

function apportChange() {
	f=document.frm;
	if (f.apportType.selectedIndex==0)
		f.apport.value=inttostr(strtoint(f.apport.value))
	else
		f.apport.value=floattostr(strtofloat(f.apport.value));
	calcGarantie();
	garantieChange();
}

function typeProjetChange() {
	if (document.frm.typeProjet.selectedIndex==0) {
		btnCalcNotaireClick()
	} else {
		calcNotaire();
		notaireChange();
	}
}

function notaireChange() {
	calcGarantie();
	garantieChange();
}

function btnCalcNotaireClick() {
	window.open("evaluation_mensualites_notaire.php?id_apporteur="+document.frm.id_apporteur.value+"&ach="+strtoint(document.frm.montantProjet.value)+"&mnn="+document.frm.monnaie.value,"calc","width=610,height=405");
	return false;
}

function garantieChange() {
	calcMontantPret();
}

function dureeChange() {
	d=document.frm.duree.value;
	if (d>26) {
		document.frm.duree.value=26;
		document.frm.dureeAug.value=1;
	} else if (d<2) {
		document.frm.duree.value=2;
	}
}

function dureeAugChange() {
	da=document.frm.dureeAug.value;
	if (da>5) {
		document.frm.dureeAug.value=5;
	} else if (da<1) {
		document.frm.dureeAug.value=1;
	}
}

var frprop;
function mep(v,t) {
	frprop=frprop+v*t/100;
}
function calcNotaire() {
	montantProjet=strtoint(document.frm.montantProjet.value);
	if (montantProjet>0) {
		monnaie=document.frm.monnaie.value;
		valeurFr=(monnaie==0)?montantProjet:montantProjet*pariteEuro;
		
		frprop=0;
		if (valeurFr<=20000) mep(valeurFr,5)
		else {
			mep(20000,5);
			if (valeurFr<=40000) mep(valeurFr-20000,3.3)
			else {
				mep(40000-20000,3.3);
				if (valeurFr<=110000) mep(valeurFr-40000,1.65)
				else {
					mep(110000-40000,1.65);
					mep(valeurFr-110000,0.825);
		} } }
		frprop=frprop*1.196;
		
		honax=1800;

		if (valeurFr>=1500000) debours=4500
		else if (valeurFr>=1000000) debours=3000
		else if (valeurFr>=500000) debours=2500
		else if (valeurFr>=200000) debours=1500
		else debours=1000;

		taxe=valeurFr*(3.6+1.2+.09)/100;

		r=frprop+honax+debours+taxe;
		if (monnaie==1) r=r/pariteEuro;
		document.frm.fraisNotaire.value=inttostr(r);
	} else {
		document.frm.fraisNotaire.value="";
	}
}

function calcGarantie() {
	f=document.frm;
	montantProjet=strtoint(f.montantProjet.value);
	notaire=strtoint(f.fraisNotaire.value);
	if (f.apportType.selectedIndex==0)
		montantApport=strtoint(f.apport.value)
	else
		montantApport=(montantProjet+notaire)*strtofloat(f.apport.value)/100;

	m=montantProjet+notaire-montantApport;
	monnaie=document.frm.monnaie.value;
	if (monnaie==0) m=m/pariteEuro;
	
	if (m>=92000) fmg=(m-92000)*.014+1284
	else if (m>=46000) fmg=(m-46000)*.008+916
	else if (m>=30400) fmg=(m-30400)*.01+760
	else fmg=m*.025;

	if (m>=100000) com=500
	else if (m>=20000) com=m*.005
	else if (m>0) com=100
	else com=0;

	r=Math.max(fmg+com,0);
	if (monnaie==0) r=r*pariteEuro;
	f.fraisGarantie.value=inttostr(r);
}

function calcMontantPret() {
	f=document.frm;
	montantProjet=strtoint(f.montantProjet.value);
	notaire=strtoint(f.fraisNotaire.value);
	var montantApport;
	if (f.apportType.selectedIndex==0)
		montantApport=strtoint(f.apport.value)
	else
		montantApport=(montantProjet+notaire)*strtofloat(f.apport.value)/100;
	fraisGarantie=strtoint(f.fraisGarantie.value);
	montantPret=Math.max(montantProjet+notaire+fraisGarantie-montantApport,0);
	f.montantPret.value=inttostr(montantPret);
}