Formatierungen
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
6 Beiträge
•
Seite 1 von 1
6 Beiträge
Seite 1 von 1
Hallo an alle,
folgende Formatierungsfragen quälen einen Anfänger:
1. Habe in einem C-Feld Kostenstellen wie 0000000730!
Wie bekomme ich die führenden Nullstellen alle weg?
Die Kostenstelle ist unterschiedlich an!
2. Ich habe in einem C-Feld einen Wert wie 36,00- oder 1,000-
Wie kann das Minus von hinten nach vorne moven?
Es sind ca. 100.000 Sätze pro Durchgang, deshalb muss es performant sein.
und 3. Ich habe einen Wert von 100.00, der Punkt soll durch ein , ersetzt werden. Das Feld ist vom Type C und hat immer nur 2 Nachkommastellen
Auch hier gibt es viele Datensätze.
Gibt es irgendwelche Bausteine oder Tricks
Vielen Dank im voraus für Eure Hilfe
Schmitti
folgende Formatierungsfragen quälen einen Anfänger:
1. Habe in einem C-Feld Kostenstellen wie 0000000730!
Wie bekomme ich die führenden Nullstellen alle weg?
Die Kostenstelle ist unterschiedlich an!
2. Ich habe in einem C-Feld einen Wert wie 36,00- oder 1,000-
Wie kann das Minus von hinten nach vorne moven?
Es sind ca. 100.000 Sätze pro Durchgang, deshalb muss es performant sein.
und 3. Ich habe einen Wert von 100.00, der Punkt soll durch ein , ersetzt werden. Das Feld ist vom Type C und hat immer nur 2 Nachkommastellen
Auch hier gibt es viele Datensätze.
Gibt es irgendwelche Bausteine oder Tricks
Vielen Dank im voraus für Eure Hilfe
Schmitti
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Hi Schmitti!
zu 1):
zu 2): Da hilft leider nur basteln... also SHIFT feld left Deleting leading space. Translate feld using '- '. Shift feld by 1 places right. feld(1) = '-'.
zu 3):
Gruß, Enno
zu 1):
Code: Alles auswählen.
DATA c1(10) VALUE '0000012345'.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
EXPORTING
input = c1
IMPORTING
output = c1.
WRITE: / c1. zu 3):
Code: Alles auswählen.
Translate feld using '.,'.
Beitrag
von Frank Dittrich (Expert / 674 / 0 /
15
)
»
Ist allerdings langsamer als die von Asaph vorgeschlagene Methode, hat aber den Vorteil, dass in Gegensatz zu SHIFT wenigstens eine 0 stehen bleibt, wenn vorher der Inhalt '0000000000' ist.ewx hat geschrieben:zu 1):Code: Alles auswählen.
DATA c1(10) VALUE '0000012345'. CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = c1 IMPORTING output = c1. WRITE: / c1.
Und dann muss noch geprüft werden, ob der Wert negativ ist, sonst stellt man auch bei positiven Werten ein '-' voran.zu 2): Da hilft leider nur basteln... also SHIFT feld left Deleting leading space. Translate feld using '- '. Shift feld by 1 places right. feld(1) = '-'.
Ich würde da auch eher auf WRITE zurückgreifen.
Da wohl nur genau ein Dezimalpunkt vorkommt, kann man auch REPLACE nehmen, sollte etwas schneller sein.zu 3):Code: Alles auswählen.
Translate feld using '.,'.
Und wenn der Dezimalpunkt immer am gleichen Offset ist, tut's auch ein MOVE.
Wenn aber Dezimalpunkt oder -komma und/oder Tausenderpunkte je nach Benutzereinstellungen auftreten können, ist mehr Aufwand nötig.
Hallo an alle,
vielen Dank für die äußerst umfangreiche Hilfe.
Konnte alle meine Probleme durch Euch lösen.
Aber weitere Probleme folgen bestimmt
Grüsse und noch einen schönen Tag
Euer Schmitti
vielen Dank für die äußerst umfangreiche Hilfe.
Konnte alle meine Probleme durch Euch lösen.
Aber weitere Probleme folgen bestimmt
Grüsse und noch einen schönen Tag
Euer Schmitti
Seite 1 von 1
Vergleichbare Themen
1
Antw.
Antw.
1510
Views
Views
Frage die ABAP Experten
Über diesen Beitrag
Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.