REPORT Z05_31.


DATA : BEGIN OF gs_line,
  empcd    TYPE zemplist-empcd,
  ename  TYPE zemplist-ename,
END OF gs_line.

DATA gt_itab LIKE TABLE OF gs_line WITH NON-UNIQUE KEY empcd.

SELECT empcd, ename
INTO CORRESPONDING FIELDS OF TABLE @gt_itab
FROM zemplist.

CLEAR : gs_line.

gs_line-empcd = '1002'.
READ TABLE gt_itab WITH TABLE KEY empcd = '1003' INTO gs_line TRANSPORTING ename.

WRITE : gs_line-empcd, gs_line-ename.