String prüfen auf numerische Werte und Stellenanzahl
Hallo,
leider bin ich auf der Suche nach meinem Problem nicht fündig geworden...
Ich habe in einer Variable (C mit Länge 20) einen Wert drin stehen. Diesen will darauf prüfen, ob er numerisch ist (also nur Zahlen enthält) und 14-stellig ist. Bin schon bei der Prüfung auf numerisch gescheitert. Folgender Code funktioniert leider nicht:
Condense wa.
IF NOT wa CO '1234567890'.
Wahrscheinlich weil der übergebene Wert nicht 20-stellig ist und so noch Leerzeichen am Ende sind.
Habt ihr vielleicht eine Idee auch für die Prüfung der Stellenanzahl?
Danke Zwenn
leider bin ich auf der Suche nach meinem Problem nicht fündig geworden...
Ich habe in einer Variable (C mit Länge 20) einen Wert drin stehen. Diesen will darauf prüfen, ob er numerisch ist (also nur Zahlen enthält) und 14-stellig ist. Bin schon bei der Prüfung auf numerisch gescheitert. Folgender Code funktioniert leider nicht:
Condense wa.
IF NOT wa CO '1234567890'.
Wahrscheinlich weil der übergebene Wert nicht 20-stellig ist und so noch Leerzeichen am Ende sind.
Habt ihr vielleicht eine Idee auch für die Prüfung der Stellenanzahl?
Danke Zwenn
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Beitrag
von Matthias.Selle (ForumUser / 69 / 1 /
0
)
»
Hallo Zwenn,
strlen hilft, bei contains only mußt Du das Blank aufnehmen.
REPORT ztest NO STANDARD PAGE HEADING.
PARAMETER: p_c(20) TYPE c.
DATA: i TYPE p.
i = STRLEN( p_c ).
WRITE:/ 'Länge', i.
IF p_c CO '1234567890 '.
WRITE:/ 'OK'.
ELSE.
WRITE:/ 'not OK'.
ENDIF.
Gruß Matthias
strlen hilft, bei contains only mußt Du das Blank aufnehmen.
REPORT ztest NO STANDARD PAGE HEADING.
PARAMETER: p_c(20) TYPE c.
DATA: i TYPE p.
i = STRLEN( p_c ).
WRITE:/ 'Länge', i.
IF p_c CO '1234567890 '.
WRITE:/ 'OK'.
ELSE.
WRITE:/ 'not OK'.
ENDIF.
Gruß Matthias
Zuletzt geändert von Matthias.Selle am 02.07.2008 11:16, insgesamt 1-mal geändert.
war ja schon fast richtig:
Code: Alles auswählen.
Condense wa.
IF NOT wa CO '1234567890 '. "Leerzeichen noch mit berücksichtigen
Gruß
Ereglam
May the Force be with your code
|| .| |.|| | .... . ..|. ||| .|. |.|. . |... . .|| .. | .... |.|| ||| ..| .|. |.|. ||| |.. .
Ereglam
May the Force be with your code
|| .| |.|| | .... . ..|. ||| .|. |.|. . |... . .|| .. | .... |.|| ||| ..| .|. |.|. ||| |.. .
Danke euch erstmal für die Rückmeldung. Wusste doch, dass es einen Befehl zur Längenbestimmung gibt 
Das mit dem Leerzeichen funktioniert jedoch leider nicht, da dadurch auch Werte akzeptiert werden, die mitten in der Nummer ein Leerzeichen haben...
32021234567891 -> so ist Nummer korrekt
3202.1234.567891 -> nicht korrekt
3202 1234 567891 -> nicht korrekt
320212354 -> nicht korrekt
Der Anwender kann ich dem zu prüfenden Feld zur Zeit leider alles eingeben, jedoch nur Variante 1 wäre korrekt.
Vielleicht noch eine Idee?
Vielen Dank Zwenn
Das mit dem Leerzeichen funktioniert jedoch leider nicht, da dadurch auch Werte akzeptiert werden, die mitten in der Nummer ein Leerzeichen haben...
32021234567891 -> so ist Nummer korrekt
3202.1234.567891 -> nicht korrekt
3202 1234 567891 -> nicht korrekt
320212354 -> nicht korrekt
Der Anwender kann ich dem zu prüfenden Feld zur Zeit leider alles eingeben, jedoch nur Variante 1 wäre korrekt.
Vielleicht noch eine Idee?
Vielen Dank Zwenn
Wenn du den String einer numerischen Variablen zuweist, weisst du, ob es ein numerischer String war/ist. Bei einem ungültiger Wert in dem String, wird eine Exception ausgelöst. Wenn du jetzt das Ganze in einem try...catch-Block verpackst, hast du es.Zwenn hat geschrieben:Danke euch erstmal für die Rückmeldung. Wusste doch, dass es einen Befehl zur Längenbestimmung gibt
Das mit dem Leerzeichen funktioniert jedoch leider nicht, da dadurch auch Werte akzeptiert werden, die mitten in der Nummer ein Leerzeichen haben...
32021234567891 -> so ist Nummer korrekt
3202.1234.567891 -> nicht korrekt
3202 1234 567891 -> nicht korrekt
320212354 -> nicht korrekt
Der Anwender kann ich dem zu prüfenden Feld zur Zeit leider alles eingeben, jedoch nur Variante 1 wäre korrekt.
Vielleicht noch eine Idee?
Vielen Dank Zwenn
Du kannst das aber auch als Fingerübung verstehen und dir einen nichtdeterministischen endlichen Automaten basteln.
Hallo,
Ennos Lösung ist ein eleganter Ansatz. Aber um die Sache abzusichern muß vorher mit SHIFT LEFT DELETING LEADING space für Linksbündigkeit gesorgt werden und zusätzlich geprüft werden, ob die Stellen 15-20 wirklich leer sind.
MfG
Thomas R.
Ennos Lösung ist ein eleganter Ansatz. Aber um die Sache abzusichern muß vorher mit SHIFT LEFT DELETING LEADING space für Linksbündigkeit gesorgt werden und zusätzlich geprüft werden, ob die Stellen 15-20 wirklich leer sind.
MfG
Thomas R.
Zuletzt geändert von Thomas R. am 02.07.2008 16:53, insgesamt 1-mal geändert.
Hi Thomas, den SHIFT LEFT... erledigt der Condense, allerdings muss da noch der Zusatz "NO-GAPS" hin. Mit deinem zweiten Einwand hast du allerdings recht... 
Ich werde mir mühe geben, etwas ÜBERSICHTLICHER zu antworten... 
it was hard to code so it should be hard to read!!!:twisted:
it was hard to code so it should be hard to read!!!:twisted:
Beitrag
von black_adept (Top Expert / 4134 / 131 /
956
)
»
Code: Alles auswählen.
FIND REGEX '^\s*(0|1|2|3|4|5|6|7|8|9){14}\s*$' IN test.Hi,
für solche Zwecke bieten sich auch die FUBA
RS_CONV_EX_2_IN bzw.
RS_CONV_EX_2_IN_DTEL an
Input das zu prüfende Alphafeld
und Art des Feldes
Ausgabe das Zielfeld
Beispiel:
Input Alphawert
Art = MATNR
Ausgabefeld xxxx type MATNR
Ergebnis: wenn ok, dann entsprechend aufbereitetes Empfangsfeld
ansonsten div Fehlermeldungen
*" INPUT_NOT_NUMERICAL
*" TOO_MANY_DECIMALS
*" MORE_THAN_ONE_SIGN
*" ILL_THOUSAND_SEPARATOR_DIST
*" TOO_MANY_DIGITS
*" SIGN_FOR_UNSIGNED
*" TOO_LARGE
*" TOO_SMALL
*" INVALID_DATE_FORMAT
*" INVALID_DATE
*" INVALID_TIME_FORMAT
*" INVALID_TIME
*" INVALID_HEX_DIGIT
*" UNEXPECTED_ERROR
*" INVALID_DTEL
*" FIELD_AND_DTEL_INCOMPATIBLE
*" INPUT_TOO_LONG
*" NO_DECIMALS
*" INVALID_FLOAT
*" CONVERSION_EXIT_ERROR
Gruß TakerOne
für solche Zwecke bieten sich auch die FUBA
RS_CONV_EX_2_IN bzw.
RS_CONV_EX_2_IN_DTEL an
Input das zu prüfende Alphafeld
und Art des Feldes
Ausgabe das Zielfeld
Beispiel:
Input Alphawert
Art = MATNR
Ausgabefeld xxxx type MATNR
Ergebnis: wenn ok, dann entsprechend aufbereitetes Empfangsfeld
ansonsten div Fehlermeldungen
*" INPUT_NOT_NUMERICAL
*" TOO_MANY_DECIMALS
*" MORE_THAN_ONE_SIGN
*" ILL_THOUSAND_SEPARATOR_DIST
*" TOO_MANY_DIGITS
*" SIGN_FOR_UNSIGNED
*" TOO_LARGE
*" TOO_SMALL
*" INVALID_DATE_FORMAT
*" INVALID_DATE
*" INVALID_TIME_FORMAT
*" INVALID_TIME
*" INVALID_HEX_DIGIT
*" UNEXPECTED_ERROR
*" INVALID_DTEL
*" FIELD_AND_DTEL_INCOMPATIBLE
*" INPUT_TOO_LONG
*" NO_DECIMALS
*" INVALID_FLOAT
*" CONVERSION_EXIT_ERROR
Gruß TakerOne
Ich bin eigentlich ein sehr netter Mensch.
Wenn ich Freunde hätte, könnten diese es bestätigen.
Wenn ich Freunde hätte, könnten diese es bestätigen.
Vergleichbare Themen
3
Antw.
Antw.
1962
Views
Views
5
Antw.
Antw.
4608
Views
Views
Prüfen der Werte bei Merkmalbewertung per FB
von xanatos » 02.06.2005 14:12 • Verfasst in ABAP® Core
von xanatos » 02.06.2005 14:12 • Verfasst in ABAP® Core
5
Antw.
Antw.
3917
Views
Views
Beliebige Werte gegen die Schablone des Merkmals prüfen
von zer0 » 08.11.2013 13:12 • Verfasst in ABAP® Core
von zer0 » 08.11.2013 13:12 • Verfasst in ABAP® Core
8
Antw.
Antw.
2199
Views
Views
String auf bestimmte Buchstaben prüfen
von debianfan » 18.03.2022 12:50 • Verfasst in ABAP® für Anfänger
von debianfan » 18.03.2022 12:50 • Verfasst in ABAP® für Anfänger
1
Antw.
Antw.
8334
Views
Views
Frage die ABAP Experten
Über diesen Beitrag
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.
Aktuelle Forenbeiträge
Unbeantwortete Forenbeiträge
Nutzung UserExit COOM0003 für Abrechnungsvorschriften Aufträge
vor einer Woche von fico_fschluesener 1 / 1692
vor einer Woche von fico_fschluesener 1 / 1692