--[[
|
编码: JX-58-13
|
名称: 入库波次-强制完成(后台)
|
作者：HAN
|
日期：2025-2-14
|
|
入口函数： ForceFinish
|
|
功能说明:
|
处理后台 WFP 的入库波次强制完成
|
|
更改记录:
|
|
--]]
|
|
wms_op = require( "wms_operation" )
|
wms_cntr = require( "wms_container" )
|
jx_base = require( "jx_base" )
|
|
function ForceFinish ( strLuaDEID )
|
local nRet, strRetInfo
|
local indound_wave = {}
|
nRet, indound_wave = m3.GetSysCurEditDataObj( strLuaDEID, "Inbound_Wave" )
|
if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "获取【入库波次】对象属性失败!"..indound_wave ) end
|
|
if ( indound_wave.b_state == 0 or indound_wave.b_state == 1) then
|
-- 0 未配盘 1 -- 组盘
|
-- 把入库单设置为完成，并且关闭数量=入库数量
|
nRet, strRetInfo = jx_base.Set_Inbound_Wave_Force_Finish( strLuaDEID, indound_wave.wave_no )
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), strRetInfo ) end
|
elseif ( indound_wave.b_state == 2 or indound_wave.b_state == 5 or indound_wave.b_state == 6 ) then
|
-- 2/执行 5/暂停 6/关闭中
|
-- 判断这个入库波次的作业是否还有在执行中的，如果有就不能马上关闭，只能设置为关闭中，等执行中的作业完成后才能设置为关闭，这个另外程序来处理
|
-- 判断是否有存在正在执行的作业 N_B_STATE = 1
|
strCondition = "S_BS_TYPE = 'Inbound_Wave' AND S_BS_NO = '"..indound_wave.wave_no.."' AND N_B_STATE = 1"
|
nRet, strRetInfo = mobox.existThisData( strLuaDEID, "Operation", strCondition )
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), strRetInfo ) end
|
if ( strRetInfo == "yes" ) then
|
-- 存在正在执行的作业
|
strCondition = "S_WAVE_NO = '"..indound_wave.wave_no.."'"
|
strUpdateSql = "N_B_STATE = 6 " -- 关闭中
|
nRet, strRetInfo = mobox.updateDataAttrByCondition( strLuaDEID, "Inbound_Wave", strCondition, strUpdateSql )
|
if ( nRet ~= 0 ) then
|
lua.Error( strLuaDEID, debug.getinfo(1), "更新【入库波次】信息失败!"..strRetInfo )
|
end
|
else
|
-- 已经没有正在执行的作业
|
nRet, strRetInfo = jx_base.Set_Inbound_Wave_Force_Finish( strLuaDEID, indound_wave.wave_no )
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), strRetInfo ) end
|
end
|
-- 把作业状态 = 等待，等待前 的作业状态设置为 取消
|
strCondition = "S_BS_TYPE = 'Inbound_Wave' AND S_BS_NO = '"..indound_wave.wave_no.."' AND ( N_B_STATE = 0 or N_B_STATE = 6 or N_B_STATE = 8 )"
|
strUpdateSql = "N_B_STATE = 7 "
|
nRet, strRetInfo = mobox.updateDataAttrByCondition( strLuaDEID, "Operation", strCondition, strUpdateSql )
|
if ( nRet ~= 0 ) then
|
lua.Error( strLuaDEID, debug.getinfo(1), "更新【作业】信息失败!"..strRetInfo )
|
end
|
end
|
|
end
|
