1、 版权所有 1993-2009 金蝶软件(中国)有限公司P2 版权所有 1993-2009 金蝶软件(中国)有限公司n工业老单二次开发n工业老单二次开发所需环境及要点n工业老单序时薄二次开发n工业老单单据二次开发n工业老单实战演练n组件编译及布署n问题交流P3 版权所有 1993-2009 金蝶软件(中国)有限公司二次开发所需环境及要点 单据二次开发是针对现目前单据的一些功能无法满足一些客户的特殊要求，同时分公司又有能力进行二次开发而提出的，这样既可以在现有的系统不做变动的情况下面满足用户的需求，同时也增强了系统的稳定性。本篇所介绍所用到的动态连接库名为：K3BillTransfer.dllK
2、3BillTransfer.dll 通过该说明文档，你可以了解到1.如何通过K3BillTransferK3BillTransfer组件在录单过程中对单据上各项目加以控制。2.如何通过K3BillTransferK3BillTransfer组件实现自定义功能菜单。3.如何通过K3BillTransferK3BillTransfer组件控制数据的保存。4.如何在序时薄上增加菜单及应用。5.应用示例实战演练。适用对象 需要在K/3供应链系统单据上进行二次开发的开发者 开发环境 1.安装过K/3ERP 9.41以后的版本且购买过供应链系统。2.VB6.0企业版+SP1 3.SQL SERVER 20
3、00及后续版本（SQL SERVER 2019,SQL SERVER 2019)P4 版权所有 1993-2009 金蝶软件(中国)有限公司序时薄二次开发老单序时薄开发相对简单，它只能在序时薄上增加菜单，通过菜单去实现一些二次开发功能.使用方法：使用方法：1.)在t_BandToolMapping中的FcomName填入需要调用组件的名称，注意：不要覆盖原有内容，要在原有内容上用“|”分割后加入自己的组件，可以加多个组件。第一个插件前一定要加“|”，因为之前的部分是记录了其他信息。2）二次开发组件必须实现MainFunction(ByVal sKey As string,oList AsObj
4、ect,Byref bCancel as Boolean)方法。要终止事件，请将bCancel设置为true。3）oList为一个即是ICList，可以使用其中的任何Public方法。比方说 GetSelData 为取得选取的对象 P5 版权所有 1993-2009 金蝶软件(中国)有限公司P6 版权所有 1993-2009 金蝶软件(中国)有限公司序时薄二次开发范例范例P7 版权所有 1993-2009 金蝶软件(中国)有限公司序时薄二次开发范例续范例续P8 版权所有 1993-2009 金蝶软件(中国)有限公司范例续范例续序时薄二次开发P9 版权所有 1993-2009 金蝶软件(中国)有
5、限公司序时薄二次开发P10 版权所有 1993-2009 金蝶软件(中国)有限公司以上只是序时薄二次开发实现的一个简单的例子，具体的二次开发，要根据不同的需求，进行相应的开发，接口都是统一调用序时薄二次开发P11 版权所有 1993-2009 金蝶软件(中国)有限公司单据二次开发单据二次开发主要通过K3BillTransferK3BillTransfer组件控制单据上一些操作。其常用属性其常用属性1.Property Cnnstring As String1.Property Cnnstring As String当前数据库的MMTS.PropsString连接串。2 2Property Sy
6、stemName As StringProperty SystemName As String当前系统名称。3 3Property LastInfo As StringProperty LastInfo As String 最后一次系统返回的各种信息4 4Property BillForm As ObjectProperty BillForm As Object 整个单据窗体对象。可通过该对象访问单据上的任何一个对象，包括控件，菜单。共有的方法有：InsertRow()，在Grid的当前行追加一行，它没有参数。5 5Property BillFunc as ObjectProperty Bil
7、lFunc as Object代表单据对象。目前没什么用途。P12 版权所有 1993-2009 金蝶软件(中国)有限公司其常用属性其常用属性续续6 6Property Head As ObjectProperty Head As Object 单据表头控件，是一个KDText控件数组7 7Property Grid As ObjectProperty Grid As Object 单据分录控件，为FpSpread控件8 8Property SumGrid As ObjectProperty SumGrid As Object单据分录合计控件，为FpSpread控件9 9Property He
8、adCtl As VariantProperty HeadCtl As Variant对应表头控件数组，记录每个表头项目各属性的数组如果要改变HeadCtlHeadCtl中的某个属性值，需先对HeadCtlHeadCtl做一个备份，然后修改此备份的相应属性值，再将此备份赋值给HeadCtlHeadCtl。单据二次开发P13 版权所有 1993-2009 金蝶软件(中国)有限公司其常用属性其常用属性续续1010Property EntryCtl As VariantProperty EntryCtl As Variant对应分录各列，记录每个分录列各属性的数组如果要改变EntryCtlEntry
9、Ctl中的某个属性值，需先对EntryCtlEntryCtl做一个备份，然后修改此备份的相应属性值，再将此备份赋值给EntryCtlEntryCtl1111Property SaveVect As KFO.VectorProperty SaveVect As KFO.Vector二次开发外部数据存取接口。在录单过程中，用户可将某些数据保存在此Vector中，在单据保存时，再通过二次开发中间层组件，将此Vector中的数据保存到指定位置。SaveVect.Item(1)为一个KFO.Dictionary对象该对象包含以下四个系统数据 SaveVect.Item(1).Value(FInterID
10、)：单据内码 SaveVect.Item(1).Value(FTransType)：单据事务类型 SaveVect.Item(1).Value(ISRedBill)：是否红字单据 SaveVect.Item(1).Value(BillChecked)：是否审核。单据二次开发P14 版权所有 1993-2009 金蝶软件(中国)有限公司常用的方法常用的方法Function AddUserMenuItem(ByVal Caption As String,ByVal Function AddUserMenuItem(ByVal Caption As String,ByVal RootMenuCapt
11、ion As String=)RootMenuCaption As String=)说明：添加一个用户自定义菜单项，系统一共预设了五个菜单项供二次开发使用参数：Caption:菜单名称 RootMenuCaption:根菜单名称。缺省为“自定义菜单”2 2Function GetGridText(ByVal Row As Long,ByVal Col As Long)As Function GetGridText(ByVal Row As Long,ByVal Col As Long)As String String说明：获取分录某单元格的值参数：Row:分录行,Col:分录列3 3Funct
12、ion GetHeadNumber(ByVal CtlIndex As Long)As StringFunction GetHeadNumber(ByVal CtlIndex As Long)As String说明：获取表头某项的代码参数：CtlIndex:表头控件索引 4 4Function GetHeadText(ByVal CtlIndex As Long)As StringFunction GetHeadText(ByVal CtlIndex As Long)As String说明：获取表头某项的文本参数：CtlIndex:表头控件索引单据二次开发P15 版权所有 1993-2009
13、金蝶软件(中国)有限公司单据二次开发常用的方法常用的方法续续5.Function GetSumGridText(ByVal Row As Long,ByVal Col As Long)5.Function GetSumGridText(ByVal Row As Long,ByVal Col As Long)As String As String说明：获取合计行某列的值参数：Row:行。一般为1,Col:分录列6 6Function SetGridText(ByVal Row As Long,ByVal Col As Long,Function SetGridText(ByVal Row As
14、Long,ByVal Col As Long,ByVal Value,ByVal InterID As Long=0,ByVal ByVal Value,ByVal InterID As Long=0,ByVal sName As String=)As Boolean sName As String=)As Boolean说明：设置分录某单元格的值,当分录为查找类型时,会把相应的信息一起 携带到相应的位置，如当为物料代码时，它会携带物料的一些基本 信息物料名称等。参数：Row:分录行,Col:分录列,Value:设置的值。如果该单元格是查找 类型的，Value应设置为代码。InterID:暂未
15、使用,sName:暂未使用P16 版权所有 1993-2009 金蝶软件(中国)有限公司常用的方法常用的方法续续7 7Function SetHead(ByVal Index As Long,ByVal Value,ByVal Function SetHead(ByVal Index As Long,ByVal Value,ByVal InterID As Long=0,ByVal sName As String=)InterID As Long=0,ByVal sName As String=)As Boolean As Boolean说明：设置表头某项的值参数：Index:表头控件索引,V
16、alue:设置的值。如果该表头项是查找类型的，Value应设置为代码,InterID:暂未使用,sName:暂未使用8 8Function SetSumGridText(ByVal Row As Long,ByVal Col As Function SetSumGridText(ByVal Row As Long,ByVal Col As Long,ByVal Value)As Boolean Long,ByVal Value)As Boolean说明：设置分录合计某列的值参数：Row:分录行。一般为1 Col:分录列 Value:设置的值。单据二次开发P17 版权所有 1993-2009 金
17、蝶软件(中国)有限公司常用的事件常用的事件1.Public Event BillInitialize()1.Public Event BillInitialize()单据初始化完成时激发该事件2 2Public Event BillTerminate()Public Event BillTerminate()单据卸载完成时激发该事件3 3Public Event UserMenuClick(ByVal Index As Long,ByVal Public Event UserMenuClick(ByVal Index As Long,ByVal Caption As String)Captio
18、n As String)说明：当点击用户自定义的菜单时激发这个事件。参数：Index:表示第几个菜单、由添加菜单的先后顺序决定，Caption:菜单项的标题，如何添加自定义菜单请参见方法 AddUserMenuItem4.Public Event HeadChange(ByVal CtlIndex As Long,ByVal Value 4.Public Event HeadChange(ByVal CtlIndex As Long,ByVal Value As Variant,ByVal bNewBill As Boolean,Cancel As As Variant,ByVal bNewB
19、ill As Boolean,Cancel As Boolean)Boolean)说明：当表头的一个项目改变时激发这个事件参数:ctlIndex 表头字段索引 Value 当前值 bNewBill是否是新增单据 Cancel是否取消单据二次开发P18 版权所有 1993-2009 金蝶软件(中国)有限公司常用的事件常用的事件续续5.Public Event LeveCell(ByVal Col As Long,ByVal Row As Long,_5.Public Event LeveCell(ByVal Col As Long,ByVal Row As Long,_ ByVal NewCol
20、 As Long,ByVal NewRow As Long,Cancel As ByVal NewCol As Long,ByVal NewRow As Long,Cancel As Boolean)Boolean)说明：当离开分录的一个单元格的时候激发这个事件参数:Col 分录的要离开列 Row分录的要离开行 NewCol 新的列 NewRow新的行 Cancel是否取消6 6Public Event GridChange(ByVal Col As Long,ByVal Row As Public Event GridChange(ByVal Col As Long,ByVal Row As
21、 Long,ByVal Value As Variant,ByVal bNewBill As Long,ByVal Value As Variant,ByVal bNewBill As Boolean,Cancel As Boolean)Boolean,Cancel As Boolean)说明：当表体的一个项目改变时激发这个事件参数:Col 分录的当前列 Row分录的当前行 Value 当前值 bNewBill是否是新增单据 Cancel是否取消单据二次开发P19 版权所有 1993-2009 金蝶软件(中国)有限公司常用的事件常用的事件续续Public Event BeforGridLook
22、Up(ByVal Row As Long,ByVal Col As Public Event BeforGridLookUp(ByVal Row As Long,ByVal Col As Long,ByVal nLookUpClsID As Long,Cancel As Boolean)Long,ByVal nLookUpClsID As Long,Cancel As Boolean)说明：在分录执行查找功能之前激发这个事件参数:Col 分录的当前列,Row分录的当前行,nLookUpClsID 当前查询的资料类型，Cancel是否取消8 8Public Event EndGridLookUp
23、(ByVal Row As Long,ByVal Col As Public Event EndGridLookUp(ByVal Row As Long,ByVal Col As Long,ByVal nLookUpClsID As Long)Long,ByVal nLookUpClsID As Long)说明：在分录完成查找功能之后激发这个事件参数:Col 分录的当前列，Row分录的当前行，nLookUpClsID 当前查询的资料类型9 9Public Event BeforHeadLookUp(ByVal CtlIndex As Long,ByVal Public Event BeforH
24、eadLookUp(ByVal CtlIndex As Long,ByVal nLookUpClsID As Long,Cancel As Boolean)nLookUpClsID As Long,Cancel As Boolean)说明：在表头的一个项目执行查找功能之前激发这个事件参数:ctlIndex表头字段索引 nLookUpClsID 当前查询的资料类型 Cancel是否取消单据二次开发P20 版权所有 1993-2009 金蝶软件(中国)有限公司常用的事件常用的事件续续Public Event EndHeadLookUp(ByVal CtlIndex As Long,ByVal Pu
25、blic Event EndHeadLookUp(ByVal CtlIndex As Long,ByVal nLookUpClsID As Long)nLookUpClsID As Long)说明：在表头的一个项目完成查找功能之后激发这个事件，参数:ctlIndex表头字段索引nLookUpClsID 当前查询的资料类型1111Public Event BeforeSave(ByVal bNew As Boolean,ByRef Public Event BeforeSave(ByVal bNew As Boolean,ByRef ReturnCode As Long)ReturnCode A
26、s Long)说明：在单据执行保存功能的时候激发这个事件参数:bNew 表示是否是新增单据，ReturnCode 返回参数-1:失败，结束 单据保存；0：成功，继续单据保存，1：成功返回，结束单据保存1212Public Event EndSave(ByVal BillNo As String)Public Event EndSave(ByVal BillNo As String)说明：在单据执行完成保存功能的时候激发这个事件参数:BillNo表示单据的编号单据二次开发P21 版权所有 1993-2009 金蝶软件(中国)有限公司常用的事件常用的事件续续13.Public Event Load
27、BillEnd(ByVal ShowType As Long)13.Public Event LoadBillEnd(ByVal ShowType As Long)说明：在单据装载完成的时候激发这个事件参数:ShowType 单据显示状态0新增 1.修改 2.查看 3.审核1414Public Event NewBillEnd()Public Event NewBillEnd()说明：在单据新增完成的时候激发这个事件1515Public Event SetMenuBarCtlPropEnd(ByVal ShowType As Long,Public Event SetMenuBarCtlPro
28、pEnd(ByVal ShowType As Long,ByVal BillChecked As Boolean)ByVal BillChecked As Boolean)说明：在单据设置菜单、工具条各属性完成的时候激发这个事件参数:ShowType 单据显示状态 0新增 1.修改 2.查看 3.审核 BillChecked 单据是否已被审核1616Public Event BeforeFillBillData(ByVal BillTransType As Long,Public Event BeforeFillBillData(ByVal BillTransType As Long,ByVa
29、l BillInterID As Long)ByVal BillInterID As Long)说明：在装载某张单据之前激发这个事件参数:BillTransType 单据事务类型 BillInterID单据内码单据二次开发P22 版权所有 1993-2009 金蝶软件(中国)有限公司常用的事件常用的事件续续1717Public Event EndBillFormActive()Public Event EndBillFormActive()说明：在显示单据之后激发这个事件1818Public Event GridFormat(ByVal Col As Public Event GridForm
30、at(ByVal Col As Long,ByVal Row As Long)Long,ByVal Row As Long)说明：在设置单据体格式后激发这个事件参数：Col要设置格式的目标列 Row要设置格式的目标行1919Public Event RefreshControl()Public Event RefreshControl()说明：在设置单据的单元格和单据头的锁定状态后激发这个事件2020Public Event BeforeEntrySplit(ByVal pCurRow As Long,ByVal Public Event BeforeEntrySplit(ByVal pCur
31、Row As Long,ByVal pSplitCount As Long,ByVal pSplitMethod As Long,pSplitCount As Long,ByVal pSplitMethod As Long,ByRef pCancel As Boolean)ByRef pCancel As Boolean)说明：在单据的拆分操作之前激发此事件参数：pCurRow 要拆分的当前分录行 pSplitCount拆分的数目 pSplitMethod拆分分录位置 0 插入式，1追加式 pCancel 是否取消拆分 true：取消拆分false：拆分单据二次开发P23 版权所有 1993-
32、2009 金蝶软件(中国)有限公司2121Public Event AfterEntrySplit(ByVal pCurRow As Long,ByVal Public Event AfterEntrySplit(ByVal pCurRow As Long,ByVal pSplitCount As Long,ByVal pSplitMethod As Long)pSplitCount As Long,ByVal pSplitMethod As Long)说明：在单据的拆分操作之后激发此事件参数：pCurRow 被拆分的分录行 pSplitCount被拆分成的数目 pSplitMethod拆分分
33、录位置 0：插入式，1：追加式2222Public Event OnBeforeDelRow(ByVal lRow As Long,ByRef Public Event OnBeforeDelRow(ByVal lRow As Long,ByRef bCancel As Boolean)bCancel As Boolean)说明：在单据删除指定行之前激发此事件参数：lRow指定要删除的行，bCancel是否取消删除，true：取消删除 false：删除23.Public Event OnAfterDelRow(ByVal lRow As Long,ByRef 23.Public Event O
34、nAfterDelRow(ByVal lRow As Long,ByRef bCancel As Boolean)bCancel As Boolean)说明：在单据删除指定行后激发此事件参数：lRow被删除的行 bCancel备用参数，目前没用到单据二次开发P24 版权所有 1993-2009 金蝶软件(中国)有限公司中间层事件中间层事件如果需要在单据保存的事务处理过程中插入一些用户处理过程，可以编写一个用户中间层，必须包含以下两个函数：1 1Public Function BeginSave(ByVal Sdsn As String,ByRef Public Function BeginSa
35、ve(ByVal Sdsn As String,ByRef SaveVect As KFO.Vector,ByRef ReturnMsg As String)As SaveVect As KFO.Vector,ByRef ReturnMsg As String)As Boolean Boolean说明：在单据保存的事务处理中，在单据数据保存到数据库之前，调用 该函数。返回值：FALSE 保存事务终止，返回错误。TRUE 单据继续保存事务 处理。参数：Sdsn：MMTS.PropsString，SaveVect：二次开发外部数据存取接口。ReturnMsg：失败时返回的错误信息。单据二次开发P2
36、5 版权所有 1993-2009 金蝶软件(中国)有限公司中间层事件中间层事件续续2 2Public Function EndSave(ByVal Sdsn As String,ByRef Public Function EndSave(ByVal Sdsn As String,ByRef SaveVect As KFO.Vector,ByRef ReturnMsg As String)As SaveVect As KFO.Vector,ByRef ReturnMsg As String)As BooleanBoolean说明：在单据保存的事务处理中，在单据数据保存到数据库之后，调 用该函数。
37、返回值：FALSE 保存事务终止,返回错误。TRUE单据继续保存事务处理。参数：Sdsn：MMTS.PropsString SaveVect：二次开发外部数据存取接口。ReturnMsg：失败时返回的错误信息。单据二次开发P26 版权所有 1993-2009 金蝶软件(中国)有限公司关于关于HeadCtlHeadCtl、EntryCtlEntryCtl数组属性和数组属性和HeadHead控件数组、控件数组、GridGrid的简要说明的简要说明HeadCtlHeadCtl ID As Integer 数组的Index与KDCtl的Index相对应，（FCtlIndex）Caption As St
38、ring KDCtl的Caption FontName As String 字体 FontSize As Integer 字体大小 FCtlIndex As Integer 控件序号 TabIndex As Integer TAB索引 Left As Single 左 Top As Single 上 Width As Single 宽 Height As Single 高 Enable As Boolean 控件是否Locked与KDCtl的Locked属性相对应 EnableValue As Integer件在各种状态下的可用性：新增、修改、察看、审核、下达。单据二次开发P27 版权所有 1
39、993-2009 金蝶软件(中国)有限公司HeadCtlHeadCtl数组续数组续用一个五位的二进制数表示，可见则对应位为1，否则为0。常用值：0、31。bPrint As Boolean 是否打印 Visible As Boolean 是否可见 VisibleValue As Integer 控件在各种状态下的可见性：新增、修改、察看、审核、下达。用一个五位的二进制数表示，可见则对应位为1，否则为0。常用值：0、31。NeedSave As Boolean 该控件的值是否保存 RelateOutTbl As Boolean 该控件的值是否来自其他表 MustInput As Boolean
40、该控件是否必须输入 LookUpCls As Integer 如果控件的类型是查找类型的（LookUpCls=ctlLookUp），则该属性标示查找的类型 -控件的数据来源属性 单据二次开发P28 版权所有 1993-2009 金蝶软件(中国)有限公司HeadCtlHeadCtl数组续数组续 InterID As Long FInterID As String nterID 对应的字段名 Number As String FNumber As String Number 对应的字段名 Name As String FName As String Name 对应的字段名 -控件的数据保存属性 F
41、ieldName As String 该值保存时对应的字段名 Vale As String 保存的值(要用ValType来格式化)Filter As String 查找的过滤条件 LOCKA As Boolean 选单锁定单据二次开发P29 版权所有 1993-2009 金蝶软件(中国)有限公司EntryCtl EntryCtl 数组数组ID As Integer 数组的Index与KDCtl的Index相对应，（FCtlIndex）CtlType As E_CtlType 控件的类型(KCtlType)Enable As Boolean 控件是否Locked与KDCtl的Locked属性相对
42、应EnableValue As Integer控件在各种状态下的可用性：新增、修 改、察看、审核、下达。用一个五位的二进制数表示，可见则对应位为1，否则为0。常用值：0、31。bPrint As Boolean 是否打印Visible As Boolean 是否可见VisibleValue As Integer 控件在各种状态下的可见性：新增、修改、察看、审核、下达。用一个五位的二进制数表示，可见则对应 位为1，否则为0。常用值：0、31。NeedSave As Boolean 该控件的值是否保存RelateOutTbl As Boolean 该控件的值是否来自其他表MustInput As
43、Boolean 该控件是否必须输入LookUpCls As Integer 如果控件的类型是查找类型的（LookUpCls=ctlLookUp），单据二次开发P30 版权所有 1993-2009 金蝶软件(中国)有限公司EntryCtlEntryCtl数组续数组续则该属性标示查找的类型 NeedCount As Boolean 是否需要合计 StatCount As Boolean 是否汇总类字段 FCtlIndex As Integer 控件序号 FCtlOrder As Integer 控件顺序号 RelationID As String 该列相关联的父级列 -控件的数据来源属性 FInt
44、erID As String InterID 对应的字段名 FNumber As String Number 对应的字段名 FName As String Name 对应的字段名 FilterString As String DInterID()As String 如果该控件是查找类型的，则在该数组内记录InterID的值，其他的值直接从界面中取得 单据二次开发P31 版权所有 1993-2009 金蝶软件(中国)有限公司EntryCtlEntryCtl数组续数组续-控件的数据保存属性 SaveRule As String FieldName As String 该值保存时对应的字段名 Val
45、Type As E_ValType 保存值的数据类型 SaveValue As E_SaveValue 保存何种类型的值（FName、InterID、Number）DName()As String DNumber()As String Filter()As StringHeadHeadItemID 当前数据的内码ItemName当前数据的名称 ItemNumber当前数据的ID Text控件显示的Text单据二次开发P32 版权所有 1993-2009 金蝶软件(中国)有限公司GrigGrig控件控件GridGridSetText（col as Long,Row as Long,var）方法给
46、数据控件的第Col列，第Row行赋值varGetText（col as Long,Row as Long,var）方法取数据控件的第Col列，第Row行的值varCol指定起始列Col2指定结束列Row指定起始行Row2 指定结束行Lock是否锁定Value 指定行列的单元格的值单据二次开发P33 版权所有 1993-2009 金蝶软件(中国)有限公司二次开发实现的步骤：单据二次开发P34 版权所有 1993-2009 金蝶软件(中国)有限公司二次开发实现的步骤续：单据二次开发P35 版权所有 1993-2009 金蝶软件(中国)有限公司举几个二次开发的例子范例一单据二次开发P36 版权所有
47、1993-2009 金蝶软件(中国)有限公司范例二单据二次开发P37 版权所有 1993-2009 金蝶软件(中国)有限公司范例三单据二次开发P38 版权所有 1993-2009 金蝶软件(中国)有限公司范例四在插件中填界面字段的三值Private Const OperNo=22 FOperID的FCtlOrder Private Sub SetOperID(ByVal Row As Long,ByRef dctResult As KFO.Dictionary)On Error GoTo HErr Dim EntryCtl As Variant EntryCtl=m_BillTransfer.
48、EntryCtl EntryCtl(OperNo).DInterID(Row)=dctResult.GetValue(FOperID)EntryCtl(OperNo).DNumber(Row)=dctResult.GetValue(FID)EntryCtl(OperNo).DName(Row)=dctResult.GetValue(FName)m_BillTransfer.EntryCtl=EntryCtl m_BillTransfer.SetGridText Row,OperNo,dctResult.GetValue(FName)HErr:.End Sub单据二次开发P39 版权所有 199
49、3-2009 金蝶软件(中国)有限公司单据二次开发P40 版权所有 1993-2009 金蝶软件(中国)有限公司EventID说明300014单据拆分后事件300013单据拆分前事件300012单据合并后事件300011单据合并前事件300010单据关联反写后事件300009单据关联反写前事件300008关闭/反关闭单据后事件300007关闭/反关闭单据前事件300006作废/反作废单据后事件300005作废/反作废单据前事件300004删除单据后事件300003删除单据前事件300002序时簿复制后事件300001序时簿复制前事件100001生成凭证结束反写事件100000生成凭证结束反写事
50、件200003审核退出前事件200002审核反写事件200001审核前事件单据二次开发P41 版权所有 1993-2009 金蝶软件(中国)有限公司客户端二次开发，先在二次开发模板中插入记录(t_ThirdPartyComponent）delete from t_ThirdPartyComponent where FComponentName=ProBillPlugIns.clsStockIn_PlugInsdeclare FIndex intset FIndex=(select MAX(FIndex)from t_ThirdPartyComponent WHERE FTypeDetailID
