Runden von Currency Feld

Getting started ... Alles für einen gelungenen Start.
5 Beiträge • Seite 1 von 1
5 Beiträge Seite 1 von 1

Runden von Currency Feld

Beitrag von cbroexkes1608 (ForumUser / 2 / 1 / 0 ) »
Hallo ABAP Mitstreiter,

ich benötige bitte Hilfe von Euch. Ich habe die Problemstellung eine CURRENCY - Feld zu runden (kaufmännisch: 13.531 auf 13.50 und 13.642 auf 13.64 auf Dezimalstellen gerundet).
Ich habe bereits schon den FuBa 'ROUND' verwendet, dieser funktioniert allerdings nicht, da dieser wohl kein CURRENCY Feld verarbeiten kann.

Hat jemand aus der Erfahrung eine Idee? Ich habe gesucht, allerdings nichts hier im Forum ausfindig machen können.

Coding:

Code: Alles auswählen.

DATA: lv_rat12 TYPE CURRENCY,
                   lv_rat24 TYPE CURRENCY,
                   lv_rat36 TYPE CURRENCY,
                   lv_ausgabe TYPE CHAR80,
                   lc_blank value space.

*CH: 8100048300 - Bei Ratenzahlungs Bedingungen muss zterm_text angepasst werden
          IF zjhs_fk-zterm = 'ZR12'.
            refresh: zterm_text.
            lv_rat12 = zjhs_fk-brtwk * '0.08333'. "12 Raten
            REPLACE ALL OCCURRENCES OF '.' IN lv_rat12 with ','.
            CONCATENATE 'Zahlbar innerh. 12 Raten zu je' lc_blank lv_rat12 lc_blank 'Euro' INTO lv_ausgabe RESPECTING BLANKS.
            MOVE lv_ausgabe TO zterm_text-line.
          ELSEIF zjhs_fk-zterm = 'ZR24'.
            refresh: zterm_text.
            lv_rat24 = zjhs_fk-brtwk * '0.04167'. "24 Raten
            REPLACE ALL OCCURRENCES OF '.' IN lv_rat24 with ','.
            CONCATENATE 'Zahlbar innerh. 24 Raten zu je' lc_blank lv_rat24 lc_blank 'Euro' INTO lv_ausgabe RESPECTING BLANKS.
            MOVE lv_ausgabe TO zterm_text-line.
          ELSEIF zjhs_fk-zterm = 'ZR36'.
            refresh: zterm_text.
            lv_rat36 = zjhs_fk-brtwk * '0.02778'. "36 Raten
            REPLACE ALL OCCURRENCES OF '.' IN lv_rat36 with ','.
            CONCATENATE 'Zahlbar innerh. 36 Raten zu je' lc_blank lv_rat36 lc_blank 'Euro' INTO lv_ausgabe RESPECTING BLANKS.
            MOVE lv_ausgabe TO zterm_text-line.
          ENDIF.
Gruß,
Christian

gesponsert
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten


Re: Runden von Currency Feld

Beitrag von wreichelt (Top Expert / 1031 / 29 / 188 ) »
Hallo,

hier gibts einige Beispiele
http://blog.hr-manager.de/2013/04/abap- ... nisch.html


Gruß Wolfgang

Folgende Benutzer bedankten sich beim Autor wreichelt für den Beitrag:
cbroexkes1608


Re: Runden von Currency Feld

Beitrag von cbroexkes1608 (ForumUser / 2 / 1 / 0 ) »
Hallo Wolfgang,

vielen Dank. Allerdings hilft mir das nicht wirklich weiter, da mein Wert in einem Currency Feld steht. Dieses wird auch im weiteren Verlauf für den Concatenate verwendet.
Ich benötige daher einen Fuba bzw. eine Möglichkeit dort zu runden (eine passende Methode wäre mir auch Recht). Die Seite, die du mir genannt hattest kenne ich bereits -damit
komme ich nicht weiter, da andere Datentypen.

Gruß,
Christian

Re: Runden von Currency Feld

Beitrag von wreichelt (Top Expert / 1031 / 29 / 188 ) »
Hallo Christian,

warum muss es ein Currency-Feld sein ?

Gruß Wolfgang

Re: Runden von Currency Feld

Beitrag von gtoXX (Specialist / 185 / 34 / 31 ) »
cbroexkes1608 hat geschrieben:Hallo Wolfgang,

vielen Dank. Allerdings hilft mir das nicht wirklich weiter, da mein Wert in einem Currency Feld steht. Dieses wird auch im weiteren Verlauf für den Concatenate verwendet.
Ich benötige daher einen Fuba bzw. eine Möglichkeit dort zu runden (eine passende Methode wäre mir auch Recht). Die Seite, die du mir genannt hattest kenne ich bereits -damit
komme ich nicht weiter, da andere Datentypen.

Gruß,
Christian

EIn bisschen Suchen im Forum oder bei Google.


Fuba SD_VALUE_ROUND basiert auf TYP p der auch hinter CURR steckt. Sollte also eigentlich funktionieren.
"Code lügt nicht ^^"

Seite 1 von 1

Vergleichbare Themen

2
Antw.
1974
Views
CURRENCY bei Feldsymbol
von RiffRaff » 07.07.2004 13:53 • Verfasst in ABAP® Core
4
Antw.
3896
Views
Currency Typ in Report
von Dyrdek » 13.12.2016 08:24 • Verfasst in ABAP® für Anfänger
5
Antw.
2597
Views
BTC: Write KBETR to CHAR15 CURRENCY 'JPY'
von Romaniac » 21.03.2018 14:10 • Verfasst in ABAP® Core
1
Antw.
8527
Views
Runden auf Hunderter
von joesephe » 02.03.2009 23:13 • Verfasst in ABAP® für Anfänger
7
Antw.
1145
Views
Rechenoperation und Runden
von Florian9999 » 07.05.2019 10:12 • Verfasst in ABAP® für Anfänger

Über diesen Beitrag


Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch

Aktuelle Forenbeiträge

SELECT CHAR16 in CHAR12-Feld
vor einer Stunde von Patrick1982 gelöst 5 / 57
alv_grid aktualisieren
vor 6 Stunden von Egzon gelöst 4 / 82

Newsletter Anmeldung

Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.
Die letzte Ausgabe findest du hier.
Details zum Versandverfahren und zu Ihren Widerrufsmöglichkeiten findest du in unserer Datenschutzerklärung.

Aktuelle Forenbeiträge

SELECT CHAR16 in CHAR12-Feld
vor einer Stunde von Patrick1982 gelöst 5 / 57
alv_grid aktualisieren
vor 6 Stunden von Egzon gelöst 4 / 82

Unbeantwortete Forenbeiträge

Zwischensumme Adobe Forms
vor 4 Wochen von Lucyalison 1 / 134
Group Items auf einer Filterbar
vor 5 Wochen von Bright4.5 1 / 170