農信社農戶小額信用貸款利率執行問題AO審計初探

以農為本、為農服務是農村信用社的辦社宗旨，農信社立足于服務“三農”，積極發放農戶小額信用貸款，全力支持農村經濟發展，為廣大農民服務，切實解決農民貸款難問題，從而實現農民增收、信用社增效的雙贏目標。但是我們在信用社審計過程中發現農信社在發放農戶小額信用貸款時還存在一些問題，部分農戶小額信用貸款利率偏高，未按省聯社規定執行，損害了農戶利益。我們此次主要是對農信社自2007年(含)后至2009年6月份收回并結清的1年期農戶小額信用貸款利率執行情況運用AO進行審計，下面簡要介紹這個問題的審計過程和方法。

因為農戶小額信用貸款的利率跟隨中國人民銀行規定的基準利率變化而變化，各個時間段的貸款利率是不同的，我省信用聯社明確規定農戶小額信用貸款執行利率不得超過同期人民銀行規定基準利率的1.2倍。為此我們需要將各個時間段貸款數據分別比照當期的貸款基準利率，如果用SQL查詢語句則需要反復多次進行查詢，工作量大，而運用ASL程序進行審計則可以方便快捷地將所需數據篩選出來，只要再對篩選結果進行適當的處理就可以得出最終的審計結果。

一、數據采集及初步處理

通過對信用社信貸系統的分析，我們可以直接在其信貸系統前臺采集數據，并導出為Excel格式文件。根據信貸系統中的查詢功能，直接選擇采集數據的條件，將2007年(含)后至2009年6月所有貸款數據查詢出來并導出為Excel文件，這部分數據是包括了未結清數據和已結清數據。同時還需采集2007年(含)后至2009年6月的還款明細表。

數據采集完成后需要對采集的原始數據進行初步處理，將數據表中的有關日期的列值格式設置為“日期”型，并刪除部分沒用的字段，以減少數據量。經過初步處理后，再將原始數據導入到AO系統中。

二、數據分析

(一)在AO系統中，我們將貸款明細表進行分析，經過分析得知，并生成所需的“已結清1年期小額農貸明細中間表”。

SQL語句如下:

Select * into已結清1年期小額農貸明細中間表 from 2007年(含)后至2009年6月所有貸款數據 where datediff(\"d\"，貸款日期，到期日期)>185 and datediff(\"d\"，貸款日期，到期日期)<380 and 科目代碼 like ‘1246%’ and 結欠金額=0

(二)運用ASL程序對上述生成的小額農貸明細表進行篩選，根據貸款時間的不同判斷每筆小額農貸的貸款利率是否超過當時銀行基準利率的1.2倍，如果超過則篩選出來，生成小額農貸利率超標明細表，并導出為疑點。然后到AO系統中的“疑點管理”中將已落實疑點數據表即小額農貸利率超標明細表導出為Excel表格，并對數據進行整理。

ASL程序如下:

var a，b，c，d;

begin

a:=CreateQ('select * from已結清1年期小額農貸明細中間表'，-1);

b:=Qeof(a);

while b<>1 do

begin

c:=QFDValue(a，'貸款日期');

d:=QFDValue(a，'合同利率');

if c>'2005-12-31' and c<'2006-04-28' and d>5.58 then //基準利率為4.65

AddTransDout(a，'5.58');

if c>'2006-04-27' and c<'2006-08-19' and d>5.85 then //基準利率為4.875

AddTransDout(a，'5.85');

if c>'2006-08-18' and c<'2007-03-18' and d>6.12 then //基準利率為5.1

AddTransDout(a，'6.12');

if c>'2007-03-17' and c<'2007-05-19' and d>6.39 then //基準利率為5.325

AddTransDout(a，'6.39');

if c>'2007-05-18' and c<'2007-07-21' and d>6.57 then //基準利率為5.475

AddTransDout(a，'6.57');

if c>'2007-07-20' and c<'2007-08-22' and d>6.84 then //基準利率為5.7

AddTransDout(a，'6.84');

if c>'2007-08-21' and c<'2007-09-15' and d>7.02 then //基準利率為5.85

AddTransDout(a，'7.02');

if c>'2007-09-14' and c<'2007-12-21' and d>7.29 then //基準利率為6.075

AddTransDout(a，'7.29');

if c>'2007-12-20' and c<'2008-09-16' and d>7.47 then //基準利率為7.47

AddTransDout(a，'7.47');

if c>'2008-09-15' and c<'2008-10-09' and d>7.2 then //基準利率為6

AddTransDout(a，'7.2');

if c>'2008-10-08' and c<'2008-10-30' and d>6.93 then //基準利率為5.775

AddTransDout(a，'6.93');

if c>'2008-10-29' and c<'2008-11-27' and d>6.66 then //基準利率為5.55

AddTransDout(a，'6.66');

if c>'2008-11-26' and c<'2008-12-23' and d>5.58 then //基準利率為4.65

AddTransDout(a，'5.58');

if c>'2008-12-22' and c<='2008-12-31' and d>5.31 then //基準利率為4.425

AddTransDout(a，'5.31');

b:=Qmov(a，1); //將數據集的下一條記錄賦值給變量b

b:=Qeof(a); //判斷數據集是否為空

end; //循環結束

TransBatch(a，'利率超標匯總'); //把查詢出的業務數據疑點導出到疑點管理中

end.

(三)將上一步驟生成并導的小額農貸利率超標明細表數據導入到AO系統中，然后與還款明細表關聯查詢，計算出結清貸款本息日至貸款日期的天數，然后貸款利息按日利率與貸款天數的乘積進行計算，生成2007～2009年結清本息小額農戶信用貸款利率超標多收利息明細總表。

SQL語句如下:

select a.*，b.交易時間，datediff(\"d\"，a.貸款日期，b.交易時間) as 貸款天數，a.貸款金額*超標利率/30000*datediff(\"d\"，a.貸款日期，b.交易時間) as 超收利息 into超收利息明細表 from小額農貸利率超標明細表 a，還款明細 b where a.貸款號=b.貸款號 and b.余額=0

三、數據核實

最后我們可以通過超收利息明細表清楚的看出每一筆農戶小額信用貸款利率超標情況，并且抽查部分貸款檔案進行核實，核實無誤后便可做出審計底稿和取證記錄，最終確定被審計單位在農戶小額信用貸款利率執行方面存在問題，2008年多收農戶利息50多萬元。

(作者單位:吉安市審計局)