巧用SQL語句檢查公務用車改革執行情況

馮林

摘要：近年來，各地相繼出臺各項措施加強公務用車管理，并暫停增加新車購買，在較大程度上控制和遏制了公務車輛的規模和經費進一步增長，但仍在部分程度上存在著管理粗放、使用浪費、配備不均等、部分開支較大等一系列問題。筆者在對某單位進行公務用車改革執行情況的審計工作中，利用SQL語句和AO系統的自動審計功能檢查公務用車改革的執行情況，查出了該單位在公務用車改革方面存在的問題，并有針對性地提出了審計建議。

關鍵詞：SQL語句；公務用車改革；執行

近年來，隨著各地采取定編配備、政府采購、多部門聯合審批等各項措施加強公務用車管理，并暫停增加新車購買，在較大程度上控制和遏制了公務車輛的規模和經費進一步增長，但仍在部分程度上存在著管理粗放、使用浪費、配備不均等、部分開支較大等一系列問題。同時，由于更新報廢制度建立的滯后，車輛老化、使用年限超限等用車問題不同程度地存在，對履行公務、車輛安全、建設節能型機關也造成了一定的影響。深化公務用車管理制度改革，盡快建立統一、規范、科學化的管理制度，對降低政府行政成本、規范職務消費、促進節能型機關建設具有十分重要的意義。近日，筆者在對某單位公務用車改革審計中，利用SQL語句和AO系統的自動審計功能檢查公務用車改革的執行情況。具體方法如下：

一、對應發放的車改補償金額進行統計

根據從第三方取得的人員表和車改辦補償發放標準表，生成新的應發放補償金額表。

var s1；

begin

s1：='select a.職務級別，[2014年補償標準]*[2014年人數] as 應發放補償金額 from 人員表 a join 車改辦補償發放標準表 b on a.職務級別=b.職務級別'；

createtemptable（'應發放補償金額表'，s1）；

end.

二、統計該單位每月應發放的車改補償金額標準

var i，j，g，c，l；

begin

ShowMsg（'現在開始查詢統計應發放的車改補償金額'）；

g：=（'select sum（應發放補償金額）from應發放補償金額表'）；

j：=CreateQ（g，-1）；

i：=Qeof（j）；

if i<>1 then

begin

repeat

AddTransrslt（j，'應發放補償金額'）；

i：=Qmov（j，1）；

i：=Qeof（j）；

until i=1；

TransBatch（j，'應發放補償金額'）；

ShowMsg（'具體明細見疑點表中“應發放補償金額”'）；

end

end.

三、通過公務用車交通費用支出情況統計明細表按月統計該單位實際發放的補償金額

var s1；

begin

s1：='select 月份，sum（發放交通費補償） as 實際發放補償金額 from 公務用車交通費用支出情況統計明細表 group by 月份'；

createtemptable（'實際發放補償金額表'，s1）；

end.

四、用實際發放補償金額減去得出的每月應發放的車改補償金額標準，發現該單位在實際發放當中多發補償的行為

var i，j，g，c，l；

begin

ShowMsg（'現在開始查詢多發放的車改補償金額'）；

g：=（'select 月份，實際發放補償金額-48600 from 實際發放補償金額表'）；

j：=CreateQ（g，-1）；

i：=Qeof（j）；

if i<>1 then

begin

repeat

AddTransrslt（j，'多發放的車改補償金額'）；

i：=Qmov（j，1）；

i：=Qeof（j）；

until i=1；

TransBatch（j，'多發放的車改補償金額'）；

ShowMsg（'具體明細見疑點表中“多發放的車改補償金額表”'）；

end

else

begin

ShowMsg（'沒有多發放的車改補償金額'）；

end；

end.

（1）根據取得的該單位交通經費支出情況統計明細表，按年度統計各項交通費用的支出明細，生成交通費用支出匯總表

var s1；

begin

s1：='select 年度，sum（發放交通費補償）as發放交通費補償合計，sum（燃油費）as燃油費合計，sum（維修保養費）as維修保養費合計，sum（車輛保險費）as車輛保險費合計，sum（過路過橋費）as過路過橋費合計，sum（車輛裝飾費）as車輛裝飾費合計，sum（非編司機工資及保險）as非編司機工資及保險合計，sum（出車補助）as出車補助合計，sum（租車費）as租車費合計，sum（其他與公車相關費用）as其他與公車相關費用合計from交通經費支出情況統計明細表group by年度 '；

createtemptable（'交通費用支出匯總表'，s1）；

end.

（2）根據生成的交通費用匯總表，按年度匯總交通費用的總計支出，生成年度交通費用匯總表

var s1；

begin

s1：=' select 年度，sum（發放交通費補償合計）+sum（燃油費合計）+sum（維修保養費合計）+sum（車輛保險費合計）+sum（過路過橋費合計）+sum（車輛裝飾費合計）+sum（非編司機工資及保險合計）+sum（出車補助合計）+sum（租車費合計）+sum（其他與公車相關費用合計） as 年度交通費用匯總 from 交通費用支出匯總表group by 年度'；

createtemptable（'年度交通費用匯總表'，s1）；

end.

（3）根據取得的該單位人員表，按年度計算該單位的總人數，生成年度人員匯總表

var s1；

begin

s1：=' select 年度，sum（縣級）+sum（副縣級）+sum（正科級）+sum（副科級）+sum（一般人員） as 年度人員匯總 from 人員表 group by 年度'；

createtemptable（'年度人員匯總表'，s1）；

end.

五、根據生成的年度交通費

用匯總表和年度人員匯總表，以年度總交通費用支出除以年度總人數，按年度計算人均交通費用支出

var i，j，g，c，l；

begin

g：=（' select a.年度 AS 年，年度交通費用匯總/年度人員匯總 as 人均年度交通費用支出 from 年度交通費用匯總表 a join 年度人員匯總表 b on a.年度=b.年度'）；

j：=CreateQ（g，-1）；

i：=Qeof（j）；

if i<>1 then

begin

repeat

AddTransrslt（j，'人均年度交通費用支出'）；

i：=Qmov（j，1）；

i：=Qeof（j）；

until i=1；

TransBatch（j，'人均年度交通費用支出'）；

ShowMsg（'具體明細見疑點表中“人均年度交通費用支出”'）；

OPutChart（j，'年'，'人均年度交通費用支出，clred'）；

end

end.

通過運用SQL語句和AO系統的自動審計功能對公務用車改革執行情況進行審計，發現該單位存在多發交通補貼，部分年度、月份用車費用較高等問題。審計組對此提出了加強制度管理、強化會計稽核審核等有針對性的審計建議，督促該單位加強公務用車改革的管理工作。