lzh
2025-06-24 13c4a636539584ab977fddacfae884b3ec250aee
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
ÿþ--[[
    x: WMS-07-03
     Tðy: 8^ϑ-ågâ‹b—g-RËYS
    \O€ÿHAN  
    åegÿ2023-08-30
 
    §~+RÿúVš[ (ô‹f,gµkãNx(Wy˜îv-N N*YOØSS)
    
    ýQpeÿ InitialPanel
 
    ŸRý€:
        ù[8^ϑô~¤bŸRý€¹p-N„vågâ‹Lub—ۏLˆRËYS ÿÔk‚Y Group 8^ϑ{|‹WI{
    ôf9e°‹U_:
        V6.0 HAN 2023/9/6  -- lua.Error/lua.Debug ýQpeØSS           
--]]
 
json  = require ("json")
mobox = require ("OILua_JavelinExt")
m3 = require( "oi_base_mobox" )
 
function InitialPanel ( strLuaDEID ) 
    local nRet, strRetInfo
    local strCondition = ''
    local strOrder = 'S_GROUP'      -- ’c^W[µk
 
    -- ·ƒÖS8^ϑ    gY\RÄ~
    nRet, strRetInfo = mobox.groupDataObjAttr( strLuaDEID, "WMS_Const", strCondition, "S_GROUP", strOrder )
    if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "àeÕlÎN08^ϑ0·ƒÖSáOo`ÿ"..strRetInfo ) end 
 
    local groups = json.decode( strRetInfo ) 
    local n, nCount
    local strGroupList = ''
 
    nCount = #groups
    for n = 1, nCount do
        strGroupList = strGroupList..'"'..groups[n].value..'",'
    end
    strGroupList = lua.trim_laster_char( strGroupList )
 
    -- ¾‹någâ‹b—g
    local setAttr = '[{"attr":"S_GROUP","value":"","choice_list":['..strGroupList..']}]'
    local strAction = '[{"action_type":"set_dlg_attr","value":'..setAttr..'}]'
    nRet, strRetInfo = mobox.setAction( strLuaDEID, strAction  )
    if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "setAction1Y%! "..strRetInfo..' action = '..strAction ) end 
 
end