genel dekont kaydında sript kod

merhaba bir konuda sykynty ya?yyorum bilgisi olan arkada?lardan yardym bekliyorum.

konu ?u: dekont kaydynda her bir dekont serisinde ve seri numarasynda sadece bir banka hareketine izin vermek istiyorum.

sql sorgu :
SELECT COUNT(C_M) AS KAYIT, DEKONT_NO, SERI_NO, C_M FROM dbo.TBLDEKOTRA
GROUP BY DEKONT_NO, SERI_NO, C_M

sript kod:
TDBNEdit / hesapkod onexit
******************
SET sorgu=NETSISCORE.NetLibDB.GetNewQuery

IF NETSISCORE.NetLibSession.AktifModulNo=11 AND NETSISCORE.NetLibSession.AktifProgramNo=2 THEN

sorgu.RecSQL("SELECT * FROM TD_BNK WHERE DEKONT_NO= '"&DekontNo.text&"' AND SERI_NO= '"&seri.text&"' ")

if sorgu.Fields(1).ASinteger>2 then

   NETSISCORE.NetLibWin32.ShowNetsisMesaj "BYR DEKONT FY?YNDE 2 BANKA HARAKETY GYRMEZSYNYZ. !!!Tunç DAL",2

   HesapKodu.Show
   HesapKodu.SetFocus
end if
END IF
**************
bu ?ekilde olunca bir banka hareketi girce ba?ka hiçbir hareket girdir miyor. yukardaki uyary mesajy çykyyor.