Extension for the previous one

Question

Hai all
I want to check wether there are fields WWRET; WWREV, WWCUC WWGCN in the table CE1XXXX where (XXXX is Operating concern will be populated in the selection selection screen.)
And The field should have
Techn.      Field Type     min. Field Length
WWRET     CHAR                2
WWREV     CHAR                4
WWCUC     CHAR                3
WWGCN     CHAR               10
Can anyone help with the code logic
Thanks in advance
Oli

Answer 1

Hallo Oli,
as you could see below.
It works.
If you have more qwestions write me a mail
[email protected]
P.S. you can write it german too. ))
Gruss
Vladimir
REPORT  ZZZVG_TEST                    .
TABLES: DD03L.
SELECT-OPTIONS TABLE FOR DD03L-TABNAME.
SELECT-OPTIONS WWFIELD FOR DD03L-FIELDNAME.
SELECT * FROM DD03L WHERE
TABNAME IN TABLE AND
FIELDNAME IN WWFIELD.
  CASE DD03L-FIELDNAME.
    WHEN 'WWRET'.
      IF DD03L-DATATYPE = 'CHAR'
        AND
        DD03L-LENG = 2.
  OK ! ****************
      ELSE.
NICHT OK ! *************
      ENDIF.
    WHEN 'WWREV'.
      IF DD03L-DATATYPE = 'CHAR'
        AND
        DD03L-LENG = 4.
  OK ! ****************
      ELSE.
NICHT OK ! *************
      ENDIF.
    WHEN 'WWCUC'.
      IF DD03L-DATATYPE = 'CHAR'
         AND
         DD03L-LENG = 3.
  OK ! ****************
      ELSE.
NICHT OK ! *************
      ENDIF.
    WHEN 'WWGCN'.
      IF DD03L-DATATYPE = 'CHAR'
         AND
         DD03L-LENG = 10.
  OK ! ****************
      ELSE.
NICHT OK ! *************
      ENDIF.
  ENDCASE.
ENDSELECT.