Yes, I was just about to update my response - I see you already move focus out of the grid.
I also see you switch to a different table, so it should not affect the other table, you're right. In any case, it would not hurt to try to save record pointer and to restore it - even though it doesn't seem to be required in this case.
Try this and see if the problem will be resolved.
>>REPORT FORM command moves the record pointer to the end of the file. You must save the current record number and restore it after REPORT FORM command.
>>
>
>But, the report is printing the medispan_out table....
>
>
>SELECT medispan_out
>DO CASE
> CASE lcLanguage = 'E'
> REPORT FORM MonoBoldProfile NOCONSOLE ALL TO PRINTER PROMPT
> CASE lcLanguage = 'S'
> REPORT FORM MonoBoldSpanishProfile NOCONSOLE ALL TO PRINTER PROMPT
> OTHERWISE
> REPORT FORM MonoBoldProfile NOCONSOLE ALL TO PRINTER PROMPT
>ENDCASE
>
>Why would this affect the RX table, the one the grid is using?
>
>
>>Also you must switch focus to some other object than grid before REPORT FORM command.
>>
>I thought I had with ....
>
>*TMT Set focus to DONE button so we don't see the RX table from the GRID
> THISFORM.cmdDone.SETFOCUS()
> SELECT medispan_out
> DO CASE
> CASE lcLanguage = 'E'
>
>
>and this...
>
>
>ENDCASE
>
>*TMT Reset focus back to GRID
>THISFORM.grdProfile.SETFOCUS()
>SELECT rx
>RETURN
>
>
>Thanks!
If it's not broken, fix it until it is.
My Blog