发布时间 : 星期一 文章AO数据采集—方正春元 - 财政总预算会计辅助帐处理方法更新完毕开始阅读20b9c5a2b0717fd5360cdc4e
ELSE 新预算单位编码 END )),' ','') AS VARCHAR(100)) ,
方向=(CASE WHEN LEFT(会计科目,1) IN (1,5) THEN '借' ELSE '贷' END) ,期初数
INTO U_总预算期初余额表 FROM 总预算会计账期初数表 A LEFT JOIN U_总预算科目1 B
ON A.会计科目=B.内码 AND A.业务年度=B.业务年度 LEFT JOIN U_预算单位 C
ON A.预算单位=C.内码 AND A.业务年度=C.业务年度 LEFT JOIN U_支出分类科目 DD
ON LEFT(A.预算科目,6)=DD.内码 AND A.业务年度=DD.业务年度
LEFT JOIN U_收入分类科目 E
ON LEFT(A.预算收入,9)=E.内码 AND A.业务年度=E.业务年度
WHERE A.帐套编码='0001' AND a.业务年度=2008 （七）生成新表-- U_总预算凭证，将新科目添加到新凭证里。SQL 语句如下：
SELECT A.业务年度,预算单位,预算单位外码=C.外码,预算单位名称=C.预算单位名称,支出科目=预算科目,支出科目外码=H.外码,支出科目名称=H.显示名称,预算收入,预算收入外码=I.外码,预算收入名称=I.显示名称,新科目
=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)),凭证月份,凭证号, 凭证日期,取号规则 AS 凭证类型,G1.用户姓名 AS 制单,G2.用户姓名 AS 审核,G3.用户姓名 AS 记账,G4.用户姓名 AS 主管,新摘要=CAST((CASE WHEN 新预算单位编码 IS NULL THEN '' ELSE '★单位-'+预算单位名称 END )+(CASE WHEN DD.新支出编码 IS NULL THEN '' ELSE '|●支出-'+DD.支出名称+'-'+H.显示名称 END )+(CASE WHEN 新收入编码 IS NULL THEN '' ELSE'|▲收入-'+收入名称+'-'+ I.显示名称 END )+(CASE WHEN J.显示名称 IS NULL THEN '' ELSE '|■业务处室-' + J.显示名称 END)+'|'+摘要+'|分录号-'+CAST(分类明细号 AS varCHAR(6)) AS VARCHAR(200)),借方金额,贷方金额,凭证状态,A.唯一号,附件数 INTO U_总预算凭证
FROM 总预算会计账凭证主表 A
LEFT JOIN dbo.总预算会计账凭证明细表 AA ON A.唯一号=AA.唯一号 LEFT JOIN U_总预算科目1 B
ON AA.会计科目=B.内码 AND AA.SET_YEAR=B.业务年度
LEFT JOIN U_预算单位 C
ON AA.预算单位=C.内码 AND AA.SET_YEAR=C.业务年度 LEFT JOIN U_支出分类科目 DD
ON LEFT(AA.预算科目,6)=DD.内码 AND AA.SET_YEAR=DD.业务年度
LEFT JOIN U_收入分类科目 E
ON LEFT(AA.预算收入,9)=E.内码 AND AA.SET_YEAR=E.业务年度
LEFT JOIN 凭证类别表 F
ON A.凭证类别=F.凭证类别 AND A.帐套编码=F.帐套编码
LEFT JOIN 用户信息 G1 ON A.制单人 = G1.用户编码 LEFT JOIN 用户信息 G2 ON A.审核人 = G2.用户编码 LEFT JOIN 用户信息 G3 ON A.记账人 = G3.用户编码 LEFT JOIN 用户信息 G4 ON A.财务主管 = G4.用户编码 LEFT JOIN 支出功能分类科目 H
ON (AA.预算科目)=H.内码 AND AA.SET_YEAR=H.业务年度
LEFT JOIN 收入分类科目 I
ON (AA.预算收入)=I.内码 AND AA.SET_YEAR=I.业务年度
LEFT JOIN dbo.业务科室 J
ON J.内码=AA.业务处室 AND AA.set_year=j.业务年度 WHERE AA.SET_YEAR=2008 AND A.帐套编码='0001' (八)将以上步骤生成的三张表：U_总预算科目_NEW、 U_总预算凭证、U_总预算期初余额表导入AO，通过中间表就可以生成有往来辅助帐的电子账簿。如下图：