>Try:
> SET PRINTER TO
After the printing is complete. This closes the printer.
**********************************
with thisform
if .SendTo.Printer.Value=1
UserPrinter=GETPRINTER()
UserPrinter=["]+UserPrinter+["]
if len(UserPrinter)>2 && Perhaps something is there
set printer to name &UserPrinter
OkayToPrint=.t.
Else
OkayToPrint=.f.
Endif && Okay to print yes/no
Else && Out something other than printer
if .SendTo.Preview.Value=1 && Out to file
SET PRINTER TO _SCRATCH.TXT
OkayToPrint=.t.
Endif && File
Endif && Printer
if OkayToPrint
do AT_X_Y_Report
Endif
set printer to
endwith

>
>
>Guy
>
>
>>When I run a program that has SET DEVICE TO PRINT, then @ say statements, then SET DEVICE TO SCREEN, I need to quit VFP before anything prints to my printer.
>>Any suggestions as to what to try to fix this?