--[[
|
编码: WMS-01-03
|
名称: 容器-删除后
|
作者:HAN
|
日期:2025-1-29
|
|
级别:固定 (说明本段代码在项目中不太会变化)
|
|
函数: AfterDataObjDelete
|
|
功能:
|
-- 删除【Container_Good 】
|
-- 删除【CG_Detail】
|
更改记录:
|
V2.0 HAN 2024-8-24
|
-- 新增对【Container_Cell】的删除
|
|
--]]
|
json = require ("json")
|
mobox = require ("OILua_JavelinExt")
|
m3 = require("oi_base_mobox")
|
|
function AfterDataObjDelete ( strLuaDEID )
|
local nRet, strRetInfo
|
|
-- step1 获取容器编码
|
nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "S_CODE" )
|
if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end
|
local obj_attrs = json.decode( strRetInfo )
|
local cntr_code = obj_attrs[1].value -- 容器编码
|
|
-- 删除和容器相关的【容器货品】【容器货品】【容器料格】
|
if ( cntr_code ~= '') then
|
local strCondition = "S_CNTR_CODE = '" .. cntr_code .."'"
|
nRet, strRetInfo = mobox.dbdeleteData(strLuaDEID, "Container_Good", strCondition)
|
if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【Container_Good】失败!"..strRetInfo) end
|
|
nRet, strRetInfo = mobox.dbdeleteData(strLuaDEID, "CG_Detail", strCondition)
|
if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【CG_Detail】失败!"..strRetInfo) end
|
|
-- V2.0
|
nRet, strRetInfo = mobox.dbdeleteData(strLuaDEID, "Container_Cell", strCondition)
|
if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【CG_Detail】失败!"..strRetInfo) end
|
end
|
end
|