You can write to a text file and:

COPY FILE MyFile.txt TO PRN

Vlad

>Hello All!
>
>I need to create a report without use report designer but i am not getting to send the characters to printer
>
>IMPRESSORA=GETPRINTER()
>SET PRINTER TO impressora
>SET DEVICE TO printer
>?sys(101) && to see the current SET DEVICE . returns PRINTER
>?sys(13) && to see the status of the printer. RETURNS READY
>
>print job
>@ 10,10 say "Sending characters to printer"
>endprintjob
>
>
>But the printer don't print