Bankfix and Rabatt Fix

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}
+```