FoxPro/Visual FoxPro - impresion por codigo

buenas amigos del foro, alguien me podria dar un ejemplo simple de como imprimir por codigo en fox 6, como inicializo la impre y mando a imprimir un texto, estoy probando pero me imprime una hoja en blanco y despues sale el listado y aveces me queda el listado en la cola de impresion, no se como trabajarlo, aparte siempre me queda el iconito de la impre en la barra de tareas, yo siempre trabaje con reportes, pero necesito hacerlo por codigo porque tengo que setear los nro de linea para el corte de papel.
Espero sus ejemplos y gracias desde ya.
saludos.

Wprn = GETPRINTER()
If Empty(Wprn)
MessageBox('Impresion Cancelada!!!',16,'JJ-System')
Return
EndIf
SET PRINTER To Name "&Wprn" FONT 'Courier New',7
SET DEVICE TO PRINTER
SET CONSOLE OFF
ContP = 1
Wait Window "Procesando la Pagina "+Alltrim(Str(ContP)) NoWait
DO WHILE !EOF()
@Prow()+1,01 Say Alltrim(SubStr(Cuenta,1,12))
@Prow()+0,15+len(Alltrim(SubStr(Cuenta,1,6))) Say Alltrim(SubStr(detalle,1,30))
@Prow()+0,77 Say Alltrim(SubStr(Status,1,1))
If Prow()=> 50
@Prow()+1,0 Say Replicate("-",80)
@Prow()+1,1 Say "Continua en la siguiente Pagina"
@Prow()+1,1 Say " "
Eject
ContP = ContP + 1
Wait Window "Procesando la Pagina "+Alltrim(Str(ContP)) NoWait
EndIf
SKIP
ENDDO
Eject
SET PRINTER TO
SET PRINTER OFF
SET DEVICE TO SCREEN
SET CONSOLE ON

gracias amigo, una mas, como hago para seterar por codigo que me haga el salto de pagina a 17 lineas, porque tengo que imprimir 3 comandas y el papel esta croquelado a 18 lineas.
es una epson lx-300
gracias

cheque en la ayuda "???"
??? CHR(18)
esto hace k la impresora la controles tu linea por linea

hola
tambien puedes consultar esta pagina
http://sd.epson.es/support/download/data/faq/escpos.pdf

porque tengo que setear los nro de linea para el corte de papel

eso lo puedes lograr con el Administrador de Impresion