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

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