--[[
|
编码: JX-52-17
|
名称: 出库分拣-条码输入变化后
|
作者：HAN
|
日期：2025-1-29
|
|
级别：固定 (说明本段代码在项目中不太会变化)
|
|
函数： AfterUPCChange
|
|
功能:
|
-- 根据输入的条码到【Material_Barcode】找到货品编码
|
-- 如果当前入库任务的货品编码相同 组盘数量+1
|
|
|
更改记录:
|
V2.0 HAN 20250422 JX_Material_Barcode 改为 Material_Barcode
|
--]]
|
jx_base= require( "jx_base" )
|
|
function AfterUPCChange ( strLuaDEID )
|
local nRet, strRetInfo
|
|
-- 获取UPC
|
nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "UPC","S_ITEM_CODE","F_ACC_P_QTY", "F_QTY", "TaskFinish")
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end
|
local obj_attrs = json.decode( strRetInfo )
|
local upc = lua.Get_StrAttrValue( obj_attrs[1].value )
|
local item_code = lua.Get_StrAttrValue( obj_attrs[2].value )
|
local acc_p_qty = lua.Get_NumAttrValue( obj_attrs[3].value )
|
local qty = lua.Get_NumAttrValue( obj_attrs[4].value )
|
local task_finish = lua.Get_NumAttrValue( obj_attrs[5].value ) -- 1 表示任务强制完成
|
local str_prompt = "请扫商品编码..."
|
local qty_input_enable = false -- 分拣数量输入框是否可以输入
|
|
if ( upc == '' ) then return end
|
|
local runtime_parameter
|
nRet, runtime_parameter = m3.GetRuntimeParam(strLuaDEID)
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "GetRuntimeParam失败! "..runtime_parameter ) end
|
-- 获取【组盘输入】面板的参数
|
local parameter
|
nRet, parameter = m3.GetRuntimePanel_InputParamter( strLuaDEID, runtime_parameter.panel, "出库分拣" )
|
if ( nRet == 1 ) then
|
mobox.setInfo( strLuaDEID, "没有定义'出库分拣'面板参数!")
|
return
|
end
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), parameter ) end
|
if ( parameter == nil ) then return end
|
|
-- V3.0
|
if ( acc_p_qty == qty or task_finish == 1 ) then
|
-- 扫码进入的应该是拣货箱编码
|
if ( upc ~= parameter.pick_box_code ) then
|
-- 扫码的拣货箱编码不正确
|
str_prompt = "请扫拣货箱编码..."
|
mobox.setInfo( strLuaDEID, "扫码绑定的拣货箱编码不正确!")
|
goto set_dlg_attr
|
else
|
-- 分拣任务完成
|
local id = parameter.id -- 当前点中的入库任务标识
|
local dc_no = parameter.dc_no -- 当前点中的入库任务所属配盘号
|
if ( dc_no == nil or dc_no == "") then
|
mobox.setInfo( strLuaDEID, "'出库分拣'面板必须有配盘号参数!")
|
return
|
end
|
|
-- 设置【配盘明细】状态 = 2（组盘完成）
|
local strCondition = "S_ID = '"..id.."'"
|
local strUpdateSql = "N_B_STATE = 2, F_ACC_P_QTY = "..acc_p_qty
|
|
nRet, strRetInfo = mobox.updateDataAttrByCondition( strLuaDEID, "Distribution_CNTR_Detail", strCondition, strUpdateSql )
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "更新【配盘明细】信息失败!"..strRetInfo ) end
|
|
-- 拣出的货品和拣料箱进行绑定（+CG_Detail）
|
if ( parameter.pick_box_code ~= '' and parameter.pick_box_code ~= nil and acc_p_qty > 0 ) then
|
local cg_detail = m3.AllocObject(strLuaDEID,"CG_Detail")
|
cg_detail.cntr_code = parameter.pick_box_code
|
cg_detail.item_code = parameter.item_code
|
cg_detail.item_name = parameter.item_name
|
cg_detail.qty = acc_p_qty
|
cg_detail.uom = "个"
|
nRet, cg_detail = m3.CreateDataObj( strLuaDEID, cg_detail )
|
if ( nRet ~= 0 ) then
|
lua.Error( strLuaDEID, debug.getinfo(1), '创建拣料箱CG_Detail时失败!'..cg_detail )
|
end
|
end
|
|
local action
|
nRet, action = jx_base.Distribution_CNTR_PostProcess( strLuaDEID, parameter )
|
if ( nRet ~= 0 ) then
|
mobox.stopProgram( strLuaDEID, action )
|
return
|
end
|
|
nRet, strRetInfo = mobox.setAction( strLuaDEID, lua.table2str(action) )
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "setAction失败! "..strRetInfo..' action = '..strAction ) end
|
return
|
end
|
|
else
|
-- 通过条码找到物料编码
|
|
local material_barcode
|
nRet, material_barcode = m3.GetDataObjectByKey(strLuaDEID, "Material_Barcode", "S_BARCODE", upc)
|
|
if (nRet ~= 0 ) then
|
if ( nRet == 1 ) then
|
mobox.setInfo( strLuaDEID, "条码'"..upc.."'没有对应的货品，请检查物料条码对照表!")
|
goto set_dlg_attr
|
end
|
lua.Error( strLuaDEID, debug.getinfo(1), "获取【物料条码】信息失败! " .. material_barcode )
|
end
|
|
-- 判断扫码的货品是否是目前的入库任务
|
if ( item_code ~= material_barcode.item_code ) then
|
mobox.setInfo( strLuaDEID, "条码'"..upc.."'对应的货品编码='"..material_barcode.item_code.."不是当前入库任务中的货物!")
|
goto set_dlg_attr
|
end
|
|
acc_p_qty = acc_p_qty + 1
|
qty_input_enable = true
|
if ( qty == acc_p_qty ) then
|
str_prompt = "请扫拣货箱编码..."
|
end
|
end
|
|
::set_dlg_attr::
|
local action =
|
{
|
{
|
action_type = "set_panel_dlg_attr",
|
value = {
|
panel_name = "出库分拣",
|
attrs = {
|
{
|
attr = "F_ACC_P_QTY",
|
value = acc_p_qty,
|
enable = qty_input_enable
|
},
|
{
|
attr = "UPC",
|
value = "",
|
prompt = str_prompt
|
},
|
{
|
attr = "Prompt",
|
value = str_prompt
|
}
|
}
|
}
|
|
}
|
}
|
|
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
|
