﻿//Copyright Gérard Lumbreras Breizh Credit
var lp_Taux=0;var Pret="";var Immobilier="";var lp_TxPer=0;var Credit="";var lp_TxAs=0;var Meilleur="";var lp_Assur=0;var Breizh="";var lp_TEG1=0;var Emprunt="";var lp_TEG2=0;var Bretagne="";var lp_Capital=0;var Finistere="";var Communaute=""
var Brest="";var Banque="";var Courtier="";var lp_DifHA1=0;var Saint="";var lp_DifHA2=0;var Nazaire="";var lp_DifHA3=0;var Loire="";var lp_DifAC1=0;var Atlantique="";var lp_DifAC2=0;var Limoges="";var lp_DifAC3=0;var Haute="";var lp_EchHA1=0
var Vienne="";var lp_EchHA2=0;var Depart1="";var lp_EchAC1=0;var Depart2="";var lp_EchAC2=0;var Depart3="";var lp_CoutAs=0;var Assurance="";var lp_CoutInt=0;var Comparer="";var lp_CoutTot=0;var Rachat="";var lp_Calcul=0;var lp_TypeDif=0
var lp_Frais=0;var lp_KCourant=0;var lp_Compt=0;var _DO_=null;var _PAGE_=null
function _ARR(v,d){v*=Math.pow(10,d);v=Math.round(v);return v/Math.pow(10,d)}
function _JRW(s){for(var i=0;i<s.length;i++)if(s[i].checked)return i+1}
function _VAL(v){var r=parseFloat(v);return isNaN(r)?0:r}
function _JCX(v){r=v.toString(16);return r.length==1?"0"+r:r}
function _SAE(c,o){var d=0;var f=c.length-1;if(o&1)while(c.charAt(d)==" ")d++;if(o&2)while(c.charAt(f)==" ")f--;if (f < d) f= d;return c.substring(d,f+1)}
function _RMP(c,o,r){var p=0;var t=c.indexOf(o);var s=new String();while(t!=-1){s+=c.substring(p,t);s+=r;p=t+o.length;t=c.indexOf(o,p);		}s+=c.substring(p,c.length);return s}
function EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,nBase){var szRes=Math.abs(Math.round(fVal)).toString(nBase);var nLgr=szRes.length;if(bSigne||(fVal<0))nLgr++;if(bMillier){var szRes2=""
for(var i=0;i<Math.ceil(szRes.length/3);i++){szRes2=szRes.substring(szRes.length-(3*(i+1)),szRes.length-(3*i))+" "+szRes2;nLgr++}szRes=szRes2.substring(0,szRes2.length-1);nLgr--}if(nLgr<eval(nTaille)){if(bCadrageGauche){while(nLgr<eval(nTaille)){
szRes+=" ";nLgr++}}else{if(bZero){while(nLgr<eval(nTaille)){if(bMillier&&(((nLgr)%4)==0))szRes=" "+szRes;else szRes="0"+szRes;nLgr++}}else{while(nLgr<eval(nTaille)){szRes=" "+szRes;nLgr++}}}}if(bSigne||(fVal<0)){var n=0
while((szRes.charAt(n)==" ")&&(n<nLgr))n++;var szSgn="+";if(fVal<0)szSgn="-";szRes=szRes.substring(0,n)+szSgn+szRes.substring(n,szRes.length)}return szRes}
function EXE_NVC_d(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,10)}
function EXE_NVC_x(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,16)}
function EXE_NVC_o(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,8)}
function EXE_NVC_e(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){var nExp=Math.round(Math.log(Math.abs(fVal))/Math.LN10);var fPuiss=Math.pow(10,nExp);var szRes=EXE_NVC_f(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,(fVal/fPuiss))
while(szRes.charAt(szRes.length-1)==" ")szRes=szRes.substring(0,szRes.length-1);szRes+="e";if(nExp>=0)szRes+="+";else szRes+="-";if(nExp<10)szRes+="0";szRes+=Math.abs(nExp);while(szRes.length<nTaille)if(bCadrageGaucHe)szRes+=" ";else szRes=" "+szRes
return szRes}
function EXE_NVC_f(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){var fEnt=Math.floor(fVal);if(fVal<0)fEnt+=1;var szDec=""+(Math.round((Math.abs(fVal)-Math.floor(Math.abs(fVal)))*Math.pow(10,nPrec))/Math.pow(10,nPrec))
szDec=szDec.substring(2,szDec.length);var szRes=EXE_NVC_d(bCadrageGauche,bSigne,bZero,nTaille-(nPrec+1),nPrec,bMillier,fEnt);if(bCadrageGauche)while(szRes.charAt(szRes.length-1)==" ")szRes=szRes.substring(0,szRes.length-1)
while(szRes.charAt(0)==" ")szRes=szRes.substr(1);if(nPrec>0){szRes+=".";while(szDec.length<nPrec)szDec+="0";szRes+=szDec.substring(0,nPrec)}while(szRes.length<nTaille)if(bCadrageGauche)szRes+=" ";else szRes=" "+szRes;return szRes}
function EXE_NVC_D(bCadrageGauche,bSigne,bZero,nTaille,nPreC,bMillier,fVal){return EXE_NVC_d(bcadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function EXE_NVC_E(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC_e(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function EXE_NVC_O(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC_o(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function EXE_NVC_X(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){var szRes = EXE_NVC_x(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal);return szRes.toUpperCase()}
function EXE_NVC_F(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC_f(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function _NVC(fVal,szFormat){if(isNaN(fVal))return fVal;var bCadrageGauche=false;var bSigne=false;var bZero=false;var nTaille=0;var nPrec=0;var szType="f";var bMillier=false;if(szFormat.charAt(0)=="-"){bCadrageGauche=true
szFormat=szFormat.substring(1,szFormat.length)}if(szFormat.charAt(0)=="+"){bSigne=true;szFormat=szFormat.substring(1,szFormat.length)}if(szFormat.charAt(0)=="0"){bZero=true;szFormat=szFormat.substring(1,szFormat.length)}
if((szFormat.charAt(szFormat.length-1)=="s")||(szFormat.charAt(szFormat.length-1)=="S")){bMillier=true;szFormat=szFormat.substring(0,szFormat.length-1)}szType=szFormat.charAt(szFormat.length-1);szFormat=szFormat.substring(0,szFormat.length-1)
if((szType!="d")&&(szType!="e")&&(szType!="f")&&(szType!="o")&&(szType!="x")&&(szType!="D")&&(szType!="E")&&(szType!="F")&&(szType!="O")&&(szType!="X"))return"";nTaille=parseInt(szFormat)
if(szFormat.indexOf(".")!=-1)nPrec=parseInt(szFormat.substring(szFormat.indexOf(".")+1,szFormat.length));else{var szEnt=""+fVal;var szDec=""+fVal;var nPosPt=szDec.indexOf(".");if(nPosPt!=-1){szDec=szDec.substring(nPosPt+1)
szEnt=szEnt.substring(nPosPt-1);nPrec=nTaille-(szEnt.length+1)}}return eval("EXE_NVC_"+szType+"("+bCadrageGauche+","+bSigne+","+bZero+","+nTaille+","+nPrec+","+bMillier+","+fVal+")")}
function Rondir(VFP_NOMBRE, VFP_BORNE ){{var VFP_X1=0;var VFP_X2=0;if((VFP_BORNE>=0)){if((VFP_BORNE>16)){VFP_BORNE=16}VFP_X2=_ARR((VFP_NOMBRE*Math.pow(10,VFP_BORNE)),0);VFP_X1=(VFP_X2*Math.pow(10,(-VFP_BORNE)))}if((VFP_BORNE<0)){if((VFP_BORNE<-4)){
VFP_BORNE=-4}VFP_X2=_ARR((VFP_NOMBRE*Math.pow(10,VFP_BORNE)),0);VFP_X1=(VFP_X2*Math.pow(10,Math.abs(VFP_BORNE)))}return(VFP_X1)}}
function Tronque(VFP_NOMBRE, VFP_BORNE ){{var VFP_X1=0;var VFP_X2=0;if((VFP_BORNE==0)){VFP_X1=Math.floor(VFP_NOMBRE)}if((VFP_BORNE>0)){if((VFP_BORNE>12)){VFP_BORNE=12}
VFP_X2=Math.floor((Math.abs(VFP_NOMBRE)-Math.floor(Math.abs(VFP_NOMBRE))*Math.pow(10,VFP_BORNE)));VFP_X1=(Math.floor(VFP_NOMBRE)+(VFP_X2*Math.pow(10,(-VFP_BORNE))))}if((VFP_BORNE<0)){if((VFP_BORNE<-4)){VFP_BORNE=-4}
VFP_X2=Math.floor((VFP_NOMBRE*Math.pow(10,VFP_BORNE)));VFP_X1=(VFP_X2*Math.pow(10,Math.abs(VFP_BORNE)))}return(VFP_X1)}}
function TxAn(VFP_TAUX, VFP_PERIO, VFP_MODETX ){{if (VFP_PERIO==undefined) VFP_PERIO=12;if (VFP_MODETX==undefined) VFP_MODETX=1;{var VFP_X1=0
if((((((((((((VFP_PERIO!=1)&&(VFP_PERIO!=2))&&(VFP_PERIO!=3))&&(VFP_PERIO!=4))&&(VFP_PERIO!=6))&&(VFP_PERIO!=12))&&(VFP_PERIO!=24))&&(VFP_PERIO!=52))&&(VFP_PERIO!=360))&&(VFP_PERIO!=365))&&(VFP_PERIO!=366))){VFP_PERIO=12}
if(((VFP_MODETX!=1)&&(VFP_MODETX!=2))){VFP_MODETX=1}if(((VFP_TAUX*Math.pow(10,6))==0)){VFP_X1=0}else {;if((VFP_MODETX==1)){VFP_X1=(VFP_TAUX*VFP_PERIO)}if((VFP_MODETX!=1)){VFP_X1=(Math.pow((1+VFP_TAUX),VFP_PERIO)-1)}}return(VFP_X1)}}}
function TxPer(VFP_TAUX, VFP_PERIO, VFP_MODETX ){{if (VFP_PERIO==undefined) VFP_PERIO=12;if (VFP_MODETX==undefined) VFP_MODETX=1;{var VFP_X1=0
if((((((((((((VFP_PERIO!=1)&&(VFP_PERIO!=2))&&(VFP_PERIO!=3))&&(VFP_PERIO!=4))&&(VFP_PERIO!=6))&&(VFP_PERIO!=12))&&(VFP_PERIO!=24))&&(VFP_PERIO!=52))&&(VFP_PERIO!=360))&&(VFP_PERIO!=365))&&(VFP_PERIO!=366))){VFP_PERIO=12}
if(((VFP_MODETX!=1)&&(VFP_MODETX!=2))){VFP_MODETX=1}if((VFP_TAUX==0)){VFP_X1=0}if((VFP_TAUX!=0)){if((VFP_MODETX==1)){VFP_X1=(VFP_TAUX/VFP_PERIO)}if((VFP_MODETX==2)){VFP_X1=(Math.pow((1+VFP_TAUX),(1/VFP_PERIO))-1)}}return(VFP_X1)}}}
function _T0(){{lp_Taux=0;Pret="";lp_ModeTx=0;Immobilier="";lp_TxPer=0;Credit="";lp_TxAs=0;Meilleur="";lp_Assur=0;Breizh="";lp_TEG1=0;Emprunt="";lp_TEG2=0;Bretagne="";lp_Capital=0;Finistere="";lp_Duree=0;Ville=new Array(300)
for(__ww__init_tab_0=0;__ww__init_tab_0<(300);__ww__init_tab_0++);Ville[__ww__init_tab_0]="";lp_Differe=0;Communaute="";lp_Npm=0;Brest="";lp_Perio=0;Banque="";lp_Terme=0;Courtier="";lp_DifHA1=0;Saint="";lp_DifHA2=0;Nazaire="";lp_DifHA3=0;Loire=""
lp_DifAC1=0;Atlantique="";lp_DifAC2=0;Limoges="";lp_DifAC3=0;Haute="";lp_EchHA1=0;Vienne="";lp_EchHA2=0;Depart1="";lp_EchAC1=0;Depart2="";lp_EchAC2=0;Depart3="";lp_CoutAs=0;Assurance="";lp_CoutInt=0;Comparer="";lp_CoutTot=0;Rachat="";lp_Calcul=0
lp_TypeDif=0;lp_Frais=0;lp_KCourant=0;lp_Compt=0;lp_Rang=new Array(300);for(__ww__init_tab_0=0;__ww__init_tab_0<(300);__ww__init_tab_0++);lp_Rang[__ww__init_tab_0]=0;lp_KRDD=new Array(300)
for(__ww__init_tab_0=0;__ww__init_tab_0<(300);__ww__init_tab_0++);lp_KRDD[__ww__init_tab_0]=0;lp_Int=new Array(300);for(__ww__init_tab_0=0;__ww__init_tab_0<(300);__ww__init_tab_0++);lp_Int[__ww__init_tab_0]=0;lp_AsMois=new Array(300)
for(__ww__init_tab_0=0;__ww__init_tab_0<(300);__ww__init_tab_0++);lp_AsMois[__ww__init_tab_0]=0;lp_Ech=new Array(300);for(__ww__init_tab_0=0;__ww__init_tab_0<(300);__ww__init_tab_0++);lp_Ech[__ww__init_tab_0]=0;lp_Report=new Array(300)
for(__ww__init_tab_0=0;__ww__init_tab_0<(300);__ww__init_tab_0++);lp_Report[__ww__init_tab_0]=0;lp_Cout=new Array(300);for(__ww__init_tab_0=0;__ww__init_tab_0<(300);__ww__init_tab_0++);lp_Cout[__ww__init_tab_0]=0;Depart1=29;Depart2=44;Depart3=87
lp_Perio=12;lp_ModeTx=1;lp_Calcul=2;lp_TypeDif=1;Ville[(1)-1]="Saint";Ville[(2)-1]="Sainte";Ville[(3)-1]="St";Ville[(4)-1]="Ste";Ville[(31)-1]="Brest";Ville[(32)-1]="Gouesnou";Ville[(33)-1]="Guipavas";Ville[(34)-1]="Le Relecq Kerhuon"
Ville[(35)-1]="Plougastel Daoulas";Ville[(36)-1]="Saint Renan";Ville[(37)-1]="Lambezellec"}}
function _T1(){{_PAGE_.A1.value="Jauge de traitement";lp_Calcul=_JRW(_PAGE_.A12);switch(lp_Calcul){case 1:{if((_VAL(_PAGE_.A2.value)>24)){_PAGE_.A2.value="24"}if(((_VAL(_PAGE_.A14.value)>24)||(_VAL(_PAGE_.A14.value)>_VAL(_PAGE_.A2.value)))){
_PAGE_.A14.value=_PAGE_.A2.value}}break;case 2:{if((_VAL(_PAGE_.A2.value)>24)){_PAGE_.A2.value="24"}_PAGE_.A14.value=""}break;case 3:{_PAGE_.A14.value=""}break;default:{_PAGE_.A12.focus()
if(window.event!=null){if(window.event!=undefined){window.event.returnValue = false;}};return}break}}}
function _T2(){{lp_Calcul=_JRW(_PAGE_.A12);switch(lp_Calcul){case 1:{if((_VAL(_PAGE_.A2.value)>24)){_PAGE_.A2.value="24"}if(((_VAL(_PAGE_.A14.value)>24)||(_VAL(_PAGE_.A14.value)>_VAL(_PAGE_.A2.value)))){_PAGE_.A14.value=_PAGE_.A2.value}}break;case 2:
{if((_VAL(_PAGE_.A2.value)>24)){_PAGE_.A2.value="24"}_PAGE_.A14.value=""}break;case 3:{_PAGE_.A14.value=""}break;default:{_PAGE_.A12.focus();if(window.event!=null){if(window.event!=undefined){window.event.returnValue = false;}};return}break}
_PAGE_.A1.value="Jauge de traitement"}}
function _T3(){{if((((_JRW(_PAGE_.A12)!=1)&&(_JRW(_PAGE_.A12)!=2))&&(_JRW(_PAGE_.A12)!=3))){_PAGE_.A12[1-1].checked=true;lp_Calcul=_JRW(_PAGE_.A12);_PAGE_.A1.value="Jauge de traitement"}}}
function _T4(){{if(((_JRW(_PAGE_.A13)!=1)&&(_JRW(_PAGE_.A13)!=2))){_PAGE_.A13[1-1].checked=true}}}
function _T5(){{_PAGE_.A2.style.color="#000040";if((lp_Calcul==3)){if((Math.floor(_VAL(_SAE(_PAGE_.A2.value,3)))>300)){_PAGE_.A2.value="300"}else {;_PAGE_.A2.value=Math.floor(_VAL(_PAGE_.A2.value))}}else {
if((Math.floor(_VAL(_SAE(_PAGE_.A2.value,3)))>24)){_PAGE_.A2.value="24"}else {;_PAGE_.A2.value=Math.floor(_VAL(_PAGE_.A2.value))}}}}
function _T6(){{_PAGE_.A2.style.color="#000040";if((lp_Calcul!=1)){_PAGE_.A14.value=""}else {;if((Math.floor(_VAL(_SAE(_PAGE_.A14.value,3)))>Math.floor(_VAL(_SAE(_PAGE_.A2.value,3))))){_PAGE_.A14.value=Math.floor(_VAL(_PAGE_.A2.value))}
if((Math.floor(_VAL(_SAE(_PAGE_.A14.value,3)))>24)){_PAGE_.A14.value="24"}else {;_PAGE_.A14.value=Math.floor(_VAL(_PAGE_.A14.value))}}}}
function _T7(){{_PAGE_.A4.style.color="#000040";_PAGE_.A4.value=_RMP(_RMP(_SAE(_PAGE_.A4.value,3)," ",""),",",".");_PAGE_.A4.value=_NVC(_VAL(_PAGE_.A4.value),"12.2fS")}}
function _T8(){{_PAGE_.A15.style.color="#000040";if(((_VAL(_RMP(_PAGE_.A4.value," ",""))*0.1)<_VAL(_RMP(_PAGE_.A15.value," ","")))){if((!confirm(	unescape("Les frais sont sup%E9rieurs %E0 10% du capital. Confirmez-vous ?")))){_PAGE_.A15.value=""
_PAGE_.A15.focus();if(window.event!=null){if(window.event!=undefined){window.event.returnValue = false;}};return}}_PAGE_.A15.value=_RMP(_RMP(_SAE(_PAGE_.A15.value,3)," ",""),",",".");_PAGE_.A15.value=_NVC(_VAL(_PAGE_.A15.value),"12.2fS")}}
function _T9(){{_PAGE_.A6.style.color="#000040";if((_VAL(_PAGE_.A6.value)==0)){_PAGE_.A6.focus();if(window.event!=null){if(window.event!=undefined){window.event.returnValue = false;}};return}_PAGE_.A6.value=_RMP(_SAE(_PAGE_.A6.value,3),",",".")
_PAGE_.A6.value=_NVC(_VAL(_PAGE_.A6.value),"9.6fS")}}
function _T10(){{_PAGE_.A16.style.color="#000040";_PAGE_.A16.value=_RMP(_SAE(_PAGE_.A16.value,3),",",".");_PAGE_.A16.value=_NVC(_VAL(_PAGE_.A16.value),"9.6fS")}}
function _T11(){{var VLP_CHAINE="";_PAGE_.A18.value="";_PAGE_.A19.value="";_PAGE_.A9.value="";_PAGE_.A25.value="";_PAGE_.A26.value="";_PAGE_.A1.value="Traitement en cours. Merci de patienter.";if((lp_ModeTx==1)){
lp_TxPer=(_VAL(_PAGE_.A6.value)/1200)}else {;lp_TxPer=(Math.pow((1+(_VAL(_PAGE_.A6.value)/100)),(1/lp_Perio))-1)}lp_Calcul=_JRW(_PAGE_.A12);lp_TypeDif=_JRW(_PAGE_.A13);lp_Assur=(_VAL(_PAGE_.A16.value)/12)
lp_Capital=_VAL(_RMP(_PAGE_.A4.value," ",""));lp_Frais=_VAL(_RMP(_PAGE_.A15.value," ",""));lp_Differe=_VAL(_PAGE_.A14.value);lp_Duree=(_VAL(_PAGE_.A2.value)-_VAL(_PAGE_.A14.value));lp_Npm=_VAL(_PAGE_.A2.value);lp_CoutAs=((lp_Capital*lp_Assur)/100)
if(((lp_Calcul==1)&&((_JRW(_PAGE_.A13)!=1)&&(_JRW(_PAGE_.A13)!=2)))){_PAGE_.A13[1-1].checked=true;lp_TypeDif=_JRW(_PAGE_.A13)}if((lp_Calcul==1)){if(((((lp_Capital==0)||(lp_Npm==0))||(lp_Differe==0))||(lp_TxPer==0))){
alert(	unescape("Donn%E9es manquantes. Merci de revoir la saisie"));return}}else {;if((((lp_Capital==0)||(lp_Npm==0))||(lp_TxPer==0))){alert(	unescape("Donn%E9es manquantes. Merci de revoir la saisie"));return}}lp_Compt=1
_PAGE_.A18.value=	unescape("Rang      KRD              Int.          Ass.        Ech.            Report%E9s")
_PAGE_.A18.value=((_PAGE_.A18.value+	unescape("\r\n"))+"-----------------------------------------------------------------------------");lp_KCourant=lp_Capital;if((lp_Calcul==3)){while((lp_Compt<=lp_Npm)){lp_Rang[(lp_Compt)-1]=lp_Compt
lp_KRDD[(lp_Compt)-1]=lp_KCourant;lp_Int[(lp_Compt)-1]=(lp_KCourant*lp_TxPer);lp_AsMois[(lp_Compt)-1]=lp_CoutAs;lp_Report[(lp_Compt)-1]=0;if((lp_Compt<lp_Npm)){lp_Ech[(lp_Compt)-1]=(lp_Int[(lp_Compt)-1]+lp_AsMois[(lp_Compt)-1])}else {
lp_Ech[(lp_Compt)-1]=((lp_KRDD[(lp_Compt)-1]+lp_Int[(lp_Compt)-1])+lp_AsMois[(lp_Compt)-1])}if((lp_Compt==1)){
VLP_CHAINE=((((((((((_NVC(lp_Compt,"03d")+"  ")+_NVC(lp_KRDD[(lp_Compt)-1],"12.2fS"))+"  ")+_NVC(lp_Int[(lp_Compt)-1],"9.2fS"))+"  ")+_NVC(lp_AsMois[(lp_Compt)-1],"8.2fS"))+	unescape("\t"))+_NVC(lp_Ech[(lp_Compt)-1],"10.2fS"))+	unescape("\t"))+_NVC(lp_Report[(lp_Compt)-1],"10.2fS"))
lp_Cout[(lp_Compt)-1]=lp_Ech[(lp_Compt)-1]}else {
VLP_CHAINE=((((((((((((VLP_CHAINE+	unescape("\r\n"))+_NVC(lp_Compt,"03d"))+"  ")+_NVC(lp_KRDD[(lp_Compt)-1],"12.2fS"))+"  ")+_NVC(lp_Int[(lp_Compt)-1],"9.2fS"))+"  ")+_NVC(lp_AsMois[(lp_Compt)-1],"8.2fS"))+	unescape("\t"))+_NVC(lp_Ech[(lp_Compt)-1],"10.2fS"))+	unescape("\t"))+_NVC(lp_Report[(lp_Compt)-1],"10.2fS"))
lp_Cout[(lp_Compt)-1]=(lp_Cout[((lp_Compt-1))-1]+lp_Ech[(lp_Compt)-1])}lp_Compt=lp_Compt+1}}else {;while((lp_Compt<=lp_Npm)){lp_Rang[(lp_Compt)-1]=lp_Compt;if((lp_Compt<=lp_Differe)){if((lp_Compt==1)){lp_KRDD[(lp_Compt)-1]=lp_KCourant
lp_Int[(lp_Compt)-1]=(lp_KCourant*lp_TxPer);lp_AsMois[(lp_Compt)-1]=lp_CoutAs;lp_Ech[(lp_Compt)-1]=lp_AsMois[(lp_Compt)-1];lp_Report[(lp_Compt)-1]=lp_Int[(lp_Compt)-1]}else {;if(((lp_Compt%12)==1)){
lp_KCourant=(lp_KCourant+lp_Report[((lp_Compt-1))-1]);lp_KRDD[(lp_Compt)-1]=lp_KCourant;lp_Int[(lp_Compt)-1]=(lp_KRDD[(lp_Compt)-1]*lp_TxPer);lp_AsMois[(lp_Compt)-1]=lp_CoutAs;lp_Ech[(lp_Compt)-1]=lp_AsMois[(lp_Compt)-1]
lp_Report[(lp_Compt)-1]=lp_Int[(lp_Compt)-1]}else {;if((lp_TypeDif==1)){lp_KRDD[(lp_Compt)-1]=lp_KCourant;lp_Int[(lp_Compt)-1]=(lp_KRDD[(lp_Compt)-1]*lp_TxPer);lp_AsMois[(lp_Compt)-1]=lp_CoutAs;lp_Ech[(lp_Compt)-1]=lp_AsMois[(lp_Compt)-1]
lp_Report[(lp_Compt)-1]=(lp_Int[(lp_Compt)-1]+lp_Report[((lp_Compt-1))-1])}if((lp_TypeDif==2)){lp_KRDD[(lp_Compt)-1]=lp_KCourant;lp_Int[(lp_Compt)-1]=(lp_KRDD[(lp_Compt)-1]*lp_TxPer);lp_AsMois[(lp_Compt)-1]=lp_CoutAs
lp_Ech[(lp_Compt)-1]=lp_AsMois[(lp_Compt)-1];lp_Report[(lp_Compt)-1]=(lp_Int[(lp_Compt)-1]+(lp_Report[((lp_Compt-1))-1]*(1+lp_TxPer)))}if((lp_Compt==lp_Npm)){
lp_Ech[(lp_Compt)-1]=((lp_AsMois[(lp_Compt)-1]+lp_Report[(lp_Compt)-1])+lp_KRDD[(lp_Compt)-1]);lp_Report[(lp_Compt)-1]=0}}}}if((lp_Compt>lp_Differe)){if((lp_Differe>0)){if((lp_Compt==(lp_Differe+1))){
lp_KCourant=(lp_KCourant+lp_Report[((lp_Compt-1))-1]);lp_KRDD[(lp_Compt)-1]=lp_KCourant;lp_Int[(lp_Compt)-1]=(lp_KRDD[(lp_Compt)-1]*lp_TxPer);lp_AsMois[(lp_Compt)-1]=lp_CoutAs;lp_Ech[(lp_Compt)-1]=(lp_Int[(lp_Compt)-1]+lp_AsMois[(lp_Compt)-1])
lp_Report[(lp_Compt)-1]=0}else {;if((lp_Compt<lp_Npm)){lp_KRDD[(lp_Compt)-1]=lp_KCourant;lp_Int[(lp_Compt)-1]=(lp_KRDD[(lp_Compt)-1]*lp_TxPer);lp_AsMois[(lp_Compt)-1]=lp_CoutAs;lp_Ech[(lp_Compt)-1]=(lp_Int[(lp_Compt)-1]+lp_AsMois[(lp_Compt)-1])
lp_Report[(lp_Compt)-1]=0}else {;lp_KRDD[(lp_Compt)-1]=lp_KCourant;lp_Int[(lp_Compt)-1]=(lp_KRDD[(lp_Compt)-1]*lp_TxPer);lp_AsMois[(lp_Compt)-1]=lp_CoutAs;lp_Ech[(lp_Compt)-1]=((lp_Int[(lp_Compt)-1]+lp_AsMois[(lp_Compt)-1])+lp_KRDD[(lp_Compt)-1])
lp_Report[(lp_Compt)-1]=0}}}else {;if((lp_Compt<lp_Npm)){lp_KRDD[(lp_Compt)-1]=lp_KCourant;lp_Int[(lp_Compt)-1]=(lp_KRDD[(lp_Compt)-1]*lp_TxPer);lp_AsMois[(lp_Compt)-1]=lp_CoutAs;lp_Ech[(lp_Compt)-1]=(lp_Int[(lp_Compt)-1]+lp_AsMois[(lp_Compt)-1])
lp_Report[(lp_Compt)-1]=0}else {;lp_KRDD[(lp_Compt)-1]=lp_KCourant;lp_Int[(lp_Compt)-1]=(lp_KRDD[(lp_Compt)-1]*lp_TxPer);lp_AsMois[(lp_Compt)-1]=lp_CoutAs;lp_Ech[(lp_Compt)-1]=((lp_Int[(lp_Compt)-1]+lp_AsMois[(lp_Compt)-1])+lp_KRDD[(lp_Compt)-1])
lp_Report[(lp_Compt)-1]=0}}}if((lp_Compt==1)){
VLP_CHAINE=((((((((((_NVC(lp_Compt,"03d")+"  ")+_NVC(lp_KRDD[(lp_Compt)-1],"12.2fS"))+"  ")+_NVC(lp_Int[(lp_Compt)-1],"9.2fS"))+"  ")+_NVC(lp_AsMois[(lp_Compt)-1],"8.2fS"))+	unescape("\t"))+_NVC(lp_Ech[(lp_Compt)-1],"10.2fS"))+	unescape("\t"))+_NVC(lp_Report[(lp_Compt)-1],"10.2fS"))
lp_Cout[(lp_Compt)-1]=lp_Ech[(lp_Compt)-1]}else {
VLP_CHAINE=((((((((((((VLP_CHAINE+	unescape("\r\n"))+_NVC(lp_Compt,"03d"))+"  ")+_NVC(lp_KRDD[(lp_Compt)-1],"12.2fS"))+"  ")+_NVC(lp_Int[(lp_Compt)-1],"9.2fS"))+"  ")+_NVC(lp_AsMois[(lp_Compt)-1],"8.2fS"))+	unescape("\t"))+_NVC(lp_Ech[(lp_Compt)-1],"10.2fS"))+	unescape("\t"))+_NVC(lp_Report[(lp_Compt)-1],"10.2fS"))
lp_Cout[(lp_Compt)-1]=(lp_Cout[((lp_Compt-1))-1]+lp_Ech[(lp_Compt)-1])}lp_Compt=lp_Compt+1}}_PAGE_.A25.value=_NVC(((lp_Cout[(lp_Npm)-1]+lp_Frais)-lp_Capital),"18.2fS");_PAGE_.A26.value=_NVC(lp_Ech[(lp_Npm)-1],"18.2fS")
_PAGE_.A18.value=((_PAGE_.A18.value+	unescape("\r\n"))+VLP_CHAINE);VLP_CHAINE="";_PAGE_.A1.value=	unescape("Traitement termin%E9")}}
