金蝶k3培训-bos插件开发手册

概 K3ClassEvents的对象模 使用说 K3ClassEvents的对 ListEvents对象参 DataSrv属 EnableListFillRowEvents属 K3Lib属 List属 ListEntrySort属 ListFilterString属 ListHeadSort属 Bar属 MultiCheckMgr属 RsId属 ShowMode属 ShowMsg属 DeleteBill函 GetDataFldByKey函 GetDataFld函 GetCurrentSelRowInfo函 GetSelectedBillInfo函 LoadSelectedBill函 RefreshList函 SenderMessage函 UpdateNormalFld函 UpdateNormalFldByKey函 ultiCheck事 AfterBusinessCheck事 AfterBusinessCheckEx事 AfterCopyBillCreateData事 AfterDeleteBill事 AfterMergeCopyBill事 AfterMultiCheck事 AfterMultiCheckEx事 AfterSelList事 AfterUnBusinessCheck事 AfterUnBusinessCheckEx事 AfterUnMultiCheck事 AfterUnMultiCheckEx事 BeforeMultiCheck事 BeforeMultiCheckEx事 BeforePrintBill事 BeforeSenderMessage事 BusinessCheck事 BusinessCheckEx事 FinishMultiCheck事 FinishMultiCheckEx事 ListFillRow事 ListRowSelected事 BarClick事 BarInitialize事 MultiCheck事 MultiCheckEx事 PrintSuccessful事 StartMultiCheck事 StartMultiCheckEx事 UnBusinessCheck事 UnBusinessCheckEx事 UnMultiCheck事 UnMultiCheckEx事 ReMultiCheck事 ReMultiCheckEx事 ReUnMultiCheck事 ReUnMultiCheckEx事 BaseClassEvent对象参 BrowseCtl属 DataSrv属 EnableListFillRowEvents属 InsertNewRowAndFillOption属 K3Lib属 ListActiveBar属 ListEntrySort属 ListFilterString属 ListHeadSort属 Bar属 RsClassGroup属 RsId属 GetActiveCtl函 函 GetSelectedItemID函 GetSelectedItems函 IsSearchState函 PitchItemByID函 SelectClassGroupByID函 SenderMessage函 SetStatus函 RefreshClassGroups方 AfterGetData事 BeforePrintBill事 BeforeSenderMessage事 ClassGroupSelected事 DeleteBillSucessful事 ListFillRow事 ListRowSelected事 BarClick事 BarInitialize事 RefreshList事 BillEvent对象参 BillCtl属 BillEntrys属 BillHeads属 BillHeight属 BillName属 BillStatus属 BillWidth属 CancelPrintControl属 ClassType属 Data属 DataSrv属 EntryPrimaryKey属 FID属 InsertNewRowAndFillOption属 IsDoAction属 IsDoActionData属 K3Lib属 LayerCount属 LayerNames属 Bar属 MultiCheckMgr属 ObjectID属 ObjectType属 OriginalFieldValue属 PrimaryKey属 ReSaveSuccess属 rsBillID属 ShowType属 TableInfo属 TableName属 TaskID属 ShowMsg属 BatchToDoActions函 DeleteEntryData函 GetActiveCtl函 GetActiveField函 monControl函 GetDataFld函 GetDataFldbyKey函 GetFieldInfoByKey函 GetDynamicCtlByKey函 GetFieldValue函 GetToolIndex函 GetVariable函 InsertNewRowAndFill函 IsChange函 IsFileNeedFilter函 LockBill函 RefreshBill函 SenderMessage函 SetDecimal函 SetFieldSumValue函 SetFieldValue函 SetSumDecimal函 SetText函 ShowHideField函 ShowHideGrid函 Sum函 UpdaookFld函 UpdateNormalFld函 DoAction方 IsDoActionByKey方 LockCell方 RemoveRow方 SaveBill方 SetActiveTab方 SetBillFormCaption方 SetCaption方 SetGridMaxRows方 SetStatus方 SetActiveCell方 SetRowsPerRequest方 SetStateStampPicture方 SetVariable函 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事 BarClick事 BarInitialize事 MultiCheck事 MultiCheckEx事 ReMultiCheck事 ReMultiCheckEx事 ReUnMultiCheck事 ReUnMultiCheckEx事 SaveBillFailed事 SaveBillSuccess事 SSTabClick事 StartMultiCheck事 StartMultiCheckEx事 UnBusinessCheck事 UnBusinessCheckEx事 UnMultiCheck事 UnMultiCheckEx事 Verify事 K3Lib对象参 Account属 Net属 User属 BatchPushOldBills函 CreateK3Object函 GetData函 GetK3Language函 LoadKDString函 UpdateData方 GetStockQty函 LookUpClass函 LoadBill方 LoadList方 AccountID属 AccountName属 SetupType属 Net对象参 BeginMutex函 CommitMutex函 QueryFunc函 QuerySubSys函 User对象参 UserID属 UserName属 Bar对象结构 ActiveBand属 BOSBands属 BOSTools属 Refresh方 BOSBands对象参 Count属 Item属 Add函 Remove方 RemoveAll方 BOSBand对象参 BandName属 BandType属 BOSTools属 Caption属 CurrentTool属 DockingArea属 DockingOffset属 DockLine属 Flags属 Visible属 Wrappable属 Refresh方 BOSTools对象参 Count属 Item属 Add函 InsertAfter方 InsertBefore方 Remove方 RemoveAll方 BOSTool对象参 Alignment属 BeginGroup属 Caption属 CaptionPosition属 Checked属 Default属 Description属 Enabled属 ShortcutKey属 Style属 SubBand属 Tag属 ToolID属 ToolName属 ToolPicture属 Visible属 SetPicture方 Bar对象结构 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方 基础配 开发环 使用说 插件K3ClassEvents的对象模 K3ClassEvents的对 ListEvents对象参 事件AfterCopyBillCreateData事 OnBarInitialize事 AfterShowBill事 OnBarItemClick事 AspxGetSelectList函 BillName属 ClassType属 PrimaryKey属 EntryPrimaryKey属 TableInfo属 TableName属 BillEvent对象参 事件OnBarInitialize事 OnBarItemClick事 AfterNewBill事 BeforLoadBillFillData事 AfterLoadBill事 AfterShowBill事 AfterConfirm事 AfterF7Select事 Change事 BeforeSave事 AfterSave事 Alter函 Confirm函 BillName属 ClassType属 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属 用户场 需 总体需 需求分 详细需 单据信 单据流 多级审 凭证功 设计 BOSIDE中设置过滤条 通过SQL更新字段的过滤条 Action设 自动生成 手动添加 单据流 练 多级审 凭证功 操作管 插件开 部 K/3BOS提供了基COM和.Net两套插件模型K/3BOSListEvents、BaseClassEvent、BillEvent三个重要的客户端接口对象及其他的辅助 的对象模型KingdeeFoundationObjects1.0对本文中所有涉及到的KFO对象，如KFO.Dictionary、KFO.Vector，他们的结构、使用方法、关于ActiveXDataObjectsLibrary对本文中所有涉及到的ADODB对象，如ADODB.Recordset版本必需不低于2.6；他们的结构、使用方法、描述等详细内容，请参考http://m /相关内容。K3ClassEventsK3ClassEvents上面的对象结构图囊括了K3ClassEvents组件中所使用到的所有对象。需要注意的是：K3Lib（Net、User、BOSTool（以及它的集合对象BOSTools）BillHead（以及它的集合对象BillHeads）BillEntry（以及它的集合对象BillEntrys）BOSField（以及它的集合对象BOSFields）属于辅助对象，不能使用New关键字创建。ListEvents对象参考ListEvents对象属于金K/3BOS的客户端接口对象，用来获K/3BOS的客户端的序时簿对ListEvents对象11个属性、8个函数和23个事件DataSrvDataSrvListEvents对象的一个实例Filter等KFO.Dictionary对象和ClassTypeID、SQLSelect、SQLFrom、SQLSelectDetail等值。获取当前单据的DataSrv.SQLSelectDetailDataSrv.SQLSelectDetail&"Where"&PrivatePrivateFunctionGetFieldInfo(ByValsFieldAsString)AsDimdctTableInfoAsKFO.DictionaryDimsKeyAsStringSetSetdctTableInfo=m_ListInterface.DataSrv.TableInfoIfdctTableInfo("Map").Lookup(sField)ThensKey=dctTableInfo("Map")(sField)SetGetFieldInfo=dctTableInfo(sKey)SetGetFieldInfo=NothingEndIfEndEnableListFillRowEventsEnableListFillRowEvents是允许否触发插件的序时簿FillRow事件。Object.ListEvents对象的一个实例是允许否触发插件的序时FillRow事件。默False，即不触发。只有当此值True且发生序时簿行填充时，才会触发插件的序时簿FillRow事件。PublicPublicSubShow(ByValoListInterfaceAs'ListEvents接口'注意此方法必须存在Setm_ListInterface='EnableListFillRowEvents属性，允许激发ListFillRow事m_ListInterface.EnableListFillRowEvents=EndHeadDictAsKFO.IDictionary,CellDataAsString,BackColorAsLong,ContinueRaiseAsIfIfHeadDict("FKey")="FText"ThenSelectCaseCellDataCaseCellData星期一"BackColorCaseCellData星期二"BackColorCaseCellData星期三"BackColorCaseCellData星期四"BackColorCaseCellData星期五"BackColorCaseCellData星期六"BackColorCaseCellData星期日"BackColorCaseBackColor=vbWhiteEndSelectEndIfContinueRaise=TrueEndK3LibK3LibK3Lib对象ListEvents对象的一个实例只读属性。返回K3Lib对象，主要用来金蝶K/3的一些属性，及执行金蝶K/3的一些标准操作。详细请参考“K3Lib对象参考”。ListListListEvents对象的一个实例CallCallListEntrySortListEvents对象的一个实例ListFilterStringListFilterStringObject.ListEvents对象的一个实例ListHeadSortListHeadSortListEvents对象的一个实例BarBarObject.ListEvents对象的一个实例 MultiCheckMgrMultiCheckMgrObject.ListEvents对象的一个实例RsIdRsIdListEvents对象的一个实例FID表示序时簿当前行的所属单据的内码,取值语法是：rsID("FID");FEntryID表示序时簿当前行的分录ID：rsID("FEntryID");注意：如果要使用这个属性，插件工程还必须ActiveXDataObjectsLibrary。ShowModeShowModeObject.ListEvents对象的一个实例 =0:一般查询MDI窗口 =1:一般查询模态窗口 =2:选单 =3:联查Enu_ListShowMode_ConnectViewExt=4:自定义联查ShowMsgShowMsgObject.ListEvents对象的一个实例DeleteBillDeleteBillObject.DeleteBill(ByVallClassTypeIDAsLong,ByValnInterIDAsLong,OptionalbSuccessAsBoolean=True)AsListEvents对象的一个实例sString对操作结果的描述：删除操作成功或失败用户定义单据并保存后，会在数据库中创建对应的表。如单据为 函数参lClassTypeID对应的字段为FClassTypeId列；nInterID对应的字段为：用户在定义单据时所指定的“主键字段”（默认为“FID。当前序时簿的单据类型ID与内码可以通过m_ListInterface.RsId("FClassTypeID"),m_ListInterface.RsId("FID")取得。 DimDimbSuccessAsDimsResultAssResult=m_ListInterface.DeleteBill(IfbSuccessThen““EndDebug.Print,0018,GetDataFldByKeyObject.GetDataFldByKey(sFKeyAsString,[RowAsListEvents对象的一个实例String类型。字段模板的关键字（FKey）DimdctFieldAsKFO.DictionaryDimdctDataDimdctFieldAsKFO.DictionaryDimdctDataAsKFO.DictionaryDimdctBillIDAsKFO.DictionarySetdctBillID=SetdctData=m_ListInterface.DataSrv.LoadBill(dctBillID.Name(1))Setm_ListInterface.Data=dctDataSetdctField=IfNotdctFieldIsNothingDebug.Print单据编号&dctField("FFLD")EndIfSetdctField=NothingSetdctData=NothingSetdctBillID=NothingGetDataFldObject.GetDataFld(dctAsDictionary,[RowAsListEvents对象的一个实例DimdctAsKFO.DictionaryDimdctDataAsKFO.DictionaryDimdctBillIDAsKFO.DictionaryDimdctDataInfoAsKFO.DictionarySetdctBillID=SetdctData=Setm_ListInterface.Data=SetdctDataInfo=Setdct=m_ListInterface.GetDataFld(dctDataInfo)IfNotdctIsNothingThenDebug.Print单据编号&dct("FFLD")EndIfSetdct=SetdctData=NothingSetdctBillID=NothingSetdctDataInfo=NothingGetCurrentSelRowInfoGetCurrentSelRowInfoListEvents对象的一个实例当前行所属单据的内码；FEntryID表示单据分录ID。DimDimdctSelectedRowAsSetdctSelectedRow=m_ListInterface.GetCurrentSelRowInfoDebug.Print"单据内码: "&dctSelectedRow("FID"),_ "&dctSelectedRow("FClassTypeID"),_"单据分录ID:"&dctSelectedRow("FEntryID")SetdctSelectedRow=GetSelectedBillInfoListEvents对象的一个实例此函数返回一个KFO.Vector数据包，Vector的Size和选中的行数一致。每行包含一个KFO.Dictionary数据包，此数据含FClassTypeID,FID,FEntryID。FClassTypeID表示单据类型；FID表示当前行所属单据的内码；FEntryID表示单据分录ID。DimDimiAsDimvctRowsAsKFO.VectorDimdctRowAsKFO.DictionarySetSetvctRows=m_ListInterface.GetSelectedBillInfoIfNotvctRowsIsNothingThenFori=1TovctRows.SizeSetdctRow=vctRows(i)Debug.Print"单据内码 "&dctRow("FID");"单据类型: "&dctRow("FClassTypeID");_"单据分录ID:"&dctRow("FEntryID")EndIfSetdctRow=NothingSetvctRows=LoadSelectedBillLoadSelectedBillObject.LoadSelectedBill(BillStatusAsEnuListEvents对象的一个实例 Enu_BillStatusExt常值012Object.RefreshList(OptionalByValbRefreshToolBarAsBoolean=True,OptionalByValbMarkSelRowAsBoolean=True)ListEvents对象的一个实例r指示是否刷新。如为True，则刷新；为False，则不刷指示在刷新后是否选定用户在刷新前选定的行。如为False，则刷新后选定m_ListInterface.RefreshListm_ListInterface.RefreshListTrue,SenderMessageObject.SenderMessage(sTitleAsString,sMessageAsString,arrUsers,[lSenderTypeAsListEvents对象的一个实例String类型，消息的标题String类型，消息的内容Variant类型，消息标必须从0开始。发送K/3主控台消息给系统管理员DimblnAsDimblnAsblnm_ListInterface.SenderMessage("审核单据请审核[111111]单据UpdateNormalFldUpdateNormalFldObject.UpdateNormalFld(dctAsDictionary,sValueAsString,[RowAsLong],[bSetModifyFlagAsBoolean])ListEvents对象的一个实例String类型。需要更新的值Boolean类型。可选参数。目前保留现参见m_ListInterface.UpdateNormalFldGetFieldInfo("FBillNo"),UpdateNormalFldByKeyUpdateNormalFldByKeyObject.UpdateNormalFldByKey(sKeyAsString,sValueAsString,[RowAsLong],[bSetModifyFlagAsBoolean])ListEvents对象的一个实例String类型。字段模板的关键名称（FKey）String类型。需要更新的值 m_ListInterface.UpdateNormalFldByKeym_ListInterface.UpdateNormalFldByKey"FBillNo", ListEvents对象的一个实例 ultiCheckPrivateSubObject_AfterBatultiCheck(ByVallCheckDirectionAsLong,ByValdctCheckResultAsKFO.Dictionary)ListEvents对象的一个实例Long1=2=反审 AfterBusinessCheckAfterBusinessCheckPrivateSubObject_AfterBusinessCheck(ByValSuccessAsListEvents对象的一个实例AfterBusinessCheckExAfterBusinessCheckExPrivateSubObject_AfterBusinessCheckEx(ByVallBillIDAsLong,ByValSuccessAsListEvents对象的一个实例其他参数及其含义跟AfterBusinessCheck完全相同。此事件总是在 AfterCopyBillCreateDataAfterCopyBillCreateDataListEvents对象的一个实例KFO.Dictionary对象，新单据的AfterDeleteBillAfterDeleteBillPrivateSubObject_AfterDeleteBill(ByValbSuccessAsBoolean,ByVallBillInterIDAsLong,ByValsBillNoAsString,ByValsErrorMessageAsString,bCancelErrorMessageAsListEvents对象的一个实例String类型。删除的单据的 AfterMergeCopyBillAfterMergeCopyBillListEvents对象的一个实例KFO.Dictionary对象，新单据的AfterMultiCheckAfterMultiCheckPrivateSubObject_AfterMultiCheck(ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByVallCheckLevelAsLong,ByVallCheckStatusAsLong,ByValSuccessAsBoolean)ListEvents对象的一个实例此事件在每步审核后都能触发，和 AfterMultiCheckExAfterMultiCheckExPrivateSubObject_AfterMultiCheckEx(ByVallBillIDAsLong,ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByVallCheckLevelAsLong,ByVallCheckStatusAsLong,ByValSuccessAsBoolean)ListEvents对象的一个实例此事件总是在 AfterSelListAfterSelListPrivateSubObject_AfterSelList(ByValRsIdAsADODB.Recordset,VectListAsListEvents对象的一个实例KFO.Vector对象。选定的源单单据集合可以通过修VectList注意：如果要使用RsId参数，插件工程还必须ActiveXDataObjectsLibraryAfterUnBusinessCheckAfterUnBusinessCheckPrivateSubObject_AfterUnBusinessCheck(ByValSuccessAsListEvents对象的一个实例AfterUnBusinessCheckExAfterUnBusinessCheckExPrivateSubObject_AfterUnBusinessCheckEx(ByVallBillIDAsLong,ByValSuccessAsListEvents对象的一个实例此事件总是在 AfterUnMultiCheckAfterUnMultiCheckPrivateSubObject_AfterUnMultiCheck(ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByVallCheckLevelAsLong,ByVallCheckStatusAsLong,ByValSuccessAsBoolean)ListEvents对象的一个实例lCheckMode参数的值12AfterUnMultiCheckExAfterUnMultiCheckExPrivateSubObject_AfterUnMultiCheckEx(ByVallBillIDAsLong,ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByVallCheckLevelAsLong,ByVallCheckStatusAsLong,ByValSuccessAsBoolean)ListEvents对象的一个实例其他参数及其含义跟AfterUnMultiCheck完全相同。此事件总是在 BeforeMultiCheckBeforeMultiCheckAsLong,ByVallBusinessLevelAsLong,lCheckLevelAsLong,ByVallCheckStatusAsLong,ByVallLastCheckFromAsLong,ByVallLastCheckToAsLong,CancelAsBoolean)ListEvents对象的一个实例Long类型。上一步完成的审核的开始级次Boolean类型。是更改Cancel参数的值True可以取消后续的审核操作lCheckMode参数的值12BeforeMultiCheckExBeforeMultiCheckExPrivateSubObject_BeforeMultiCheckEx(ByVallBillIDAsLong,ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByReflCheckLevelAsLong,ByVallCheckStatusAsLong,ByVallLastCheckFromAsLong,ByVallLastCheckToAsLong,ByRefCancelAsBoolean)ListEvents对象的一个实例其他参数及其含义跟BeforeMultiCheck完全相同。BeforePrintBillBeforePrintBillPrivateSubObject_BeforePrintBill(ByVallClassTypeIDAsLong,ByValvctInterIDAsByRefbCancelAsListEvents对象的一个实例DBoolean类型。当前动作是否预String类型。PDF文件存放路String类型。PDF文件Boolean类型。是否取消后续的打印/预览操更改Cancel参数的值True可以取消打印预览操作BeforeSenderMessageBeforeSenderMessagePrivateSubObject_BeforeSenderMessage(ByValActionCodeAsString,dctMessageAsKFO.Dictionary,CancelAsBoolean)ListEvents对象的一个实例String类型。触发消息发送的动作名称Boolean类型。是否取消消息发送dctMessage参数的值，可以修改发送的消息数据。更改Cancel参数的值为True可以取消消息发送。BeforRefreshToolBarBeforRefreshToolBars对象的一个实例n类型。是否显更改bShowCaption参数的值可以控制是否显示中的标题。True为显示；False为不显示BusinessCheckBusinessCheckPrivateSubObject_BusinessCheck(CancelAsListEvents对象的一个实例Boolean类型。是否取消后续审核更改Cancel参数的值True可以取消后续的审核操作BusinessCheckExBusinessCheckExPrivateSubObject_BusinessCheckEx(ByVallBillIDAsLong,CancelAsListEvents对象的一个实例其他参数及其含义跟BusinessCheck完全相同。此事件总是在BusinessCheck事件之后触发。BusinessCheck事件中设置CancelFinishMultiCheckFinishMultiCheckPrivateSubObject_FinishMultiCheck(ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByVallCheckStatusAsLong,bSenderMessageAsListEvents对象的一个实例eBoolean类型。是否发送审核完成bSenderMessage参数值默认为True。更改参数的值False可以取消后续发送审核完成消息lCheckMode参数的值12FinishMultiCheckExFinishMultiCheckExByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByVallCheckStatusAsLong,ByRefbSendMessageAsBoolean)ListEvents对象的一个实例其他参数及其含义跟FinishMultiCheck完全相同。ListFillRowListFillRowPrivateSubObject_ListFillRow(ByVallRowAsLong,ByValRowDataAsObject,ByValHeadDictAsKFO.Dictionary,CellDataAsString,BackColorAsLong,ContinueRaiseAsListEvents对象的一个实例KFO.Dictionary对象。当前单元格（字段）的信息String类型。当前单元格数据否发生此事件是否发生，取决 CellData参数的值，可以改变单元格的实际填充

属性的设置。详细BackColor参数的值，可以改变行的背景色。可RGB函数得到色值生ListFillRow事件。注意：如果要使用RowData参数，插件工程还必须 ActiveXDataObjectsPublicPublicSubShow(ByValoListInterfaceAs'ListEvents接口'注意此方法必须存在Setm_ListInterface='EnableListFillRowEvents属性，允许激发ListFillRow事m_ListInterface.EnableListFillRowEventsm_ListInterface.EnableListFillRowEvents=TrueEndSubHeadDictAsKFO.IDictionary,CellDataAsString,BackColorAsLong,ContinueRaiseAsIfHeadDict("FKey")="FText"ThenSelectCaseCellDataCaseCellData星期一"BackColorCaseCellData星期二"BackColorCaseCellData星期三"BackColorCaseCellData星期四"BackColorCaseCellData星期五"BackColorCaseCellData星期六"BackColorCaseCellData星期日"BackColorCaseBackColor=vbWhiteEndSelectEndIfContinueRaise=TrueEndListRowSelectedListRowSelectedListEvents对象的一个实例BarClickBarClickPrivateSubObject_BarClick(ByValBOSToolAsK3ClassEvents.BOSTool,CancelAsListEvents对象的一个实例Boolean类型。是否取消后续事件处理操作Cancel参数值默认False。更改参数的值为True可以取消后续事件处理BarInitializeBarInitializeListEvents对象的一个实例o可以通过操作oBar参数来修改、新增菜单、项MultiCheckMultiCheckPrivateSubObject_MultiCheck(ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByVallCheckLevelAsLong,ByVallCheckStatusAsLong,bSenderCheckMessageAsBoolean,bSenderAcceptMessageAsBoolean,sMessageTitleAsString,sMessageAsString,CancelAsBoolean)ListEventsLong类型。业务审核级次Long类型。待审核的级次Boolean类型。是否发送审核消息Boolean类型。是否发送接收上级的审核StringStringBoolean类型。是否取消后续操作。默认为FalsebSenderCheckMessage参数值为True，则会发送审核消息；更改为False，则不会发送审bSenderAcceptMessageTrue，则会接收上级的审核消息；更改为False，则不会sMessageTitle参数值可以改变审核消息的标题。更改sMessage参数值可以改变审核消息的内容。Cancel参数True可以取消后续操作值12MultiCheckExMultiCheckExPrivateSubObject_MultiCheckEx(ByVallBillIDAsLong,ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByVallCheckLevelAsLong,ByVallCheckStatusAsLong,ByRefbSendCheckMessageAsBoolean,ByRefbSendAcceptMessageAsBoolean,ByRefsMessageTitleAsString,ByRefsMessageAsString,ByRefCancelAsBoolean)ListEvents对象的一个实例其他参数及其含义跟MultiCheck完全相同。此事件总是在MultiCheck事件之后触发。即使在MultiCheck事件中设置CancelTrue，此事PrintSuccessfulPrintSuccessfulPrivateSubObject_PrintSuccessful(ByValdctParametersAsListEvents对象的一个实例 StartMultiCheckStartMultiCheckPrivateSubObject_StartMultiCheck(ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,bSenderMessageAsBoolean,CancelAsBoolean)ListEvents对象的一个实例Boolean类型。是否发送启动审核消息eBoolean类型。是否取消后续操作。默认为FalsebSenderMessageTrue，则会发送启动审核消息；更改为False，则不会发送启动Cancel参数True可以取消后续操作值12StartMultiCheckExStartMultiCheckExByVallCheckMaxLevelAsLong,ByRefbSendMessageAsBoolean,ByRefCancelAsListEvents此事件总是在StartMultiCheck事件之后触发。即使StartMultiCheck事件中设置了CancelUnBusinessCheckUnBusinessCheckPrivateSubObject_UnBusinessCheck(CancelAsListEventsBoolean类型。是否取消后续操作。默认为False更改Cancel参数的值True可以取消后续的审核操作UnBusinessCheckExUnBusinessCheckExPrivateSubObject_UnBusinessCheckEx(ByVallBillIDAsLong,CancelAsListEvents对象的一个实例Boolean类型。是否取消后续操作。默认为FalseUnMultiCheckUnMultiCheckPrivateSubObject_UnMultiCheck(ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByVallCheckStatusAsLong,ByVallLastCheckFromAsLong,ByVallLastCheckToAsLong,bSenderMessageAsBoolean,CancelAsBoolean)ListEvents对象的一个实例Long类型。上一步完成的审核的开始级次eBoolean类型。是否发送驳回审核消息Boolean类型。是否取消后续操作。默认为False更改bSenderMessage参数值为True，则会发送驳回审核消息；更改为False，则不会发送驳回Cancel参数True可以取消后续操作值12UnMultiCheckExUnMultiCheckExPrivateSubObject_UnMultiCheckEx(ByVallBillIDAsLong,ByVallCheckModeAsLong,ByVallCheckMaxLevelAsLong,ByVallBusinessLevelAsLong,ByVallCheckStatusAsLong,ByVallLastCheckFromAsLong,ByVallLastCheckToAsLong,bSenderMessageAsBoolean,CancelAsBoolean)ListEvents此事UnMultiCheck事件之使在UnMultiCheck事件中设置了CancelTrue，ReMultiCheckReMultiCheckObject,bReCheckAsBoolean)ListEventsKFO.Dictionary对象。错误对象tObject对象。审核附加包，实际为KFO.DictionaryBoolean类型。是否重新审核。默认为FalsebReCheckTrue，则会触发重新审核False，则不会触发重新ReMultiCheckExReMultiCheckExPrivateSubObject_ReMultiCheckEx(ByVallBillIDAsLong,ByValdctErrorAsKFO.Dictionary,FCheckRecordExtAsObject,bReCheckAsBoolean)ListEvents此事件总是在ReMultiCheckReUnMultiCheckReUnMultiCheckPrivateSubObject_ReUnMultiCheck(ByValdctErrorAsKFO.Dictionary,FCheckRecordExtAsObject,bReCheckAsBoolean)ListEventsKFO.Dictionary对象。错误对象tObject对象。审核附加包，实际为KFO.DictionaryBoolean类型。是否重新审核。默认为FalseReUnMultiCheckExReUnMultiCheckExPrivateSubObject_ReUnMultiCheckEx(ByVallBillIDAsLong,ByValdctErrorAsKFO.Dictionary,FCheckRecordExtAsObject,bReCheckAsBoolean)ListEvents对象的一个实例其他参数及其含义跟ReUnMultiCheck完全相同。此事件总是在 对象参考BaseClassEvent对象属于金K/3BOS的客户端接口对象，用来获得金K/3BOS的客户端的基础BaseClassEvent对象11个属性、8个函数、4个方法和7个事件BrowseCtlBrowseCtlObject.BaseClassEvent对象的一个实例DataSrvDataSrvObject.BaseClassEvent对象的一个实例客户端基础资料序时簿服务对象，包括了单据的模板信息TableInfo数据字典等EnableListFillRowEventsEnableListFillRowEvents获取或设置是否允许触发插件的序时簿FillRow事件Object.BaseClassEvent对象的一个实例默认为False，即不触发。只有当此值为True且发生序时触发插件的序时簿PublicPublicSubShow(ByValoListInterfaceAs'ListEvents接口'注意此方法必须存在Setm_BaseListInterface='EnableListFillRowEvents属性，允许激发ListFillRow事m_BaseListInterface.EnableListFillRowEvents=EndPrivateSubm_BaseListInterface_ListFillRow(ByVallRowAsLong,ByValRowDataAsByValHeadDictAsKFO.IDictionary,CellDataAsString,BackColorAsLong,ContinueRaiseAsIfHeadDict("FKey")="FText"SelectCaseCellDataCase“1”:CellData星期一BackColor=vbWhiteCase“2”:CellData星期二BackColor=vbWhiteCase“3”:CellData星期三BackColor=vbWhiteCase“4”:CellData星期四BackColor=vbWhiteCase“5”:CellData星期五BackColor=CaseCaseCellData星期六"BackColorCaseCellData星期日"BackColorCaseBackColor=vbWhiteEndSelectEndIfContinueRaise=TrueEndInsertNewRowAndFillOptionInsertNewRowAndFillOptionObject.InsertNewRowAndFillOption[=ByValdctOptionAsKFO.DictionaryBaseClassEvent对象的一个实例KFO.Dictionary或返回的KFO.Dictionary的成员及其含义如下：如设为True，则允许执行ACTION；否则执行如设为True，则设置单元格字 K3LibK3LibObject.BaseClassEvent对象的一个实例请参考“K3Lib对象参考”。ListActiveBarListActiveBarObject.BaseClassEvent对象的一个实例ListEntrySortListEntrySortBaseClassEvent对象的一个实例ListFilterStringListFilterStringBaseClassEvent对象的一个实例ListHeadSortListHeadSortBaseClassEvent对象的一个实例BarBarObject.BaseClassEvent对象的一个实例 Bar对象参RsClassGroupRsClassGroupObject.BaseClassEvent对象的一个实例注意：如果要使用这个属性，插件工程还必须ActiveXDataObjectsLibrary。RsIdRsId获取基础资料明细ID数据集合。Object.BaseClassEvent对象的一个实例注意：如果要使用这个属性，插件工程还必须ActiveXDataObjectsLibrary。GetActiveCtlGetActiveCtlBaseClassEvent对象的一个实例DimDim AsSelectCasesCtlNameCase"TREEVIEW":MsgBox"光标选中了分组树"Case"LEDGER50":MsgBox"光标选中了明细表" MsgBox"我也不知道是什么"EndSelect BaseClassEvent对象的一个实例增加一个操作mnuTest，在操作被点击时获取序时簿界面当前选中的分 PrivateSubm_BaseListInterface_ BarClick(ByValPrivateSubm_BaseListInterface_ BarClick(ByValBOSToolAsK3ClassEvents.BOSTool,CancelAsBoolean)SelectCaseBOSTool.ToolNameCase"mnuTest"MsgBox"当前选择的分组ID为："&CStr(m_BaseListInterface.GetSelectedCla)CaseElseEndEndEndGetSelectedClassTypeGetSelectedClassTypeBaseClassEvent对象的一个实例值12增加一个操作mnuTest，在操作被点击时获取序时簿界面当前选PrivateSubm_BaseListInterface_ BarClick(ByValPrivateSubm_BaseListInterface_ BarClick(ByValBOSToolAsK3ClassEvents.BOSTool,CancelAsBoolean)SelectCaseBOSTool.ToolNameCase"mnuTest"1,基础资料顶级分组基础资料子分组")CaseElseEndEndGetSelectedItemIDBaseClassEvent对象的一个实例增加一个操作mnuTest，在操作被点击时获取序时簿界面当前选中的明 PrivateSubm_BaseListInterface_ BarClick(ByValPrivateSubm_BaseListInterface_ BarClick(ByValBOSToolAsK3ClassEvents.BOSTool,CancelAsBoolean)SelectCaseBOSTool.ToolNameCase"mnuTest"MsgBox当前选ID为：&CStr(m_BaseListInterface.GetSelectedItemID)CaseElseEndEndGetSelectedItemsObject.GetSelectItems()AsBaseClassEvent对象的一个实例返回值类 PrivateSubm_BaseInterface_ PrivateSubm_BaseInterface_ OnErrorResumeNextDimi AsLongDim AsSetdict=m_BaseInterface.GetSelectItems()IfNotdictIsNothingThenFori=1ToDebug.PrintDebug.Print在这里查看EndIfEndSubIsSearchStateIsSearchStateObject.IsSearchStateBaseClassEvent对象的一个实例DimDim AsSelectCasesCtlNameCaseCase"LEDGER50":Ifm_BaseListInterface.IsSearchStateThenMsgBox"光标选中了查询状态的明细表"EndIfEndSelectPitchItemByIDPitchItemByIDBaseClassEvent对象的一个实例成功选择返True；否则返False。PrivateSubm_BaseListInterface_ BarClick(ByValPrivateSubm_BaseListInterface_ BarClick(ByValBOSToolAsK3ClassEvents.BOSTool,CancelAsBoolean)SelectCaseBOSTool.ToolNameCase"mnuTest"CaseElseEndEndSelectClassGroupByIDBaseClassEvent对象的一个实例增加一个操作mnuTest，在操作被点击时定位显m_lGroupID所对应的分组，让用户在界面上看到这PrivateSubm_BaseListInterface_ BarClick(ByValPrivateSubm_BaseListInterface_ BarClick(ByValBOSToolAsK3ClassEvents.BOSTool,CancelAsBoolean)SelectCaseBOSTool.ToolNameCase"mnuTest"CaseElseEndEndSenderMessageObject.SenderMessage(sTitleAsString,sMessageAsString,arrUsers,[lSenderTypeAsBaseClassEvent对象的一个实例String类型。消息的标题String类型。消息的内容Variant类型。消息标必须从0开始。发送K/3主控台消息给系统管理员DimblnAsDimblnAsblnm_BaseListInterface.SenderMessage("审核单据请审核[111111]单据SetStatusSetStatusObject.SetStatus(OptionalByValsStatusAsString=BaseClassEvent对象的一个实例String类型。要设置的信息发送K/3主控台消息给系统管理员DimblnAsDimblnAsblnm_BaseListInterface.SenderMessage("审核单据请审核[111111]单据RefreshClassGroupsRefreshClassGroupsBaseClassEvent对象的一个实例增加一个操作mnuTest，在操作被点击时刷PrivateSubm_BaseListInterface_ BarClick(ByValPrivateSubm_BaseListInterface_ BarClick(ByValBOSToolAsK3ClassEvents.BOSTool,CancelAsBoolean)SelectCaseBOSToo