Code listing for: ZFIRP028
Description:
*&---------------------------------------------------------------------*
*& Report ZFIRP028
*&---------------------------------------------------------------------*
*& 账期批量更新
*& JT_LIXX 20211202
*&---------------------------------------------------------------------*
REPORT zfirp028.
TABLES: t001,t001b,marv.
DATA: ok_code TYPE sy-ucomm,
save_ok TYPE sy-ucomm,
g_grid_top TYPE REF TO cl_gui_alv_grid,
g_grid_dwn TYPE REF TO cl_gui_alv_grid,
g_container_top TYPE REF TO cl_gui_container,
g_container_dwn TYPE REF TO cl_gui_container,
g_splitter TYPE REF TO cl_gui_splitter_container.
DATA: BEGIN OF gs_data,
bukrs TYPE t001-bukrs,
butxt TYPE t001-butxt,
light,
message(128),
END OF gs_data,
gt_data LIKE TABLE OF gs_data.
DATA: gs_cw TYPE t001b.
DATA: gt_cw TYPE TAB