diff --git a/Penta/Änderungen.md b/Penta/Änderungen.md index f2a2ae0..2497f85 100644 --- a/Penta/Änderungen.md +++ b/Penta/Änderungen.md @@ -58,3 +58,39 @@ SDPE: [CHERP011](files://cherp011\sdpe_ful\share\report\forms) > command.ZUORDNUNG_K - puid.ZUORDNUNG > ![a](img/ustfix_PKRK-PUID.jpg) > ![a](img/ustfix_Command-PUID.jpg) + +# Bankverbindung +> Um die Bankverbindung zu fixen benutze folgenden Code in einem Feld: + +```Crystal +stringvar account; +stringvar bank; +if {?Pm-PKRK.WAEHRUNG} = "GBP" then +account := "SA30920AC" else +if {?Pm-PKrK.WAEHRUNG} = "EUR" then +account := "GL100533.1" else +if {?Pm-PKRK.WAEHRUNG} = "USD" then +account := "GL100533.2" else +account := "L0030174.0"; + +if {?Pm-PKRK.WAEHRUNG} in ["USD", "EUR", "CHF"] then +bank := "UBS AG, CH-9001 St. Gallen" else +bank := "Bank für Tirol und Vorarlberg AG, CH-9422 Staad"; + +"Account no. " + account + " " + bank +``` + +# Cutdown fix +Wenn die Prozente vom Rabatt nicht richtig angezeigt werden sollte folgender Code verwendet werden: + +> Ja, es ist keine Meisterleistung, welche ich hier niedergeschrieben habe; aaaaaaber.... +Schlussendlich gillt, dass der initial string ENTWEDER als "5% Rabatt", "15% Rabatt", "100% Rabatt" ODER "SPEZIAL RABATTTEXT". +Bedeutet, dass ich zuerst abfangen muss, ob ein Prozentzeichen in dem Text ist. +Wenn Ja, behalte nur die ersten 3 Zeichen und lösche den rest. Danach ersetze alle % zeichen mit " ". und zu guter letzt ersetze " " mit "". + +```Crystal +If InStr({PZAF.ZU_AB_SCHLAG_BENENNUNG}, "%") > 0 then +REPLACE(REPLACE(LEFT({PZAF.ZU_AB_SCHLAG_BENENNUNG}, 3), "%", " "), " ", "")+"%" +else +{PZAF.ZU_AB_SCHLAG_BENENNUNG} +```