《U8开发之会计凭证组件.pdf》由会员分享，可在线阅读，更多相关《U8开发之会计凭证组件.pdf（9页珍藏版）》请在三一文库上搜索。
1、实用文案 文案大全 U8 会计凭证组件 摘要 凭证组件是提供U8 会计凭证录入、查询、修改、联查的界面交互组件。 适合于为各种原始单据或其他数据来源如excel 并且需要用户交互，转换为会计凭证提供服 务。完全后台生成会计凭证不适用此组件。 组件文件Us_pz.dll，部署于安装目录u8softUFCOMSQL。 概念说明 会计凭证： 以原始单据如发票、收据等为依据，按照经济业务的事项的内容加以分类(以会 计科目体现 )，并据以确定会计分录(要素：会计科目、借贷金额)后所填制的会计凭证，是登 入账簿的直接依据。 会计科目： 按照经济业务的内容和经济管理的要求，对会计要素的具体内容进行分类核算的
2、 科目。 辅助核算： 会计科目可设置辅助核算属性如客户、供应商、部门、项目等，用以补充会计分 录其他辅助信息，如某笔收款的客户信息。 凭证类别：如收款凭证、付款凭证、转账凭证 实用文案 文案大全 目标 本文主要介绍凭证组件的基础知识，应用过程及相关注意事项，方便各类U8 产品开发人员 更好的使用凭证组件，更高效的开发产品。 如何使用凭证组件 1.初始化凭证组件 Dim WithEvents m_objPz As zzpz. clsPZ 声明为类变量，使用WithEvents关键字从而可以 处理事件 set m_objPz = New zzpz.clsPZ Set m_objPz.zzLogin
3、 = m_login Set m_objPz.zzSys = m_ZwPub 总账公用函数ZzPub.clsPub 2.准备临时表数据,凭证组件对外数据接口主要是此临时表 准备临时表数据 准备数据, 临时表结构参见总账凭证表gl_accvouch数据字典 临时表名称为m_ZwPub.WbTableName 相同的coutno_id表示一张凭证 分录1:科目1001借方200 strSql=” insert into “ Pz_CX=2修改;Pz_LC=3联查 Version 可选参数忽略 k1 是否记账 K2 期间 K3 凭证类别 K4 凭证号 iYear 年度 sbilldate 凭证日期
4、实用文案 文案大全 4. 通过事件回写业务单据凭证信息 回写凭证信息 通过事件回写凭证信息 Private Sub m_objPz_Save(rstCurrentVouch As ADODB.Recordset, IsSuccess As Boolean) Dim objCon As ADODB.Connection Set objCon = rstCurrentVouch.ActiveConnection - 代码略，注意使用objCon连接以保证统一的事务管理 - IsSuccess = True End Sub 应用案例 详细说明实现过程 1.应用场景描述 某ERP系统费用单据推到U8生
5、成凭证 2.实现步骤过程及效果 (1)开发可与U8门户集成的dll，参考U8开发之CS门户集成相关文档 (2)引用USDbKit.DLL，USZZPUB.DLL，US_Pz.dll（U8SOFTufcomsql） (3)实现费用单据列表，可供选择生成凭证 实用文案 文案大全 (4)初始化总账公用函数ZzPub.clsPub 初始化总账公用函数 参数说明 第一个参数为外部系统ID(可参考ufsystemua_subsys) m_login为Login对象 UfDb为UfDbKit.UfDatabase (引用usdbkit.dll) Dim m_ZwPub As new ZzPub.clsPub
6、 定义公用函数(引用uszzpub.dll) Dim UfDb As New UfDbKit.UfDatabase UfDb.OpenDatabase m_login.UfDbName m_ZwPub.InitPubs2 “PM“, m_login.UfSystemDb, UfDb, m_login.cAcc_Id, m_login.cIYear, m_login.cUserId, m_login.CurDate, m_login.SysPassword 10.1及以后版本通过赋g_business可以嵌入门户，否则凭证为模态窗口 Set m_ZwPub.g_business = g_busi
7、ness (5).初始化凭证组件 初始化凭证组件 Dim WithEvents m_objPz As zzpz. clsPZ 声明为类变量 set m_objPz = New zzpz.clsPZ Set m_objPz.zzLogin = m_login Set m_objPz.zzSys = m_ZwPub 实用文案 文案大全 (6).准备临时表数据 准备临时表数据 准备数据, 临时表结构参见总账凭证表gl_accvouch数据字典 临时表名称为m_ZwPub.WbTableName 相同的coutno_id表示一张凭证 分录1:科目1001借方200 strSql=” insert in
8、to “ Pz_CX=2修改;Pz_LC=3联查 m_objPz.StartUpPz “PM“, “PM034“, Pz_ZD 8.回写凭证信息 回写凭证信息 通过事件回写凭证信息 Private Sub m_objPz_Save(rstCurrentVouch As ADODB.Recordset, IsSuccess As Boolean) Dim objCon As ADODB.Connection Set objCon = rstCurrentVouch.ActiveConnection - 代码略，注意使用objCon连接以保证统一的事务管理 回写费用单据凭证信息(一般回写coutno_id字段并通过它进行关联查询)，从而 实现不可重复生成凭证和联查凭证功能 - 实用文案 文案大全 IsSuccess = True End Sub