SAP: MF60 / MB1A Enhancement LRMPUFS1 / LRMPUFS7 / LRMPUFSD / LV01FFSA / LV01FFSD / LV01FFSC

本文链接：https://blog.csdn.net/yong325/article/details/8813860

这篇博客详细介绍了在SAP系统中，针对MF60和MB1A事务代码进行的多个增强，包括LRMPUFS1、LRMPUFS7、LRMPUFSD等。这些增强主要用于限制和验证生产订单，如检查单个生产订单，限制问题位置，以及过滤特定库存地点。

摘要由CSDN通过智能技术生成

LRMPUFS1:

PERFORM rm_clear_trace USING 1.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1) Form REQ_SELECTION, End                                                                                                                           A
*$*$-Start: (1)---------------------------------------------------------------------------------$*$*
ENHANCEMENT 3  ZMF60.    "active version
* Add by Lisa Wong 09/05/2012 for single production order checking

data: l_len type i.
data : wa_ordx like line of sr-ordx.
data:  l_FTRMI like afko-FTRMI.
*delete sr-ordx where sec_slct = 'X'.
clear: l_len,l_FTRMI.
loop at sr-ordx into wa_ordx where sec_slct = ''.
  l_len = l_len + 1.
  W_AUFNR = WA_ORDX-AUFNR.
endloop.
*describe table sr-ordx lines l_len .
if l_len > 1.
   message 'Please input single production order' type 'E'.
endif.
select single FTRMI into l_FTRMI from afko
   where afko~aufnr = w_aufnr.

if l_FTRMI is INITIAL.
   message 'Production order is not released' type 'E'.
  endif.
ENDENHANCEMENT.
*$*$-End:   (1)---------------------------------------------------------------------------------$*$*
ENDFORM.                    " REQ_SELECTION

LRMPUFS7:

PERFORM rm_clear_trace USING 3.
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(1) Form RESB_BY_RSNUM, End                                                                                                                           A
*$*$-Start: (1)---------------------------------------------------------------------------------$*$*
ENHANCEMENT 4  ZMF60.    "active version
* Add by Lisa wong 10/05/2012  start restrict issue location
if sy