Marcia,
I used the code that I got earlier and then I compared it to what you just gave me and it is very close to it. We got it working and it does what we want it to do.
Thanks for the help.

Jim

>Hi Jim.
>
>>> Thanks, it makes some sense but as they say a picture is worth a 1000 words. So if you could give me an example it would help. I will try to apply what you wrote and see where it places me. Thanks for the response. <<
>
>In BeforeRowColChange:
>
>

>
>WITH This
>  IF .lValidatingRow
>     NODEFAULT
>  ELSE
>    .nRecNo = RECNO(.RecordSource)
>  ENDIF
>ENDWITH
>
>In AfterRowColChange:
>
>LOCAL lnRec2GoTo
>WITH This
>  IF .nRecNo = 0
>     RETURN
>  ENDIF
>  *** Save the current record number in case we have changed rows
>  SELECT (.RecordSource)
>  lnRec2GoTo = RECNO()
>  *** Check to see if the row has changed
>  IF .nRecNo <> lnRec2GoTo
>     *** We are validating the row we are attempting to leave...set the flag
>     .lValidatingRow = .T.
>     GOTO .nRecNo
>     IF .ValidateCurrentRow()
>        GOTO .nRec2GoTo
>     ENDIF
>     *** Finished with validation...reset flag
>     .lValidatingRow = .F.
>  ENDIF   	
>ENDWITH    	
>
>

>
>Marcia