–[[ 格式日期 2024-03-25T16:00:00.000Z 格式化為 2024-03-25?]]

function DayFromat(dateTimeStr)

local formattedDateStr =""
if (dateTimeStr == "" or dateTimeStr==nil ) then
return formattedDateStr
end

dateTimeStr = string.gsub(dateTimeStr, "T", " ")
print(dateTimeStr)

-- 使用模式匹配提取日期和時間部分
local dateStr, timeStr = dateTimeStr:match("(%d+-%d+-%d+) (%d+:%d+:%d+)")

if (dateStr == nil) then
formattedDateStr ="Date Format Error"
return formattedDateStr
end

-- 提取日期部分的年、月、日
local year, month, day = dateStr:match("(%d+)-(%d+)-(%d+)")

-- 將提取的月、日格式化為兩位數(shù)的字符串
month = string.format("%02d", tonumber(month))
day = string.format("%02d", tonumber(day))

-- 組合格式化后的日期和原始時間部分
local formattedDateStr = string.format("%s-%s-%s", year, month, day)
local formattedDateTime = string.format("%s %s", formattedDateStr, timeStr)

return formattedDateStr
end

— 示例使用
local date = “2024-03-25T16:00:00.000Z”
local formattedDate = DayFromat(date)
print(formattedDate) — 輸出: 2024-03-25

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

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

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

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

腳本列子

— 功能:
— 3000 功能點 列出與某一個taskid相關(guān)的數(shù)據(jù)
— 若列出數(shù)據(jù)已經(jīng)有，將 新增 頁面按鈕屏蔽 （這個功能是做任務(wù)評測結(jié)果的，結(jié)果只能有一個，不可能多個）
————————————————————————–
json = require (“json”)
mobox = require (“OILua_JavelinExt”)

function shownowtaskdata ( strLuaDEID )

local nRet, strRetInfo
local nType
local strTaskID
local bHidden=false
local strClsID=""

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

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

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

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

--轉(zhuǎn)為整數(shù)類型
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腳本，將這個數(shù)據(jù)做處理后再顯示（在顯示前事件里面定義這個lua腳本）

腳本列子

–[[

? ? 功能說明:

? ? ? ? 1） 顯示前做一些字段的處理

? ? ? ? 2）前端導(dǎo)入，新增有換行符號　%%3Cbr%%3E　　，替換成 <br> 前端html支持的換行內(nèi)容

? ? ? ? 3）內(nèi)容中有&，替換成 ＆ 前端解析 &不支持，最好在輸入時進行替換

–]]

json = require(“json”)

mobox = require(“OILua_JavelinExt”)

require(“oi_basestrfunc”)

function BeforeGridShow(strLuaDEID)

? ? local nRet, strRetInfo

? ? local arobjs, attrs, success

? ? — 獲取輸入的DataJson數(shù)據(jù)包

? ? nRet, strRetInfo = mobox.getCurEditDataPacket(strLuaDEID)

? ? if (nRet ~= 0) then

? ? ? ? mobox.error(strLuaDEID, “無法獲取數(shù)據(jù)包!”)

? ? ? ? return

? ? end

? ? if (strRetInfo == ” or strRetInfo == nil) then

? ? ? ? return

? ? end

? ? — 解析數(shù)據(jù)包，數(shù)據(jù)包格式

? ? — [{“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=”

? ? ? ? — 開始過濾顯示數(shù)據(jù)對象屬性

? ? ? ? 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

這個列子也可以用于別的一些非法字符串的處理

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

項目類型定義過程

Sa 登錄mobox低代碼開發(fā)平臺

進入數(shù)據(jù)模型（001功能點）創(chuàng)建數(shù)據(jù)對象

創(chuàng)建一個用于描述項目擴展屬性的數(shù)據(jù)對象

注意：業(yè)務(wù)類型必須是 項目

接下來需要做的內(nèi)容，這里不具體展開

• • 設(shè)置數(shù)據(jù)對象的相關(guān)字段屬性
  • 設(shè)置數(shù)據(jù)對象的Gird（列表）
  • 設(shè)置數(shù)據(jù)對象的窗口（界面）
  • 及可能涉及的二次開發(fā)

進入項目類型定義（8012功能點）創(chuàng)建項目類型

• 新建項目類型（基礎(chǔ)）

基礎(chǔ)：主要是綁定哪個數(shù)據(jù)對象及相關(guān)的界面

• 新建項目類型（功能）

功能：主要是可以自定義該類型項目的自定義菜單 （參考下圖）

效果

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

這個是一個標準的導(dǎo)入模板 ，使用前可以通過修改 表名，字段名稱，字段中文名，字段對應(yīng)賦值變量名稱。

–[[

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

1、修改里面的數(shù)據(jù)對象名稱 樣品技術(shù)參數(shù)

2、字段相關(guān)名稱（字段中文名、字段名稱、字段賦值變量名稱）

字段名稱? ? ? ? ? ? ? ? ? ? ? ? ? ? 字段中文名? ? ? ? ? 字段對應(yīng)賦值變量名

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

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

S_ITEM_M_S_N? ? ? ? ? ? ? ?型號_規(guī)格_數(shù)量? ?strItemMSN

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

S_MANUFACTURER? ? ? ? 生產(chǎn)單位? ? ? ? ? ? ? strFacturer

3、若字段不夠多，或太多，需要調(diào)整程序

4、里面的唯一性判斷是 task_id + S_ITEM_NAME + S_ITEM_CODE （需要根據(jù)情況調(diào)整）

–]]

功能說明：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, “系統(tǒng)無法獲取全局變量 “..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, “必須要有項目及任務(wù)相關(guān)信息” )

return

end

— 獲取導(dǎo)入的單條數(shù)據(jù), 返回 {“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, “無法獲取導(dǎo)入數(shù)據(jù)!”..strRetInfo)

return

end

local n, nCount, nValue

local strAddAttr = ”

local strAttr = ”

local strSetSQL = ”

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

local nSN? ? ? ? ? ? ? ? ? ? ? ? ? ?— 對應(yīng) 序號 N_SN

local strItemName = ”? ? ? ? — 對應(yīng) 名稱 S_ITEM_NAME

local strItemMSN = ”? ? ? ? ?— 對應(yīng) 型號_規(guī)格_數(shù)量 S_ITEM_M_S_N

local strItemCode = ”? ? ? ? ?— 對應(yīng) 編號 S_ITEM_CODE

local strFacturer = ”? ? ? ? ? ? — 對應(yīng) 生產(chǎn)單位 S_MANUFACTURER

 

— 因為每次導(dǎo)入只傳一條記錄，所以當前條寫入 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導(dǎo)入的一行數(shù)據(jù)，根據(jù)excel的列定義進行屬性組合 strAddAttr

nCount = #input_rows

for n = 1, nCount do

strAttr = input_rows[n].attr

strValue = input_rows[n].value

— 根據(jù)導(dǎo)入的excel列頭名稱進行判斷

— 關(guān)鍵屬性判斷

if (strAttr == “名稱”) then

if (strValue == ”) then

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

return

end

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

 

— 常規(guī)屬性

elseif (strAttr == “序號”) then

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

elseif (strAttr == “型號_規(guī)格_數(shù)量”) 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 == “生產(chǎn)廠家”) then

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

end

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

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

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

return
end

if (strRetInfo == ‘yes’) then

— 已經(jīng)存在，根據(jù)導(dǎo)入的數(shù)據(jù)進行覆蓋

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, “樣品技術(shù)參數(shù)”, strCondition, strSetSQL)

if (nRet ~= 0) then

mobox.error(strLuaDEID, strRetInfo)

return

end

elseif (strRetInfo == ‘no’) then

— 創(chuàng)建 樣品技術(shù)參數(shù)

— mobox.writeSysLog(“strAddAttr1”, strAddAttr1)

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

mobox.writeSysLog(“strAddAttr2”, strAddAttr1)

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

if (nRet ~= 0) then

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

return
end

end
end

 

function

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

給項目設(shè)置擴展屬性，用于對用戶需求的適應(yīng)

需要將企業(yè)歷史項目清單一次性導(dǎo)入

Mobox低代碼中心的實現(xiàn)過程

• Mobox數(shù)據(jù)建模
• Mobox設(shè)置項目類型
• Mobox編寫項目導(dǎo)入二次開發(fā)腳本
• Mobox增加導(dǎo)入功能點，綁定數(shù)據(jù)模型及腳本
• Mobox通過腳本創(chuàng)建Gungho項目后的g _id 寫入到數(shù)據(jù)對象的 G_PRJ_ID中

數(shù)據(jù)對象建模

因為，我們是為Gungho的項目管理做配套，所以在mobox建立數(shù)據(jù)模型的時候，有類型需要選擇? ，業(yè)務(wù)類型必須是 “項目”

項目類型定義（通過 8012 功能點）

目的，定義適用企業(yè)個性需求的項目管理功能及界面

• 基礎(chǔ)

• 功能

根據(jù)需求 自定義功能

• 腳本

根據(jù)需求，加入對應(yīng)腳本

函數(shù) createProject（） 說明

方法一： ?（這個一般在mobox數(shù)據(jù)對象創(chuàng)建后事件調(diào)用）

Mobox 數(shù)據(jù)對象先創(chuàng)建 –》之后通過腳本生成Gungho的項目 –》得到Gungho項目的prj_id –》更新mobox數(shù)據(jù)對象的 G_PRJ_ID

方法二： ?（這個一般在mobox數(shù)據(jù)對象的自定義事件入“項目導(dǎo)入”調(diào)用）

Gungho的項目所需的所有信息（包括擴展信息）全部定義好，一次性創(chuàng)建Gungho及Mobox所有數(shù)據(jù)及其相關(guān)性

我們系統(tǒng)上線的時候，原先的歷史數(shù)據(jù)是沒有的，為了快速接軌企業(yè)已有數(shù)據(jù)，我們可以通過excel 對歷史數(shù)據(jù)進行導(dǎo)入操作。導(dǎo)入一般可以通過腳本做一些定制開發(fā)來實現(xiàn)

列子：

數(shù)據(jù)導(dǎo)入的sheet 要求

這個系統(tǒng)只能導(dǎo)入，左邊第一個sheet （命名無所謂）（注意：若數(shù)據(jù)列表 這個sheet左邊還有隱藏的sheet，那么系統(tǒng)也不能獲取 數(shù)據(jù)列表sheet頁的數(shù)據(jù)）

對Excel單元格的要求

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

另外，單元個內(nèi)容 不能出現(xiàn) /\<> & 符號，不能有換行或大量空格

分析excel格式

1、字段分3類：

• 關(guān)鍵字段

如，產(chǎn)品名稱 ，這個是必須有數(shù)值的

• 屬性字段

用于登記各種屬性信息

• 計算字段

若有數(shù)據(jù)，則直接獲取

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

這種字段，一般也是必須有數(shù)值的

2、第一行是表頭行，數(shù)據(jù)行從第二行開始

定義導(dǎo)入功能

通過Mobox 3000 功能點進行定義，設(shè)置界面如下：

導(dǎo)入腳本，參考：

數(shù)據(jù)對象它有生命周期：編輯 -> 審核 -> 定版 -> 報廢? （默認 4個狀態(tài)）

我們數(shù)據(jù)在輸入階段，那么就屬于 “編輯”? ，這個時候可以修改與之相關(guān)的屬性及關(guān)聯(lián)關(guān)系。而一定數(shù)據(jù)對象經(jīng)過審核 ，進入“定版” 狀態(tài)，那么針對這個數(shù)據(jù)對象就不能修改了

參考下圖：

為實現(xiàn)這個功能設(shè)置，Mobox系統(tǒng)需要做如下配置

-》在grid列表定義里面 ，必須有 “S_STATE” 狀態(tài)? 這個字段

若這個字段不設(shè)置到 grid ，就無法實現(xiàn)第一圖的效果