RE:Impresion en matricial
No, no hace falta utilizar un reporte.
De esta manera imprimis en modo DOS
Es más rápido, pero no tenes preimpresión, imprime directamente en la LPT
Siempre hablando de matriz de punto....
Te mando unas lineas para que veas como imprimo una fecha, un nº de cuit,
salto de lineas en blanco, etc.
! Imprimo la Factura
LOC:DefaultPrinter = (PRINTER{PROPPRINT:Device}) ! Guardo la Impresora por Predeterminada
LOC:ReceiptPrinter = 'Epson LX-810' ! Cambio por la Epson LX-810
PRINTER{PROPPRINT:Device}=CLIP(LOC:ReceiptPrinter)
LinePrint('<27,64>',,0) ! Inicializo Impresora
LinePrint('<27,67,48>',,0) ! Longitud pagina a 48 Líneas
LinePrint('<27,102,1,4>',,0) ! Salta 4 Lineas
LinePrint(CHR(27)&CHR(18)&' FECHA EMISION: '&(format (FAC1:FechaEmision,@d6)))
LinePrint('<27,102,1,4>',,0) ! Salta 4 Lineas
LinePrint(CHR(27)&CHR(18)&' '&AC1:ApellidoNombre)
LinePrint(CHR(27)&CHR(18)&' '&AC1:Direccion)
LinePrint(CHR(27)&CHR(18)&' '&AEN:Localidad &' '&Format(AC1:Cuit,@P##-########-#P)&' '&ASI:Abreviatura)
LinePrint('<27,102,1,2>',,0) ! Salta 2 Lineas
..........................
! Termino
LinePrint(FF) ! Salto de página
LinePrint('<27,64>',,0) ! Inicializo Impresora
LinePrint('<27,67,72>',,0) ! Longitud pagina a 72 Líneas
PRINTER{PROPPRINT:Device}=CLIP(LOC:DefaultPrinter) ! Devuelvo la impresora predeterminada
Avisa como te fue.....
Saludos desde Venado Tuerto
Marcelo Madelón