Marco
PRINTDRV::Initialise(CLIP(NombreImpresora))
!Donde NombreImpresora es una variable o campo de un archivo que contiene el nombre de la impresora que se
!encuentra instalada en windows.
PRINTDRV::Initialise() --> Inicializar la impresión')
PRINTDRV::WriteText() --> Imprimir un string')
PRINTDRV::Finalise() --> Cerrar la impresión')
PRINTDRV::ModoDraft() --> Pasa a la printer a modo Draft
PRINTDRV::ModoNLQ() --> Pasa a la printer a modo NLQ
PRINTDRV::ResetPrinter
PRINTDRV::ResetPrinter() --> Resetea la impresora'
PRINTDRV::WriteText
PRINTDRV::Finalise
!!************ ejemplo
PRINTDRV::Initialise(CLIP(IMP:NombreImpresora))
PRINTDRV::ModoDraft() ! --> Pasa la printer a modo Draft
PRINTDRV::WriteText('<27,64>',0) ! Inicializo Impresora
PRINTDRV::WriteText('<27,67,48>',0) ! Longitud pagina a 48 Líneas
PRINTDRV::WriteText(' ') ! Salta 1 Lineas
PRINTDRV::WriteText(CHR(27)&CHR(18)&' FECHA EMISION: '|
&(format (RE1:FechaEmision,@d06)))
PRINTDRV::WriteText(CHR(27)&CHR(18)&' '&format(AC1:ApellidoNombre,@s30))
PRINTDRV::WriteText(CHR(27)&CHR(18)&' '&format(AC1:Direccion,@s30))
PRINTDRV::WriteText(CHR(27)&CHR(18)&' '&Format(AC1:CodPostal,@P(####-##)P)&' '&Format(AEN:Localidad,@s30) &' '|
Fijate que en http://www.evolutionconsulting.com.ar/download.html podes encontrar algo mas
Saludos
