业务场景:wms传入单号到sap,sap通过bapi生成盘点凭证并过账(实际业务是由财务过账,这里只说明技术)
前台一步输入物料号和盘点数量生成盘点凭证,在进行过账,(2步),sap是先生成盘点凭证,再输入数据最后差异过账(3步)
注意:bapi:创建盘点凭证 :BAPI_MATPHYSINV_CREATE_MULT
盘点数量:BAPI_MATPHYSINV_COUNT(一定要记得传入item行号)
差异过账:BAPI_MATPHYSINV_POSTDIFF(传入行号item)
*&---------------------------------------------------------------------*
*& Form CREATE_WSCODE
*&---------------------------------------------------------------------*
* 在这里创键盘点凭证。
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM FRM_CREATE_WSCODE TABLES GT_ALL STRUCTURE GS_ALL
T_RETURN STRUCTURE ZSMM0005
CHANGING E_RTYPE E_RTMSG.
LOOP AT GT_ALL INTO GS_ALL.
GS_DATA2 = GS_ALL.
APPEND GS_DATA2 TO GT_DATA2.
ENDLOOP.
DELETE ADJACENT DUPLICATES FROM GT_DATA2 COMPARING WMSORD."删除重复项
*IF SY-SUBRC = 0.
LOOP AT GT_DATA2 INTO GS_DATA2.
CLEAR: GS_HEAD_MUTT,
GS_ITEMS_MUTT,
GS_ITEMS_COUNT,
GS_ITEMS_POSTDIFF,
&nbs