Subroutines
FORM refresh_display USING p_grid TYPE REF TO cl_gui_alv_grid.
data is_stable LIKE lvc_s_stbl.
PERFORM get_grid USING p_grid.
is_stable-row = 'X'.
is_stable-col = 'X'.
CALL METHOD p_grid->refresh_table_display
EXPORTING
is_stable = is_stable.
ENDFORM. " REFRESH_DISPLAY
FORM get_grid USING p_grid TYPE REF TO cl_gui_alv_grid.
IF p_grid IS NOT INITIAL.
FREE p_grid.
ENDIF.
CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
IMPORTING
e_grid = p_grid.
ENDFORM. " GET_GRID
FORM check_change USING p_grid TYPE REF TO cl_gui_alv_grid.
DATA: g_valid TYPE c.
PERFORM get_grid USING p_grid.
CALL METHOD p_grid->check_changed_data
IMPORTING
e_valid = g_valid.
ENDFORM. " CHECK_CHANGE
Call Function
data : d_dtb1 type ref to cl_gui_alv_grid.
PERFORM refresh_display USING d_dtb1.
PERFORM check_change USING d_dtb1.
Ref Report
YPP_PRODORD_OPR_CHANGE
ไม่มีความคิดเห็น:
แสดงความคิดเห็น