国产91在线播放,国产成人高清亚洲一区91,国产精品玖玖玖影院 http://51chudao.com PDM產品數據管理軟件、項目管理系統 Sun, 06 Oct 2024 04:40:45 +0000 zh-Hans hourly 1 https://wordpress.org/?v=6.7.1 http://51chudao.com/wp-content/uploads/2022/11/cropped-plmico512-32x32.png 二次開發 – 共好plm系統 http://51chudao.com 32 32 lua for mobox3二次開發一些經驗 http://51chudao.com/3119/ Sun, 06 Oct 2024 04:40:45 +0000 http://51chudao.com/?p=3119 1、建議任何調用函數,都需要做執行保護

nRet, strOBJInfo = mobox.objAttrToObjJson (‘PMS001’, strRetInfo )

沒有對執行做保護(原先理解是 絕對不會出錯的,實際上是錯了),執行后報錯

這個錯誤爆出,我們根本無法判斷問題所在。所以在任何情況下調用函數都需要做 出錯保護,加入

?if (nRet ~= 0) then

mobox.error(strLuaDEID, “PMS001數據庫沒有對應字段 “)

return

end

2、在Debug 函數里面不能包含表類型的變量

Debug( strLuaDEID, debug.getinfo(1), ‘keynode創建’,tbNote[1])

里面的 tbNote[1]是一個表類型的變量,debug 不支持這個格式

nRet, strOBJInfo = mobox.objAttrToObjJson (‘JS003’, strRetInfo )

 

 

]]>
Mobox 3000功能點頁面按鈕隱藏的lua實現方法 http://51chudao.com/2590/ Thu, 18 Apr 2024 03:06:07 +0000 http://51chudao.com/?p=2590 需求,我們有一個任務執行后,需要對這個任務做后做評價。為此與任務系統集成通過3000功能點定義了一個任務評分的功能點。任務評分后,不能通過新增,對這個任務再次增加一個評分。因此第一個任務評分后,需要將頁面按鈕(新增)隱藏掉

腳本列子

— 功能:
— 3000 功能點 列出與某一個taskid相關的數據
— 若列出數據已經有,將 新增 頁面按鈕屏蔽 (這個功能是做任務評測結果的,結果只能有一個,不可能多個)
————————————————————————–
json = require (“json”)
mobox = require (“OILua_JavelinExt”)

function shownowtaskdata ( strLuaDEID )

local nRet, strRetInfo
local nType
local strTaskID
local bHidden=false
local strClsID=""
--拿到數據對象標識
nRet, strRetInfo = mobox.getCurEditExtInfo( strLuaDEID )
if ( nRet ~= 0 ) then
    mobox.error( strLuaDEID, "系統獲取擴展屬性失敗 "..strRetInfo )
    return
end
if ( strRetInfo =='' or strRetInfo==nil or strRetInfo=='{}' ) then
    mobox.error( strLuaDEID, "系統獲取擴展屬性為空!" )
    return
end
local extinfo = json.decode( strRetInfo )
strClsID=extinfo.cls_id -- 得到當前cls的id ,下面操作需要

— 獲取任務全局屬性 (這個案例是與 Gungho任務系統集成,所以需要這個參數,別的環境這個可以忽略
nRet, strRetInfo = mobox.getGlobalAttr( strLuaDEID, “task_id” )
if ( nRet ~= 0 or strRetInfo == ” ) then
mobox.error( strLuaDEID, “系統無法獲取任務號 “..strRetInfo )
return
end
local input_paramter = json.decode( strRetInfo )
local strTaskID = input_paramter[1].value

local strCondition
strCondition = "G_TASK_ID='"..strTaskID.."'"

--增加隱藏按鈕的依據-通過條件查詢返回符合數據>0 既隱藏
-- local strQeuryCondition="S_TESTITEM='X'" (定義grid某一個字段內有某些數值 這里沒有啟用)
nRet, strRetInfo = mobox.getDataObjCount(strLuaDEID, strClsID, strCondition)
if (nRet ~= 0 ) then
    mobox.error(strLuaDEID, "得到數據數量失敗,原因:" .. strRetInfo)
    return
end

--轉為整數類型
local nDataCount = tonumber(strRetInfo)
if (nDataCount >0) then
    bHidden=true
end

--隱藏頁面按鈕 “新增”
local strHiddenButton = ''
if (bHidden) then
    strHiddenButton =
    ',{"action_type":"hidden_button","value":[{"name":"新增"}]}'
end

local strAction = '[{"action_type":"set_query_condition","value":{"where":"' .. strCondition .. '","order":""}}'
strAction = strAction .. strHiddenButton .. ']'
mobox.setAction( strLuaDEID, strAction )
end
這個列子也可以用于別的一些非法字符串的處理
]]>
lua 對回車(%3Cbr%3E)處理方法 http://51chudao.com/2537/ Thu, 11 Apr 2024 05:02:28 +0000 http://51chudao.com/?p=2537 我們在Gird列出數據的時候,若數據內帶%3Cbr%3E,其實是回車的意思,若grid讀出數據不做任何處理,那么就會影響系統表達

為了解決這個問題,我們可以編輯一個lua腳本,將這個數據做處理后再顯示(在顯示前事件里面定義這個lua腳本)

腳本列子

–[[
? ? 功能說明:
? ? ? ? 1) 顯示前做一些字段的處理
? ? ? ? 2)前端導入,新增有換行符號 %%3Cbr%%3E  ,替換成 <br> 前端html支持的換行內容
? ? ? ? 3)內容中有&,替換成 & 前端解析 &不支持,最好在輸入時進行替換
–]]
json = require(“json”)
mobox = require(“OILua_JavelinExt”)
require(“oi_basestrfunc”)
function BeforeGridShow(strLuaDEID)
? ? local nRet, strRetInfo
? ? local arobjs, attrs, success
? ? — 獲取輸入的DataJson數據包
? ? nRet, strRetInfo = mobox.getCurEditDataPacket(strLuaDEID)
? ? if (nRet ~= 0) then
? ? ? ? mobox.error(strLuaDEID, “無法獲取數據包!”)
? ? ? ? return
? ? end
? ? if (strRetInfo == ” or strRetInfo == nil) then
? ? ? ? return
? ? end
? ? — 解析數據包,數據包格式
? ? — [{“id”:””,”attrs”:[{“attr”:””,”value”:””},..]},..]
? ? local n, nCount
? ? success, arobjs = pcall(json.decode, strRetInfo)
? ? if (success == false) then
? ? ? ? mobox.error(strLuaDEID, “非法的JSON格式!”)
? ? ? ? return
? ? end
? ? nCount = #arobjs
? ? if (nCount == 0) then
? ? ? ? return
? ? end
? ? local obj, attrs
? ? local nattr_count
? ? local strRow, strAttr, strItem
? ? local strDataJson
? ? local id, strValue
? ? local strAttrs
? ? strDataJson = ‘[‘
? ? local seg = {}
? ? local nSegCount = 0
? ? for n = 1, nCount do
? ? ? ? obj = arobjs[n]
? ? ? ? attrs = obj.attrs
? ? ? ? nattr_count = #attrs
? ? ? ? id = obj.id
? ? ? ? strAttrs=”
? ? ? ? — 開始過濾顯示數據對象屬性
? ? ? ? for nIndex = 1, nattr_count do
? ? ? ? ? ? strAttr = attrs[nIndex].attr
? ? ? ? ? ? strValue = attrs[nIndex].value
? ? ? ? ? ? strValue = strValue:gsub(“%%3Cbr%%3E”, “<br>”)
? ? ? ? ? ? strValue = strValue:gsub(“&”, “&”)
? ? ? ? ? ? strItem = ‘{“attr”:”‘ .. strAttr .. ‘”,”value”:”‘ .. strValue .. ‘”},’
? ? ? ? ? ? strAttrs = strAttrs .. strItem
? ? ? ? end
? ? ? ? — 取消最后一個,號
? ? ? ? strAttrs = trim_laster_char(strAttrs)
? ? ? ? strRow = ‘{“id”:”‘ .. id .. ‘”,”attrs”:[‘ .. strAttrs .. ‘]},’
? ? ? ? strDataJson = strDataJson .. strRow
? ? end
? ? — 取消最后一個,號
? ? strDataJson = trim_laster_char(strDataJson)
? ? strDataJson = strDataJson .. ‘]’
? ? local strAction = ‘[{“action_type”:”reset_data_attr”,”value”:’ .. strDataJson .. ‘}]’
? ? mobox.setAction(strLuaDEID, strAction)
end
這個列子也可以用于別的一些非法字符串的處理
]]>
Gungho項目擴展屬性二次開發的實現過程 http://51chudao.com/2224/ Thu, 29 Feb 2024 04:27:33 +0000 http://51chudao.com/?p=2224 Gungho個性項目屬性描述二次開發的實現過程

 

企業在實施項目管理系統的時候,不通類型的項目其屬性可能是不一樣的。而Gungho標準系統內對項目的屬性,主要包括(項目名稱、編號、開始結束日期等)。為了適應企業個性項目信息的輸入,我們需要通過Mobox平臺定義項目類型去適應這個需求

 

項目類型定義過程

Sa 登錄mobox低代碼開發平臺

進入數據模型(001功能點)創建數據對象

創建一個用于描述項目擴展屬性的數據對象

注意:業務類型必須是 項目

接下來需要做的內容,這里不具體展開

    • 設置數據對象的相關字段屬性
    • 設置數據對象的Gird(列表)
    • 設置數據對象的窗口(界面)
    • 及可能涉及的二次開發

進入項目類型定義(8012功能點)創建項目類型

  • 新建項目類型(基礎)

基礎:主要是綁定哪個數據對象及相關的界面

 

  • 新建項目類型(功能)

功能:主要是可以自定義該類型項目的自定義菜單 (參考下圖)

效果

我們在gungho登錄后,新建項目

]]>
Gungho任務二次開發-任務分類集成3000功能的擴展屬性excel導入 http://51chudao.com/2176/ Mon, 26 Feb 2024 05:43:40 +0000 http://51chudao.com/?p=2176 Gungho任務二次開發-任務分類集成3000功能的清單導入

這個是一個標準的導入模板 ,使用前可以通過修改 表名,字段名稱,字段中文名,字段對應賦值變量名稱。

–[[

這個是一個標準的腳本,可以

1、修改里面的數據對象名稱 樣品技術參數

2、字段相關名稱(字段中文名、字段名稱、字段賦值變量名稱)

字段名稱? ? ? ? ? ? ? ? ? ? ? ? ? ? 字段中文名? ? ? ? ? 字段對應賦值變量名

N_SN? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?序號? ? ? ? ? ? ? ? ? ? ?nSN

S_ITEM_NAME? ? ? ? ? ? ? ? ?名稱? ? ? ? ? ? ? ? ? ? ?strItemName

S_ITEM_M_S_N? ? ? ? ? ? ? ?型號_規格_數量? ?strItemMSN

S_ITEM_CODE? ? ? ? ? ? ? ? ?編號? ? ? ? ? ? ? ? ? ? ?strItemCode

S_MANUFACTURER? ? ? ? 生產單位? ? ? ? ? ? ? strFacturer

3、若字段不夠多,或太多,需要調整程序

4、里面的唯一性判斷是 task_id + S_ITEM_NAME + S_ITEM_CODE (需要根據情況調整)

–]]

功能說明:json = require(“json”)

mobox = require(“OILua_JavelinExt”)

require(“oi_basestrfunc”)

function ImportExcle(strLuaDEID)

local nRet, strRetInfo

local strPrjID = ”

local strTaskID = ”

— 獲取全局變量 prj_id, task_id

nRet, strRetInfo = mobox.getGlobalAttr( strLuaDEID, “task_id”,”prj_id” )

if ( nRet ~= 0 or strRetInfo == ” ) then

mobox.error( strLuaDEID, “系統無法獲取全局變量 “..strRetInfo )

return

end

local input_paramter = json.decode( strRetInfo )

strTaskID = input_paramter[1].value

strPrjID = input_paramter[2].value

if ( strTaskID == ” ) then

mobox.error( strLuaDEID, “必須要有項目及任務相關信息” )

return

end

— 獲取導入的單條數據, 返回 {“id”:”xxx”,”attrs”:[{“attr”:”attr1″,”value”:”xxx1″},{“attr”:”attr2″,”value”:”xxx2″}, …]}

nRet, strRetInfo = mobox.getInputParameter(strLuaDEID)

if (nRet ~= 0 or strRetInfo == ” ) then

mobox.error(strLuaDEID, “無法獲取導入數據!”..strRetInfo)

return

end

local n, nCount, nValue

local strAddAttr = ”

local strAttr = ”

local strSetSQL = ”

— 一些關鍵屬性 (腳本 后期只需要改字段名稱就可以)

local nSN? ? ? ? ? ? ? ? ? ? ? ? ? ?— 對應 序號 N_SN

local strItemName = ”? ? ? ? — 對應 名稱 S_ITEM_NAME

local strItemMSN = ”? ? ? ? ?— 對應 型號_規格_數量 S_ITEM_M_S_N

local strItemCode = ”? ? ? ? ?— 對應 編號 S_ITEM_CODE

local strFacturer = ”? ? ? ? ? ? — 對應 生產單位 S_MANUFACTURER

 

— 因為每次導入只傳一條記錄,所以當前條寫入 prj_id 及 task_id

strAddAttr = strAddAttr .. ‘{“attr”:”G_TASK_ID”,”value”:”‘ .. strTaskID .. ‘”},’

strAddAttr = strAddAttr .. ‘{“attr”:”G_PRJ_ID”,”value”:”‘ .. strPrjID .. ‘”},’

local retJson =json.decode(strRetInfo)

local input_rows =retJson[“parameter”]

— 步驟1 獲取從excel導入的一行數據,根據excel的列定義進行屬性組合 strAddAttr

nCount = #input_rows

for n = 1, nCount do

strAttr = input_rows[n].attr

strValue = input_rows[n].value

— 根據導入的excel列頭名稱進行判斷

— 關鍵屬性判斷

if (strAttr == “名稱”) then

if (strValue == ”) then

mobox.error(strLuaDEID, strAttr .. “不能為空!”)

return

end

strItemName = strValue
strAddAttr = strAddAttr .. ‘{“attr”:”S_ITEM_NAME”,”value”:”‘ .. strItemName .. ‘”},’

 

— 常規屬性

elseif (strAttr == “序號”) then

nSN = strValue
strAddAttr = strAddAttr .. ‘{“attr”:”N_SN”,”value”:”‘ .. nSN .. ‘”},’

elseif (strAttr == “型號_規格_數量”) then

strItemMSN = strValue
strAddAttr = strAddAttr .. ‘{“attr”:”S_ITEM_M_S_N”,”value”:”‘ .. strItemMSN .. ‘”},’

elseif (strAttr == “編 號”) then

strItemCode= strValue
strAddAttr = strAddAttr .. ‘{“attr”:”S_ITEM_CODE”,”value”:”‘ .. strItemCode .. ‘”},’

elseif (strAttr == “生產廠家”) then

strFacturer = strValue
strAddAttr = strAddAttr .. ‘{“attr”:”S_MANUFACTURER”,”value”:”‘ .. strFacturer .. ‘”},’

end

end
–去除最后一個,
local strAddAttr1 = trim_laster_char(strAddAttr)

— 步驟2 根據 (名稱+編號+taskid) 來判斷導入的檢測數據是否已經存在
— 如果已經存在,根據導入的數據進行覆蓋
— 如果不存在需要創建
local attrs
local strCondition = “S_ITEM_NAME='” .. strItemName .. “‘ and G_TASK_ID='”..strTaskID..”‘ and S_ITEM_CODE='” .. strItemCode.. “‘”
nRet, strRetInfo = mobox.existThisData(strLuaDEID, “樣品技術參數”, strCondition)
if (nRet ~= 0 ) then

mobox.error(strLuaDEID, “在檢查樣品技術參數是否存在時失敗! ” .. strRetInfo)

return
end

if (strRetInfo == ‘yes’) then

— 已經存在,根據導入的數據進行覆蓋

strCondition = “S_ITEM_NAME='” .. strItemName .. “‘ and G_TASK_ID='”..strTaskID..”‘ and S_ITEM_CODE='” .. strItemCode.. “‘”

strSetSQL = “N_SN='” ..nSN.. “‘, S_ITEM_NAME = ‘” .. strItemName ..”‘ , S_ITEM_CODE ='” ..strItemCode .. “‘ , S_ITEM_M_S_N = ‘” .. strItemMSN ..”‘ “

nRet, strRetInfo = mobox.updateDataAttrByCondition(strLuaDEID, “樣品技術參數”, strCondition, strSetSQL)

if (nRet ~= 0) then

mobox.error(strLuaDEID, strRetInfo)

return

end

elseif (strRetInfo == ‘no’) then

— 創建 樣品技術參數

— mobox.writeSysLog(“strAddAttr1”, strAddAttr1)

strAddAttr1 = ‘[‘ .. strAddAttr1 .. ‘]’

mobox.writeSysLog(“strAddAttr2”, strAddAttr1)

nRet, strRetInfo = mobox.createDataObj(strLuaDEID, “樣品技術參數”, strAddAttr1)

if (nRet ~= 0) then

mobox.error(strLuaDEID, “創建樣品技術參數失敗! ” .. strRetInfo )

return
end

end
end

 

function
]]>
通過Mobox導入項目清單詳細說明 http://51chudao.com/1696/ Thu, 30 Nov 2023 03:08:04 +0000 http://51chudao.com/?p=1696 項目清單導入

 

我們在實施Gungho項目管理系統剛上線的時候,其實用戶手上有很多的歷史項目需要導入進來。而且用戶的項目屬性與我們標準的項目屬性差異很大。為此,我們需要對Gungho的項目數據屬性進行擴延。而這個擴延設置是在Mobox數據平臺來完成的。為此我們需要做2個事情:

給項目設置擴展屬性,用于對用戶需求的適應

需要將企業歷史項目清單一次性導入

 

Mobox低代碼中心的實現過程

  • Mobox數據建模
  • Mobox設置項目類型
  • Mobox編寫項目導入二次開發腳本
  • Mobox增加導入功能點,綁定數據模型及腳本
  • Mobox通過腳本創建Gungho項目后的g _id 寫入到數據對象的 G_PRJ_ID中

 

數據對象建模

因為,我們是為Gungho的項目管理做配套,所以在mobox建立數據模型的時候,有類型需要選擇? ,業務類型必須是 “項目”

項目類型定義(通過 8012 功能點)

目的,定義適用企業個性需求的項目管理功能及界面

  • 基礎

 

  • 功能

根據需求 自定義功能

 

  • 腳本

根據需求,加入對應腳本

 

函數 createProject() 說明

方法一: ?(這個一般在mobox數據對象創建后事件調用)

Mobox 數據對象先創建 –》之后通過腳本生成Gungho的項目 –》得到Gungho項目的prj_id –》更新mobox數據對象的 G_PRJ_ID

 

local strPrjInfo

strPrjInfo = ‘{“type“:”漢和項目”,”name“:”‘ .. strPrjName .. ‘”,’

strPrjInfo = strPrjInfo .. ‘”pm_login“:”‘ .. strPMID .. ‘”,”pm_name“:”‘ .. strPMName .. ‘”,’

strPrjInfo = strPrjInfo .. ‘”pd_login“:”‘ .. strPDID .. ‘”,”pd_name“:”‘ .. strPDName .. ‘”,’

— type:定義了項目類型? ? ? ?name:項目名稱

 

strPrjInfo = strPrjInfo .. ‘”class_name“:”項目”,”obj_id“:”‘ .. strObjID .. ‘”,’

— class_name:數據對象名稱? obj_id:數據對象ID ,Mobox數據創建后獲取

 

strPrjInfo = strPrjInfo .. ‘”code“:”‘ .. strPrjCode .. ‘”,’

strPrjInfo = strPrjInfo .. ‘”role“:[{“name”:”項目總監”,”user”:[{“login”:”‘ .. strPDID .. ‘”,”name”:”‘ ..?strPDName .. ‘”}]}’ .. strPrjRoleMember .. ‘]}’

— code:項目編號? role:角色相關

 

— 向共好系統創建一個項目

nRet, strRetInfo = mobox.createProject(strLuaDEID, strPrjInfo)

— strRetInfo:返回的是gungho創建項目的ID (prj_id)

if (nRet ~= 0) then

mobox.error(strLuaDEID, strRetInfo)

return

end

strRetInfo:這個要回寫Mobox數據對象的 G_PRJ_ID

 

— 得到prj_id 將信息寫入mobox數據對象的代碼,這里就不展現了

方法二: ?(這個一般在mobox數據對象的自定義事件入“項目導入”調用)

Gungho的項目所需的所有信息(包括擴展信息)全部定義好,一次性創建Gungho及Mobox所有數據及其相關性

?strPrjInfo = ‘{“type”:”漢和項目”,”class_name”:”項目”,”name”:”‘ .. strPrjName .. ‘”,’

strPrjInfo = strPrjInfo .. ‘”pm_login”:”‘ .. strPMID .. ‘”,”pm_name”:”‘ .. strPMName .. ‘”,’

strPrjInfo = strPrjInfo .. ‘”pd_login”:”‘ .. strPDID .. ‘”,”pd_name”:”‘ .. strPDName .. ‘”,’

strPrjInfo = strPrjInfo .. ‘”code”:”‘ .. strPrjCode .. ‘”,’

 

— 拼接項目的角色屬性

strPrjInfo = strPrjInfo .. ‘”role”:[{“name”:”項目總監”,”user”:[{“login”:”‘ .. strPDID .. ‘”,”name”:”‘ ..? strPDName .. ‘”}]}’ .. strPrjRoleMember .. ‘],’

 

— 拼接項目的擴展項目屬性

strPrjInfo = strPrjInfo .. ‘”ext_obj_attr“:[‘ .. strAddAttr1 .. ‘]}’

ext_obj_attr 項目創建的時候,帶擴展屬性(strAddAttr1 變量事先拼接好了)

 

— 帶擴展屬性,會同時將mobox數據對象及gungho的項目都創建起來,并關聯好

nRet, strRetInfo = mobox.createProject(strLuaDEID, strPrjInfo)

–strRetInfo 返回參數 為兩個GUID :項目ID ;

— 返回的內容如:

— ‘{A52E97CF-BDBE-4EA7-AAD6-949AD5707BF3};{1CB2B481-CA23-42DB-B7A2-546C1EA05364}’

]]>
Excel數據導入Mobox低代碼平臺 http://51chudao.com/1686/ Tue, 28 Nov 2023 02:22:55 +0000 http://51chudao.com/?p=1686 Excel數據導入Mobox低代碼平臺

 

我們系統上線的時候,原先的歷史數據是沒有的,為了快速接軌企業已有數據,我們可以通過excel 對歷史數據進行導入操作。導入一般可以通過腳本做一些定制開發來實現

 

列子:

數據導入的sheet 要求

這個系統只能導入,左邊第一個sheet (命名無所謂)(注意:若數據列表 這個sheet左邊還有隱藏的sheet,那么系統也不能獲取 數據列表sheet頁的數據)

對Excel單元格的要求

單元個里面的數據,只能是字符串或數值。若是計算公式或函數 ,將無法獲取

另外,單元個內容 不能出現 /\<> & 符號,不能有換行或大量空格

分析excel格式

1、字段分3類:

  • 關鍵字段

如,產品名稱 ,這個是必須有數值的

  • 屬性字段

用于登記各種屬性信息

  • 計算字段

若有數據,則直接獲取

若沒有,可以通過lua腳本計算生成

這種字段,一般也是必須有數值的

2、第一行是表頭行,數據行從第二行開始

 

定義導入功能

通過Mobox 3000 功能點進行定義,設置界面如下:

導入腳本,參考:

json? = require(“json”)
mobox = require(“OILua_JavelinExt”)
require(“oi_basestrfunc”)
function ImportKA(strLuaDEID)
? ? local nRet, strRetInfo
? ? — 獲取導入的數據, 返回 [[{“attr”:”xx”,”value”:””},…]]
? ? — V2.0
? ? nRet, strRetInfo = mobox.getCurEditDataPacket(strLuaDEID)
? ? if (nRet ~= 0 or strRetInfo == ”) then
? ? ? ? mobox.error(strLuaDEID, “無法獲取導入數據!”)
? ? ? ? return
? ? end
? ? local input_rows = json.decode(strRetInfo)
? ? local n, nCount, nValue, nMaxRow, nRow
? ? local strAddAttr = ”
? ? — 一些關鍵屬性
? ? local strKAName = ”
? ? local strKAType = ”
? ? local strArea = ”
? ? — 步驟1 獲取從excel導入的一行數據,根據excel的列定義進行屬性組合 strAddAttr
? ? nMaxRow = #input_rows
? ? for nRow = 1, nMaxRow do
? ? ? ? input = input_rows[nRow]
? ? ? ? nCount = #input
? ? ? ? — V2.1
? ? ? ? strAddAttr = ”
? ? ? ? strKAName = ”
? ? ? ? strKAType = ”
? ? ? ? strArea = ”
? ? ? ? for n = 1, nCount do
? ? ? ? ? ? strAttr = input[n].attr
? ? ? ? ? ? strValue = input[n].value
? ? ? ? ? ? if (strAttr ~= ” and strValue ~= ”) then
? ? ? ? ? ? ? ? — 根據導入的excel列頭名稱進行判斷
? ? ? ? ? ? ? ? — 關鍵屬性判斷
? ? ? ? ? ? ? ? if (strAttr == “客戶名稱”) then
? ? ? ? ? ? ? ? ? ? if (strValue == ”) then
? ? ? ? ? ? ? ? ? ? ? ? mobox.error(strLuaDEID, strAttr .. “不能為空!”)
? ? ? ? ? ? ? ? ? ? ? ? return
? ? ? ? ? ? ? ? ? ? end
? ? ? ? ? ? ? ? ? ? strKAName = strValue
? ? ? ? ? ? ? ? ? ? strAddAttr = strAddAttr .. ‘{“attr”:”S_KA_NAME”,”value”:”‘ .. strKAName .. ‘”},’
? ? ? ? ? ? ? ?— 常規屬性
? ? ? ? ? ? ? ? elseif (strAttr == “所屬地區”) then
? ? ? ? ? ? ? ? ? ? strArea = strValue
? ? ? ? ? ? ? ? ? ? strAddAttr = strAddAttr .. ‘{“attr”:”S_AREA”,”value”:”‘ .. strArea .. ‘”},’
? ? ? ? ? ? ? ? elseif (strAttr == “客戶類型”) then
? ? ? ? ? ? ? ? ? ? strKAType = strValue
? ? ? ? ? ? ? ? ? ? strAddAttr = strAddAttr .. ‘{“attr”:”S_KA_TYPE”,”value”:”‘ .. strKAType .. ‘”},’
? ? ? ? ? ? ? ? end
? ? ? ? ? ? end
? ? ? ? end
? ? ? ? –去除最后一個,
? ? ? ? local strAddAttr1 = trim_laster_char(strAddAttr)
? ? ? ? — 步驟2 根據客戶名稱來判斷導入的客戶是否已經存在
? ? ? ? —? ? ? ?如果已經存在,根據導入的數據進行覆蓋
? ? ? ? —? ? ? ?如果不存在需要創建
? ? ? ? local attrs
? ? ? ? local strCondition = “S_KA_NAME='” .. strKAName .. “‘”
? ? ? ? nRet, strRetInfo = mobox.existThisData(strLuaDEID, “客戶”, strCondition)
? ? ? ? if (nRet ~= 0) then
? ? ? ? ? ? mobox.error(strLuaDEID, “在檢查客戶是否存在時失敗! ” .. strRetInfo)
? ? ? ? ? ? return
? ? ? ? end
? ? ? ? if (strRetInfo == ‘yes’) then
? ? ? ? ? ? — 已經存在,根據導入的數據進行覆蓋
? ? ? ? ? ? strCondition = “S_KA_NAME='” .. strKAName .. “‘”
? ? ? ? ? ? strSetSQL =? “S_KA_NAME = ‘” .. strKAName ..”‘ , S_KA_TYPE ='” ..strKAType .. “‘ , S_AREA = ‘” .. strArea ..”‘ “
? ? ? ? ? ? nRet, strRetInfo = mobox.updateDataAttrByCondition(strLuaDEID, “客戶”, strCondition, strSetSQL)
? ? ? ? ? ? if (nRet ~= 0) then
? ? ? ? ? ? ? ? mobox.error(strLuaDEID, strRetInfo)
? ? ? ? ? ? ? ? return
? ? ? ? ? ? end
? ? ? ? elseif (strRetInfo == ‘no’) then
? ? ? ? ? ? — 創建客戶
? ? ? ? ? ? –mobox.writeSysLog(“strAddAttr1”, strAddAttr1)
? ? ? ? ? ? strAddAttr1 = ‘[‘ .. strAddAttr1 .. ‘]’
? ? ? ? ? ? –mobox.writeSysLog(“strAddAttr2”, strAddAttr1)
? ? ? ? ? ? nRet, strRetInfo = mobox.createDataObj(strLuaDEID, “客戶”, strAddAttr1)
? ? ? ? ? ? if (nRet ~= 0) then
? ? ? ? ? ? ? ? mobox.error(strLuaDEID, “創建客戶失敗! ” .. strRetInfo )
? ? ? ? ? ? ? ? return
? ? ? ? ? ? end
? ? ? ? end
? ? end
end
]]>
低代碼平臺關于數據對象定版后權限控制 http://51chudao.com/1646/ Wed, 13 Sep 2023 02:15:16 +0000 http://51chudao.com/?p=1646 在項目實施過程中:Mobox低代碼平臺所需管理的內容,都是通過數據建模而確立的。我們可以將任何一個需要管理的事務抽象為數據對象。

數據對象它有生命周期:編輯 -> 審核 -> 定版 -> 報廢? (默認 4個狀態)

我們數據在輸入階段,那么就屬于 “編輯”? ,這個時候可以修改與之相關的屬性及關聯關系。而一定數據對象經過審核 ,進入“定版” 狀態,那么針對這個數據對象就不能修改了

參考下圖:

為實現這個功能設置,Mobox系統需要做如下配置

-》在grid列表定義里面 ,必須有 “S_STATE” 狀態? 這個字段

若這個字段不設置到 grid ,就無法實現第一圖的效果

]]>
低代碼腳本開發-人員選擇 http://51chudao.com/1617/ Fri, 01 Sep 2023 08:12:11 +0000 http://51chudao.com/?p=1617 Lua腳本【人員選擇前

json = require (“json”)

mobox = require (“OILua_JavelinExt”)

function BeforeSelectUser ( strLuaDEID )

local action = ‘[{“action_type”:”open_select_userdlg“,”value”:{“multi_choice “:false,”style”:”user“}}]’

?— user 的意思 只列出用戶選擇

nRet, strRetInfo = mobox.setAction( strLuaDEID, action )

if (nRet ~= 0) then error( strRetInfo ) end

end

Lua腳本【人員選擇后

json? = require (“json”)
mobox = require (“OILua_JavelinExt”)
function AfterSelectUser ( strLuaDEID )
? ? local? ?nRet, strUserLogin, strUserName
? ? — 獲取當前選擇數據
? ? nRet, strRetInfo = mobox.getInputParameter( strLuaDEID )
? ? if ( nRet ~= 0 or? strRetInfo == ”) then
? ? ? ? mobox.error( strLuaDEID, “無法獲取數據!”)
? ? ? ? return
? ? end
? ? local retJson = json.decode( strRetInfo )
? ? local input_parameter = retJson[“parameter”]
? ? strUserLogin = input_parameter[1].id
? ? strUserName =? input_parameter[1].name
? ? — 設置所選人員
? ? local setAttr = ‘[{“attr”:”S_MASTER”,”value”:”‘..strUserName..'”},{“attr”:”S_S_MASTER_Login”,”value”:”‘..strUserLogin..'”}]’
? ? mobox.setCurEditDataObjAttr( strLuaDEID,setAttr )
end
]]>
Mobox二開的彈窗選擇數據實現技巧 http://51chudao.com/1600/ Mon, 21 Aug 2023 03:23:02 +0000 http://51chudao.com/?p=1600 Mobox二開的彈窗選擇數據實現技巧

 

需求描述

 

(上圖為多選窗口)

實現方式

需要開發2個lua腳本

 

Lua腳本【試驗類型選擇前

–[[
? ? 這個腳本適合 單個選擇的獲取過程
–]]

json = require (“json”)

mobox = require (“OILua_JavelinExt”)

function BeforeSelectGP ( strLuaDEID )

local nRet, strRetInfo ,strCondition

strCondition = “”

local action = ‘[{“action_type”:”open_data_query_dlg”,”value”:{“mulit_select”:0,”cls_name”:”供應商”,”order”:””,”grid_style”:”default”,”condition”:”‘..strCondition..'”}}]’

mobox.setAction( strLuaDEID, action )

end

 

  • 彈出窗口定義:? ?(注意粘貼下面內容的時候? ”? 可能是中文的,需要改成英文)
  • 單選 “mulit_select”:0??? 多選? “mulit_select”:1
  • 關聯表名 “cls_name”:”部分性能試驗”?? (部分性能試驗 這個是表名)
  • 排序 “order”:””????? (可以設置排序字段名)
  • 窗口grid “grid_style”:”procure”? (不設置就是默認grid)
  • 查詢條件 “condition”:”‘..strCondition..’”? ( strCondition 是變量,拼接的查詢條件)

 

我們在彈出窗口前,可以將我們需要的通過上述參數設置好后 再彈出

Lua腳本【試驗類型選擇后】? 單選和多選例子

–[[

這個腳本適合 單個選擇 的獲取過程

–]]

 

json? = require (“json”)

mobox = require (“OILua_JavelinExt”)

function AfterSelectSYTPYE ( strLuaDEID )

local?? nRet,? strTpyeDESC , strOldDesc

 

— 獲取當前選擇數據

nRet, strRetInfo = mobox.getInputParameter( strLuaDEID )

if ( nRet ~= 0 or? strRetInfo == ”) then

mobox.error( strLuaDEID, “無法獲取導入數據!”)

return

end

 

local retJson = json.decode( strRetInfo )

local input_parameter = retJson[“parameter”]

local n, nCount

 

strTpyeDESC = input_parameter[“S_TST_TPYEDESC”]

 

if ( strTpyeDESC == ”? ) then

mobox.error( strLuaDEID, “試驗類型信息不對!”)

return

end

 

— 設置試驗類型信息

local setAttr = ‘[{“attr”:”S_TST_TPYEDESC”,”value”:”‘..strTpyeDESC..'”}]’

mobox.setCurEditDataObjAttr( strLuaDEID,setAttr )

下面是多選的例子

–[[

這個腳本適合 多個選擇 的獲取過程

–]]

 

json? = require (“json”)

mobox = require (“OILua_JavelinExt”)

function AfterSelectSYTPYE ( strLuaDEID )

local?? nRet,? strTpyeDESC

— 獲取當前選擇數據

nRet, strRetInfo = mobox.getInputParameter( strLuaDEID )

if ( nRet ~= 0 or? strRetInfo == ”) then

mobox.error( strLuaDEID, “無法獲取導入數據!”)

return

end

local retJson = json.decode( strRetInfo )

local input_parameter = retJson[“parameter”]????? —? 或者 retJson.parameter

local n, nCount

nCount = #input_parameter

strTpyeDESC =”

for n = 1 , nCount do???????????????????????????????????? — 需要for循環

??????? if (strTpyeDESC ==”) then

??????????? strTpyeDESC = input_parameter[n].S_TST_TPYEDESC

??????? else

??????????? strTpyeDESC = strTpyeDESC .. ‘、’..input_parameter[n].S_TST_TPYEDESC

??????? end

?? ?end

— 設置試驗類型信息

local setAttr = ‘[{“attr”:”S_TST_TPYEDESC”,”value”:”‘..strTpyeDESC..'”}]’

mobox.setCurEditDataObjAttr( strLuaDEID,setAttr )

 

之后將這個腳本管理的窗口的定義里面

 

]]>

    <noscript id="7lhqw"><i id="7lhqw"><legend id="7lhqw"></legend></i></noscript>
    <u id="7lhqw"><optgroup id="7lhqw"><listing id="7lhqw"></listing></optgroup></u>
    1. <blockquote id="7lhqw"><center id="7lhqw"></center></blockquote>
      <address id="7lhqw"></address>
      主站蜘蛛池模板: 濮阳市| 来安县| 泸州市| 玛多县| 徐汇区| 茂名市| 金乡县| 鹤庆县| 阳原县| 安康市| 高要市| 济阳县| 瑞金市| 会宁县| 额济纳旗| 镇宁| 灵璧县| 延长县| 新闻| 含山县| 牙克石市| 丰城市| 东海县| 涡阳县| 三明市| 清流县| 如东县| 古浪县| 溧阳市| 南华县| 锦屏县| 西安市| 许昌县| 深泽县| 涟源市| 措勤县| 中卫市| 离岛区| 盐池县| 晋中市| 大渡口区|