点击此处--->   群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）

"利润中心
  从zpi_map_plant中选择prctr到表it_map_plant的对应字段中，其中werks = wa_master-werks。
  如果sy-subrc = 0。
  从zpi_map_plant中选择单项，然后放入wa_item_master-prctr中，其中werks = wa_stock-werks。
  其他。
  从zpi_map_plant中选择一个prctr_klinik到wa_item_master-prctr中werks_klinik = wa_stock-werks。
  从zpi_map_plant中选择一个prctr_klinik，然后插入wa_item_master-prctr_klinik，其中werks_klinik = wa_stock-werks。
  万一。

 表格show_alv。
  lo_layout-zebra ='X'。
  lo_layout-colwidth_optimize ='X'。
  lo_layout-info_fieldname ='COLOR'。
  ls_variant-report = sy-repid。
  清除wa_event。
  将" TOP_OF_PAGE"移动到wa_event-name。
  将" TOP_OF_PAGE"移动到wa_event-form。
  APPEND wa_event TO事件。
  grids-coll_top_p ='X'。
  执行fill_structure。
  IF opty EQ'X'。
  通话功能'REUSE_ALV_GRID_DISPLAY'
  出口
  i_callback_program = sy-repid
  it_fieldcat = it_fieldcat
  i_default ='X'
  i_save ='A'
  桌子
  t_outtab = it_item_stock_assigned []。
  ELSEIF选择了EQ'X'。
  通话功能'REUSE_ALV_GRID_DISPLAY'
  出口
  i_callback_program = sy-repid
  it_fieldcat = it_fieldcat
  i_default ='X'
  i_save ='A'
  " i_background_id = d_alv_bg_id
  桌子
  t_outtab = it_item_stock_not_assigned []。
  万一。
 ENDFORM。
 FORM set_pop_custom使用rt_extab类型slis_t_extab。
  刷新rt_extab。
  将PF状态设置为``4000''。
 ENDFORM。
 FORM user_command_change使用p_comm TYPE sy-ucomm
  wa_selfield TYPE slis_selfield。
  案例p_comm。
  当"返回"时。
  离开屏幕0。
  当"关闭"时。
  离开屏幕0。
  当"退出"时。
  离开屏幕0。
  当"＆XLS"时。
  " PERFORM save_excel_0030。
  结束。
 ENDFORM。