String in Operator?

[Murdock]

Hi,

wenn nicht hier, wo könnte ich diese frage sonst stellen

Gibt es im ABAP einen in Operator, der auf eine Zeichenkettenmenge überprüft?

Also, anstatt

Code: Alles auswählen

IF lv_feld1 = 'Test1' OR lv_feld1 = 'Test2'.
 ...
ENDIF.
 

Soetwas wie:

Code: Alles auswählen

IF lv_feld1 IN ('Test1','Test2').
 ...
ENDIF.
 

Danke,
Murdock.

[black_adept]

"CASE" statt "IF" - das kommt dem sehr nahe.

Code: Alles auswählen

CASE lv_feld1.
  WHEN 'Test1'
    OR 'Test2'.
  ...
ENDCASE.

[a-dead-trousers]

hi!

"CASE" statt "IF" - das kommt dem sehr nahe.

Mach ich meistens auch immer so.

Wenn es aber etwas komplizierter wird (z.B. mit Wildcards usw.) braucht man entweder einen Range oder RegEx.

Code: Alles auswählen

data: lr_string type range of string.
field-symbols: <lr_string> like line of lr_string.

* Beliebige Patterns füllen
append initial line to lr_string assigning <lr_string>.
<lr_string>-sign = 'I'.
<lr_string>-option = 'CP'.
<lr_string>-low = 'Test*'.
...

if lv_field1 in lr_string.
...
endif.
 

Code: Alles auswählen

find regex 'Test[12]' in lv_field1.
if sy-subrc eq 0.
...
endif.

lg ADT

EDIT: Die RegEx lautet richtigerweise 'Test[12]'

[Murdock]

Danke für die Antworten.

Dass es mit CASE oder gar einer RANGE Tabelle geht ist klar.

Bei meinem Beispiel ginge ja auch

Code: Alles auswählen

IF lv_feld1 CP 'Test*'.

ENDIF.
 

(ja das trifft mehr als nur Test1 und Test2)
(wobei ich mal anmerken muss, dass ich die Operatoren wie CP, CS, CA, ... von der Sache her ziemlich gut finde )

Ich nehme also mit:
1. es gibt keinen "in" Operator wie ich ihn gesucht habe
2. ich bin nicht zu blöd zum Lesen der ABAP Hilfe

Gruß,
Murdock.

Edit sagt, man macht nur 'ne Klammer zu, wenn man sie auch aufgemacht hat...

[Alexander D.]

frei nach http://www.tricktresor.de/content/index ... 46&aID=241
könnte sowas vielleicht auch funktionieren?

Code: Alles auswählen

IF 'Test1/Test2' CS lv_feld1.

[a-dead-trousers]

ja!

Aber wie schon auf der Seite erwähnt hat das Konstrukt einige Nachteile.

[Murdock]

Code: Alles auswählen

IF 'Test1/Test2' CS lv_feld1.

Auch schön, danke.

Gruß,
Murdock.