Does this work?

set PRINTER TO NAME (GETPRINTER())
? set('printer',3) && pick a different printer to verify it changes later
=APRINTERS(myprinters)
for i = 1 TO ALEN(myprinters,1)
   IF "IMAGE WRITER" $ UPPER(myprinters(i,1))
       set PRINTER TO NAME (myprinters(i,1))
   endif
endfor
? set('printer',3)  && is the current printer the Image Writer Printer?

>If I use the prompt option in the report form and choose the "ImageRight Printer" it works, but when I set printer to name "ImageRight Printer" it does not. "ImageRight Printer" is a print driver that calls an image processing interphase, which allows me to store the output as an image and route the image accordingly.
>
>the following code works:
>
>report form (myreport) to printer prompt && ImageRight Printer is chosen
>
>but the following code does not
>
>myprinter = "ImageRight Printer"
>set printer to name (myprinter)
>report form (myreport) to printer