BP API: cl_md_bp_maintain

供应商冻结与接触:

  DATA:
    LS_BPDATA TYPE CVIS_EI_EXTERN,
    t_retun TYPE BAPIRETM,
    t_bp TYPE  CVIS_EI_EXTERN_T.

  LS_BPDATA-PARTNER-HEADER-OBJECT = 'WX990'.
  LS_BPDATA-PARTNER-HEADER-OBJECT_INSTANCE-BPARTNER = 'WX990'.
  LS_BPDATA-PARTNER-HEADER-OBJECT_INSTANCE-BPARTNERGUID = '7446A0A1157D1EEBB480A555A0638DA5'.
  LS_BPDATA-PARTNER-HEADER-OBJECT_TASK = 'M'.


  LS_BPDATA-VENDOR-HEADER-OBJECT_INSTANCE-LIFNR = 'WX990'.
  LS_BPDATA-VENDOR-HEADER-OBJECT_TASK = 'U'.

*  LS_BPDATA-VENDOR-CENTRAL_DATA-CENTRAL-DATA-LOEVM = 'X'.
  LS_BPDATA-VENDOR-CENTRAL_DATA-CENTRAL-DATA-LOEVM = ''.
  LS_BPDATA-VENDOR-CENTRAL_DATA-CENTRAL-DATAX-LOEVM = 'X'.
*  LS_BPDATA-VENDOR-CENTRAL_DATA-CENTRAL-DATA-NODEL = 'X'.
  LS_BPDATA-VENDOR-CENTRAL_DATA-CENTRAL-DATA-NODEL = ''.
  LS_BPDATA-VENDOR-CENTRAL_DATA-CENTRAL-DATAX-NODEL = 'X'.
*  LS_BPDATA-VENDOR-COMANY_DATA = 'X'.

  APPEND LS_BPDATA TO t_bp.



CALL METHOD cl_md_bp_maintain=>maintain
  EXPORTING
    i_data     = t_bp
*    i_test_run =
  IMPORTING
    e_return   = t_retun
    .

  LOOP AT t_retun ASSIGNING FIELD-SYMBOL(<FS_L_BPDATA>).

  ENDLOOP.
  IF SY-SUBRC <> 0.
    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
     EXPORTING
       WAIT          = 'X'
*     IMPORTING
*       RETURN        =
              .
  ENDIF.

  • 0
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 1
    评论
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值