DATA:lt_USER LIKE TABLE OF ZMM_YLRY .
DATA:lt_matnr LIKE TABLE OF zmara_zsgl WITH HEADER LINE.
DATA:l_matnr TYPE RANGE OF zmara_zsgl-matnr WITH HEADER LINE.
SELECT * INTO CORRESPONDING FIELDS OF TABLE lt_USER FROM ZMM_YLRY WHERE ZRYBH = SY-UNAME.
IF SY-SUBRC = 0.
SELECT MATNR INTO CORRESPONDING FIELDS OF TABLE lt_matnr FROM ZMARA_ZSGL WHERE ZYLSYB = 'X'.
IF lt_matnr IS NOT INITIAL .
LOOP AT lt_matnr.
l_matnr-sign = 'I'.
l_matnr-option = 'EQ'.
l_matnr-low = lt_matnr-matnr.
append l_matnr.
ENDLOOP.
IF l_matnr[] is NOT INITIAL.
delete gt_data WHERE matnr NOT IN l_matnr.
ELSE.
delete gt_data.
ENDIF.
ENDIF.
ENDIF.
以下为第二个案例:
DATA ra_bwart TYPE RANGE OF mseg-bwart."移动类型
DATA ls_bwart LIKE LINE OF ra_bwart.
DATA ra_date TYPE RANGE OF sy-datum."日期期间
DATA ls_date LIKE LINE OF ra_date.
ls_bwart-low = '201'.
ls_bwart-sign = 'I'.
ls_bwart-option = 'EQ'.
A