REPORT  z05_25.

TYPES : BEGIN OF t_line,
          empcd TYPE zfamily-empcd,
          ename TYPE zemplist-ename,
          fname TYPE zfamily-fname,
        END OF t_line.

DATA gt_itab TYPE TABLE OF t_line.

SELECT empcd, fname INTO CORRESPONDING FIELDS OF TABLE @gt_itab
FROM zfamily.

LOOP AT gt_itab INTO DATA(gs_line).

  SELECT SINGLE ename INTO gs_line-ename
    FROM zemplist WHERE empcd = gs_line-empcd.

  MODIFY gt_itab FROM gs_line.

  WRITE : / gs_line-empcd, gs_line-ename, gs_line-fname.

ENDLOOP.