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
ÿþ--[[
    x: M3-00-01
     Tðy: public-¾‹nWMB Basis øvsQ„vpenc{|-N„vxŒT>f:yz˜^ ÿRÄ~
    \O€ÿHAN  
    åegÿ2025-2-14
 
    §~+Rÿ y˜îv
    
    ýQpeÿ Reset_WMSBasisClsCode
 
    ŸRý€:
 
 
    ôf9e°‹U_:
 
--]]
 
json  = require ("json")
mobox = require ("OILua_JavelinExt")
require ("oi_basestrfunc")
 
local wms_basis_cls_def_list = {{code = "02",order = 2,group="úW@xpenc",cls_id="Warehouse"},{code="27",order=16,group = "úW@xpenc",cls_id = "WH_Manager"},{code = "70",order = 1,group = "û|ß~",cls_id = "WH_Inventory"},{code = "07",order = 1,group = "vQƒ[",cls_id = "WMS_Const"},{code = "60",order = 43,group = "úQ“^",cls_id = "Outbound_Wave"},{code = "64",order = 44,group = "úQ“^",cls_id = "OW_Detail"},{code = "63",order = 43,group = "úQ“^",cls_id = "OW_Compose"},{code = "24",order = 45,group = "úQ“^",cls_id = "Outbound_Order"},{code = "25",order = 46,group = "úQ“^",cls_id = "Outbound_Detail"},{code = "81",order = 3,group = "vQƒ[",cls_id = "WMS_TEST_WH_IO"},{code = "22",order = 40,group = "úQ“^",cls_id = "Shipping_Order"},{code = "23",order = 41,group = "úQ“^",cls_id = "Shipping_Detail"},{code = "72",order = 2,group = "vQƒ[",cls_id = "WMS_Warning"},{code = "00",order = 1,group = "úW@xpenc",cls_id = "Factory"},{code = "50",order = 12,group = "úW@xpenc",cls_id = "Function_Area"},{code = "41",order = 15,group = "úW@xpenc",cls_id = "Supplier"},{code = "04",order = 4,group = "úW@xpenc",cls_id = "Location"},{code = "10",order = 1,group = "'MO¹[hV",cls_id = "Loc_Container"},{code = "11",order = 2,group = "'MO¹[hV",cls_id = "LC_Log"},{code = "77",order = 4,group = "¾‹Y",cls_id = "Loc_EQ_Link"},{code = "39",order = 6,group = "úW@xpenc",cls_id = "Location_Ext"},{code = "30",order = 7,group = "úW@xpenc",cls_id = "Location_Group"},{code = "26",order = 1,group = ":gðS",cls_id = "Machine_Station"},{code = "66",order = 2,group = ":gðS",cls_id = "MS_Area_Link"},{code = "37",order = 6,group = "Øv¹p",cls_id = "CP_Good_List"},{code = "36",order = 5,group = "Øv¹p",cls_id = "CP_Location_List"},{code = "17",order = 3,group = "Øv¹p",cls_id = "CP_Count_Container"},{code = "62",order = 50,group = "úQ“^",cls_id = "Picking_Result"},{code = "46",order = 1,group = "(u",cls_id = "Inspect_Order"},{code = "47",order = 2,group = "(u",cls_id = "Inspect_Detail"},{code = "48",order = 3,group = "(u",cls_id = "Inspect_Record"},{code = "71",order = 2,group = "û|ß~",cls_id = "WMS_Inventory_Diff"},{code = "03",order = 3,group = "úW@xpenc",cls_id = "Area"},{code = "49",order = 3,group = "û|ß~",cls_id = "AZ_Inventory"},{code = "05",order = 8,group = "úW@xpenc",cls_id = "Zone"},{code = "44",order = 10,group = "úW@xpenc",cls_id = "Zone_Link"},{code = "43",order = 11,group = "úW@xpenc",cls_id = "Zone_Loc"},{code = "06",order = 9,group = "úW@xpenc",cls_id = "Zone_Cls"},{code = "31",order = 10,group = "Øv¹p",cls_id = "Count_Diff"},{code = "28",order = 2,group = "Øv¹p",cls_id = "Count_Order"},{code = "16",order = 1,group = "Øv¹p",cls_id = "Count_Plan"},{code = "29",order = 4,group = "Øv¹p",cls_id = "Count_CG_Detail"},{code = "51",order = 53,group = "úQ“^",cls_id = "Distribution_CNTR"},{code = "52",order = 54,group = "úQ“^",cls_id = "Distribution_CNTR_Detail"},{code = "",order = 0,group = "KmՋ",cls_id = "TEST_Inbound"},{code = "53",order = 51,group = "úQ“^",cls_id = "OOS_Order"},{code = "54",order = 52,group = "úQ“^",cls_id = "OOS_Detail"},{code = "38",order = 2,group = "\ON",cls_id = "Task"},{code = "12",order = 3,group = "\ON",cls_id = "Task_Action"},{code = "01",order = 1,group = "¹[hV",cls_id = "Container"},{code = "45",order = 3,group = "¹[hV",cls_id = "Container_Good"},{code = "19",order = 4,group = "¹[hV",cls_id = "CG_Detail"},{code = "83",order = 2,group = "¹[hV",cls_id = "Container_Cell"},{code = "58",order = 25,group = "eQ“^",cls_id = "Inbound_Wave"},{code = "61",order = 27,group = "eQ“^",cls_id = "IW_Detail"},{code = "59",order = 26,group = "eQ“^",cls_id = "IW_Compose"},{code = "20",order = 28,group = "eQ“^",cls_id = "Inbound_Order"},{code = "21",order = 29,group = "eQ“^",cls_id = "Inbound_Detail"},{code = "65",order = 4,group = "(u",cls_id = "OnOff_Shelves"},{code = "80",order = 1,group = "¾‹Y",cls_id = "Equipment"},{code = "08",order = 3,group = "¾‹Y",cls_id = "MQ_EQAction"},{code = "78",order = 2,group = "¾‹Y",cls_id = "MQ_EQAction_Msg"},{code = "76",order = 5,group = "¾‹Y",cls_id = "WMS_DevComm_Ext"},{code = "15",order = 23,group = "eQ“^",cls_id = "Receipt_Order"},{code = "18",order = 24,group = "eQ“^",cls_id = "Receipt_Detail"},{code = "09",order = 5,group = "û|ß~",cls_id = "Lock"},{code = "90",order = 14,group = "úW@xpenc",cls_id = "Material"},{code = "32",order = 13,group = "úW@xpenc",cls_id = "Roadway"},{code = "42",order = 4,group = "û|ß~",cls_id = "Business_Source"},{code = "13",order = 20,group = "eQ“^",cls_id = "ASN_Order"},{code = "14",order = 21,group = "eQ“^",cls_id = "ASN_Detail"},{code = "33",order = 47,group = "úQ“^",cls_id = "Specify_Outbound"},{code = "34",order = 48,group = "úQ“^",cls_id = "Specify_Outbound_CNTR"},{code = "35",order = 49,group = "úQ“^",cls_id = "SO_CNTR_Detail"},{code = "56",order = 31,group = "eQ“^",cls_id = "Organize_CNTR_Detail"},{code = "57",order = 30,group = "eQ“^",cls_id = "Organize_Container"},{code = "40",order = 1,group = "\ON",cls_id = "Operation"}}
 
function Reset_WMSBasisClsCode ( strLuaDEID ) 
    local nRet, strRetInfo, n
    local strCondition, strSetSQL
 
    for n = 1, #wms_basis_cls_def_list do
        strCondition = "CN_S_ID = '"..wms_basis_cls_def_list[n].cls_id.."'"
        strSetSQL = "CN_N_ORDER = "..wms_basis_cls_def_list[n].order..", CN_S_CODE = '"..wms_basis_cls_def_list[n].code.."',"..
                    "CN_S_GROUP = '"..wms_basis_cls_def_list[n].group.."'"
 
        Debug(strLuaDEID, debug.getinfo(1), 'strCondition:', strCondition)
        Debug(strLuaDEID, debug.getinfo(1), 'strSetSQL:', strSetSQL)
        nRet, strRetInfo = mobox.updateTableAttrByCondition ( strLuaDEID, "OI_SYS_DATA_CLASS", strCondition, strSetSQL )
        
        if ( nRet ~= 0 ) then
            Error( strLuaDEID, debug.getinfo(1), "ôf°epenc{|š[IN1Y%!"..strRetInfo )
        end
        Debug(strLuaDEID, debug.getinfo(1), 'nRet:', nRet)
        Debug(strLuaDEID, debug.getinfo(1), 'strRetInfo:', strRetInfo)
    end
end