如何利用Access查询采集用友8.x辅助帐(2)

　　2.生成新凭证表
　　⑴生成新凭证中间表。查询语句如下：
　　SELECT GL_accvouch.dbill_date AS 编制日期， GL_accvouch.ino_id AS 凭证编号， GL_accvouch.ccode AS 科目编码， GL_accvouch.md AS 借方金额， GL_accvouch.mc AS 贷方金额， GL_accvouch.cdigest AS 摘要， GL_accvouch.cperson_id AS 个人编码， Person.cPersonName, GL_accvouch.ccus_id AS 单位往来编码， Customer.cCusName, GL_accvouch.csup_id AS 应付款编码， Vendor.cVenName INTO 新凭证中间表
　　FROM Vendor RIGHT JOIN （Person RIGHT JOIN
　　（Customer RIGHT JOIN GL_accvouch ON Customer.
　　cCusCode = GL_accvouch.ccus_id） 
　　ON Person.cPersonCode = GL_accvouch.cperson_id） ON 
　　Vendor.cVenCode = GL_accvouch.csup_id
　　WHERE （（（GL_accvouch.dbill_date） Like ’2008*’） 
　　AND （（GL_accvouch.ino_id） Is Not Null））
　　ORDER BY GL_accvouch.dbill_date, GL_accvouch.ino_id;
　　⑵生成新凭证表。查询语句如下：
　　SELECT 新凭证中间表。编制日期， 新凭证中间表。凭证编号，
　　IIf（[单位往来编码] Is Not Null,IIf（Len（[单位往来编码]）=3,[科目编码]+’0’+Right（[单位往来编码],1），[科目编码]+Right（[单位往来编码],2）），
　　IIf（[应付款编码] Is Not Null,IIf（Len（[应付款编码]）=4,[科目编码]+’0’+Right（[应付款编码],1），[科目编码]+Right（[应付款编码],2）），
　　IIf（[个人编码] Is Not Null,IIf（Len（[个人编码]）=3,[科目编码]+’0’+Right（[个人编码],1），[科目编码]+Right（[个人编码],2）），[科目编码]））） AS 新科目编码，
　　新凭证中间表。借方金额， 新凭证中间表。贷方金额， 新凭证中间表。摘要 INTO 新凭证表
　　FROM 新凭证中间表；
　　3.生成新科目表
　　⑴生成科目表。查询语句如下：
　　SELECT code.ccode AS 科目编码， code.ccode_name AS 科目名称 INTO 科目表 FROM code;
　　⑵生成新科目表。查询语句如下：
　　SELECT * INTO 新科目表
　　FROM （SELECT DISTINCT
　　iif（[单位往来编码] Is Not Null,IIf（Len（[单位往来编码]）=3,科目表。科目编码+’0’+Right（[单位往来编码],1），科目表。科目编码+Right（[单位往来编码],2）），
　　IIf（[应付款编码] Is Not Null,IIf（Len（[应付款编码]）=4,科目表。科目编码+’0’+Right（[应付款编码],1），科目表。科目编码+Right（[应付款编码],2）），
　　IIf（[个人编码] Is Not Null,IIf（Len（[个人编码]）=3,科目表。科目编码+’0’+Right（[个人编码],1），科目表。科目编码+Right（[个人编码],2）），科目表。科目编码））） AS 新科目编码，
　　iif（[单位往来编码] Is Not Null,[ccusname],
　　iif（[应付款编码] Is Not Null,[cVenName],
　　iif（[个人编码] Is Not Null,[cPersonName],[科目名称]））） AS 新科目名称
　　FROM 新凭证中间表 RIGHT JOIN 科目表 ON 新凭证中间表。科目编码 = 科目表。科目编码
　　union select * from 科目表  union select 新科目编码，科目名称 from 新往来余额表） AS A;
　　㈢利用AO采集转换功能生成电子帐套
　　将以上在Access数据库中整理后形成的新科目表、新余额表和新凭证表，通过财务软件数据库采集方式导入AO，然后利用辅助导入向导按照提示输入即可完成。
　　㈣数据核对
　　数据导入AO完成后，需对操作的准确性进行判断。可从AO 的“审计分析/账表分析/报表审查”菜单生成被审计单位的资产负债表，与该单位的纸制报表进行核对；或“审计分析/账表分析/会计科目审查”界面，将科目树中的信息与被审计单位提供的纸制会计账簿进行核对。如果相符，则证明数据导入成功。
　　三、几点体会
　　审计人员在数据采集过程中遇到需要采集辅助帐的情况时，只要通过对数据库表进行认真分析，找出导入数据所需的关键数据表及其相互关系，就可以实现将辅助核算数据导入AO中。例如本例中通过Access查询实现导入往来辅助帐后，审计人员可以方便地在AO中对往来明细科目进行审查，极大地提高审计工作效率。