農(nóng)村居民最低生活保障資金審計方法.doc

農(nóng)村低保標(biāo)準(zhǔn)執(zhí)行情況計算機(jī)審計方法一、方法代碼二、方法名稱農(nóng)村低保標(biāo)準(zhǔn)執(zhí)行情況計算機(jī)審計方法三、目標(biāo)功能審計目標(biāo)：農(nóng)村居民最低生活保障政策的執(zhí)行，難點(diǎn)在于申請對象家庭貨幣收入和財產(chǎn)收入的認(rèn)定，重點(diǎn)在于審批對象的合法性、合理性和平衡性，焦點(diǎn)在于生活水平明顯高于最低生活保障水平的對象享受低保政策后引發(fā)一些社會矛盾。此審計方法主要檢查農(nóng)村居民最低生活保障對象收入認(rèn)定的準(zhǔn)確性，享受資格的合法性、合理性，名冊資料的真實(shí)性。審計功能：將社會救助部門實(shí)際執(zhí)行的發(fā)放明細(xì)表與從工商部門取得的企業(yè)和個體工商戶注冊資料、從交警車管部門取得的車輛上戶資料、從財政部門取得的房產(chǎn)契稅征收明細(xì)資料、從社會勞動保險部門取得的離退休人員退休金發(fā)放資料相關(guān)聯(lián)，檢查保障對象資格認(rèn)定的合法性，通過與各部門的數(shù)據(jù)關(guān)聯(lián)，發(fā)現(xiàn)和核實(shí)疑點(diǎn)，實(shí)現(xiàn)審計目標(biāo)，發(fā)揮審計監(jiān)督作用。四、所屬審計事項分類基礎(chǔ)管理規(guī)范性審查違規(guī)審批、發(fā)放低保金五、所需數(shù)據(jù)（一）社會救助業(yè)務(wù)流程：1、農(nóng)村低保申請審批程序。個人申報村委會入戶調(diào)查民主評議小組評議公布初審合格對象填寫申報表取證鄉(xiāng)鎮(zhèn)（民政所）入戶調(diào)查鄉(xiāng)鎮(zhèn)（民政所）審核公布準(zhǔn)保對象名單區(qū)縣（市）民政局入戶調(diào)查（抽樣）區(qū)縣（市）民政局審批張榜公布保障對象發(fā)放低保保障金領(lǐng)取證兌現(xiàn)領(lǐng)取2、低保金發(fā)放程序。個人申報收入村委會入戶測算民主評議小組評議社會救助局審定救助標(biāo)準(zhǔn)民政資金專戶下?lián)苜Y金銀行（村委會）按季發(fā)放低保對象憑證領(lǐng)取銀行（村委會）及時報送領(lǐng)取花名冊財務(wù)憑冊作賬（二）所需數(shù)據(jù)和資料根據(jù)本審計方法的目標(biāo)與功能定位，確定所需數(shù)據(jù)和相關(guān)資料，包括電子數(shù)據(jù)和紙質(zhì)資料。如下表：序號數(shù)據(jù)資料名稱結(jié)構(gòu)化非結(jié)構(gòu)化半結(jié)構(gòu)化1農(nóng)村居民最低生活保障金發(fā)放明細(xì)表（2009年四季度）2汽車上戶明細(xì)表（2000-2009年度）3摩托車上戶明細(xì)表（2003-2009年度）4工商注冊登記明細(xì)表（2000-2009年度）5社保退休人員表（2000-2009年度）6企業(yè)退休人員養(yǎng)老保險金發(fā)放明細(xì)表（2008-2009年度）7房產(chǎn)交易契稅征收明細(xì)表（2005-2009年度）本審計方法所需的數(shù)據(jù)資料，主要來自該審計方法所對應(yīng)的審計數(shù)據(jù)規(guī)劃的基礎(chǔ)表或分析表及其數(shù)據(jù)元素。其中車輛上戶資料源于交警車管部門，工商注冊登記表源于工商管理部門，社保退休人員表和企業(yè)退休人員養(yǎng)老保險金發(fā)放明細(xì)表源于勞動局社會勞動養(yǎng)老保險部門，房產(chǎn)交易契稅征收明細(xì)表源于財政農(nóng)稅契稅征收管理部門，也可在房產(chǎn)管理部門取得房產(chǎn)證辦理的相關(guān)資料。1、基礎(chǔ)表：農(nóng)村居民最低生活保障金發(fā)放明細(xì)表。數(shù)據(jù)元素：戶主姓名，身份證號碼，銀行帳號，季度金額，救助類別，地址。2、基礎(chǔ)表：汽車上戶明細(xì)表。數(shù)據(jù)元素：初次登記日期，車輛類型，車輛型號，中文品牌，號牌號碼，強(qiáng)制報廢期止，身份證號碼，機(jī)動車所有人，住所詳細(xì)地址。3、基礎(chǔ)表：摩托車上戶明細(xì)表。數(shù)據(jù)元素：初次登記日期，車輛類型，車輛型號，中文品牌，號牌號碼，強(qiáng)制報廢期止，身份證號碼，機(jī)動車所有人，住所詳細(xì)地址。4、基礎(chǔ)表：工商注冊登記明細(xì)表。數(shù)據(jù)元素：公司名稱，法定代表人，注冊資本，成立日期，法定代表人證件號碼。5、基礎(chǔ)表：社保退休人員表。數(shù)據(jù)元素：社會保障號，個人帳戶，姓名，性別，出生年月，工作年月，建帳時間，離退時間，離退類別，家庭住址。6、基礎(chǔ)表：企業(yè)退休人員養(yǎng)老保險金發(fā)放明細(xì)表。數(shù)據(jù)元素：單位代碼DW01，帳號GR03，姓名GR04, 發(fā)放年月TXMX02，工資額TXMX04，家庭住址TX52。7、基礎(chǔ)表：房產(chǎn)交易契稅征收明細(xì)表。數(shù)據(jù)元素：完稅證號碼，繳款書號碼，繳款時間，納稅人名稱，證件號碼，權(quán)屬轉(zhuǎn)移性質(zhì)，房產(chǎn)類型，計稅金額，實(shí)納金額。六、分析步驟由于農(nóng)村居民最低生活保障實(shí)行按季發(fā)放、動態(tài)管理的原則，各個季度的享受對象、戶數(shù)、人數(shù)和享受標(biāo)準(zhǔn)都可能存在差異，分析以某一個季度的發(fā)放數(shù)據(jù)（2009年4季度）為例。將以上業(yè)務(wù)數(shù)據(jù)導(dǎo)入到AO軟件中。以下所有步驟和SQL語句都在AO軟件中進(jìn)行。（一）農(nóng)村五保戶重復(fù)享受農(nóng)村低保情況步驟一：源數(shù)據(jù)清理（1）刪除“某季度農(nóng)村低保發(fā)放表”中“季度金額”為零的記錄。（2）刪除身份證號碼中的空格。步驟二：建立中間表將五保戶和低保戶從發(fā)放表中分離。五保戶和農(nóng)村低保戶屬于兩種不同的社會保障類型，享受五保戶的對象不得重復(fù)享受低保政策。為了簡化手續(xù)，社會救助部門將每個季度五保戶和低保戶上卡發(fā)放申請同時提交財政部門，并在同一數(shù)據(jù)表中體現(xiàn)，為了便于查詢，以“救助類別”為標(biāo)志，分別建立“五保資金季度發(fā)放表”和“低保資金季度發(fā)放表”。步驟三：查詢重復(fù)享受兩項低保政策的發(fā)放記錄以身份證號碼為聯(lián)接查詢條件，通過SQL語句將“五保資金季度發(fā)放表”和“低保資金季度發(fā)放表”聯(lián)接查詢，得出審計結(jié)果。（二）企業(yè)業(yè)主和個體工商戶享受農(nóng)村低保和五保情況步驟一：源數(shù)據(jù)清理（1）刪除“工商注冊登記表”中“法定代表人證件號碼”為空的記錄。（2）刪除身份證號碼中的空格。步驟二：聯(lián)接查詢以身份證號碼為聯(lián)接查詢條件，通過SQL語句將“低保資金季度發(fā)放明細(xì)表”和“工商注冊登記表”聯(lián)接查詢，得出審計結(jié)果。（三）汽車所有者享受農(nóng)村低保和五保情況汽車所有者雖然沒有在法規(guī)政策中明確提出，但這種情況明顯屬于收入或資產(chǎn)核定不實(shí)，審批把關(guān)或動態(tài)管理不嚴(yán)。步驟一：源數(shù)據(jù)清理：（1）刪除“汽車上戶明細(xì)表”中“身份證明號碼”為空的記錄。（2）刪除身份證明號碼中的空格。步驟二：聯(lián)接查詢以身份證號碼為聯(lián)接查詢條件，通過SQL語句將“低保資金季度發(fā)放明細(xì)表”和“汽車上戶明細(xì)表”（包括大車、低速車、小車）聯(lián)接查詢，得出審計結(jié)果。（四）摩托車所有者享受農(nóng)村低保和五保情況步驟一：源數(shù)據(jù)清理：（1）刪除“摩托車上戶明細(xì)表”中“身份證明號碼”為空的記錄。（2）刪除身份證明號碼中的空格。步驟二：聯(lián)接查詢以身份證號碼為聯(lián)接查詢條件，通過SQL語句將“低保資金季度發(fā)放明細(xì)表”和“摩托車上戶明細(xì)表”聯(lián)接查詢，得出審計結(jié)果。（五）房產(chǎn)交易納稅人受農(nóng)村低保和五保情況以身份證號碼為聯(lián)接查詢條件，通過SQL語句將“低保資金季度發(fā)放明細(xì)表”和“房產(chǎn)交易契稅征繳明細(xì)表”聯(lián)接查詢，得出審計結(jié)果。（六）社保離退人員享受農(nóng)村低保和五保情況步驟一：源數(shù)據(jù)清理刪除“社保退休人員表”中“社會保障號”和“個人帳號”中的空格。步驟二：建立中間表社保離退人員某月養(yǎng)老保險金發(fā)放信息表。在社會勞動保險部門取得“企業(yè)退休人員養(yǎng)老保險金發(fā)放明細(xì)表”和“社保退休人員表”，由于發(fā)放明細(xì)表中只有退休金發(fā)放的時間、金額等相關(guān)信息，沒有身份證號碼、離退休時間等數(shù)據(jù)元素，需以兩表為依據(jù)建立發(fā)放詳表。步驟三：查詢同一時間段領(lǐng)取退休金和低保資金的記錄以身份證號碼為聯(lián)接查詢條件，通過SQL語句將“低保資金季度發(fā)放明細(xì)表”和“社保離退人員某月養(yǎng)老保險金發(fā)放詳表”聯(lián)接查詢，得出審計結(jié)果。（七）身份證號碼異常情況1、從位數(shù)查詢無效身份證號碼一、二代身份證號碼分別為15位和18位，其他位數(shù)長度均為無效號碼。通過SQL語句，使用Len函數(shù)直接查詢得出審計結(jié)果。2、從年齡查詢無效身份證號碼在身份證號碼中，使用Mid函數(shù)通過計算，篩選出年齡在90歲以上和18歲以下的記錄，將結(jié)果與對象備案表進(jìn)行核對，發(fā)現(xiàn)疑點(diǎn)（發(fā)放表以戶為單位，看未成年人享受低保是否屬于孤兒，重點(diǎn)關(guān)注100歲以上和1歲以下記錄）步驟一：從15位證中檢查由于使用的低保數(shù)據(jù)的發(fā)放時間為2009年末，身份證號碼中記載年度的字符為2位，以109減去身份證號碼中的第7至8位得出年齡，篩選出過高和或低的記錄。步驟二：從18位證中檢查身份證號碼中記載年度的字符為4位，以2009減去身份證號碼中的第7至10位得出年齡，篩選出過高和或低的記錄。（八）同銀行帳號不同身份情況每一個低保戶均注冊了自己的銀行卡，財政部門將每次低保資金按時發(fā)放到各自的銀行卡中，查出銀行帳號相同而戶主和身份證號碼不同的記錄進(jìn)行核對。七、流程圖1.流程一八、方法語言（一）農(nóng)村五保戶重復(fù)享受農(nóng)村低保情況/定義變量Var SqlStr;CurQuery;IsEmpty;BeginShowMsg(清除空格及空記錄！);/清除某季度農(nóng)村低保發(fā)放表中季度金額為零的記錄SqlStr:=DELETE FROM 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ WHERE 季度金額=0;ExecuteUpdate(SqlStr);/清除身份證號碼中的空格SqlStr:=UPDATE 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ SET 身份證號碼=trim(身份證號碼);ExecuteUpdate(SqlStr);/將五保戶和低保戶從發(fā)放表中分離SqlStr:=Select * From 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ WHERE 救助類別 LIKE %低%;CreateTempTable(低保資金季度發(fā)放表,SqlStr);SqlStr:=Select * From 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ WHERE 救助類別 NOT LIKE %低%;CreateTempTable(五保資金季度發(fā)放表,SqlStr);/審查重復(fù)享受兩項低保政策的發(fā)放記錄情況SqlStr:=Select S1.戶主姓名,S1.身份證號碼,S1.救助類別 AS 農(nóng)村五保, S1.季度金額 +AS 五保發(fā)放額,S2.救助類別 AS 農(nóng)村低保 ,S2.季度金額 AS 低保發(fā)放額 From +五保資金季度發(fā)放表 AS S1 INNER JOIN 低保資金季度發(fā)放表 AS S2 ON S1.戶主姓名+=S2.戶主姓名 AND S1.身份證號碼=S2.身份證號碼;CurQuery:=CreateQ(SqlStr,-1);/查詢結(jié)果集是否為空IsEmpty:=Qeof(CurQuery);if IsEmpty1 thenbegin/循環(huán)將查詢結(jié)果存入業(yè)務(wù)疑點(diǎn)臨時庫repeatAddTransRslt(CurQuery,重復(fù)享受兩項低保政策的發(fā)放情況審計疑點(diǎn));IsEmpty:=Qmov(CurQuery,1);IsEmpty:=Qeof(CurQuery);until IsEmpty=1;/將臨時庫結(jié)果集存入疑點(diǎn)庫TransBatch(CurQuery,重復(fù)享受兩項低保政策的發(fā)放情況審計疑點(diǎn)); end;ShowMsg(插入重復(fù)享受兩項低保政策的發(fā)放情況審計疑點(diǎn)成功！);End.（二）企業(yè)業(yè)主和個體工商戶享受農(nóng)村低保和五保情況/定義變量Var SqlStr;CurQuery;IsEmpty;BeginShowMsg(清除空格及空記錄！);/清除工商注冊登記表中法定代表人證件號碼為空的記錄SqlStr:=DELETE FROM 業(yè)務(wù)_源_工商注冊$ WHERE 法定代表人證件號碼 IS NULL;ExecuteUpdate(SqlStr);/清除身份證號碼中的空格SqlStr:=UPDATE 業(yè)務(wù)_源_工商注冊$ SET 法定代表人證件號碼=trim(法定代表人證件號碼);ExecuteUpdate(SqlStr);/審查企業(yè)業(yè)主和個體工商戶享受農(nóng)村低保和五保情況SqlStr:=SELECT S1.戶主姓名,S1.地址,S1.身份證號碼,S1.救助類別,S1.季度金額,+S2.公司名稱,S2.法定代表人,S2.注冊資本,S2.成立日期,S2.法定代表人證件號碼 +AS 證件號碼 FROM 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ AS S1 inner JOIN 業(yè)務(wù)_源_工商注冊$ +AS S2 ON S1.戶主姓名=S2.法定代表人 AND S1.身份證號碼=S2.法定代表人證件號碼;CurQuery:=CreateQ(SqlStr,-1);/查詢結(jié)果集是否為空IsEmpty:=Qeof(CurQuery);if IsEmpty1 thenbegin/循環(huán)將查詢結(jié)果存入業(yè)務(wù)疑點(diǎn)臨時庫repeatAddTransRslt(CurQuery,企業(yè)業(yè)主和個體工商戶享受農(nóng)村低保和五保情況審計疑點(diǎn));IsEmpty:=Qmov(CurQuery,1);IsEmpty:=Qeof(CurQuery);until IsEmpty=1;/將臨時庫結(jié)果集存入疑點(diǎn)庫TransBatch(CurQuery,企業(yè)業(yè)主和個體工商戶享受農(nóng)村低保和五保情況審計疑點(diǎn)); end;ShowMsg(插入企業(yè)業(yè)主和個體工商戶享受農(nóng)村低保和五保情況審計疑點(diǎn)成功！);End.（三）汽車所有者享受農(nóng)村低保和五保情況/定義變量Var SqlStr;CurQuery;IsEmpty;BeginShowMsg(清除空格及空記錄！);/清除汽車上戶明細(xì)表中身份證明號碼為空的記錄SqlStr:=DELETE FROM 業(yè)務(wù)_源_汽車上戶明細(xì)表$ WHERE 身份證明號碼 IS NULL;ExecuteUpdate(SqlStr);/清除身份證號碼中的空格SqlStr:=UPDATE 業(yè)務(wù)_源_汽車上戶明細(xì)表$ SET 身份證明號碼=trim(身份證明號碼);ExecuteUpdate(SqlStr);/審查汽車所有者享受農(nóng)村低保和五保情況SqlStr:=SELECT A.戶主姓名,A.身份證號碼,A.銀行帳號,A.季度金額,A.救助類別,A.地址,+B.初次登記日期,B.車輛類型,B.中文品牌,B.號牌號碼,B.強(qiáng)制報廢期止 FROM +業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ AS A INNER JOIN 業(yè)務(wù)_源_汽車上戶明細(xì)表$ +AS B ON A.戶主姓名=B.機(jī)動車所有人 AND A.身份證號碼=B.身份證明號碼 WHERE LEFT(強(qiáng)制報廢期止,4)2009;CurQuery:=CreateQ(SqlStr,-1);/查詢結(jié)果集是否為空IsEmpty:=Qeof(CurQuery);if IsEmpty1 thenbegin/循環(huán)將查詢結(jié)果存入業(yè)務(wù)疑點(diǎn)臨時庫repeatAddTransRslt(CurQuery,汽車所有者享受農(nóng)村低保和五保情況審計疑點(diǎn));IsEmpty:=Qmov(CurQuery,1);IsEmpty:=Qeof(CurQuery);until IsEmpty=1;/將臨時庫結(jié)果集存入疑點(diǎn)庫TransBatch(CurQuery,汽車所有者享受農(nóng)村低保和五保情況審計疑點(diǎn)); end;ShowMsg(插入汽車所有者享受農(nóng)村低保和五保情況審計疑點(diǎn)成功！);End.（四）摩托車所有者享受農(nóng)村低保和五保情況/定義變量Var SqlStr;CurQuery;IsEmpty;BeginShowMsg(清除空格及空記錄！);/清除摩托車上戶明細(xì)表中身份證明號碼為空的記錄SqlStr:=DELETE FROM 業(yè)務(wù)_源_摩托車上戶明細(xì)表$ WHERE 身份證明號碼 IS NULL;ExecuteUpdate(SqlStr);/清除身份證號碼中的空格SqlStr:=UPDATE 業(yè)務(wù)_源_摩托車上戶明細(xì)表$ SET 身份證明號碼=trim(身份證明號碼);ExecuteUpdate(SqlStr);/審查摩托車所有者享受農(nóng)村低保和五保情況SqlStr:=SELECT A.地址,A.戶主姓名,A.銀行帳號,A.身份證號碼,A.季度金額,A.救助類別,+B.初次登記日期,B.車輛類型,B.中文品牌,B.號牌號碼,B.強(qiáng)制報廢期止 FROM +源_某季度農(nóng)村低保發(fā)放表$ AS A INNER JOIN 源_摩托車上戶明細(xì)表$ AS +B ON A.戶主姓名=B.機(jī)動車所有人 AND A.身份證號碼=B.身份證明號碼 WHERE LEFT(強(qiáng)制報廢期止,4)2009;CurQuery:=CreateQ(SqlStr,-1);/查詢結(jié)果集是否為空IsEmpty:=Qeof(CurQuery);if IsEmpty1 thenbegin/循環(huán)將查詢結(jié)果存入業(yè)務(wù)疑點(diǎn)臨時庫repeatAddTransRslt(CurQuery,摩托車所有者享受農(nóng)村低保和五保情況審計疑點(diǎn));IsEmpty:=Qmov(CurQuery,1);IsEmpty:=Qeof(CurQuery);until IsEmpty=1;/將臨時庫結(jié)果集存入疑點(diǎn)庫TransBatch(CurQuery,摩托車所有者享受農(nóng)村低保和五保情況審計疑點(diǎn)); end;ShowMsg(插入摩托車所有者享受農(nóng)村低保和五保情況審計疑點(diǎn)成功！);End.（五）房產(chǎn)交易納稅人受農(nóng)村低保和五保情況/定義變量Var SqlStr;CurQuery;IsEmpty;Begin/審查房產(chǎn)交易納稅人受農(nóng)村低保和五保情況SqlStr:=SELECT A.戶主姓名,A.身份證號碼,A.銀行帳號,A.季度金額,A.救助類別,A.地址,+B.完稅證號碼,B.繳款書號碼,B.繳款時間,B.納稅人名稱,B.權(quán)屬轉(zhuǎn)移性質(zhì),B.房產(chǎn)類型,+B.計稅金額,B.實(shí)納金額 FROM 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ AS A INNER JOIN +業(yè)務(wù)_源_房產(chǎn)交易契稅征繳明細(xì)表$ AS B ON A.戶主姓名=B.納稅人名稱 AND A.身份證號碼=B.證件號碼;CurQuery:=CreateQ(SqlStr,-1);/查詢結(jié)果集是否為空IsEmpty:=Qeof(CurQuery);if IsEmpty1 thenbegin/循環(huán)將查詢結(jié)果存入業(yè)務(wù)疑點(diǎn)臨時庫repeatAddTransRslt(CurQuery,房產(chǎn)交易納稅人受農(nóng)村低保和五保情況審計疑點(diǎn));IsEmpty:=Qmov(CurQuery,1);IsEmpty:=Qeof(CurQuery);until IsEmpty=1;/將臨時庫結(jié)果集存入疑點(diǎn)庫TransBatch(CurQuery,房產(chǎn)交易納稅人受農(nóng)村低保和五保情況審計疑點(diǎn)); end;ShowMsg(插入房產(chǎn)交易納稅人受農(nóng)村低保和五保情況審計疑點(diǎn)成功！);End.（六）社保離退人員享受農(nóng)村低保和五保情況/定義變量Var SqlStr;CurQuery;IsEmpty;BeginShowMsg(清除空記錄！);/清除社保退休人員表中社會保障號和個人帳號中的空格SqlStr:=UPDATE 業(yè)務(wù)_源_社保退休人員表$ SET 社會保障號=trim(社會保障號),個人帳戶=trim(個人帳戶);ExecuteUpdate(SqlStr);/生成社保離退人員某月養(yǎng)老保險金發(fā)放信息表SqlStr:=SELECT A.DW01 AS 單位代碼,A.GR04 AS 姓名,A.TXMX02 AS 發(fā)放年月,A.TXMX04 +AS 2009年12月工資額,B.社會保障號,B.個人帳戶,B.出生年月,B.工作年月,B.離退時間,+B.家庭住址 FROM 業(yè)務(wù)_源_企業(yè)退休人員養(yǎng)老保險金發(fā)放明細(xì)表$ AS A INNER JOIN +業(yè)務(wù)_源_社保退休人員表$ AS B ON A.GR04=B.姓名 AND A.GR03=B.個人帳戶 WHERE A.TXMX02=200912;CreateTempTable(社保離退人員2009年12月養(yǎng)老金發(fā)放信息表,SqlStr);/審查社保離退人員享受農(nóng)村低保和五保情況SqlStr:=SELECT A.戶主姓名,A.銀行帳號,A.身份證號碼,A.季度金額 AS 四季度低保額,A.救助類別,+B.單位代碼,B.社會保障號,B.個人帳戶,B.發(fā)放年月,B.2009年12月工資額,B.出生年月,+B.離退時間 FROM 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ AS A INNER JOIN +社保離退人員2009年12月養(yǎng)老金發(fā)放信息表 AS B ON A.戶主姓名=B.姓名 +AND A.身份證號碼=B.社會保障號;CurQuery:=CreateQ(SqlStr,-1);/查詢結(jié)果集是否為空IsEmpty:=Qeof(CurQuery);if IsEmpty1 thenbegin/循環(huán)將查詢結(jié)果存入業(yè)務(wù)疑點(diǎn)臨時庫repeatAddTransRslt(CurQuery,社保離退人員享受農(nóng)村低保和五保情況審計疑點(diǎn));IsEmpty:=Qmov(CurQuery,1);IsEmpty:=Qeof(CurQuery);until IsEmpty=1;/將臨時庫結(jié)果集存入疑點(diǎn)庫TransBatch(CurQuery,社保離退人員享受農(nóng)村低保和五保情況審計疑點(diǎn)); end;ShowMsg(插入社保離退人員享受農(nóng)村低保和五保情況審計疑點(diǎn)成功！);End.（七）身份證號碼異常情況/定義變量Var SqlStr;CurQuery;IsEmpty;Begin/審查無效身份證情況SqlStr:=SELECT 地址,戶主姓名,農(nóng)戶代碼,銀行帳號,身份證號碼,LEN(身份證號碼) AS 身份證位數(shù),+救助類別,季度金額 FROM 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ WHERE LEN(身份證號碼)15 +AND LEN(身份證號碼)18;CurQuery:=CreateQ(SqlStr,-1);/查詢結(jié)果集是否為空IsEmpty:=Qeof(CurQuery);if IsEmpty1 thenbegin/循環(huán)將查詢結(jié)果存入業(yè)務(wù)疑點(diǎn)臨時庫repeatAddTransRslt(CurQuery,無效身份證情況審計疑點(diǎn));IsEmpty:=Qmov(CurQuery,1);IsEmpty:=Qeof(CurQuery);until IsEmpty=1;/將臨時庫結(jié)果集存入疑點(diǎn)庫TransBatch(CurQuery,無效身份證情況審計疑點(diǎn)); end;ShowMsg(插入無效身份證情況審計疑點(diǎn)成功！);/審查可疑身份證（15位）情況SqlStr:=Select 戶主姓名,身份證號碼,109-mid(trim(身份證號碼),7,2) as 年齡,季度金額,+救助類別,地址 From 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ WHERE len(trim(身份證號碼)=15 +AND (109-mid(trim(身份證號碼),7,2)=90 OR 109-mid(trim(身份證號碼),7,2)ORDER BY 109-mid(trim(身份證號碼),7,2) DESC;CurQuery:=CreateQ(SqlStr,-1);/查詢結(jié)果集是否為空IsEmpty:=Qeof(CurQuery);if IsEmpty1 thenbegin/循環(huán)將查詢結(jié)果存入業(yè)務(wù)疑點(diǎn)臨時庫repeatAddTransRslt(CurQuery,可疑身份證（15位）情況審計疑點(diǎn));IsEmpty:=Qmov(CurQuery,1);IsEmpty:=Qeof(CurQuery);until IsEmpty=1;/將臨時庫結(jié)果集存入疑點(diǎn)庫TransBatch(CurQuery,可疑身份證（15位）情況審計疑點(diǎn)); end;ShowMsg(插入可疑身份證（15位）情況審計疑點(diǎn)成功！);/審查可疑身份證（18位）情況SqlStr:=Select 戶主姓名,身份證號碼,2009-mid(trim(身份證號碼),7,4) as 年齡,+季度金額,救助類別,地址 From 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ WHERE +len(trim(身份證號碼)=18 AND (2009-mid(trim(身份證號碼),7,4)=90 +OR 2009-mid(trim(身份證號碼),7,4)CurQuery:=CreateQ(SqlStr,-1);/查詢結(jié)果集是否為空IsEmpty:=Qeof(CurQuery);if IsEmpty1 thenbegin/循環(huán)將查詢結(jié)果存入業(yè)務(wù)疑點(diǎn)臨時庫repeatAddTransRslt(CurQuery,可疑身份證（18位）情況審計疑點(diǎn));IsEmpty:=Qmov(CurQuery,1);IsEmpty:=Qeof(CurQuery);until IsEmpty=1;/將臨時庫結(jié)果集存入疑點(diǎn)庫TransBatch(CurQuery,可疑身份證（18位）情況審計疑點(diǎn)); end;ShowMsg(插入可疑身份證（18位）情況審計疑點(diǎn)成功！);End.（八）同銀行帳號不同身份情況/定義變量Var SqlStr;CurQuery;IsEmpty;Begin/審查同銀行帳號不同身份情況SqlStr:=SELECT S1.地址 AS 居住地一,S1.戶主姓名 AS 姓名一,S1.銀行帳號 AS 銀行帳號一,+S1.身份證號碼 AS 身份證一,S1.救助類別 AS 類別一,S1.季度金額 AS 季度金額一,+S2.地址 AS 居住地二,S2.戶主姓名 AS 姓名二,S2.銀行帳號 AS 銀行帳號二,S2.身份證號碼 +AS 身份證二,S2.救助類別 AS 類別二,S2.季度金額 AS 季度金額二 FROM +業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ AS S1 INNER JOIN 業(yè)務(wù)_源_某季度農(nóng)村低保發(fā)放表$ +AS S2 ON S1.銀行帳號=S2.銀行帳號 AND S1.戶主姓名S2.戶主姓名;CurQuery:=CreateQ(SqlStr,-1);/查詢結(jié)果集是否為空IsEmpty:=Qeof(CurQuery);if IsEmpty1 thenbegin/循環(huán)將查詢結(jié)果存入業(yè)務(wù)疑點(diǎn)臨時庫repeatAddTransRslt(CurQuery,同銀行帳號不同身份情況審計疑點(diǎn));IsEmpty:=Qmov(CurQuery,1);IsEmpty:=Qeof(CurQuery);until IsEmpty=1;/將臨時庫結(jié)果集存入疑點(diǎn)庫TransBatch(CurQuery,同銀行帳號不同身份情況審計疑點(diǎn)); end;ShowMsg(插入同銀行帳號不同身份情況審計疑點(diǎn)成功！);End.九、適用法規(guī)（一）法規(guī)名稱：國務(wù)院關(guān)于建立農(nóng)村最低生活保障制度的通知發(fā)文文號：國發(fā)200719號發(fā)文機(jī)關(guān)：國務(wù)院法規(guī)條目：“三、合理確定農(nóng)村最低生活保障標(biāo)準(zhǔn)和對象范圍。農(nóng)村最低生活保障對象是家庭年人均純收入低于當(dāng)?shù)刈畹蜕畋Ｕ蠘?biāo)準(zhǔn)的農(nóng)村居民，主要是因病殘、年老體弱、喪失勞動能力以及生存條件惡劣等原因造成生活常年困難的農(nóng)村居民?！薄八?、規(guī)范農(nóng)村最低生活保障管理。（一）申請、審核和審批。申請農(nóng)村最低生活保障，一般由戶主本人向戶籍所在地的鄉(xiāng)（鎮(zhèn)）人民政府提出申請；村民委員會受鄉(xiāng)（鎮(zhèn)）人民政府委托，也可受理申請。受鄉(xiāng)（鎮(zhèn)）人民政府委托，在村黨組織的領(lǐng)導(dǎo)下，村民委員會對申請人開展家庭經(jīng)濟(jì)狀況調(diào)查、組織村民會議或村民代表會議民主評議后提出初步意見，報鄉(xiāng)（鎮(zhèn)）人民政府；鄉(xiāng)（鎮(zhèn)）人民政府審核后，報縣級人民政府民政部門審批。鄉(xiāng)（鎮(zhèn)）人民政府和縣級人民政府民政部門要核查申請人的家庭收入，了解其家庭財產(chǎn)、勞動力狀況和實(shí)際生活水平，并結(jié)合村民民主評議，提出審核、審批意見。（四）動態(tài)管理。鄉(xiāng)（鎮(zhèn)）人民政府和縣級人民政府民政部門要采取多種形式，定期或不定期調(diào)查了解農(nóng)村困難群眾的生活狀況，及時將符合條件的困難群眾納入保障范圍；并根據(jù)其家庭經(jīng)濟(jì)狀況的變化，及時按程序辦理停發(fā)、減發(fā)或增發(fā)最低生活保障金的手續(xù)。保障對象和補(bǔ)助水平變動情況都要及時向社會公示?！鄙掌冢?007年7月11日失效日期：無適用范圍：農(nóng)村低保戶保障資格審批審核（二）法規(guī)名稱：農(nóng)村五保供養(yǎng)工作條例發(fā)文文號：中華人民共和國國務(wù)院令第 456 號發(fā)文機(jī)關(guān)：國務(wù)院法規(guī)條目：“第二章 第六條 老年、殘疾或者未滿16周歲的村民，無勞動能力、無生活