BeraeknaLaanEx
Denna funktion kan beräkna effektiv ränta samt ränta och amortering i kronor per år för olika typer av lån (raka lån, annuitetslån och serielån). Se dokumentationen under datamodell för mer information om indata.
Till skillnad från funktionen BeraeknaLaan så kan man i denna funktion ange hur många år som ska beräknas.
Exempelkod i c#, ett serielåns effektiva ränta och hela amorteringsplanen för kommande år
bk.BeraeknaLaanEx laanber = new bk.BeraeknaLaanEx(); bk.clsLaanSerieTrappa serielaan = new bk.clsLaanSerieTrappa(); laanber.clsLaaneBeraekning_1 = new bk.clsLaaneBeraekning(); // Årtalet ska vara det år som beräkningsdelen är anpassad till. // För versioner som heter 2008.x så är det 2008 som gäller. // För versioner som heter 2009.x så är det 2009 som gäller osv... laanber.clsLaaneBeraekning_1.AArtal = 2008; laanber.clsLaaneBeraekning_1.Antal_aar_i_resultat = 50; laanber.clsLaaneBeraekning_1.Laanelista = new bk.clsLaanutgifterLanelista(); laanber.clsLaaneBeraekning_1.Laanelista.Laan = new bk.clsLaanBasklass[] {serielaan}; serielaan.Belopp_Kr = 100000; serielaan.Raenta_Procent = 9.2; serielaan.Loeptid_AAr = 5; serielaan.Foersta_AArets_Amortering_Proc = 15; serielaan.AArlig_Hoejning_Av_Amortering_Proc = 2.5; serielaan.Antal_Amorteringar_Per_AAr = 12; // Dessa uppgifter påverkar enbart effektiv ränta: serielaan.Aviavgift_Kr = 15; serielaan.Beraekna_Effektiv_Raenta = true ; serielaan.Upplaeggningsavgift_Ingaar_I_Laanebeloppet = true ; serielaan.Upplaeggningsavgift_Kr = 7500; // Utför anrop och presentera resultatet. bk.Kalkyl kalkyl = new bk.Kalkyl(); kalkyl.Credentials = new System.Net.NetworkCredential( "xxxx" , "xxxx" ); // Optimering, false ger alltid två anrop till servern... kalkyl.PreAuthenticate = true ; // Optimering, servern skickar resultatet gzippat... kalkyl.EnableDecompression = true ; bk.clsResLan resultat = kalkyl.BeraeknaLaanEx(laanber).result; Console.WriteLine( "effektiv ränta:" + resultat.EffektivRaenta_Proc.ToString()); for ( int i = 0; i < resultat.AAterbetalningPerAAr.Length; i++) { if (resultat.AAterbetalningPerAAr[i].SummaRaentaAmort_Kr_Per_AAr > 0) { Console.WriteLine( "Amortering per månad, år " + (i + 1).ToString() + ": " + Math.Round(resultat.AAterbetalningPerAAr[i].Amortering_Kr_Per_AAr / 12).ToString()); Console.WriteLine( "Ränta per månad, år " + (i + 1).ToString() + ": " + Math.Round(resultat.AAterbetalningPerAAr[i].Raenta_Kr_Per_AAr / 12).ToString()); Console.WriteLine( "Kvarvarande skuld vid årets början år " + (i + 1).ToString() + ": " + resultat.AAterbetalningPerAAr[i].Kvarvarande_Skuld_Kr.ToString()); Console.WriteLine( "Månadsutgift år " + (i + 1).ToString() + ": " + Math.Round(resultat.AAterbetalningPerAAr[i].SummaRaentaAmort_Kr_Per_AAr / 12 + serielaan.Aviavgift_Kr).ToString()); Console.WriteLine( "----------------" ); } } /* Resultat: effektiv ränta:17.9 Amortering per månad, år 1: 1250 Ränta per månad, år 1: 714 Kvarvarande skuld vid årets början år 1: 100000 Månadsutgift år 1: 1979 ---------------- Amortering per månad, år 2: 1459 Ränta per månad, år 2: 590 Kvarvarande skuld vid årets början år 2: 85000 Månadsutgift år 2: 2064 ---------------- Amortering per månad, år 3: 1667 Ränta per månad, år 3: 447 Kvarvarande skuld vid årets början år 3: 67492 Månadsutgift år 3: 2129 ---------------- Amortering per månad, år 4: 1875 Ränta per månad, år 4: 285 Kvarvarande skuld vid årets början år 4: 47488 Månadsutgift år 4: 2175 ---------------- Amortering per månad, år 5: 2082 Ränta per månad, år 5: 104 Kvarvarande skuld vid årets början år 5: 24988 Månadsutgift år 5: 2201 ---------------- */ |