gridlerde kodlama

forma kayfugum 4 colonluk bir gridde;
column3.text1.lastfocus ta şöyle bir kod var
fiyat=miktar.bfiyat

form ilk çalıştığında thisform.grid1.recordsource="hastagel"
burda sorun yok çünkü gridde değişiklik yaptığımda sorunsuz çalışıyor.

formda hastagelin geliş şartlarını değiştiriyorum ;
select* from hasta where year(tarih)=2009 into cursor hastagel readwrite
thisform.grid1.recordsource="hastagel"
budurumda gridde kayıtları değiştirdiğimde kod çalışmıyor.
bu gridin recordsource u değiştiğinde yukardaki kod çalışmıyor bu kodun recordsrch un değiştiği yerden tekrar eklenmesi gerekiyor galiba. yada ben öyle tahmin ediyorum.

bu durumda bu kodu tekrar gridde nasıl tanıtabilirim.