*&---------------------------------------------------------------------*
*& Include Z13_04_TOP                               - Module Pool      Z13_04
*&---------------------------------------------------------------------*
CONTROLS tc_zemplist TYPE TABLEVIEW USING SCREEN 0100.

TYPES BEGIN OF ty_list.
INCLUDE STRUCTURE zs13_02.
TYPES mark TYPE char1.
TYPES END OF ty_list.

DATA: gv_change TYPE c,
      ok_code   TYPE sy-ucomm.

DATA: gs_list TYPE ty_list,
      gt_list LIKE TABLE OF gs_list.

DATA: gs_cols TYPE scxtab_column.