mobox3的功能點擴展的MBC客戶端的配置實現方式
需要定義 3個應用 (應用名稱 不能變)
MOBOX3
OIOrgSAPI
OIMoboxSAPI
OIDataSAPI
其它2個服務類似
nRet, strRetInfo = mobox.getCurEditDataObjAttr(strLuaDEID, “G_PRJ_ID”, “S_PRJ_CODE”, “S_PRJ_NAME”, “S_PM_NAME”, “S_PD_NAME”)
[{
“attr”: “G_PRJ_ID”,
“value”: “”
},
{
“attr”: “S_PRJ_CODE”,
“value”: “PM-0002”
},
{
“attr”: “S_PRJ_NAME”,
“value”: “pcy 0999 hard”
},
{
“attr”: “S_PM_NAME”,
“value”: “金振興”
},
{
“attr”: “S_PD_NAME”,
“value”: “”
}
]
nRet, strOBJInfo = mobox.objAttrToObjJson (‘JS001’, strRetInfo )
注意:strOBJInfo 得到其實還是一個Json字符串,但其是一個標準的Json表格式表達
具體 objAttrToObjJson 函數怎么用查看手冊
{“cls”: “JS001”,
“ver”: 1,
“G_PRJ_ID”: “”,
“S_PRJ_CODE”: “PM-0002”,
“S_PRJ_NAME”: “pcy 0999 hard”,
“S_PM_NAME”: “金振興”
}
注意:這個Json格式是標準表格式字符串表達。
local tbOBJ = json.decode (strOBJInfo)
注,只有變成表后,我們可以這樣來理解這個表:
字段名 | cls | ver | G_PRJ_ID | S_PRJ_CODE | S_PRJ_NAME | S_PM_NAME |
數值 | JS001 | 1 | PM-0002 | pcy 0999 hard | 金振興 |
取值方法:
local strPMName
strPMName = tbOBJ.S_PRJ_NAME
賦值方法:
tbOBJ.S_PRJ_NAME = ‘潘元元’
local strRetInfo , strOBJInfo
local tbOBJ ={}
— 得到當前窗體上指定字段的json字符串
nRet, strRetInfo = mobox.getCurEditDataObjAttr(strLuaDEID, “G_PRJ_ID”, “S_PRJ_CODE”, “S_PRJ_NAME”, “S_PM_NAME”, “S_PD_NAME”)— 將json字符串(mobox3)格式轉為 json標準表格式
nRet, strOBJInfo = mobox.objAttrToObjJson (‘JS001’, strRetInfo )–將json字符串轉變為表
tbOBJ = json.decode (strOBJInfo)
— 獲取表字段內容及設置表字段值
local strPMName
strPMName = tbOBJ.S_PM_NAME
tbOBJ.S_PM_NAME = ‘潘元元’
若需要將數據轉會mobox3數據格式
–將表轉變為json字符串(標準格式)
strOBJInfo = json.encode (tbOBJ)— 將json標準表格式格式轉為 json字符串(mobox3)
nRet, strRetInfo = mobox.objJsonToObjAttr (‘JS001’, strOBJInfo )
]]>
為了解決這個問題,我們可以編輯一個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標準系統內對項目的屬性,主要包括(項目名稱、編號、開始結束日期等)。為了適應企業個性項目信息的輸入,我們需要通過Mobox平臺定義項目類型去適應這個需求
Sa 登錄mobox低代碼開發平臺
創建一個用于描述項目擴展屬性的數據對象
注意:業務類型必須是 項目
接下來需要做的內容,這里不具體展開
基礎:主要是綁定哪個數據對象及相關的界面
功能:主要是可以自定義該類型項目的自定義菜單 (參考下圖)
我們在gungho登錄后,新建項目
Gungho項目管理軟件在企業部署的時候因其業務的個性,很有可能需要對任務做各種各樣的二次開發,從而適應企業需求
舉例:
某檢測檢驗中心,在做叉車整車檢測的時候會分解出100多個的檢測任務,每一個任務除了要求員工按時間要求完成以外,還需將每個檢測任務所獲取的數據等級下來。這個數據可能是一個表,而且每一個任務所對應的填寫數據也都是不一樣的。
這樣一個需求,我們就必須對任務做二次開發
用sa 登錄Mobox平臺,進入系統管理模塊
定義的任務類型名稱,在后面會用到
開發一個腳本:任務點擊后 腳本 (目的是 任務點擊后能將 prj_id,task_id 等設置到全局變量)
這個任務點擊后(lua腳本)是標準的
|
這個腳本目的是生成 全局變量:prj_id , task_id 。 這2個變量描述了當前任務所屬項目唯一標識,及任務唯一標識。是Gungho系統向Mobox平臺傳遞核心參數,Mobox后期二次開發的時候都需要用到。
注意,這里定義的全局變量 名稱在后期調用的是要完全一樣
這個腳本,會在后面文章的:任務分類定義 –? 事件 (點擊后事件用到) 參考
按需分別定義數據模型,及模型里面的字段。這里不詳細展開(需要有mobox二次開經驗)
定義小窗口的時候需要注意,有一個窗口初始化腳本要執行(目的是個小窗口內設置prj_id, task_id)
因為是與Gungho集成,前面描述過gungho的全局變量,這里開發的時候已經可以使用這些變量(prj_id , task_id)
根據需求,圍繞數據模型做二次開發(可能有很多過個腳本,按需求開發)比如
1)查詢事件 (我們的擴展屬性,是與任務綁定的,所以需要查出與本任務有關的屬性 如 任務ID過濾 )
因為是與Gungho集成,前面描述過gungho的全局變量,這里開發的時候已經可以使用這些變量(prj_id , task_id)
2)初始化腳本 (因為需要與Gungho的任務集成,定義界面(小窗口的時候需要定義初始化腳本 如 設置項目及任務ID )
任務擴展屬性信息的grid展示(查詢事件)、小窗口數據的輸入保存(需要綁定task_id等)
任務分類定義,是gungho的任務與Mobox的功能點集合的一個過程
注意:數量限制 必須選擇 多數據, 顯示方式必須選擇 自定義頁面
注意:點擊任務后事件 是必須選擇( 來源: gungho領域 – TASK任務 – 某自定義事件)
自定義里面是將任務與Mobox的功能點集合在一起
按上圖,A2樣品技術參數,這類任務,綁定了2個功能點
綁定了2個功能點
? 1 個用于技術參數輸入 (可能是一個表)
1 個用于檢測結果輸入
]]>
1)3000功能點
2)增加打印功能
3)配置打印時用的支撐文檔柜
需要定義word模版,必須存儲為 docx
主表變量:{S_KA_NAME}???? 對應的是:客戶名稱
這里的 {S_KA_NAME} 變量輸入(最好的方法)
1)在 notepad 中,將變量輸入后,復制;
2)到word 里面進行 粘貼
若不采用這個方法,直接在word里面輸入這個變量,有的時候word對這個變量會做特殊處理。從而在打印的時候造成,變量無法賦值
其中,購買產品是一個采購清單,屬于合同的關聯表,其變量定義解釋
舉例:產品名稱 字段 ,變量:
{TN_0012*S_PO_CODE*S_GDS_NAME*2}
關聯表變量解釋:
其中:所有這些表名、字段名等都需要系統管理 在后臺進行查看
帶來的問題:
設置正確后:
打印的word 顯示會正常:
我們在實施Gungho項目管理系統剛上線的時候,其實用戶手上有很多的歷史項目需要導入進來。而且用戶的項目屬性與我們標準的項目屬性差異很大。為此,我們需要對Gungho的項目數據屬性進行擴延。而這個擴延設置是在Mobox數據平臺來完成的。為此我們需要做2個事情:
給項目設置擴展屬性,用于對用戶需求的適應
需要將企業歷史項目清單一次性導入
因為,我們是為Gungho的項目管理做配套,所以在mobox建立數據模型的時候,有類型需要選擇? ,業務類型必須是 “項目”
目的,定義適用企業個性需求的項目管理功能及界面
根據需求 自定義功能
根據需求,加入對應腳本
方法一: ?(這個一般在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 對歷史數據進行導入操作。導入一般可以通過腳本做一些定制開發來實現
列子:
數據導入的sheet 要求
這個系統只能導入,左邊第一個sheet (命名無所謂)(注意:若數據列表 這個sheet左邊還有隱藏的sheet,那么系統也不能獲取 數據列表sheet頁的數據)
對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? ? endend
數據對象它有生命周期:編輯 -> 審核 -> 定版 -> 報廢? (默認 4個狀態)
我們數據在輸入階段,那么就屬于 “編輯”? ,這個時候可以修改與之相關的屬性及關聯關系。而一定數據對象經過審核 ,進入“定版” 狀態,那么針對這個數據對象就不能修改了
參考下圖:
為實現這個功能設置,Mobox系統需要做如下配置
-》在grid列表定義里面 ,必須有 “S_STATE” 狀態? 這個字段
若這個字段不設置到 grid ,就無法實現第一圖的效果
]]>