ABAP销售合同冻结Bapi

FUNCTION ZSD_SALESORDER_BLOCK.
*"----------------------------------------------------------------------
*"*"本地接口：
*"  IMPORTING
*"     VALUE(I_VBELN) TYPE  VBAK-VBELN
*"     VALUE(NOAPPLLOG) TYPE  CHAR1 OPTIONAL
*"     VALUE(TESTRUN) TYPE  CHAR1 OPTIONAL
*"  EXPORTING
*"     VALUE(E_SUCC) TYPE  CHAR1
*"     VALUE(E_MESSAGE) TYPE  GTER_TEXT
*"  TABLES
*"      IT_ITEM STRUCTURE  ZVS_VBAP_BLOCK
*"      ET_RETURN STRUCTURE  BAPIRET2 OPTIONAL
*"----------------------------------------------------------------------DATA:CONTRACT_HEADER_IN  LIKE  BAPISDH1,CONTRACT_HEADER_INX LIKE  BAPISDH1X,CONTRACT_ITEMS_IN   LIKE TABLE OF BAPISDITM WITH HEADER LINE,CONTRACT_ITEMS_INX  LIKE TABLE OF BAPISDITMX WITH HEADER LINE,LT_RETURN           LIKE TABLE OF BAPIRET2 WITH HEADER LINE.CONTRACT_HEADER_INX-UPDATEFLAG = 'U'.LOOP AT IT_ITEM.CONTRACT_ITEMS_IN-ITM_NUMBER = IT_ITEM-POSNR.CONTRACT_ITEMS_INX-ITM_NUMBER = IT_ITEM-POSNR.CONTRACT_ITEMS_INX-UPDATEFLAG = 'U'.CONTRACT_ITEMS_IN-REASON_REJ = IT_ITEM-ABGRU.CONTRACT_ITEMS_INX-REASON_REJ = 'X'.APPEND CONTRACT_ITEMS_IN.APPEND CONTRACT_ITEMS_INX.ENDLOOP.CALL FUNCTION 'BAPI_CUSTOMERCONTRACT_CHANGE'EXPORTINGSALESDOCUMENT       = I_VBELNCONTRACT_HEADER_IN  = CONTRACT_HEADER_INCONTRACT_HEADER_INX = CONTRACT_HEADER_INXSIMULATION          = TESTRUN
*     BEHAVE_WHEN_ERROR   = ' '
*     INT_NUMBER_ASSIGNMENT       = ' '
*     LOGIC_SWITCH        =
*     NO_STATUS_BUF_INIT  = ' 'TABLESRETURN              = LT_RETURNCONTRACT_ITEM_IN    = CONTRACT_ITEMS_INCONTRACT_ITEM_INX   = CONTRACT_ITEMS_INX
*     PARTNERS            =
*     PARTNERCHANGES      =
*     PARTNERADDRESSES    =
*     CONDITIONS_IN       =
*     CONDITIONS_INX      =
*     CONTRACT_CFGS_REF   =
*     CONTRACT_CFGS_INST  =
*     CONTRACT_CFGS_PART_OF       =
*     CONTRACT_CFGS_VALUE =
*     CONTRACT_CFGS_BLOB  =
*     CONTRACT_CFGS_VK    =
*     CONTRACT_CFGS_REFINST       =
*     CONTRACT_TEXT       =
*     CONTRACT_DATA_IN    =
*     CONTRACT_DATA_INX   =
*     CONTRACT_KEYS       =
*     EXTENSIONIN         =
*     EXTENSIONEX         =.APPEND LINES OF LT_RETURN TO ET_RETURN.LOOP AT LT_RETURN WHERE TYPE = 'E' OR TYPE = 'A'.E_SUCC = 'E'.CONCATENATE E_MESSAGE LT_RETURN-MESSAGE ';' INTO E_MESSAGE.ENDLOOP.IF SY-SUBRC <> 0.CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'EXPORTINGWAIT = 'X'.E_SUCC = 'S'.ELSE.CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.ENDIF.ENDFUNCTION.

ABAP销售合同冻结Bapi相关推荐

ABAP销售合同删除Bapi
FUNCTION ZSD_SALESORDER_DELETE. *"------------------------------------------------------------- ...
ABAP 资产类BAPI过账 BAPI_ACC_DOCUMENT_POST
博客转移,点击进入:ABAP 资产类BAPI过账 BAPI_ACC_DOCUMENT_POST 我在公众号里写了很多SAP的文章有兴趣可以关注一下公众号:SAP Technical
SAP ABAP SD 常用BAPI
1.创建标准销售订单的bapi:BAPI_SALESORDER_CREATEFROMDAT2 2.创建退货销售订单的bapi:BAPI_CUSTOMERRETURN_CREATE 3.更改销售订单 b ...
SAP中ABAP开发常用bapi
有些订单SAP提供了Function和BAPI两种方式创建.修改订单,我们建议使用BAPI方式,BAPI会有一些逻辑的检查. 1.MM模块 MM01.MM02 BAPI ...
VA41 销售合同创建BAPI
一.事务代码VA41 合同创建的过程和销售订单几乎一致二.调用BAPI 调用BAPI为BAPI_CONTRACT_CREATEFROMDATA 传参和销售订单BAPI:BAPI_SALESORDER ...
[ABAP] QA32冲销BAPI示例代码
有需求需要做QA32的返向即质检库存转为非限制库存,下面放DEMO程序,有碰到类似需求的朋友方便引用. *$*$-------------------------------------------- ...
SAP ABAP 业务合作伙伴 BP BAPI清单
SAP ABAP 业务合作伙伴 BP BAPI 清单简介: 本文记录业务对象业务合作伙伴 BP 的 BAPI 清单. 关键字:SAP ABAP 业务合作伙伴 BAPI BP 文章目录 SAP ABA ...
我回答的一个粉丝关于模拟SAP事务的问题
提问: 星主,你好.我们公司使用的是SAP GUI,数据库是hana,服务器都是在国外,我是其中的一个财务人员也就是End User.之前学过MySQL等数据库,也会一点js,php,qt,VBA等. ...
我回答的一个粉丝关于用编程语言模拟SAP事务的问题
提问: 星主,你好.我们公司使用的是SAP GUI,数据库是hana,服务器都是在国外,我是其中的一个财务人员也就是End User.之前学过MySQL等数据库,也会一点js,php,qt,VBA等. ...

ABAP销售合同冻结Bapi

ABAP销售合同冻结Bapi相关推荐

最新文章

热门文章