Nelson
13 de Noviembre del 2003

Necesito que mi programa imprima facturas, pero tengo el problema de que el tamaño de la factura no pertenece a ninguno existente.
Entonces no me queda bien el salto de pagina.

pablo
13 de Noviembre del 2003

nesecito que me mandes un modelo de una nota de debito, de credito y alguna factura lo nesecito cuantto antes, gracias.

Raul
13 de Noviembre del 2003

Esta rutina te imprime una matriz para que busques las posiciones de las columnas y 66 lineas de impresion y 80 columnas que corresponden a una pagina 8 1/2 por 11".
Puedes cambiar el numero de lineas hasta que se ajuste al tamaño de tu formulario.
Luego en el programa utilizas lo mismo, solo que en lugar de la variable 'X' y del lazo FOR...ENDFOR, utiliza do while fila<40 and !eof()
enddo
Y dentro de este ultimo colocas con @fila,1 say " " lo que se tenga que imprimer de la tabla que utilizas.
Espero te ayude, sino escribi a mi privado para poder enviarte el codigo total para facturas, notas de debito o credito

set printer on
set devi to print
for x=1 to 66
@ x,1 say '123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890' font 'arial',10

next
set device to screen
set printer to