First Commit (2026.08.28)
This commit is contained in:
@@ -0,0 +1,33 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& 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.
|
||||
Reference in New Issue
Block a user