资源描述：
《孤儿基本生活保障经费计算机审计方法》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。
1、孤儿基本生活保障经费计算机审计方法一、方法代码GGE二、方法名称孤儿基本生活保障经费的计算机审计方法三、目标功能审计目标：检查孤儿基本生活保障经费发放的真实性、合规性和效益性。审计功能：通过民政部门提供的孤儿基本生活保障经费发放表、依法收养人员信息表，城镇低保发放表、农村低保发放表、农村五保发放表进行比对、筛选，从而实现审计目标，发挥审计监督作用。四、审计事项社会保障审计/其他社保审计/孤儿基本生活保障经费孤儿基本生活保障经费的审计方法所需数据资料见表1。表1孤儿基本生活保障经费的审计方法所需数据资料
2、序号数据资料名称结构化非结构化半结构化1孤儿基本生活保障经费发放表√2依法收养人员信息表√3城镇低保补助表√４农村低保补助表√5农村五保补助发放表√（1）基础表：孤儿基本生活保障经费发放表。数据元素：姓名、性别、年龄、身份证号码、儿童现住址、补助金额（2）基础表：依法收养人员信息表。数据元素：被收养人姓名、性别、年龄、身份证号、收养人姓名、被收养人现住址（3）基础表：城镇低保补助表。数据元素：户主姓名，身份证号，补助金额。（4）基础表：农村低保补助表。数据元素：姓名，身份证号，家庭人口，家庭住址，补助
3、金额。（5）基础表：农村五保补助发放表。数据元素：姓名，身份证号，性别、家庭住址。六、分析步骤步骤内容1检查是否存在孤儿在依法收养的情况下，领取孤儿保障资金。通过身份证号孤儿保障金发放表与依法收养人员信息表进行比对，如有，则视为疑点。2检查是否存在孤儿年满18周岁，且没有在校学习，领取孤儿保障资金。2.1通过对身份证号的长度进行分析，改正一些不规范的身份证号。通过对十五位身份证号进行分析，检查是否存在孤儿年满18周岁，且没有在校学习，领取孤儿保障经费。2.2通过对十八位身份证号进行分析，检查是否存在孤
4、儿年满18周岁，且没有在校学习，领取孤儿保障经费。3检查孤儿是否存在重复享受农村低保、农村五保、城镇低保等。3.1通过孤儿孤儿基本生活保障经费发放表与农村低保补助表相比对，检查是否存在双重享受的情况。3.2通过孤儿孤儿基本生活保障经费发放表与农村五保补助发放表相比对，检查是否存在双重享受的情况。3.3通过孤儿孤儿基本生活保障经费发放表与城镇低保补助表发放表相比对，检查是否存在双重享受的情况。七、流程图八、方法语言步骤内容1varCx,Bz,Sk;//定义变量Cx:查询，Bz:标志，Je:金额begin
5、Cx:=CreateQ('Select*From孤儿基本生活保障经费发放表WHERE身份证号in(Select身份证号From依法收养人员信息表)',-1);//打开表Bz:=qeof(Cx);//判断是否为空ifBz#1then//循环开始直到Bz=1结束beginrepeatSk:=QFDValue(Cx,'身份证号');//取'身份证号'字段的值AddTransRslt(Cx,'身份证号');//判断，成立插入未落实疑点临时表Bz:=qmov(Cx,1);//下移一行Bz:=qeof(Cx);/
6、/判断是否为空untilBz=1;//循环结束end;TransBatch(Cx,'依法收养孤儿领取孤儿保障资金');//把业务数据疑点丛临时表导出写入正式表ShowMsg('记录已成功插入到未落实业务疑点库中');end.2.1varCx,Bz,Sk;//定义变量Cx:查询，Bz:标志，Je:金额beginCx:=CreateQ('select*from孤儿基本生活保障经费发放表where(111-Substring(身份证号,7,2))>=18andlen([身份证号])=15',-1);//打开
7、表Bz:=qeof(Cx);//判断是否为空ifBz#1then//循环开始直到Bz=1结束beginrepeatSk:=QFDValue(Cx,'身份证号');//取'身份证号'字段的值AddTransRslt(Cx,'身份证号');//判断，成立插入未落实疑点临时表Bz:=qmov(Cx,1);//下移一行Bz:=qeof(Cx);//判断是否为空untilBz=1;//循环结束end;TransBatch(Cx,'身份证号十五位年满18周岁孤儿领取孤儿保障资金');//把业务数据疑点丛临时表导出
8、写入正式表ShowMsg('记录已成功插入到未落实业务疑点库中');end.2.2varCx,Bz,Sk;//定义变量Cx:查询，Bz:标志，Je:金额beginCx:=CreateQ('select*from孤儿基本生活保障经费发放表where(2011-Substring(身份证号,7,4))>=18andlen(身份证号)=18',-1);//打开表Bz:=qeof(Cx);//判断是否为空ifBz#1then//循环开始直到Bz=1结束begin
