Templates by BIGtheme NET
|
Willkommen,
Gast
|
THEMA:
Pfändungsrechner 17 Dez 2023 18:59 #1
|
Hallo,
anbei ein kleiner Rechner, der den pfändbaren Betrag aus einem Nettoeinkommen errechnet als Beispiel zur freien Verwendung. Ciao, Joachim
1 Aufruf Marke 'Initialisieren' 2 Aufruf Marke 'FensterAufbauen' 3 Warte Endlos (Warten auf zu behandelnde Ereignisse) 4 :: Anzeige(Pfändungsrechner)_Element(netto)_Verändert 5 :: Anzeige(Pfändungsrechner)_Element(Zahlenauswahl_1)_Verändert 6 Setze in [cX.Anzeige(Pfändungsrechner).BindungAktualisieren]: '1' 7 Wenn (? '[netto] > 4.298,80') 8 Setze in [pfändbar]: '[cX.ZeileAus([PZeilen];[Pgrenze$])]' , Trenner ';', Teilstück Nr. [cX.Rechne([personen]+2)] 9 Setze in [pfändbar]: '[pfändbar] + ([netto] - 4298,81) ' , berechnen' 10 Sonst 11 Schleife ab hier mit Variable [x] bis [PZeilen] Schrittweite 1 12 Setze in [Eingabe]: '[cX.ZeileAus([x];[PGrenze$])]' , Trenner ';', Teilstück Nr. 1 13 Schleife bis hier (? '[Eingabe] > [netto]') 14 Setze in [pfändbar]: '[cX.ZeileAus([x];[Pgrenze$])]' , Trenner ';', Teilstück Nr. [cX.Rechne([personen]+2)] 15 Ende Wenn 16 Setze , MultiSet 'cX.Anzeige(Pfändungsrechner).Element(Pfändbar).Text=Pfändbar sind [pfändbar§#,0.00] €¶verbleiben= [cX.Rechne([netto]-[pf...' 17 Beende Unterprogramm (Zurück) 18 :: Anzeige(Pfändungsrechner)_Element(ClipB)_Klick 19 Setze in [cX.Clipboard.Text]: 'Bei einem Nettoeinkommen von [netto§#,0.00] € sind bei einem [personen] Personen gegenüber Unterhaltsverpflichteten...' 20 Beende Unterprogramm (Zurück) ...
|
|
Bitte Anmelden oder Registrieren um der Konversation beizutreten. |
cX4Web Code