方正春元财政总预算会计辅助帐处理方法文档格式.docx

1、1.内码 （会计收入编码）2.外码（财政预算收入科目编码）3.显示名称 4.是否底级5.业务年度6.级次（二）支出功能分类科目。1.内码 （会计支出编码）2.外码（财政预算支出功能科目编码）3.显示名称 （三）预算单位。1.内码 2.外码3.显示名称 4.是否底级5.业务年度 6.级次（四）会计科目。5.账套编码 6.业务年度（五）总预算会计账期初数表1.业务年度 2.会计科目3.期初数 4.预算单位5.预算科目 6.账套编码7.预算收入（六）总预算会计账凭证主表1.唯一号 2.业务年度3.凭证月份 4.凭证号5.凭证类别 6.凭证日期7.附件数 8.制单人9.审核人 10.记账人11.财务主

2、管 12.凭证状态13.账套编码（七）总预算会计账凭证明细表1.唯一号 2.分类明细号3.会计科目摘要 4.借方金额5.贷方金额 6.预算单位7.预算科目 8.预算收入9.set_year 10.账套编码11.业务处室（八）凭证类别表1.凭证类别 2.账套编码3.业务年度 4.取号规则（九）用户信息1.用户编码 2.用户姓名（十）账套管理表1.账套编码 2.账套名称3.业务年度 4.当前会计月份5.是否年结 6.财务主管7.账套联系 8.是否初始化确认（十一）业务科室3.显示名称 4.级次5.是否底级 6.业务年度五、审计步骤。辅助账处理的核心就是将辅助科目做为明细科目添加到科目表里，形成一个

3、包含有辅助科目的完整科目表。方正春元财政总预算会计内有三种主要辅助科目，支出功能分类科目、收入分类科目和预算单位。我国从2007年度全面实施政府收支分类改革。新的政府收支分类主要包以下方面的内容；第一，收入分类科目分设类、款、项、目四级。收入分类科目的编码以1开头,以3222规则编码，如下图：类级科目按照收入形式设置，包括：税收收入、社会保险基金收入、非税收入、贷款转贷回收本金收入、债务收入、转移性收入。款级科目主要按照收入来源划分，如国内增值税、进口增值税、行政事业性收费收入等等。项级科目主要按照收入来源的所有制结构设置录入，如股份制企业所得税、集体企业所得税、审计行政事业性收费收入等等。目

4、级科目是收入类明细科目。第二，支出功能分类科目分设类、款、项三级。支出功能分类科目的编码以2开头,以322规则编码，如下图：类级科目综合反映政府的职能活动，如国防、教育、社会保障、环境保护等；款级科目反映为完成某项政府职能所进行的某一方面的工作，如“教育类”下的“普通教育”款；项级科目反映为完成某一方面的工作所发生的具体支出事项，如“水利”款下的“抗旱”、“水土保持”等。我们在财政审计关心政府的职能活动，对资金收支的进行整体分析，侧重分析财政资金使用的效益，然后再根据资金流动方向延伸到某个具体单位。根据这样审计思路，我们把扩展位数的科目作为上一级科目,收支科目放在次末级科目，预算单位放在末级科

5、目，确定新科目表结构如下：处理新科目的关键将添加的辅助科目作为末级科目添加，难点是并要保持科目编码的规范性，新添加的末级科目不能和原来的末级科目编码重复对应级次科目长度要保持一致。要考虑的未来经济发展，预算单位会增加，我们将预算单位编码设置为6位，以88XXXX为编码规则，相应的收入和支出功能科目和扩展位数的科目表二级以下科目都需要扩容到6位。处理步骤如下（附件二：方正春元财政总预算会计往来处理SQL语句）：（一）生成新表U_收入分类科目。原会计科目表收入科目已经有类级，这里只处理款和项级。SQL 语句如下：SELECT TOP 100 PERCENT 内码,外码,显示名称 AS 收入名称,

6、业务年度, 新收入编码=CAST（CASE WHEN LEN（内码）=6 THEN 内码 WHEN LEN（内码）=9 THEN LEFT（内码,6） +000 + RIGHT（内码,3） END） AS VARCHAR（100）INTO U_收入分类科目 FROM 收入分类科目WHERE 业务年度=2008 ORDER BY 内码（二）生成新表U_支出分类科目。根据审计需要，处理到类和款级。SELECT TOP 100 PERCENT 内码,外码,显示名称 AS 支出名称,业务年度,新支出编码=CAST（CASE WHEN LEN（内码）=3 THEN 990+内码 WHEN LEN（内码）

7、=6 THEN + LEFT（内码,3）+RIGHT（内码,3）END） AS VARCHAR（50）INTO U_支出分类科目FROM 支出功能分类科目where 业务年度=2008 ORDER BY 内码（三）生成新表- U_预算单位。并给预算单位编码赋新值。SELECT TOP 100 PERCENT 内码,外码,显示名称 AS 预算单位名称,业务年度,新预算单位编码=cast（000000 AS VARCHAR（6）INTO U_预算单位 FROM 预算单位WHERE 业务年度=2008 ORDER BY 显示名称GODECLARE cur CURSOR FOR SELECT 内码,外

8、码, 预算单位名称,业务年度,新预算单位编码 FROM U_预算单位FOR UPDATE DECLARE 内码 char（50）,外码 char（20）,预算单位名称 CHAR（100）,业务年度 CHAR（4）,新预算单位编码 CHAR（6）DECLARE Tmp新编码 char（6）SET Tmp新编码=880000 OPEN cur FETCH NEXT FROM cur INTO 内码 ,外码,预算单位名称,业务年度,新预算单位编码WHILE FETCH_STATUS = 0 BEGIN SET Tmp新编码=Tmp新编码+1 Update U_预算单位 Set 新预算单位编码= Tm

9、p新编码 WHERE CURRENT OF CUR END CLOSE cur DEALLOCATE cur （四）生成新表INTO U_总预算科目。将二级以下科目扩到6位。SELECT DISTINCT 新科目编码=（CASE WHEN LEN（内码）=3 THEN 内码 WHEN LEN（内码）=6 THEN LEFT（内码,3）+RIGHT（内码,3） WHEN LEN（内码）=9 THEN LEFT（内码,3）+SUBSTRING（内码,4,3） +RIGHT（内码,3） WHEN LEN（内码）=12 THEN LEFT（内码,3）+SUBSTRING（内码,4,3）+SUBSTRI

10、NG（内码,7,3） +RIGHT（内码,3） END ）,科目名称=显示名称,业务年度,方向=（CASE WHEN 余额方向=1 THEN 借 ELSE 贷 END）,内码 ,帐套编码INTO U_总预算科目1FROM 会计科目where 帐套编码=0001 AND 业务年度=2008（五）将从余额表和凭证表提取添加了辅助科目的末级科目与上一步骤生成的新表合并，最终生成新科目表U_总预算科目_NEW。SELECT 新科目编码,科目名称,业务年度,方向 INTO U_总预算科目_NEWFROM U_总预算科目11.余额表提取科目-扩展位数的科目+预算单位UNION SELECT 新科目=新科目

11、编码 +新预算单位编码 ,科目名称=预算单位名称,A.业务年度,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5）THEN END）FROM 总预算会计账期初数表 AJOIN U_预算单位 BON A.预算单位=B.内码 AND A.业务年度=B.业务年度JOIN U_总预算科目1 CON A.会计科目=c.内码 AND A.业务年度=C.业务年度where A.业务年度 =2008 AND （预算科目 IS NULL and 预算收入 IS NULL）-扩展位数的科目+支出科目款+预算单位UNIONSELECT 新科目=新科目编码+CC.新支出编码+新预算单位编码, 科目

12、名称=预算单位名称,A.业务年度,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5）THEN FROM dbo.总预算会计账期初数表 AJOIN U_支出分类科目 CCON LEFT（A.预算科目,6）=CC.内码 AND A.业务年度=CC.业务年度JOIN U_总预算科目1 DON A.会计科目=D.内码 AND A.业务年度=D.业务年度where A.业务年度 =2008-扩展位数的科目+收入+预算单位 SELECT 新科目= 新科目编码+新收入编码+新预算单位编码, 科目名称=预算单位名称,A.业务年度,方向=（CASE WHEN LEFT（会计科目,1） IN

13、（1,5）THEN JOIN U_收入分类科目 CON LEFT（A.预算收入,9）=C.内码 AND A.业务年度=C.业务年度-扩展位数的科目+收入科目 SELECT 新科目=新科目编码+新收入编码,科目名称=收入名称,A.业务年度,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5）THEN ON LEFT（A.预算收入,6）=C.内码 AND A.业务年度=C.业务年度WHERE A.业务年度 =2008SELECT 新科目=新科目编码+新收入编码,科目名称=收入名称,A.业务年度,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5）THEN -扩展

14、位数的科目+支出类科目SELECT 新科目=新科目编码+新支出编码,科目名称=支出名称,A.业务年度,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5）THEN JOIN U_支出分类科目 CON LEFT（A.预算科目,3）=C.内码 AND A.业务年度=C.业务年度-扩展位数的科目+支出款科目SELECT 新科目=新科目编码+CC.新支出编码,科目名称=CC.支出名称,A.业务年度,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5）THEN 2.凭证提取会计科目SELECT DISTINCT 新科目=新科目编码+新预算单位编码, 科目名称=预算单位

15、名称,业务年度=A.SET_year ,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5） THEN END） FROM 总预算会计账凭证明细表 ALEFT JOIN U_总预算科目1 BON A.会计科目=B.内码 AND A.SET_YEAR=B.业务年度LEFT JOIN U_预算单位 CON A.预算单位=C.内码 AND A.SET_YEAR=C.业务年度where A.SET_YEAR =2008 AND（ 预算科目 IS NULL AND 预算收入 IS null）-扩展位数的科目+支出+预算单位SELECT DISTINCT 新科目=新科目编码+DD.新支出

16、编码+新预算单位编码, 科目名称=预算单位名称,业务年度=A.SET_year ,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5） THEN JOIN U_总预算科目1 BJOIN U_预算单位 CJOIN U_支出分类科目 DDON LEFT（A.预算科目,6）=DD.内码 AND A.SET_YEAR=DD.业务年度where A.SET_YEAR =2008 -扩展位数的科目+收入+预算单位SELECT DISTINCT 新科目=新科目编码+新收入编码+新预算单位编码,科目名称=预算单位名称,业务年度=A.SET_year ,方向=（CASE WHEN LEFT（会

17、计科目,1） IN （1,5） THEN JOIN U_收入分类科目 DON LEFT（A.预算收入,9）=D.内码 AND A.SET_YEAR=D.业务年度where A.SET_YEAR =2008-扩展位数的科目+收入SELECT DISTINCT 新科目=新科目编码+新收入编码,科目名称=收入名称,业务年度=A.SET_year ,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5） THEN ON left（A.预算收入,6）=D.内码 AND A.SET_YEAR=D.业务年度WHERE A.SET_YEAR =2008ON left（A.预算收入,9）=D.内

18、码 AND A.SET_YEAR=D.业务年度SELECT DISTINCT 新科目=新科目编码+新支出编码,科目名称=支出名称,业务年度=A.SET_year ,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5） THEN JOIN U_支出分类科目 DON LEFT（A.预算科目,3）=D.内码 AND A.SET_YEAR=D.业务年度SELECT DISTINCT 新科目=新科目编码+DD.新支出编码,科目名称=DD.支出名称,业务年度=A.SET_year ,方向=（CASE WHEN LEFT（会计科目,1） IN （1,5） THEN -删除NULL之值记录D

19、ELETE FROM U_总预算科目_NEWWHERE 新科目编码 IS NULL（六）生成新表U_总预算期初余额表。将新科目编码添加到新余额表里。SELECT A.业务年度,新科目=CAST（REPLACE（新科目编码+（CASE WHEN DD.新支出编码 IS NULL THEN ELSE DD.新支出编码 END ）+（CASE WHEN 新收入编码 IS NULL THEN ELSE 新收入编码 END ）+（CASE WHEN 新预算单位编码 IS NULL THEN ELSE 新预算单位编码 END ）, ,） AS VARCHAR（100） ,方向=（CASE WHEN LEF

20、T（会计科目,1） IN （1,5） THEN END） ,期初数 INTO U_总预算期初余额表ON A.会计科目=B.内码 AND A.业务年度=B.业务年度ON A.预算单位=C.内码 AND A.业务年度=C.业务年度LEFT JOIN U_支出分类科目 DDON LEFT（A.预算科目,6）=DD.内码 AND A.业务年度=DD.业务年度LEFT JOIN U_收入分类科目 EON LEFT（A.预算收入,9）=E.内码 AND A.业务年度=E.业务年度WHERE A.帐套编码= AND a.业务年度=2008（七）生成新表- U_总预算凭证，将新科目添加到新凭证里。SELECT A.业务年度,预算单位,预算单位外码=C.外码,预算单位名称=C.预算单位名称,支出科目=预算科目,支出科目外码=H.外码,支出科目名称=H.显示名称,预算收入,预算收入外码=I.外码,预算收入名称=I.显示名称,新科目=CAST（REPLACE（新科目编码+（CASE WHEN DD.新支出编码 IS NULL THEN ELSE DD.新支出编码 END ）+（CASE WHEN 新收入编码 IS NULL THEN ） AS VARCHAR（100）,凭证月份,凭证号, 凭证日期,取号规则 AS 凭