*&---------------------------------------------------------------------*
*& Report Z12_01
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT z12_01.

PARAMETERS p_depcd TYPE zemplist-depcd.

INITIALIZATION.
  p_depcd = 'D002'.

START-OF-SELECTION.
  SELECT *
    FROM zemplist
    WHERE depcd EQ @p_depcd
    INTO TABLE @DATA(lt_data).

END-OF-SELECTION.
  cl_demo_output=>display( lt_data ).