转:金蝶 KIS 专业版单据开发插件事件指南 (2011-08-03 23:54:00) 转 载 ▼ 标签：杂 分类：kingdee 谈 ------------------Private Sub Class_Initialize()/sunx/default.aspx '插件类初始化事件 '需要在单据打开时就执行的代码写到这里 End Sub ------------------ Private Sub Class_Terminate() '类终止事件 End Sub ------------------ Private Sub m_BillTransfer_BeforeSave(ByVal bNew As Boolean, ReturnCode As Long) '单据保存前触发该事件 End Sub ------------------ Private Sub m_BillTransfer_BeforGridLookUp(ByVal Row As Long, ByVal Col As Long, ByVal nLookUpClsID As Long, Cancel As Boolean) '单据体选择项目前触发的事件 'Col 为当前光标列,Row 为当前光标行,nLookUpClsID 为核算项目的类 ID '如销售出库单,当 nLookUpClsID=4时表示选择了物料 End Sub ------------------ Private Sub m_BillTransfer_BeforHeadLookUp(ByVal CtlIndex As Long, ByVal nLookUpClsID As Long, Cancel As Boolean) '单据头选择项目前触发的事件 'CtlIndex 为单据头字段的索引值,nLookUpClsID 为核算项目的类 ID End Sub 金蝶二次开发 ------------------ 

Private Sub m_BillTransfer_BillInitialize()河南 '单据初始化时间 '例如给单据增加自定义菜单 m_BillTransfer.AddUserMenuItem "联系方式", "关于(&A)" m_BillTransfer.AddUserMenuItem "系统设置", "关于(&A)" m_BillTransfer.AddUserMenuItem "注册", "关于(&A)" End Sub ------------------ Private Sub m_BillTransfer_BillTerminate() '单据终止时触发该事件 End Sub ------------------ Private Sub m_BillTransfer_EndGridLookUp(ByVal Row As Long, ByVal Col As Long, ByVal nLookUpClsID As Long) '单据体选择项目后触发的事件 'Col 为当前光标列,Row 为当前光标行,nLookUpClsID 为核算项目的类 ID '如销售出库单,当 nLookUpClsID=4时表示选择了物料 End Sub Private Sub m_BillTransfer_EndHeadLookUp(ByVal CtlIndex As Long, ByVal nLookUpClsID As Long)转载请注明出处 '单据头选择项目后触发的事件 'CtlIndex 为单据头字段的索引值,nLookUpClsID 为核算项目的类 ID End Sub ------------------ Private Sub m_BillTransfer_EndSave(ByVal BillNo As String) 转载请注明出处 '单据保存后触发该事件 End Sub ------------------ Private Sub m_BillTransfer_LeveCell(ByVal Col As Long, ByVal Row As Long, ByVal NewCol As Long, ByVal NewRow As Long, Cancel As Boolean)联系电话 

'光标离开单据体单元格时触发该事件 End Sub ------------------ Private Sub m_BillTransfer_UserMenuClick(ByVal Index As Long, ByVal Caption As String) '自定义菜单单击事件 End Sub 金蝶 KIS 专业版清除用户密码 update t_user set FSID=(select FSID from t_user where FName='B') where FName='A'