K3.BOS插件开发记录

获取单据值

String= m_BillInterface.GetFieldValue("字段名", -1, Enu_ValueType_FFLD)

–这里的-1为表索引，-1是表头，一个单据体一个索引

设置单据值

m_BillInterface.SetFieldValue "FText", strICMONumber（填写的值）

–这里的“FText” 并不是字段名，而是


存储数据集

strSql = "EXEC STKD_P_Position"\\sql语句
rsTemp.CursorLocation = adUseClient
Set rsTemp = m_BillInterface.K3Lib.GetData(strSql)
If rsTemp("FID") = 1000 Then
MsgBox rsTemp("FID").Value, vbCritical, "金蝶提示"
rsTemp.Close
Exit Sub
End If

\\rsTemp("FID") 列值

遍历数据集，然后逐行插入

rsTemp.MoveFirst
For i = 1 To rsTemp.RecordCount
m_BillInterface.InsertNewRowAndFill 4, i, "FText2", rsTemp("FName").Value
//这里来的4 是索引第四个单据体，i 暂时未知何意
rsTemp.MoveNext
Next i
rsTemp.Close  //完毕后需要关闭数据集

找不到插件错误：



或者是插件没注册：

处理方法：cmd-regsvr32 插件绝对地址