–以下**為更新任務回報單的工時功能,以下外掛程式**:
public sub mainfunction(byval skey as string, olist as object, byref bcancel as boolean)
dim sqlcode as string
dim finterid as long
dim fentryid as long
if skey = "hmprint" then
olist.multiselect = 2
'獲取選擇單據的單據內碼及行號
dim selinterid as kfo.vector
dim selentryid as kfo.vector
set selinterid = olist.getseldata("finterid")
set selentryid = olist.getseldata("fentryid")
if selinterid.ubound > 0 then
dim hrwt as string
dim hrwtime as double
hrwt = inputbox("請輸工時數值", "請輸工時數值", "0")
if isnumeric(hrwt) then
hrwtime = round(cdbl(hrwt), 2)
for i = selinterid.lbound to selinterid.ubound
finterid = selinterid(i).getvalue("finterid")
fentryid = selentryid(i).getvalue("fentryid")
sqlcode = "update icmorptentry set ftimehrwork=" & hrwtime & " where finterid=" & finterid & " and fentryid=" & fentryid
obj.execute3 (sqlcode)
next i
msgbox "人工實作工時 批量更新成功!", vbokonly, "金蝶提示"
sendkeys ("")
else
msgbox "請輸入數值!", vbokonly, "金蝶提示"
end if
end if
end if
end sub
金碟K3 WISE 表結構
大家在維護系統的時候,在資料字典沒有查到相關的字段。給工作帶了很多的不便。為此,把系統的結構通過 查詢方式給大家檢視。select from t tabledescription where ftablename icstockbillentry 查詢所有的 結構 select t1.from t ...
K3老單二次開發學習記錄
重點內容 一 老單相關表 select from t thirdpartycomponent 老單外掛程式表 select from ictransactiontype 單據型別表 select from ictemplate select from ictemplateentry 單據模版表12 ...
金蝶K3老單新增自定義選單按鈕
先說下金蝶老單是新單的區別 金蝶是有著20多年的歷史,金蝶軟體是多年的積澱,軟體也經常更新,但是原有的 框架是不變的,因此,現在的金蝶wise,實際上用的還是已經淘汰的語言vb寫的,底層的框架也都是十幾年前落後的。金蝶也有新語言寫的,比如cloud,但wise至少不是。老單與新單,應該是金蝶bos功...