K/3 BOS插件开发手册
概述
COM
K3ClassEvents的对象模型
使用说明
K3ClassEvents的对象
ListEvents对象参考
DataSrv 属性
Dim dctTableInfo As KFO.Dictionary
Set dctTableInfo = m_ListInterface.DataSrv.TableInfo
Set GetFieldInfo = Nothing
End Function
EnableListFillRowEvents 属性
'ListEvents 接口实现
End Sub
If HeadDict("FKey") = "FText" Then
BackColor = vbWhite
End Sub
K3Lib 属性
K3Lib对象
List 属性
ListEntrySort 属性
ListFilterString 属性
ListHeadSort 属性
MenuBar 属性
MultiCheckMgr 属性
RsId 属性
ShowMode 属性
ShowMsg 属性
DeleteBill 函数
Debug.Print “删除成功”
Debug.Print “删除失败”
GetDataFldByKey 函数
Set dctBillID = m_ListInterface.List.GetSelectedBillID
Set m_ListInterface.Data = dctData
If Not dctField Is Nothing Then
Set dctField = Nothing
GetDataFld 函数
Set dctBillID = m_ListInterface.List.GetSelectedBillID
' GetFieldInfo()函数的实现参见ListEvents.DataSrv属性的示例
Set dct = m_ListInterface.GetDataFld(dctDataInfo)
If Not dct Is Nothing Then
Set dct = Nothing
GetCurrentSelRowInfo 函数
GetSelectedBillInfo 函数
LoadSelectedBill 函数
RefreshList函数
SenderMessage 函数
UpdateNormalFld 函数
UpdateNormalFldByKey 函数
RefreshMenu 函数
AfterBatchMultiCheck事件
AfterBusinessCheck 事件
AfterBusinessCheckEx 事件
AfterCopyBillCreateData 事件
AfterDeleteBill 事件
AfterMergeCopyBill事件
AfterMultiCheck 事件
AfterMultiCheckEx 事件
AfterSelList 事件
AfterUnBusinessCheck 事件
AfterUnBusinessCheckEx 事件
AfterUnMultiCheck 事件
AfterUnMultiCheckEx 事件
BeforeMultiCheck 事件
BeforeMultiCheckEx 事件
BeforePrintBill 事件
BeforeSenderMessage 事件
BeforRefreshToolBar 事件
BusinessCheck 事件
BusinessCheckEx 事件
FinishMultiCheck 事件
FinishMultiCheckEx 事件
ListFillRow 事件
'ListEvents 接口实现
End Sub
If HeadDict("FKey") = "FText" Then
BackColor = vbWhite
End Sub
ListRowSelected 事件
MenuBarClick 事件
MenuBarInitialize 事件
MultiCheck 事件
MultiCheckEx 事件
PrintSuccessful事件
StartMultiCheck 事件
StartMultiCheckEx 事件
UnBusinessCheck 事件
UnBusinessCheckEx 事件
UnMultiCheck 事件
UnMultiCheckEx 事件
ReMultiCheck 事件
ReMultiCheckEx 事件
ReUnMultiCheck 事件
ReUnMultiCheckEx 事件
BaseClassEvent对象参考
BrowseCtl 属性
DataSrv 属性
EnableListFillRowEvents 属性
'ListEvents 接口实现
End Sub
If HeadDict("FKey") = "FText" Then
BackColor = vbWhite
End Sub
InsertNewRowAndFillOption属性
K3Lib 属性
ListActiveBar 属性
ListEntrySort 属性
ListFilterString 属性
ListHeadSort 属性
MenuBar 属性
RsClassGroup 属性
RsId 属性
GetActiveCtl 函数
Select Case sCtlName
GetSelectedClassID 函数
Select Case BOSTool.ToolName
End Sub
GetSelectedClassType 函数
Select Case BOSTool.ToolName
End Sub
GetSelectedItemID 函数
Select Case BOSTool.ToolName
End Sub
GetSelectedItems 函数
Set dict = m_BaseInterface. GetSelectItems()
If Not dict Is Nothing Then
Next
Debug.Print “获取失败”
IsSearchState 函数
Select Case sCtlName
MsgBox "光标选中了分组树"
If m_BaseListInterface.IsSearchState Then
Else
End If
MsgBox "我也不知道是什么"
PitchItemByID 函数
Select Case BOSTool.ToolName
End Sub
SelectClassGroupByID 函数
Select Case BOSTool.ToolName
End Sub
SenderMessage 函数
SetStatus函数
RefreshClassGroups 方法
Select Case BOSTool.ToolName
End Sub
RefreshListByClassGroupID 方法
Select Case BOSTool.ToolName
End Sub
RefreshSelectedClassGroup 方法
Select Case BOSTool.ToolName
End Sub
RefreshSelectedClassGroupList 方法
Select Case BOSTool.ToolName
End Sub
AfterGetData 事件
BeforePrintBill 事件
BeforeSenderMessage 事件
ClassGroupSelected 事件
DeleteBillSucessful事件
ListFillRow 事件
'ListEvents 接口实现
End Sub
If HeadDict("FKey") = "FText" Then
BackColor = vbWhite
End Sub
ListRowSelected 事件
MenuBarClick 事件
MenuBarInitialize 事件
RefreshList 事件
BillEvent对象参考
AccessoryTypeID 属性
BillCtl 属性
BillEntrys 属性
BillHeads 属性
BillHeight 属性
BillName 属性
BillStatus 属性
BillWidth 属性
CancelPrintControl属性
ClassType 属性
ClassTypeEntry 属性
ClassTypeKey 属性
Data 属性
DataSrv 属性
EntryPrimaryKey 属性
FID 属性
InsertNewRowAndFillOption属性
IsDoAction 属性
IsDoActionData 属性
K3Lib 属性
LayerCount 属性
LayerNames属性
MenuBar 属性
MultiCheckMgr 属性
ObjectID 属性
ObjectType 属性
OriginalFieldValue属性
PrimaryKey 属性
ReSaveSuccess 属性
rsBillID 属性
ShowType 属性
TableInfo 属性
TableName 属性
TaskID 属性
ShowMsg 属性
BatchToDoActions函数
DeleteEntryData 函数
GetActiveCtl 函数
Case 1
Case 2
Case 3
Case 4
Case 8
Case 999
End Select
Case Else
GetActiveField 函数
GetCommonControl函数
Set dic = m_BillInterface.GetCommonControl("FButton")
If Not dic Is Nothing Then
For i = 1 To dic.Count
'此时不能直接显示dict(sName),要视具体情况来处理
GetDataFld 函数
GetDataFldbyKey 函数
GetFieldInfoByKey 函数
GetDynamicCtlByKey函数
GetFieldValue 函数
Case 1
Case 2
Case 3
Case 4
Case 8
Case 999
End Select
Case Else
GetToolIndex 函数
GetVariable函数
Object. GetVariable(ByVal strVariableName As String) As Variant
LABEL_ERR:
If Err.Number = &H800407C0 Then
MsgBox "此变量未定义!", vbExclamation
InsertNewRowAndFill 函数
IsChange 函数
MsgBox "单据已经被修改"
MsgBox "单据没有被修改"
IsFileNeedFilter 函数
MsgBox "选单时需要过滤条件"
MsgBox "选单时不需要过滤条件"
LockBill 函数
If m_BillInterface.BillStatus = Enu_BillStatusExt_Modify Then
End If
RefreshBill 函数
SenderMessage 函数
SetDecimal 函数
SetFieldSumValue函数
SetFieldValue 函数
SetSumDecimal 函数
SetText 函数
SetTypeFloatMax 函数
SetTypeFloatMin 函数
ShowHideField 函数
ShowHideGrid 函数
Sum 函数
UpdateLookFld 函数
UpdateNormalFld 函数
DoAction 方法
IsDoActionByKey 方法
LockCell 方法
If m_BillInterface.BillStatus = Enu_BillStatusExt_Modify Then
End If
RemoveRow 方法
SaveBill 方法
If m_BillInterface.SaveBill(False, True) Then
Else
SetActiveTab方法
SetBillFormCaption 方法
SetCaption 方法
If m_BillInterface.BillStatus = Enu_BillStatusExt_Modify Then
SetGridMaxRows方法
SetStatus 方法
If m_BillInterface.BillStatus = Enu_BillStatusExt_Modify Then
End If
SetActiveCell 方法
If m_BillInterface.BillStatus = Enu_BillStatusExt_Modify Then
End If
SetBillWindowState方法
SetRowsPerRequest方法
SetStateStampPicture方法
SetStatusBarInfo方法
SetVariable函数
LABEL_ERR:
If Err.Number = &H800407C0 Then
MsgBox "此变量未定义!", vbExclamation
SizeBillControl方法
AddNewRow 事件
AfterBusinessCheck 事件
AfterBusinessCheckEx 事件
AfterCopyBill 事件
AfterDeleteRow 事件
AfterDoAction 事件
AfterFillRow 事件
AfterFirstNewBill 事件
AfterInputBillSetSumData 事件
AfterLoadBill 事件
AfterLoadBillSetSumData 事件
AfterLoadDynamicCtl事件
AfterMergeCopyBill 事件
AfterMultiCheck 事件
AfterMultiCheckEx 事件
AfterNewBill 事件
AfterNewEmptyData 事件
AfterSave 事件
AfterSelBill 事件
AfterSelBillBeforeFillData 事件
AfterStockQuery事件
AfterUnBusinessCheck 事件
AfterUnBusinessCheckEx 事件
AfterUnMultiCheck 事件
AfterUnMultiCheckEx 事件
BeforeDeleteRow事件
BeforeDoAction 事件
BeforeLoadBill 事件
BeforeMultiCheck 事件
BeforeMultiCheckEx 事件
BeforePrintBill 事件
BeforeSave 事件
BeforeSelBills 事件
BeforeSelBillShowFilter 事件
BeforeSenderMessage 事件
BeforeSetMutilSelData事件
BeforeSetMutilSelData2事件
BeforeVerify 事件
BeforeWindowExit事件
BeforLoadBillFillData 事件
BeginEdit 事件
BusinessCheck 事件
BusinessCheckEx 事件
Change 事件
CommandClick事件
EntryFieldChanged事件
FinishMultiCheck 事件
FinishMultiCheckEx 事件
GetFocus 事件
HeadCtlClick 事件
LostFocus 事件
MenuBarClick 事件
MenuBarInitialize 事件
MultiCheck 事件
MultiCheckEx 事件
ReMultiCheck 事件
ReMultiCheckEx 事件
ReUnMultiCheck 事件
ReUnMultiCheckEx 事件
SaveBillFailed 事件
SaveBillSuccess事件
SSTabClick事件
StartMultiCheck 事件
StartMultiCheckEx 事件
UnBusinessCheck 事件
UnBusinessCheckEx 事件
UnMultiCheck 事件
UnMultiCheckEx 事件
Verify 事件
K3Lib对象参考
Account 属性
Net 属性
User 属性
BatchPushOldBills 函数
ByVal lDestClassTypeID As Long, _
KFO.Vector。BOS单据批量生成工业单据返回信息。每一项为Dctionary
Select Case BOSTool.ToolName
'可使用MS SQL SERVER 附带的事件跟踪器监视系统运行过程而得到
& " inner join t_RPContractScheme t2 " _
& " inner join t_rpContractEntry t3 on " _
For i = 1 To vctBillInfo.Size
If Not rs Is Nothing Then
Set vctBillInfo(i)("DataInfo") = rs
Set vctBillInfo(i)("DataInfo") = Nothing
End If
Set vctResult = m_BillInterface.K3Lib.BatchPushOldBills( _
For i = 1 To vctResult.Size
Else
End If
Debug.Assert False
'...其他按钮单击事件处理
Exit Sub
CreateK3Object 函数
With oBj
GoTo ExitSub
HandleError Err
GetData 函数
If rs.RecordCount > 0 Then
GoTo ExitSub
HandleError Err
GetK3Language 函数
Select Case m_BillInterface.K3Lib.GetK3Language
MsgBox "计算完成"
MsgBox "計算完成"
MsgBox "Calculate finished"
LoadKDString 函数
If rs.RecordCount > 0 Then
GoTo ExitSub
HandleError Err
UpdateData 方法
GetStockQty 函数
H_ERROR:
MsgBox "调用GetStockQty()出错: " & Err.Description
LookUpClass函数
Dim i As Long
Set dct = New KFO.Dictionary
If Not objReturn Is Nothing Then
Debug.Print "用户选择了 " & objReturn.Size & " 项"
MsgBox "用户取消了选择"
H_ERROR:
MsgBox “调用LookUpClass()出错: ” & Err.Description
LoadBill 方法
LoadList方法
Account对象参考
AccountID 属性
With m_BillInterface.K3Lib.Account
AccountName 属性
SetupType 属性
Net对象参考
BeginMutex 函数
CommitMutex 函数
QueryFunc 函数
QuerySubSys 函数
User对象参考
UserID 属性
UserName 属性
MenuBar对象参考
MenuBar 对象结构图
ActiveBand 属性
BOSBands 属性
BOSTools 属性
Refresh 方法
BOSBands对象参考
Count 属性
Item 属性
Add 函数
Remove 方法
RemoveAll 方法
BOSBand对象参考
BandName 属性
BandType 属性
BOSTools 属性
Caption 属性
CurrentTool 属性
DockingArea 属性
DockingOffset 属性
DockLine 属性
Flags 属性
Visible 属性
Wrappable 属性
Refresh 方法
End Sub
BOSTools对象参考
Count 属性
Item 属性
Add 函数
GetFreeToolID 函数
InsertAfter 方法
InsertBefore 方法
Remove 方法
End Sub
RemoveAll 方法
End Sub
BOSTool对象参考
Alignment 属性
BeginGroup属性
Caption 属性
CaptionPosition 属性
Enu_ToolCaptionPositions 常数
Checked 属性
Default 属性
Description 属性
Enabled 属性
ShortcutKey 属性
Style 属性
SubBand 属性
Tag 属性
ToolID 属性
ToolName 属性
ToolPicture 属性
TooltipText 属性
Visible 属性
PasteToolFace 方法
End Sub
SetPicture 方法
End Sub
BillHeads\BillHead\BillEntrys\BillEntry\BOSFields\BOSField对象参考
MenuBar 对象结构图
BillHeads对象参考
Count 属性
Item 属性
BillHead对象参考
BOSFields 属性
BillEntrys对象参考
Count 属性
Item 属性
BillEntry对象参考
BOSFields 属性
EntryHeight 属性
EntryIndex 属性
EntryLeft 属性
EntryTop 属性
EntryType 属性
EntryWidth 属性
KeyField 属性
Layer 属性
MaxRows 属性
TableName 属性
Visible 属性
AddRow 方法
RemoveRow 方法
BOSFields对象参考
Count 属性
Item 属性
BOSField对象参考
Caption 属性
FieldHeight 属性
FieldLeft 属性
FieldLock 属性
FieldName 属性
FieldTop 属性
FieldWidth 属性
Filter 属性
FKey 属性
FontBold 属性
FontItalic 属性
FontName 属性
FontSize 属性
FrameBorder 属性
FrameBorderColor 属性
LabelColor 属性
LabelWidth 属性
Layer 属性
MustInput 属性
NeedSave 属性
Note 属性
Number 属性
Page 属性
Row 属性
TableName 属性
Text 属性
TextColor 属性
Value 属性
Visible 属性
SetFieldSumValue方法
.Net
基础配置
开发环境
使用说明
引用
Kingdee.K3.BOS.BusinessObject.dll
插件跟踪
K3ClassEvents的对象模型
K3ClassEvents的对象
ListEvents对象参考
事件声明
AfterCopyBillCreateData 事件
OnBarInitialize 事件
AfterShowBill 事件
OnBarItemClick 事件
ShowBill函数
AspxGetSelectList 函数
AddBarItem函数
AddBarItemLink函数
SetBarItemProperty函数
AddBarItemLink函数
RemoveBarItem函数
RemoveBarItemLink函数
BillName 属性
ClassType 属性
ClassTypeEntry 属性
ClassTypeKey 属性
PrimaryKey 属性
EntryPrimaryKey 属性
TableInfo 属性
TableName 属性
BillEvent对象参考
事件声明
OnBarInitialize 事件
OnBarItemClick 事件
AfterNewBill 事件
BeforLoadBillFillData 事件
AfterLoadBill 事件
AfterShowBill 事件
AfterConfirm 事件
AfterF7Select 事件
Change 事件
BeforeSave 事件
AfterSave 事件
AddBarItem函数
AddBarItemLink函数
GetBarItemProperty函数
SetBarItemProperty函数
AddBarItemLink函数
RemoveBarItem函数
RemoveBarItemLink函数
Alter函数
Confirm函数
GetFieldValue函数
GetRequest函数
LockCell函数
LockWebTabItem函数
SaveBill函数
SetFieldValue函数
ShowBill函数
ShowF7Select函数
BillName 属性
ClassType 属性
ClassTypeEntry 属性
ClassTypeKey 属性
PrimaryKey 属性
EntryPrimaryKey 属性
TableInfo 属性
TableName 属性
CurBillID 属性
BillHeads对象参考
Count 属性
Item 属性
BillHead对象参考
BOSFields 属性
BillEntrys对象参考
Count 属性
Item 属性
BillEntry对象参考
BOSFields 属性
EntryHeight 属性
EntryIndex 属性
EntryLeft 属性
EntryTop 属性
EntryType 属性
EntryWidth 属性
KeyField 属性
Layer 属性
TableName 属性
Visible 属性
BOSFields对象参考
Count 属性
Item 属性
BOSField对象参考
Caption 属性
FieldHeight 属性
FieldLeft 属性
FieldLock 属性
FieldName 属性
FieldTop 属性
FieldWidth 属性
Filter 属性
FKey 属性
FontBold 属性
FontItalic 属性
FontName 属性
FontSize 属性
FrameBorder 属性
FrameBorderColor 属性
LabelColor 属性
LabelWidth 属性
Layer 属性
MustInput 属性
NeedSave 属性
Note 属性
Number 属性
Page 属性
Row 属性
TableName 属性
Text 属性
TextColor 属性
Value 属性
Visible 属性
用户场景
需求
总体需求
需求分解
详细需求
单据信息
单据流程
多级审核
凭证功能
设计和实现
单据数据结构设计
单据头
单据体
字段的过滤条件
BOS IDE中设置过滤条件
通过SQL更新字段的过滤条件
Action设置
自动生成Action
手动添加Action
单据流程
【销售订单】下推生成【产品入库通知单】
练习一下
【应收合同】下推生成【产品入库通知单】
【产品入库通知单】下推生成【产品入库单】
多级审核
多级审核设置
凭证功能
设置凭证数据来源
操作管理
插件开发
部署
发布到主控台
制作部署文件