SAP 采购申请的增强（对内容的处理，比如批次）

SAP 采购申请的增强（对内容的处理，比如批次）

有些SAP的采购申请的增强涉及对采购申请的数据的额外处理
如果在ME_PROCESS_REQ_CUST的process_item里面处理
会导致程序死循环，循环触发。因此，需要寻找另外的地方进行采购申请ME51N、ME52N做增强处理。找到一个函数的增强点，
ME_UPDATE_REQUISITION，可以对数据进行额外的处理
FUNCTION me_update_requisition.
“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”“”"$"$\SE:(1) Function Module ME_UPDATE_REQUISITION, Start A
$\ast$-Start: (1)---------------------------------------------------------------------------------$\ast$
ENHANCEMENT 1 ZME52N_UPDATE. "active version
DATA: LV_MATNR TYPE MARA-MATNR ,
LV_MPN TYPE FLAG ,
lv_XCHPF TYPE MARA-XCHPF .
LOOP AT XEBAN.
CLEAR:LV_MATNR , LV_MPN , lv_XCHPF .
LV_MATNR = XEBAN-EMATN .
CALL FUNCTION ‘ZCHECK_IS_MPN’
EXPORTING
iv_material = LV_MATNR
IMPORTING
EV_IS_MPN = LV_MPN

•  EV_MATERIAL_INT       =
  

•  EV_MP_PROFILE         =
  

• EXCEPTIONS

•  NOT_FOUND             = 1
  

•  OTHERS                = 2
         .
  

  IF sy-subrc <> 0.
• Implement suitable error handling here
  ENDIF.
  IF LV_MPN = ‘X’.
  SELECT SINGLE XCHPF
  INTO lv_XCHPF
  FROM MARA
  WHERE MATNR = XEBAN-MATNR .
  IF lv_XCHPF = ‘X’.
  XEBAN-CHARG = XEBAN-MFRNR .
  SHIFT XEBAN-CHARG LEFT DELETING LEADING ‘0’ .
  MODIFY XEBAN .
  ENDIF.
  ENDIF.
  ENDLOOP.
  ENDENHANCEMENT.

这是一个自动修改采购申请的批次的数据的代码，仅供参考。