Eingabewert mit 0 expandieren?

Die Frage ist als "gelöst" markiert. Den entsprechend Beitrag findest du hier.

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

Eingabewert mit 0 expandieren?

Beitrag von Gast ( / / 0 / 3 ) »
Hallo,

kann jemand mir helfen, folgendes zu implementieren:

ich habe einen

Code: Alles auswählen.

parameters input(10) type c.
es wird nach der Eingabe Ueberprueft, ob der Eingabewert eine 10 stellige Zahl ist, wenn nicht, werden Nullen links hinzugef�gt, z.B wenn Input=123, es wird dann auf 0000000123 expandiert. Wie?

Danke im voraus.

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


Beitrag von ereglam (Top Expert / 1829 / 2 / 7 ) »

Code: Alles auswählen.

IF input CO '0123456789 '. "wichtig: Leerzeichen im Prüfstring
* Eingabe nach rechts schieben, bis eine Ziffer dort steht
  SHIFT input RIGHT DELETE TRAILING space.
* Leerzeichen mit '0' ersetzen
  OVERLAY input WITH '0000000000' ONLY space.
* or
  TRANSLATE input USING ' 0'.
ENDIF.
PS:
es wird unterstellt, dass innerhalb der Zeichenkette keine Lücken vorhanden sind. Sonst kommt nicht das heraus, was der Anwender sich vorstellt...

Code: Alles auswählen.

12 34 => 0000012034
Gruß
Ereglam


May the Force be with your code
|| .| |.|| | .... . ..|. ||| .|. |.|. . |... . .|| .. | .... |.|| ||| ..| .|. |.|. ||| |.. .

Beitrag von GastX (Specialist / 287 / 4 / 19 ) »
Unter Verzicht auf Plausis etc. reicht auch die automatische Konvertierung, will sagen:

Code: Alles auswählen.

REPORT Z.
PARAMETERS EINGABE(10) TYPE C.
DATA: AUSGABE(10) TYPE N.

START-OF-SELECTION.
  WRITE : / INPUT.
  AUSGABE = INPUT. " Umwandlung fertig
  INPUT = AUSGABE. " hier nur zurückschieben
  WRITE : / INPUT.
Oder?
Gruss, Frank

Beitrag von black_adept (Top Expert / 4134 / 131 / 956 ) »
Hallo Gast1,

falls in das Eingabefeld theoretisch auch nicht-ganzzahlen eingetragen werden dürfen ( sonst die Methode von Frank anwenden ) würde ich den Standardbaustein "CONVERSION_EXIT_ALPHA_INPUT" probieren (siehe auch Doku zu dessen Funktionsweise).
live long and prosper
Stefan Schmöcker

email: stefan@schmoecker.de

Beitrag von Gast ( / / 0 / 3 ) »
toll! vielen Dank fuer eure Hilfe.

Gruss

Beitrag von Gast ( / / 0 / 3 ) »
Warum nehmt ihr nicht einfach:

Code: Alles auswählen.

parameters input(10) type N.
Statt type C type N ????????

Beitrag von GastX (Specialist / 287 / 4 / 19 ) »
tja, da haben wir uns wohl nur auf die Konvertierung gestürzt ... hast natürlich recht, bei Parametern das gleich über die Definition zu klären...

Frank

Seite 1 von 1

Vergleichbare Themen

3
Antw.
2005
Views
Adressblock expandieren/collapsen
von deejey » 03.01.2019 12:48 • Verfasst in Dialogprogrammierung
7
Antw.
3277
Views
Eingabewert in einer internen Tabelle?
von zickzack0312 » 12.03.2006 01:11 • Verfasst in ABAP® für Anfänger
3
Antw.
1525
Views
Tablecontrol: Eingabewert wird nicht übernommen
von khb » 10.02.2015 17:26 • Verfasst in ABAP® für Anfänger
1
Antw.
2478
Views
Alle Methoden / Forms im Quellcode Einklappen/Expandieren
von Timoniac » 22.12.2017 12:33 • Verfasst in ABAP® für Anfänger

Ü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

IBAN und BUT0BK
Gestern von GastX gelöst 4 / 2219
Gewährleistungsende im Equipment
vor 2 Tagen von Yourairld gelöst 8 / 24472
IF mit AND und OR
vor einer Woche von GastX 6 / 12758
Meine Inbox
vor einer Woche von Rabea1103 1 / 10228

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

IBAN und BUT0BK
Gestern von GastX gelöst 4 / 2219
Gewährleistungsende im Equipment
vor 2 Tagen von Yourairld gelöst 8 / 24472
IF mit AND und OR
vor einer Woche von GastX 6 / 12758
Meine Inbox
vor einer Woche von Rabea1103 1 / 10228