1
Jianw
2025-07-09 f6f5e6b632d6649386a380558d84003f3de7ec6c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
--[[
   编码: WMS-107-02
   名称: 
   作者:
   日期:2025-06-02
 
   函数: AfterClickOk
   功能:
    -- 删除容器货品明细并设置该容器号的作业完成
 
   更改记录:
 
--]]
 
json  = require ("json")
mobox = require ("OILua_JavelinExt")
m3 = require ("oi_base_mobox")
 
function AfterClickOk( strLuaDEID )
    local nRet, strRetInfo
    -- 获取参数
    nRet, strRetInfo = mobox.getCurEditDataObjAttr(strLuaDEID,"S_CNTR_CODE")
    if (nRet ~= 0) then lua.Error(strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! " .. strRetInfo) end
    lua.Debug(strLuaDEID, debug.getinfo(1), 'strRetInfo', strRetInfo)
    local obj_attrs = json.decode(strRetInfo)
    local cntr_code = obj_attrs[1].value
    if(cntr_code == nil or cntr_code == '')then
        lua.Stop(strLuaDEID, "料箱号不能为空! ")
        return
    end
    
    -- 删除容器货品明细
    nRet, strRetInfo = mobox.deleteDataObject(strLuaDEID, "CG_Detail", "S_CNTR_CODE = '" .. cntr_code .. "'")
    if (nRet ~= 0) then
        lua.Stop(strLuaDEID,"删除容器货品明细失败!" .. strRetInfo)
        return
    end
    mobox.setInfo(strLuaDEID,"解绑成功!")
end