REPORT z07_03.
DATA: gr_rdata TYPE RANGE OF zemplist-empcd,
gs_rdata LIKE LINE OF gr_rdata.
DATA: gt_emp TYPE TABLE OF zemplist,
gs_emp LIKE LINE OF gt_emp.
gs_rdata-sign = 'I'.
gs_rdata-option = 'EQ'.
gs_rdata-low = '1001'.
APPEND gs_rdata TO gr_rdata.
gs_rdata-sign = 'I'.
gs_rdata-option = 'EQ'.
gs_rdata-low = '1002'.
APPEND gs_rdata TO gr_rdata.
SELECT empcd, ename
FROM zemplist
WHERE empcd IN @gr_rdata
INTO CORRESPONDING FIELDS OF TABLE @gt_emp.
LOOP AT gt_emp INTO gs_emp.
WRITE: / gs_emp-empcd, gs_emp-ename.
ENDLOOP.
Leave a Reply
댓글을 달기 위해서는 로그인해야합니다.