gelöst Zeichenprüfung

[Abapsocke]

Hallo,

ich möchte eine Zeichenfolge überprüfen.
Also Beispielsweise 'A0123'

Code: Alles auswählen

If usereingabe EQUALS 'A0123'

-> dann ist alles super

Allerdings soll das Programm nur schauen ob an der ersten Stelle ein A ist und danach vier Ziffern folgen Welche Ziffern das sind ist egal. Wenn dem so ist -> super.

[Legxis]

Code: Alles auswählen

IF usereingabe+0(1) EQ 'A' AND usereingabe+1(4) CO '0123456789'.

[Abapsocke]

Danke top

[lausek]

@Legxis Antwort ist schon sehr gut. Die solltest du nehmen.

Ich wollte hier trotzdem nochmal kurz Regex aufbringen, da das ein sehr nützliches Tool ist - gerade wenn die Bedingungen für einen String komplexer werden:

Code: Alles auswählen

FIND REGEX '^A\d{4}$' IN usereingabe.
IF sy-subrc = 0.
    " ... passt
ENDIF.
 

Der Ausdruck baut sich so auf:
^ - Anfang des Strings, das nächste Zeichen ist der erste Buchstabe
A - entspricht genau dem Buchstaben
\d - ist ein alias für Nummern also 0123456789
{4} - genau vier Zeichen
$ - Ende des String, das vorige Zeichen ist der letzte Buchstabe (also die vier Zahlen)

[ralf.wenzel]

Man sollte es aber in einem Kommentar erklären, weil viele mit Regex nichts anfangen können - sowas wie

Code: Alles auswählen

" check for 'Annnn' - n = numeric digit

Ralf

[Abapsocke]

Danke für den Tipp.
Die Möglichkeiten von Regex kann ich gerade sehr gut gebrauchen.

[black_adept]

@lausek
deine Antwort stimmt zwar für Strings, aber Abapsocke sprach von Zeichenfolgen, so dass auch C-Felder erlaubt sein könnten. Und für Regex zählen bei diesen die abschließenden Leerzeichen mit, so dass man vor dem $ noch ein /s* hinzufügen muss.
Der korrekte Regex wäre somit ^A\d{4}\s*$

@Ralf: Das mit dem Kommentar ist immer eine gute Idee, aber nicht weil es Nichtwissende gibt. Sonst müsste man ja auch einen funktionalen Methodnaufruf oder eine Inlinedeklaration kommentieren, bloß weil es immer noch Dinos gibt....

[ralf.wenzel]

Nein. Regex sind schon sehr speziell und ganz besonders unlesbar für jemanden, der es nicht kennt. Bei einem Methodenaufruf kann der Entwickler einwirken durch Namensvergabe. Eine Regex kann ich nur per Kommentar erklären, zumal sie praktisch unendlich komplex sein kann.


Ralf

[black_adept]

Nein. Regex sind schon sehr speziell und ganz besonders unlesbar für jemanden, der es nicht kennt. Bei einem Methodenaufruf kann der Entwickler einwirken durch Namensvergabe. Eine Regex kann ich nur per Kommentar erklären, zumal sie praktisch unendlich komplex sein kann.

Du hast nicht den Tenor meiner Bemerkung erkannt. Genau so wie es Leute gibt, die keine funktionalen Methodenaufrufe verstehen ( weil sie als Dinos eben nur FORMs und FuBa kennen ), gibt es auch Leute, die sich nicht die Mühe machen reguläre Ausdrücke - zumindest rudimentär - zu verstehen. Beides ist zur Beherrschung der (ABAP)Sprache nötig. Und wenn wir die Lernunwilligen verhätscheln hilft das niemandem - egal ob es sich um OO-Verweigerer oder Regex-Ignorierende handelt.

[ralf.wenzel]

Ich habe (meiner Erinnerung nach) in 20 Jahren noch keine Regex gebraucht, obwohl ich sie immer mal sinnvoll einsetzen wollte. Ich habe auch noch nie im SAP-Coding (oder überhaupt in ABAP außerhalb von Büchern) eine Anwendung von Regex gesehen.

Es ist deutlich schwerer, 20 Jahre ABAP zu verwenden, ohne (in irgendeinem Coding) auf einen funktionalen Methodenaufruf zu stoßen.

Regex ist eine Nischenanwendung, die zudem ihren eigenen Regeln folgt. Und es würde den Lesefluss auch für mich als Entwickler mit 20 Jahren Erfahrung massiv stören, wenn da eine unkommentierte Regex erscheint. Weil ich zum Entschlüsseln in mein Regex-Buch gucken müsste. Darum halte ich einen kurzen Kommentar (der menschlich einfach lesbar ist, wie mein Beispiel).


Ralf

[fr-g]

Nachtrag zur Lösung:
Ich würde in dem konkreten Fall eine Regex-Lösung mit FIND präferieren. Beim anderen Vorschlag müsste man sicherheitshalber noch STRLEN überprüfen, damit man mit dem Offset nicht im Leeren landet ...gerade eine Usereingabe könnte ja evtl. leer sein o.ä.