函数使用十三：BAPI_REQUISITION_CREATE

2021-11-02 10:01:08 阅读：180 来源： 互联网

标签：gw BAPI gt text CREATE 申请 item REQUISITION 采购

*&---------------------------------------------------------------------*
*& Report  ZBAPI_REQUISITION_CREATE
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
"场景  公司需求采购某物料，需求部门或者物资部门通过创建采购申请来提出自己的需求。
"因测试系统配置有限，采购申请的其他功能暂时不能实现，待后续
REPORT  zbapi_requisition_create.

DATA:gt_item TYPE TABLE OF bapiebanc,"采购申请项目内表
     gw_item LIKE LINE OF gt_item,
     gt_text TYPE TABLE OF bapiebantx,"采购申请项目文本内表
     gw_text LIKE LINE OF gt_text,
     gt_retu TYPE TABLE OF bapireturn,"返回消息内表
     gw_retu LIKE LINE OF gt_retu,
     gv_rdno TYPE banfn.

"行项目数据添加
gw_item-preq_item = 10."行项目号
gw_item-doc_type = 'ZB'."采购申请类型
gw_item-pur_group = 'D01'."采购组
*gw_item-pur_group = '137'."采购组
gw_item-created_by = 'LIYUAN'."创建人
gw_item-preq_name = 'ANDYLEE'."需求人
gw_item-preq_date = '20210603'."采购组
gw_item-short_text = 'short text'."项目短文本
gw_item-material = 'K300000'."采购申请行物料号
*gw_item-material = 'T60602475'."采购申请行物料号
*gw_item-batch = 'HS'."采购申请行物料号
gw_item-plant = '6375'."采购申请工厂
*gw_item-plant = '8380'."采购申请工厂
gw_item-quantity = '2'."采购申请数量
gw_item-deliv_date = '20210715'."采购申请发运日期
APPEND gw_item TO gt_item.

"行文本
gw_text-preq_item = 10."项目号
gw_text-text_id = 'Z001'."文本号
gw_text-text_form = '*'."文本号
gw_text-text_line = 'test for purchase requisition'."文本号
APPEND gw_text TO gt_text.

CALL FUNCTION 'BAPI_REQUISITION_CREATE'
  IMPORTING
    number                = gv_rdno
  TABLES
    requisition_items     = gt_item
    requisition_item_text = gt_text
    return                = gt_retu.

READ TABLE gt_retu INTO gw_retu WITH KEY type = 'E'.
IF sy-subrc <> 0.
  CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
    EXPORTING
      wait = 'X'.
  WRITE gv_rdno.
ELSE.
  CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
ENDIF.

标签：gw,BAPI,gt,text,CREATE,申请,item,REQUISITION,采购
来源： https://www.cnblogs.com/sapSB/p/15497464.html

本站声明： 1. iCode9 技术分享网（下文简称本站）提供的所有内容，仅供技术学习、探讨和分享；
2. 关于本站的所有留言、评论、转载及引用，纯属内容发起人的个人观点，与本站观点和立场无关；
3. 关于本站的所有言论和文字，纯属内容发起人的个人观点，与本站观点和立场无关；
4. 本站文章均是网友提供，不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属；如您发现该文章侵犯了您的权益，可联系我们第一时间进行删除；
5. 本站为非盈利性的个人网站，所有内容不会用来进行牟利，也不会利用任何形式的广告来间接获益，纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。

ICode9

函数使用十三：BAPI_REQUISITION_CREATE