Fred-

>I have a question. I added the access and assign methods and it seems to work in all but on screen form.

Do you mean you added the methods for the ActivePage property of the pageframe?

It's not clear to me where the error occurs. Do you suspend when the error occurs? Which line of code is the program on?

Have you tried putting a breakpoint on the DO CASE line and step thru? If so, at what point in the program does it occur? Where and what is the code that leads to the error?

>I have added the following code block to the access method of the pageframe.
>

*******************
><b>DO CASE</b>
>	CASE INLIST(THIS.ACTIVEPAGE,1,3)
>		THISFORM.cmdPrint.VISIBLE = .T.
>		
>	CASE This.ActivePage = 2
>		WITH THISFORM.eapages1.page2
>			.grid1.SetFocus()
>			.grid1.ActivateCell(1,1)
>			.page2.grid2
>			.Refresh()
>			.ActivateCell(RECNO([vehiclestatus]),1)
>			.SetFocus()
>		EndWith
>		
>	OTHERWISE
>		THISFORM.cmdPrint.VISIBLE = .F.
>ENDCASE
>*********************

>
>Whenever I test the value of thisform.eapages1.activepage is equal to a number, I get operator/operand mismatch error.