首页
学习
活动
专区
工具
TVP
发布
社区首页 >专栏 >使用ABAP代码返回S/4HANA Material上维护的Attachment明细

使用ABAP代码返回S/4HANA Material上维护的Attachment明细

原创
作者头像
Jerry Wang
发布2018-06-23 22:18:52
1K0
发布2018-06-23 22:18:52
举报

在事务码 MM02里为ID为16的material维护附件:

如何使用ABAP代码获得如下附件的名称和文件内容?

REPORT zgos_api.

DATA ls_appl_object     TYPE gos_s_obj.

DATA lo_gos_api         TYPE REF TO cl_gos_api.

DATA lt_attachment_list TYPE gos_t_atta.

DATA lt_role_filter     TYPE gos_t_rol.

DATA ls_attachment   TYPE gos_s_atta.

DATA ls_attachm_cont TYPE gos_s_attcont.

DATA ls_atta_key     TYPE gos_s_attkey.

DATA: lv_id  TYPE matnr VALUE '16',

      lt_att TYPE TABLE OF sibflporb.

CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT'

  EXPORTING

    input  = lv_id

  IMPORTING

    output = lv_id.

ls_appl_object-typeid = 'BUS1001006'.

ls_appl_object-instid = lv_id.

ls_appl_object-catid  = 'BO'.

START-OF-SELECTION.

  TRY.

      lo_gos_api = cl_gos_api=>create_instance( ls_appl_object ).

      APPEND cl_gos_api=>c_attachment TO lt_role_filter.

      lt_attachment_list = lo_gos_api->get_atta_list( lt_role_filter ).

    CATCH cx_gos_api INTO DATA(error).

      WRITE:/ error->get_text( ).

      RETURN.

  ENDTRY.

  DATA: ls_key TYPE gos_s_attkey.

  LOOP AT lt_attachment_list ASSIGNING FIELD-SYMBOL(<id>).

    ls_key-atta_id = <id>-atta_id.

    ls_key-atta_cat = <id>-atta_cat.

    DATA(ls) = lo_gos_api->get_al_item( ls_key ).

  ENDLOOP.

执行结果:

要获取更多Jerry的原创技术文章,请关注公众号"汪子熙"或者扫描下面二维码:

原创声明:本文系作者授权腾讯云开发者社区发表,未经许可,不得转载。

如有侵权,请联系 cloudcommunity@tencent.com 删除。

原创声明:本文系作者授权腾讯云开发者社区发表,未经许可,不得转载。

如有侵权,请联系 cloudcommunity@tencent.com 删除。

评论
登录后参与评论
0 条评论
热度
最新
推荐阅读
领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档