// (C) CSB Internetservice function berechne2( meinFormular ) // erhaelt als parameter einen zeiger auf das html-formular { // die variablen fuer die werte der formularfelder eingabeWunschsumme = 0; eingabeEintrittsalter = 0; eingabeLaufzeit = 0; eingabeRestschuld = 0; // variablen fuer die umgewandelten eingaben zahlWunschsumme = 0; zahlEintrittsalter = 0; zahlLaufzeit = 0; zahlRestschuld = 0; werteGueltig = true; kreditSumme = 0; // Erst mal die werte der formular-felder holen eingabeWunschsumme = meinFormular.kreditsumme.value; eingabeEintrittsalter = meinFormular.eintrittsalter.options[meinFormular.eintrittsalter.options.selectedIndex].value; eingabeLaufzeit = meinFormular.laufzeit.options[meinFormular.laufzeit.options.selectedIndex].value; eingabeRestschuld = meinFormular.restschuld.options[meinFormular.restschuld.options.selectedIndex].value; // werte, die als zahl vorliegen sollen, in zahlen umwandeln zahlWunschsumme = parseInt( eingabeWunschsumme ); zahlEintrittsalter = parseInt( eingabeEintrittsalter ); zahlLaufzeit = parseInt( eingabeLaufzeit ); zahlRestschuld = parseInt( eingabeRestschuld ); // nun kann man testen, ob die werte gueltig waren if ( !zahlWunschsumme > 0 ) { werteGueltig = false; alert( "Ungueltiger Wert fuer die Kreditsumme." ); } if ( zahlEintrittsalter == -1 ) { werteGueltig = false; alert( "Kein Eintrittsalter ausgewaehlt." ); } if ( zahlLaufzeit == -1 ) { werteGueltig = false; alert( "Keine Laufzeit ausgewaehlt." ); } if ( zahlRestschuld == 0 ) { werteGueltig = false; alert( "Restschuld nicht ausgewählt." ); } if ( werteGueltig == false ) // auswertung abbrechen? return; // die beiden frei einzugebenden zahlwerte im formular werden nun auf die // dafuer errechneten werte gesetzt. das ist noetig, da parseInt(...) // beispielsweise fuer einen wert "3000abc" den wert 3000 errechnet. // und diese 3000 sollten dann auch im formular stehen. // Die weiter unten intern gemachte aenderung des wertes fuer die miete // wird nicht in das formular uebernommen, da eine solche aenderung // den benutzer verwirren wuerde. // soll dies trotzdem geschehen, muessen die folgenen zwei zeilen nach // weiter unten verschoben werden. meinFormular.kreditSumme.value = zahlWunschsumme; // vorbereitung der werte fuer die errechung der kreditsumme: // if ( zahlMiete < 400 && zahlEintritt == 1000 ) // zahlMiete = 400; // else if ( zahlMiete < 300 && zahlEintritt == 800 ) // zahlMiete = 300; // Die fertigen werte liegen nun vor. Fehlt noch die errechung der kreditsumme // die dafuer noetige formel ist dem autor unbekannt // die zu verwendeden variablen: // zahlKreditsumme: das einkommen wie eingegeben, z.b. 3000 // zahlLauf: einer der folgenden werte: 12, 24, 36, 48, 60, 72, 84, 96 // zahlFamilie: einer der folgenden werte: 800, 1000, 800, 800 // zahlMiete: die miete wie eingegeben // zahlKinder: einer der folgenden werte: 0, 200, 400, 600, 800, 1000 // ----------------Berechnungen für 12 Monate----------------------------------- if (zahlLaufzeit == 12 && zahlEintrittsalter == 1 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 880.08 ; if (zahlLaufzeit == 12 && zahlEintrittsalter == 2 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 884.59 ; if (zahlLaufzeit == 12 && zahlEintrittsalter == 3 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 888.83 ; if (zahlLaufzeit == 12 && zahlEintrittsalter == 4 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 875.52 ; if (zahlLaufzeit == 12 && zahlEintrittsalter == 5 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 880.72 ; if (zahlLaufzeit == 12 && zahlEintrittsalter == 6 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 888.03 ; if (zahlLaufzeit == 12 && zahlRestschuld == 2) kreditSumme = ( zahlWunschsumme/10000 ) * 866.13 ; // ----------------Berechnungen für 24 Monate----------------------------------- if (zahlLaufzeit == 24 && zahlEintrittsalter == 1 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 457.89 ; if (zahlLaufzeit == 24 && zahlEintrittsalter == 2 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 461.97 ; if (zahlLaufzeit == 24 && zahlEintrittsalter == 3 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 466.01 ; if (zahlLaufzeit == 24 && zahlEintrittsalter == 4 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 458.51 ; if (zahlLaufzeit == 24 && zahlEintrittsalter == 5 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 464.02 ; if (zahlLaufzeit == 24 && zahlEintrittsalter == 6 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 471.97 ; if (zahlLaufzeit == 24 && zahlRestschuld == 2) kreditSumme = ( zahlWunschsumme/10000 ) * 448.69 ; // ----------------Berechnungen für 36 Monate----------------------------------- if (zahlLaufzeit == 36 && zahlEintrittsalter == 1 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 317.56 ; if (zahlLaufzeit == 36 && zahlEintrittsalter == 2 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 321.82 ; if (zahlLaufzeit == 36 && zahlEintrittsalter == 3 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 325.93 ; if (zahlLaufzeit == 36 && zahlEintrittsalter == 4 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 320.28 ; if (zahlLaufzeit == 36 && zahlEintrittsalter == 5 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 326.34 ; if (zahlLaufzeit == 36 && zahlEintrittsalter == 6 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 335.04 ; if (zahlLaufzeit == 36 && zahlRestschuld == 2) kreditSumme = ( zahlWunschsumme/10000 ) * 309.78 ; // ----------------Berechnungen für 48 Monate----------------------------------- if (zahlLaufzeit == 48 && zahlEintrittsalter == 1 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 247.77 ; if (zahlLaufzeit == 48 && zahlEintrittsalter == 2 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 252.13 ; if (zahlLaufzeit == 48 && zahlEintrittsalter == 3 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 256.71 ; if (zahlLaufzeit == 48 && zahlEintrittsalter == 4 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 251.89 ; if (zahlLaufzeit == 48 && zahlEintrittsalter == 5 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 258.50 ; if (zahlLaufzeit == 48 && zahlEintrittsalter == 6 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 268.26 ; if (zahlLaufzeit == 48 && zahlRestschuld == 2) kreditSumme = ( zahlWunschsumme/10000 ) * 240.46 ; // ----------------Berechnungen für 60 Monate----------------------------------- if (zahlLaufzeit == 60 && zahlEintrittsalter == 1 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 206.04 ; if (zahlLaufzeit == 60 && zahlEintrittsalter == 2 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 211.10 ; if (zahlLaufzeit == 60 && zahlEintrittsalter == 3 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 215.77 ; if (zahlLaufzeit == 60 && zahlEintrittsalter == 4 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 211.29 ; if (zahlLaufzeit == 60 && zahlEintrittsalter == 5 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 218.75 ; if (zahlLaufzeit == 60 && zahlEintrittsalter ==6 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 229.80 ; if (zahlLaufzeit == 60 && zahlRestschuld == 2) kreditSumme = ( zahlWunschsumme/10000 ) * 198.94 ; // ----------------Berechnungen für 72 Monate----------------------------------- if (zahlLaufzeit == 72 && zahlEintrittsalter == 1 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 178.66 ; if (zahlLaufzeit == 72 && zahlEintrittsalter == 2 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 183.76 ; if (zahlLaufzeit == 72 && zahlEintrittsalter == 3 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 188.86 ; if (zahlLaufzeit == 72 && zahlEintrittsalter == 4 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 184.93 ; if (zahlLaufzeit == 72 && zahlEintrittsalter == 5 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 192.87 ; if (zahlLaufzeit == 72 && zahlEintrittsalter == 6 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 205.55 ; if (zahlLaufzeit == 72 && zahlRestschuld == 2) kreditSumme = ( zahlWunschsumme/10000 ) * 171.52 ; // ----------------Berechnungen für 84 Monate----------------------------------- if (zahlLaufzeit == 84 && zahlEintrittsalter == 1 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 159.10 ; if (zahlLaufzeit == 84 && zahlEintrittsalter == 2 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 164.73 ; if (zahlLaufzeit == 84 && zahlEintrittsalter == 3 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 170.43 ; if (zahlLaufzeit == 84 && zahlEintrittsalter == 4 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 166.38 ; if (zahlLaufzeit == 84 && zahlEintrittsalter == 5 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 175.49 ; if (zahlLaufzeit == 84 && zahlEintrittsalter == 6 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 189.88 ; if (zahlLaufzeit == 84 && zahlRestschuld == 2) kreditSumme = ( zahlWunschsumme/10000 ) * 151.81 ; // ----------------Berechnungen für 96 Monate----------------------------------- if (zahlLaufzeit == 96 && zahlEintrittsalter == 1 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 144.96 ; if (zahlLaufzeit == 96 && zahlEintrittsalter == 2 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 150.85 ; if (zahlLaufzeit == 96 && zahlEintrittsalter == 3 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 156.90 ; if (zahlLaufzeit == 96 && zahlEintrittsalter == 4 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 152.88 ; if (zahlLaufzeit == 96 && zahlEintrittsalter == 5 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 163.07 ; if (zahlLaufzeit == 96 && zahlEintrittsalter == 6 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 179.63 ; if (zahlLaufzeit == 96 && zahlRestschuld == 2) kreditSumme = ( zahlWunschsumme/10000 ) * 137.35 ; // ----------------Berechnungen für 108 Monate----------------------------------- if (zahlLaufzeit == 108 && zahlEintrittsalter == 1 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 140.60 ; if (zahlLaufzeit == 108 && zahlEintrittsalter == 2 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 146.30 ; if (zahlLaufzeit == 108 && zahlEintrittsalter == 3 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 153.23 ; if (zahlLaufzeit == 108 && zahlEintrittsalter == 4 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 167.56 ; if (zahlLaufzeit == 108 && zahlEintrittsalter == 5 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 179.87 ; if (zahlLaufzeit == 108 && zahlRestschuld == 2) kreditSumme = ( zahlWunschsumme/10000 ) * 128.69 ; // ----------------Berechnungen für 120 Monate----------------------------------- if (zahlLaufzeit == 120 && zahlEintrittsalter == 1 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 132.37 ; if (zahlLaufzeit == 120 && zahlEintrittsalter == 2 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 138.78 ; if (zahlLaufzeit == 120 && zahlEintrittsalter == 3 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 146.70 ; if (zahlLaufzeit == 120 && zahlEintrittsalter == 4 && zahlRestschuld == 1) kreditSumme = ( zahlWunschsumme/10000 ) * 162.84 ; if (zahlLaufzeit == 120 && zahlRestschuld == 2) kreditSumme = ( zahlWunschsumme/10000 ) * 119.81 ; // ---------------------------------------------------------------------------------------- kreditSumme=Math.round(kreditSumme); if ( kreditSumme <= 0 ) meinFormular.kreditSumme.value = "Fehlerhafter Wert!"; else meinFormular.kreditSumme.value = kreditSumme; }