U8开发之会计凭证组件.docVIP

U8知识库文档 U8会计凭证组件 摘要 凭证组件是提供U8会计凭证录入、查询、修改、联查的界面交互组件。 适合于为各种原始单据或其他数据来源如excel并且需要用户交互，转换为会计凭证提供服务。完全后台生成会计凭证不适用此组件。 组件文件Us_pz.dll，部署于安装目录u8soft\UFCOMSQL。 概念说明 会计凭证：以原始单据如发票、收据等为依据，按照经济业务的事项的内容加以分类(以会计科目体现)，并据以确定会计分录(要素：会计科目、借贷金额)后所填制的会计凭证，是登入账簿的直接依据。 会计科目：按照经济业务的内容和经济管理的要求，对会计要素的具体内容进行分类核算的科目。 辅助核算：会计科目可设置辅助核算属性如客户、供应商、部门、项目等，用以补充会计分录其他辅助信息，如某笔收款的客户信息。 凭证类别：如收款凭证、付款凭证、转账凭证 目标 本文主要介绍凭证组件的基础知识，应用过程及相关注意事项，方便各类U8产品开发人员更好的使用凭证组件，更高效的开发产品。 如何使用凭证组件 1.初始化凭证组件 Dim WithEvents m_objPz As zzpz. clsPZ ‘声明为类变量，使用WithEvents关键字从而可以处理事件 set m_objPz = New zzpz.clsPZ Set m_objPz.zzLogin = m_login Set m_objPz.zzSys = m_ZwPub ‘总账公用函数ZzPub.clsPub 2.准备临时表数据,凭证组件对外数据接口主要是此临时表 准备临时表数据 ‘准备数据 , 临时表结构参见总账凭证表gl_accvouch数据字典 ‘临时表名称为m_ZwPub.WbTableName ‘相同的coutno_id表示一张凭证 ‘分录1:科目1001借方200 strSql=”insert into “ m_ZwPub.WbTableName “(ioutperiod,coutsign ,coutno_id,coutsysname,cbill,inid,ccode,dt_date,doutbilldate,bvouchedit,bvalueedit,bcodeedit,md) values(12,N项目, N123456,NPM,N m_login.cUserName ,1,N1001,2012-12-01,2012-12-01,1,1,1,200)” UfDb.Execute strSql ‘分录2:科目1002贷方200 strSql=”insert into “ m_ZwPub.WbTableName “(ioutperiod,coutsign ,coutno_id,coutsysname,cbill,inid,ccode,dt_date,doutbilldate,bvouchedit,bvalueedit,bcodeedit,mc) values(12,N项目, N123456,NPM,N m_login.cUserName ,1,N1002,2012-12-01,2012-12-01,1,1,1,200)” UfDb.Execute strSql gl_accvouch数据字典 Column Name Description Datatype Length Allow Nulls i_id 自动编号? int 4? False? iperiod 会计期间? tinyint 1? False? csign 凭证类别字? nvarchar 8? True? isignseq 凭证类别排序号? int 4? True? ino_id 凭证编号? smallint 2? True? inid 行号? smallint 2? False? dbill_date 制单日期? datetime 8? False? idoc 附单据数? smallint 2? False? cbill 制单人? nvarchar 20? True? ccheck 审核人? nvarchar 20? True? cbook 记账人? nvarchar 20? True? ibook 记账标志? tinyint 1? False? ccashier 出纳签字人? nvarchar 20? True? iflag 凭证标志? tinyint 1? True? ctext1 凭证头自定义项1? nvarchar 10? True? ctext2 凭证头自定义项2? nvarchar 10? True? cdigest 摘要? nvarchar 120? True? ccod