Hi

>i get error message syntax error at
> m.lcMonth=TRANSFORM(MONTH(thisform.text2.Value))

Why? There is nothing wrong with that line.

>>Mohammed
>>
>>Never use property in LOCATE FOR or SET FILTER! Always use macro substitution. Variable disappears (goes out of scope) when method ends!
>>
>>

>>if nkeycode=13
>>   SET FILTER TO
>>   LOCAL m.ldDat
>>   m.ldDat = thisform.text2.Value
>>   LOCATE FOR dat = m.ldDat
>>   IF FOUND()
>>      LOCAL m.lcMonth
>>      m.lcMonth=TRANSFORM(MONTH(thisform.text2.Value))
>>      SET FILTER TO MONTH(dat)=&lcMonth.
>>      LOCATE
>>      thisform.grid1.Visible=.t.
>>      thisform.grid1.Refresh
>>      thisform.grid1.column7.setfocus()
>>   else
>>      =messagebox("åÐÇ ÇáÊÇÑíÎ ÛíÑ ãæÌæÏ ")
>>      thisform.grid1.visible=.f.
>>   ENDIF
>>endif
>>