IF m.a=m.w
  =MessageBox("true")
  grdTable = thisform.Grid1.RecordSource
  SKIP IN (grdTable)&&¬hng happend
  IF EOF(grdTable)
     SKIP -1 IN (grdTable)
   ENDIF
   thisform.Grid1.column7.SetFocus()
   thisform.Grid1.refresh() && I am not sure if this ine is necessary!

ELSE

   =MessageBox("false")

ENDIF