在migo生成物料凭证时,需要人为在创建一张移库凭证。可通过以下增强实现。
-
*$*$-Start: GOODS_MOVEMENT_FILL_04--------------------------------------------------------------$*$*
-
ENHANCEMENT 4 OIO_SAPLMIGO. \"active version
-
IF l_tafkz = x. \"201156
-
COMMIT WORK AND WAIT. \"201156
-
CALL METHOD reset.
-
CALL TRANSACTION \'LT06\'. \"201156
-
ELSE.
-
data l_oio_cd(1) type c.
-
import l_cd_list = l_oio_cd from memory id \'OIO_GR\'.
-
if l_oio_cd = \'X\'.
-
commit work and wait.
-
else.
-
commit work.
-
endif.
-
CALL METHOD reset.
-
ENDIF.
-
ENDENHANCEMENT.
可通过修改此段代码来实现客户化功能
来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/7714329/viewspace-1561498/
,如需转载,请注明出处,否则将追究法律责任。