ASL语言在非税收入审计中的应用实例，本文主要内容关键词为：税收论文,应用实例论文,语言论文,ASL论文，此文献不代表本站观点，内容供学术参考，文章仅供参考阅读下载。
审计脚本语言(ASL)是现场审计实施系统AO软件提供的嵌入式编程语言，全称是Audit Script Language。它根据审计业务特征需要，能将审计人员的专业思路，通过Pascal命令行的形式，实现计算机的自动处理。在非税收入审计中，审计人员可以利用ASL语言编写程序，存储为审计方法并编译执行，帮助发现非税收入征管上的违纪违规问题，并构建非税收入计算机审计经验模型。
在某市人民政府财政决算审计的项目中，审计人员决定应用AO软件对该市非税收入征管情况进行计算机审计。经了解，当地财政部门的非税收入信息管理系统由财务和业务两大模块组成，后台均为Oracle数据库。其中，业务模块数据量约为50多万条记录，主要的数据表包括：收费凭证主表、收费凭证明细表、系统单位表、系统预算科目表等，表间关系参见上图：
审计人员先在本地机上安装Oracle客户端软件，通过控制面板中的ODBC管理器配置数据源，连接成功后使用AO软件的数据导入功能，采集被审计单位的非税收入电子数据。数据导入完成后，再在AO中进行数据整理，实现审计业务中间表重建，这其中比较关键的有两点：一是通过多表关联生成“非税收入记录表”，参考的SQL语句为：Select A.凭证ID，A.凭证票号，A.日期，B.金额，C.预算科目名称，C.预算科目类别，D.单位名称Into非税收入记录表From（（收费凭证主表as A Inner Join收费凭证明细表as B On A.凭证ID=B.凭证ID）InnerJom系统预算科目表as C onB预算科目ID=C.预算科目ID）Inner Join系统单位表asD on A.单位ID=D单位ID；二是转换生成“已取消的收费项目表”，这主要来自于国务院和各地公布的失效收费项目文件，一般为Text或Excel格式，可通过AO软件将其导入。
其后，审计人员就可以利用AO软件提供的审计方法管理功能，编制ASL审计脚本语言，借助AO中的自动审计功能进行非税收入数据分析，从中发现有无违规收费、无依据收费、将预算内收入转入预算外等疑点线索。下面所列的就是其中两个典型应用实例：
（一）违规征收已明令取消的非税收入
具体方法是，将非税收入业务系统的收费数据，与国家和各地方公布的已取消收费项目的目录比对，查找有无征收已明令取消的政府性基金或行政性收费项目的行为，并逐项列示出具体的征收单位、征收项目、汇总收费金额。编写的ASL审计脚本语句如下：
／／说明：违规征收非税收入情况审计的ASL语句。非税收入的征收和管理，应严格依照法律、法规所确定的项目、范围、标准和程序执行。
Var qryData，qryCancel，strName，strValue，strType，a，b，sum；
Begin
qryData: =CreateQ（'Select预算科目名称as收费项目，Sum（金额）as收费金额，First（单位名称）as收费单位From非税收入记录表Group by预算科目名称′，-1）；
b:=QEof(qryData)；
While b#1Do
Begin
strName: =QFDValue（qryData，′收费项目′）；
qryCancel:=CreateQ
（′Select＊From已取消的收费项目表Where项目名称like'''+strName+''''，-1）；
a:=QEof(qryCancel)；
If a# 1 Then
Begin
strType:=QFDValue（qryData，′收费单位′）；
strValue:=QFDValue（qryData，′收费金额′）；
sum：=′收费单位：′+strType+′收费项目：′+strName+′收费金额：′；
Write(sum)；
Write(strValue)；
End；
b：=QMov(qryData，1)；
b：=QEof(qryData)；
End；
End.
通过编译执行ASL语句发现，该市劳动和社会保障局继续征收国家已明令取消的就业调节金、职工退休养老证工本费，两项非税收入金额合计60多万元。很明显，这样的做法是严重违规的，应及时予以纠正。（二）具体部门征收的非税收入项目和金额
具体方法是，输入某一个部门名称的关键字，ASL语句自动对该部门征收的非税收入进行分类汇总，通过图表直观显示出非税收入收费项目和统计金额，便于审计人员从中发现有无疑点问题。编写的ASL审计脚本语句如下：
／／说明：图表显示部门征收非税收入情况的ASL语句。
Var strEntity，qryChart，qryType，a，strType，strSum；
Begin
Read(strEntity)；
qryType：=CreateQ（′Select单位名称as单位，Sum（金额）as金额合计From非税收入记录表Where单位名称like″%，+strEntity+′%″Group by单位名称′，-1）；
a：=QEof(qryType)；
While a# 1 Do
Begin
strType：=QFDValue（qryType，′单位′）；
strSum：=QFDValue（qryTyPe，′金额合计′）；
Write(strType)；／／显示有哪些部门
Write(strSum)；／／显示收费汇总数字
a：=QMov(qryType，1)；
a：=QEof(qryType)；
End；
qryChart：='Select First（预算科目名称）as项目，Sum（金额）as收费金额From非税收入记录表where单位名称like″%′+strEntity+′%″Group by预算科目名称′；
OPutChart（qryChart，′项目′，′收费金额，clred′）
End.
审计人员由此发现地税局征收有一笔400万元的非税收入，如此大额的整数收费，却没有具体的收费项目名称，仅仅标记为“其他往来”。审计人员于是将其作为疑点线索进行追查，发现该市财政部门将地税局缴入的应纳入预算内的教育费附加收入400万元，作为预算外收入违规缴库。
对于经常使用或者比较复杂的ASL语句，审计人员可以将其保存为审计师方法，以后遇到类似的审计情形时，只需打开或稍加修改就可以直接调用了。在非税收入审计中灵活地应用ASL语言，可以有效地提高审计的效率和质量，有兴趣的审计人员应进一步加以研究，以更好地发挥ASL语言的作用。