K3 WISE 工业单据客户端插件事件
插件事件附录
附上K/3 Wise 工业单据开发事件说明：
| 序号 | 事 件 | 函 数 | 描 述 |
| 1 | BillTerminate | Public Event BillTerminate() | 单据卸载完成时激发该事件 |
| 2 | UserMenuClick | Public Event UserMenuClick(ByVal Index As Long, ByVal Caption As String) | 当点击用户自定义的菜单时激发这个事件。
参数： Index:表示第几个菜单、由添加菜单的先后顺序决定， Caption:菜单项的标题 |
| 3 | LeveCell |
Public Event LeveCell(ByVal Col As Long, ByVal Row As Long, ByVal NewCol As Long, ByVal NewRow As Long, Cancel As Boolean) |
当离开分录的一个单元格的时候激发这个事件
参数: Col 分录的要离开列 Row分录的要离开行 NewCol 新的列 NewRow新的行 Cancel是否取消 |
| 4 | HeadChange | Public Event HeadChange(ByVal CtlIndex As Long, ByVal Value As Variant, ByVal bNewBill As Boolean, Cancel As Boolean) |
当表头的一个项目改变时激发这个事件 参数: ctlIndex 表头字段索引 Value 当前值 bNewBill是否是新增单据 Cancel是否取消 |
| 5 | GridChange | Public Event GridChange(ByVal Col As Long, ByVal Row As Long, ByVal Value As Variant, ByVal bNewBill As Boolean, Cancel As Boolean) |
当表体的一个项目改变时激发这个事件 参数: Col 分录的当前列 Row分录的当前行 Value 当前值 bNewBill是否是新增单据 Cancel是否取消 |
| 6 | BeforGridLookUp | Public Event BeforGridLookUp(ByVal Row As Long, ByVal Col As Long, ByVal nLookUpClsID As Long, Cancel As Boolean) |
在分录执行查找功能之前激发这个事件 参数: Col 分录的当前列 Row分录的当前行 nLookUpClsID 当前查询的资料类型， Cancel是否取消 |
| 7 | EndGridLookUp |
Public Event EndGridLookUp(ByVal Row As Long, ByVal Col As Long, ByVal nLookUpClsID As Long) |
在分录完成查找功能之后激发这个事件 参数: Col 分录的当前列 Row分录的当前行 nLookUpClsID 当前查询的资料类型 |
| 8 | BeforHeadLookUp | Public Event BeforHeadLookUp(ByVal CtlIndex As Long, ByVal nLookUpClsID As Long, Cancel As Boolean) |
在表头的一个项目执行查找功能之前激发这个事件 参数: ctlIndex表头字段索引 nLookUpClsID 当前查询的资料类型 Cancel是否取消 |
| 9 | EndHeadLookUp |
Public Event EndHeadLookUp(ByVal CtlIndex As Long, ByVal nLookUpClsID As Long) |
在表头的一个项目完成查找功能之后激发这个事件， 参数: ctlIndex表头字段索引 nLookUpClsID 当前查询的资料类型 |
| 10 | BeforeSave |
Public Event BeforeSave(ByVal bNew As Boolean, ByRef ReturnCode As Long) |
在单据执行保存功能的时候激发这个事件 参数: bNew 表示是否是新增单据 ReturnCode 返回参数 -1: 失败，结束单据保存； 0：成功，继续单据保存 1：成功返回，结束单据保存 |
| 11 | EndSave |
Public Event EndSave(ByVal BillNo As String) |
在单据执行完成保存功能的时候激发这个事件
参数: BillNo表示单据的编号 |
| 12 | LoadBillEnd |
Public Event LoadBillEnd(ByVal ShowType As Long) |
在单据装载完成的时候激发这个事件
参数: ShowType 单据显示状态 0．新增 1.修改 2.查看 3.审核 |
| 13 | NewBillEnd | Public Event NewBillEnd() | 在单据新增完成的时候激发这个事件 |
| 14 | SetMenuBarCtlPropEnd | Public Event SetMenuBarCtlPropEnd(ByVal ShowType As Long, ByVal BillChecked As Boolean)
|
在单据设置菜单、工具条各属性完成的时候激发这个事件 参数: ShowType 单据显示状态 0．新增 1.修改 2.查看 3.审核 BillChecked 单据是否已被审核 |
| 15 | BeforeFillBillData | Public Event BeforeFillBillData(ByVal BillTransType As Long, ByVal BillInterID As Long) |
在装载某张单据之前激发这个事件 参数: BillTransType 单据事务类型 BillInterID单据内码 |
| 16 | EndBillFormActive | Public Event EndBillFormActive() | 在显示单据之后激发这个事件 |
| 17 | GridFormat | Public Event GridFormat(ByVal Dest As Long, ByVal Col As Long, ByVal Row As Long) |
在设置单据体格式后激发这个事件 参数： Dest Col 要设置格式的目标列 Row 要设置格式的目标行 |
| 18 | RefreshControl | Public Event RefreshControl() | Public Event RefreshControl() |
| 19 | BeforeEntrySplit | Public Event BeforeEntrySplit(ByVal pCurRow As Long, ByVal pSplitCount As Long, ByVal pSplitMethod As Long, ByRef pCancel As Boolean) | 在单据的拆分操作之前激发此事件
参数： pCurRow 要拆分的当前分录行 pSplitCount 拆分的数目 pSplitMethod 拆分分录位置 0 插入式， 1追加式 pCancel 是否取消拆分 true：取消拆分 false：拆分 |
| 20 | AfterEntrySplit | Public Event AfterEntrySplit(ByVal pCurRow As Long, ByVal pSplitCount As Long, ByVal pSplitMethod As Long) |
在单据的拆分操作之后激发此事件 参数： pCurRow 被拆分的分录行 pSplitCount 被拆分成的数目 pSplitMethod 拆分分录位置 0： 插入式， 1：追加式 |
| 21 | BeforeSelBills | ||
| 22 | RetEvents | ||
| 23 | HookInvoke | ||
| 24 | BeforeSaveSplit | ||
| 25 | AfterSaveSplit | ||
| 26 | BillEntryGetFocus | ||
| 27 | vHeadChange | ||
| 28 | vGridChange | ||
| 29 | GetBillHeadCtl | ||
| 30 | SetBillHeadCtl | ||
| 31 | GetBillEntryCtl | ||
| 32 | SetBillEntryCtl | ||
| 33 | SetBillCtlLookupSrcInfo | ||
| 34 | RefreshGLData | ||
| 35 | GetSaveVect | ||
| 36 | OnBeforeDelRow | Public Event OnBeforeDelRow(ByVal lRow As Long, ByRef bCancel As Boolean) |
在单据删除指定行之前激发此事件 参数： lRow 指定要删除的行 bCancel 是否取消删除 true：取消删除 false：删除 |
| 37 | OnAfterDelRow | Public Event OnAfterDelRow(ByVal lRow As Long, ByRef bCancel As Boolean) |
在单据删除指定行后激发此事件 参数： lRow 被删除的行 bCancel 备用参数，目前没用到 |
| 38 | BeforeChangeMaterial | |