Code: Alles auswählen.
DATA: feldlaenge TYPE I,
format_ist_richtig TYPE BOOLEAN_FLG.
LOOP AT tab ASSIGNING FIELD-SYMBOL(<tab>).
CLEAR format_ist_richtig .
feldlaenge = STRLEN( <tab>-zu_pruefendes_feld ).
case feldlaenge.
when 2.
format_ist_richtig = 'X'.
when 5.
if <tab>-zu_pruefendes_feld+3(1) = '-'.
format_ist_richtig = 'X'.
endif.
when 8.
if <tab>-zu_pruefendes_feld+3(1) = '-'
and <tab>-zu_pruefendes_feld+5(1) = '-'
format_ist_richtig = 'X'.
endif.
endcase.
* Abhängig von format_ist_richtig irgendwas machen
ENDLOOP.
Code: Alles auswählen.
find regex '^(\d\d|\d\d-\d\d|\d\d-\d\d-\d\d)$' in ...