--[[
|
编码: WMS-09-12
|
名称:
|
作者：
|
日期：2025-03-06
|
|
函数： ClickOK
|
|
场景: 在实施过程中进行会出现有些货位被某个作业锁了，但是这些作业可能已经被删除或完成，取消，这个时候就需要把这些货位释放
|
功能:
|
点击确定后获取仓库、库区编码，调用 进行释放被无效作业锁定的货位
|
|
更改记录:
|
|
--]]
|
wms_wh = require ("wms_wh")
|
|
function ClickOK( strLuaDEID )
|
local nRet, strRetInfo
|
local _obj = {}
|
nRet, io_obj = m3.GetSysCurEditDataObj( strLuaDEID, "Lock" )
|
if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "获取【锁】对象属性失败!"..io_obj ) end
|
|
nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "S_WH_CODE", "S_AREA_CODE" )
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end
|
local obj_attrs = json.decode( strRetInfo )
|
local wh_code = lua.Get_StrAttrValue( obj_attrs[1].value )
|
local area_code = lua.Get_StrAttrValue( obj_attrs[2].value )
|
|
if ( wh_code == '') then
|
mobox.stopProgram( strLuaDEID, "仓库编码不能为空!" )
|
return
|
end
|
if ( area_code == '') then
|
mobox.stopProgram( strLuaDEID, "库区编码不能为空!" )
|
return
|
end
|
|
nRet, strRetInfo = wms.wms_CleanInvalidLocLock( wh_code, area_code )
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "wms_CleanInvalidLocLock失败! "..strRetInfo ) end
|
end
|
