It's possible that the reason it worked before and it doesn't work now is because you have added a "Top Level Form," and/or have made the screen invisible. I believe that report will preview in the screen only.
Try this:
IF PrintFlag = 1
_SCREEN.Visible =.T.
_SCREEN.Windowstate=2 && This will maximize the _screen
REPORT FORM orderport NOCONSOLE PREVIEW
_SCREEN.Visible =.F.
ELSE
REPORT FORM orderport NOCONSOLE TO PRINTER PROMPT
ENDIF
JR
>I have a form on which I have placed a button which is supposed to display a preview of a report. I have another button which prints the report.
>
>The "Print" button works just fine, building the tables the report uses, bringing up the printer selector dialog box, and printing the report.
>
>The "Preview" button, however, has a problem. The preview never is displayed.
>
>This worked for a little while, but has recently stopped working, for reasons unknown to me. Both buttons use the same call to the print program, only the preview button passes a "1" and the print button passes a "2" to be used as the PrintFlag. I've displayed the code below. Any suggestions on why this no longer works would be appreciated.
>
>
>IF PrintFlag = 1
> REPORT FORM orderport NOCONSOLE PREVIEW
>ELSE
> REPORT FORM orderport NOCONSOLE TO PRINTER PROMPT
>ENDIF
CLARC Services, Inc.
3500 Tamiami Trail
Port Charlotte, FL 33952
www.clarc.com(941) 743-0108
(800) 246-5488