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
40
41
42
43
44
45
46
47
48
49
50
51
| --[[
| 编码: AMS-90-20
| 名称: 初始化
| 作者：HAN
| 日期：2025-4-29
|
| 级别：项目
|
| 函数： InitialNewAddDlg
|
| 功能:
|
| 更改记录:
|
| --]]
|
| wms_base = require ("wms_base")
|
| function InitialNewAddDlg ( strLuaDEID )
| local nRet, strRetInfo, data_objs, n
| local strCondition = ""
| local strOrder = 'S_CTD_CODE'
| local sku
| nRet, sku = m3.GetSysCurEditDataObj( strLuaDEID, "SKU" )
| if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..sku ) end
|
| nRet, data_objs = m3.QueryDataObject( strLuaDEID, "Container_Type_Def", strCondition, strOrder )
| if (nRet ~= 0) then
| lua.Stop( strLuaDEID, "获取【Warehouse】信息失败! " .. data_objs)
| return
| end
| local obj_attrs
| local choice_list = {}
| for n = 1, #data_objs do
| obj_attrs = m3.KeyValueAttrsToObjAttr(data_objs[n].attrs)
| table.insert( choice_list, obj_attrs.S_CTD_CODE )
| end
| local action = {
| {
| action_type = "set_dlg_attr",
| value = {
| { attr = "S_CTD_CODE", value = sku.ctd_code, choice_list = choice_list }
| }
| }
| }
| nRet, strRetInfo = mobox.setAction( strLuaDEID, lua.table2str(action) )
| if ( nRet ~= 0 ) then
| lua.Stop( strLuaDEID, "setAction失败! "..strRetInfo..' action = '..strAction )
| return
| end
| end
|
|
