EKKO-BSART= 'AZB' 收货跳过检验批
方案一、强制跳过检验批,不在入库(后续退货、冲销可能有问题 看业务需要)QA32 查不到检验批。
方法1、smod QAAT0001
EXIT_SAPLQAAT_002
e_no_inspection = 'X'.等于表示跳过检验批
方法2、通过检验批是否创建开关函数控制(在隐式增强里面增加)
控制是否创建检验批开关函数
CALL FUNCTION 'QAAT_QM_ACTIVE_INACTIVE'
EXPORTING
aktiv = space.(空为不创建)
创建检验批函数
CALL FUNCTION 'QPL1_INSPECTION_LOT_CREATE'
EXPORTING
qals_imp = lw_qals_imp
rmqed_imp = lw_rmqed_imp
IMPORTING
e_prueflos = lv_prueflos
e_qals = lw_qals_out
subrc = lv_subrc.
IF lv_subrc = 0 AND lv_prueflos IS NOT INITIAL.
" Update memory stack for actual posting...
CALL FUNCTION 'QPL1_UPDATE_MEMORY'
EXPORTING
i_qals = lw_qals_out
i_updkz = 'I'.
" Post lot to DataBase...
CALL FUNCTION 'QPL1_INSPECTION_LOTS_POSTING'.
COMMIT WORK AND WAIT.V
方案二MIGO增强 采购订单生成的检验批自动决策并过账所有数量到非限制库存(转载)
背景:Z009类型的采购订单,101收货入库时,不需要产生检验批
MIGO增强 采购订单生成的检验批自动决策并过账所有数量到非限制库存_mb5ff982de32716的技术博客_51CTO博客