SAP采购订单税码增强检查.docx

SAP采购订单税码增强检查2014年09月05日 综合 共 3030字 字号小中大评论关闭1、SE18查看ME_PROCESS_PO_CUST相关信息2、SE19创建ME_PROCESS_PO_CUST的BADI实现类注意类名称定义是按照以下规则：ZCL_IM_ + BADI其中CL表示CLASS类的意思，IM表示Implement实现的意思；3、SE24实现ZCL_IM_ME_PROCESS_PO_CUST4、实现PROCESS_ITEM代码：METHOD IF_EX_ME_PROCESS_PO_CUSTPROCESS_ITEM.*&=*& 对采购订单行项目增加是否有选择税码检查*& Added by liangqh 2010-07-28*&=INCLUDE MM_MESSAGES_MAC.DATA:L_ITEM TYPEMEPOITEM.采购订单行项目*- 取得采购订单行项目数据L_ITEM =IM_ITEM-GET_DATA( ).*- 判断行项目税率是否为空IF L_ITEM-MWSKZ = OR L_ITEM-MWSKZ ISINITIAL.MMPUR_MESSAGE E ZMM01 002 L_ITEM-EBELN L_ITEM-EBELP .ENDIF.ENDMETHOD.METHOD IF_EX_ME_PROCESS_PO_CUSTCHECK.*&=*& 对采购订单行项目增加是否有选择税码检查*& Added by liangqh 2010-07-28*&=INCLUDE MM_MESSAGES_MAC.DATA:OBJ_ITEMSTYPE PURCHASE_ORDER_ITEMS,OBJ_ITEMTYPE PURCHASE_ORDER_ITEM,LW_HEADERTYPE MEPOHEADER,LW_ITEM TYPEMEPOITEM.*-取得订单抬头信息及明细数据LW_HEADER = IM_HEADER-GET_DATA().OBJ_ITEMS=IM_HEADER-GET_ITEMS( ).LOOP AT OBJ_ITEMS INTO OBJ_ITEM.LW_ITEM =OBJ_ITEM-ITEM-GET_DATA( ).*- 判断行项目税率是否为空IFLW_ITEM-MWSKZ = OR LW_ITEM-MWSKZ IS INITIAL.MMPUR_MESSAGE E ZMM01 002 LW_ITEM-EBELN LW_ITEM-EBELP .ENDIF.ENDLOOP.ENDMETHOD.method IF_EX_ME_PROCESS_PO_CUSTPOST.*&=*& 对采购订单行项目增加是否有选择税码检查*& Added by liangqh 2010-07-28*&=INCLUDE MM_MESSAGES_MAC.DATA:OBJ_ITEMSTYPE PURCHASE_ORDER_ITEMS,OBJ_ITEMTYPE PURCHASE_ORDER_ITEM,LW_HEADERTYPE MEPOHEADER,LW_ITEM TYPEMEPOITEM.*-取得订单抬头信息及明细数据LW_HEADER = IM_HEADER-GET_DATA().OBJ_ITEMS=IM_HEADER-GET_ITEMS( ).LOOP AT OBJ_ITEMS INTO OBJ_ITEM.LW_ITEM =OBJ_ITEM-ITEM-GET_DATA( ).*- 判断行项目税率是否为空IFLW_ITEM-MWSKZ = OR LW_ITEM-MWSKZ IS INITIAL.MMPUR_MESSAGE E ZMM01 002 LW_ITEM-EBELN LW_ITEM-EBELP .ENDIF.ENDLOOP.endmethod.*Add by Andrew :在采购订单增强中报消息信息的方法：.INCLUDEMM_MESSAGES_MAC.MMPUR_MESSAGEWZMM01002ls_mepoitem-EBElnls_mepoitem-EBELPls_mepoitem-reslo.sy-msgid=ZMM01.sy-msgty=W.sy-msgno=003.messageidsy-msgidtypesy-msgtynumbersy-msgnoWITHls_mepoitem-EBElnls_mepoitem-EBELPls_mepoitem-reslo.setextendedcheckoff.callmethodcl_message_mm=createEXPORTINGim_msgid=sy-msgidim_msgty=sy-msgtyim_msgno=sy-msgnoim_msgv1=sy-msgv1im_msgv2=sy-msgv2im_msgv3=sy-msgv3im_msgv4=sy-msgv4im_force_collect=mmpur_yesEXCEPTIONSfailure=01dialog=02.setextendedcheckoff.这两个方法实现方法是一样的，只是第一种是SAP公司已经实现了，包含在includeMM_MESSAGES_MAC中，所以直接引用。消息类：SE91建立消息类：ZMM01Message : 002It