*&---------------------------------------------------------------------*
*& Include          ZCOPATD0020I01
*&---------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*&      Module  USER_COMMAND_0100  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE user_command_0100 INPUT.

  CASE ok_code.
    WHEN 'ADD'.
      PERFORM add_variant_select_item.
    WHEN 'DEL'.
      PERFORM delete_variant_select_item.
    WHEN 'SAVE'.
      PERFORM save_selected_variant.
  ENDCASE.

  CALL METHOD g_grid_left->refresh_table_display.
  CALL METHOD g_grid_right->refresh_table_display.
ENDMODULE.
*&---------------------------------------------------------------------*
*&      Module  EXIT_0100  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE exit_0100 INPUT.
  CASE ok_code.
    WHEN 'BACK' OR 'RW' OR 'EXIT'.
      LEAVE TO SCREEN 0.
  ENDCASE.
ENDMODULE.