Tuesday, May 7, 2019

Range with Field Symbol

DATArtab TYPE RANGE OF mara-matnr,
      wtab LIKE LINE OF rtab.

SELECT matnr FROM mara INTO TABLE @DATA(t_mara)
  WHERE mtart 'ZFRT'.

IF sy-subrc 0.
  SORT t_mara.
  wtab-sign   'I'.
  wtab-option 'EQ'.

  LOOP AT t_mara ASSIGNING FIELD-SYMBOL(<w_mara>).
    wtab-low <w_mara>-matnr.
    APPEND wtab TO rtab.

    WRITE:/ wtab-sign,
          wtab-option,
          wtab-low.
    CLEARwtab-low<w_mara>.
  ENDLOOP.
ENDIF.



No comments: