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
| --[[
| 编码: JX-102-03
| 名称: 删除前
| 作者：
| 日期: 2025-1-29
|
| 函数： BeforeDataObjDelete
|
| 功能:
| -- N_B_STATE = 2 执行状态的不能删除
|
| 更改记录:
|
| --]]
|
| json = require ("json")
| mobox = require ("OILua_JavelinExt")
| m3 = require("oi_base_mobox")
|
| function BeforeDataObjDelete( strLuaDEID )
| local nRet, strRetInfo
|
| -- 获取 N_B_STATE
| nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "N_B_STATE" )
| if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end
| local obj_attrs = json.decode( strRetInfo )
| local b_state = lua.StrToNumber( obj_attrs[1].value )
|
| if ( b_state == 2 ) then
| mobox.stopProgram( strLuaDEID, "执行状态的入库波次不能删除!")
| return
| end
|
| end
|
|
