通过ABAP程序批量修改合作伙伴

最新推荐文章于 2023-10-10 14:18:21 发布

原创

最新推荐文章于 2023-10-10 14:18:21 发布 · 1.2k 阅读

2 ·

CC 4.0 BY-SA版权

这个ABAP报告用于批量修改合作伙伴数据。用户输入参数包括供应商组织、运输方式和部分，上传CSV文件后，程序根据指定操作（删除、插入或更新）对数据进行处理，并在ALV网格中显示结果。

REPORT Y0000SD_KNVP_UPDATE.

TYPE-POOLS: slis.
TYPES: ty_tab TYPE line OCCURS 10.
TYPES: BEGIN OF ty_kunnr,
kunnr TYPE kunnr,
END OF ty_kunnr.
DATA: gv_file TYPE string.
DATA: gt_tab TYPE ty_tab,
gs_line TYPE line,
gs_knvp TYPE knvp.
DATA: gt_knvp_update TYPE y0000sd_knvp_upd OCCURS 0,
gs_knvp_update TYPE y0000sd_knvp_upd.
DATA: gt_knvp_before TYPE y0000sd_knvp_upd OCCURS 0,
gs_knvp_before TYPE y0000sd_knvp_upd.
DATA: gt_kunnr TYPE ty_kunnr OCCURS 0,
gs_kunnr TYPE ty_kunnr.
DATA: gt_alv TYPE y0000sd_knvp_upd_alv OCCURS 0,
gs_alv TYPE y0000sd_knvp_upd_alv.
DATA: gs_layout TYPE slis_layout_alv.

PARAMETER: p_vkorg TYPE vkorg OBLIGATORY DEFAULT '0051',
p_vtweg TYPE vtweg OBLIGATORY DEFAULT '11',
p_spart TYPE spart OBLIGATORY DEFAULT '01',
p_file TYPE localfile.
PARAMETER: r_del RADIOBUTTON GROUP typ,
r_ins RADIOBUTTON GROUP typ,
r_upd RADIOBUTTON GROUP typ.
PARAMETER: p_test AS CHECKBOX DEFAULT 'X'.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
program_name = syst-cprog
dynpro_number = syst-dynnr
field_name = ' '