Merhabalar,

Aşağıdaki kod parçacığında görüldüğü üzere BeforeSave eventi içerisinde kontrol sağlayıp kaydetme işlemini durdurmaktayım. Fakat tekrar senedin tutarını aşmayacak şekilde doğru değerler girip kaydetme işlemini yaptığımda yine aşağıda bulunan ekran görüntüsündeki hatayı almaktayım.

Ekran Görüntüleri :

Screenshot_1.png

Screenshot_2.png

Kod Parçacığı :

Sub BeforeSave(proceed as Integer)

if _tahsiltutar>_senetDovizliTutari then
 str(_senetDovizliTutari,str_senetDovizliTutari)
 warn("Senet tutarı : "+str_senetDovizliTutari+" aşılmamalıdır!!!")
 proceed = 0
 EXIT SUB
end if

End sub
BASIC