--[[
|
编码: WMS-56-16
|
名称: 容器\站台输入变化后
|
作者：HAN
|
日期：2025-3-11
|
|
级别：固定 (说明本段代码在项目中不太会变化)
|
|
函数： AfterCNTRChange
|
|
功能:
|
-- 根据输入的容器号，判断在当前工作台是否有该容器号的 组盘明细 ，有显示在【货品明细】页签
|
-- 如果当前到站台的入库任务中的容器号和扫码输入的容器号不相等报错
|
|
|
更改记录:
|
V2.0 KUN 20250107
|
需要判断料箱的属性
|
--]]
|
|
wms_cntr= require( "wms_container" )
|
|
function AfterCNTRChange ( strLuaDEID )
|
local nRet, strRetInfo
|
|
-- 获取站台编码
|
nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "S_STATION_NO","S_CNTR_CODE" )
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end
|
local obj_attrs = json.decode( strRetInfo )
|
local station = lua.Get_StrAttrValue( obj_attrs[1].value )
|
local cntr_code = lua.Get_StrAttrValue( obj_attrs[2].value )
|
|
if ( station == '' ) then return end
|
|
local action = {}
|
local strCondition
|
|
if ( cntr_code ~= '' ) then
|
-- 判断料箱属性
|
-- MDY BY KUN 20250107
|
local cntr_obj
|
nRet, cntr_obj = wms_cntr.GetInfo( strLuaDEID, cntr_code )
|
if ( nRet ~= 0 ) then
|
mobox.setInfo( strLuaDEID, "获取容器对象失败! "..cntr_obj )
|
return
|
end
|
if ( cntr_obj == '' ) then
|
mobox.setInfo( strLuaDEID, "编码 = '"..cntr_code.."'的拣料箱不存在!")
|
return
|
end
|
if ( cntr_obj.source ~= "巨沃" ) then
|
mobox.setInfo( strLuaDEID, "编码 = '"..cntr_code.."'的拣料箱不是巨沃的")
|
return
|
end
|
local act_weight = lua.Get_NumAttrValue( cntr_obj.act_weight ) -- 料箱实际重量
|
local max_weight = wms_base.Get_nConst(strLuaDEID, "料箱最大载重")
|
local f_acc_weight = act_weight - max_weight
|
|
-- 判断容器是否处于回库中状态（N_B_STATE = 3/组盘完成，4/回库）
|
strCondition = "S_STATION_NO = '"..station.."' AND ( N_B_STATE = 3 OR N_B_STATE = 4 ) AND S_CNTR_CODE = '"..cntr_code.."'"
|
nRet, data_objs = m3.QueryDataObject(strLuaDEID, "Pre_Alloc_Container", strCondition, "" )
|
if ( nRet ~= 0 ) then
|
mobox.setInfo( strLuaDEID, "QueryDataObject失败!"..data_objs)
|
return
|
end
|
if ( data_objs == '' ) then
|
mobox.setInfo( strLuaDEID, "料箱号'"..cntr_code.."'没有在站台'"..station.."'")
|
return
|
end
|
local org_cntr = m3.KeyValueAttrsToObjAttr(data_objs[1].attrs)
|
local pac_no = lua.Get_StrAttrValue( org_cntr.S_PAC_NO )
|
if ( pac_no == '' ) then
|
mobox.setInfo( strLuaDEID, "料箱号'"..cntr_code.."'无法获取当前入库组盘号")
|
return
|
end
|
if (act_weight <= max_weight) then
|
mobox.setInfo( strLuaDEID, "料箱'"..cntr_code.."'没超重，请联系仓管人员" )
|
else
|
-- 查询并显示料箱货品明细
|
strCondition = "S_STATION_NO = '"..station.."' AND N_B_STATE = 2 AND S_CNTR_CODE = '"..cntr_code.."' AND S_PAC_NO = '"..pac_no.."'"
|
action = {
|
{
|
action_type = "set_dlg_attr",
|
value = {
|
{ attr = "F_ACT_WEIGHT", value = f_acc_weight, enable = false }
|
}
|
},
|
{
|
action_type = "set_query_condition",
|
value = {
|
condition = strCondition,
|
order = "",
|
page_name = "货品明细"
|
}
|
}
|
}
|
end
|
|
end
|
|
strCondition = "S_STATION_NO = '"..station.."' AND N_B_STATE = 0"
|
local action_item = {
|
action_type = "set_query_condition",
|
value = {
|
condition = strCondition,
|
order = "",
|
page_name = "站台超重货品明细"
|
}
|
}
|
table.insert( action, action_item )
|
|
lua.Debug( strLuaDEID, debug.getinfo(1), "action --> ", action )
|
|
nRet, strRetInfo = mobox.setAction( strLuaDEID, lua.table2str(action) )
|
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "setAction失败! "..strRetInfo ) end
|
|
end
|
