Clarion - Varios registros en un reporte

Hola tengo un reporte en donde se debe de imprimir mas de un registro como puedo hacer esto.

Es decir tengo recibos los cuales se necesitan imprimir. Para imprimirlos se usa una hoja preimpresa cada recibo tiene un tamaño definido por ejemplo de 10cm x 15cm. Resulta que son hojas continuas cada hoja continua le caben 3 recibos y necesito imprimir por lo tanto 3 recibos en una sola hoja.

Se puede decir que en una hoja carta caben los 3 recibos que les comento. ¿Cómo puedo hacer los que les digo?

Es decir..

------------------------------------------------
| |
| registro 1 |
| |
| |
| registro 2 |
| |
| |
| registro 3 |
| |
-------------------------------------------------

Los registro 2 y 3 son de la misma tabla, no son iguales entre si.

Hola Isai
te sugiero:
1.- en tu aplicacion en tu reporte , en Report Properties, en Label: le pones
Recibos u otro nombre, en Paper size: Other y en las medidas , las medidas
de tu recibo
2.- en Windows.. Inicio..Impresoras y Faxes...Archivo...Propiedades del Servidor..
formularios...Check en crear nuevo formulario..en nombre del formulario poner
Recibo o el nombre que le asignaste en el reporte...luego las medidas que le
asignaste en el reporte..guardar formulario

en adelante el reporte usara el formulario que esta configurado en el windows en forma automatica

espero que esto te ayude
saludos
German Minaya
Lima Peru

Hola,

Si papel continuo estamos hablando de una impresora matricial, por ese motivo para mi tendrias que hacer una impresion bajo DOS.

Tu hoja seguro tiene 72 lineas de impresion, por lo que te quedarian 24 lineas por recibo, sacando la primera y la ultima, te quedarian 22 lineas para imprimir,

Podes usar cualquier metodo de impresion bajo DOS y no te va a fallar,

Eso seguro

Suerte y a tu disposicion

Pedro

Podes usar el LinePrint (Free)
Tambien existe el PrintDrive (Free)
Te paso el código para imprimir con LinePrint, si necesitas usar el PrintDrive
Avisame.
Espero te sirva, Saludos

! IMPRIMIR CON LINEPRINT
! Agregar desde los Embeds de la GLOBAL :
! AFTER GLOBAL INCLUDEs
Include('prnprop.clw')

! Variables Usadas con LinePrint
! Agregalas editando las variables pica en el boton (...) y copia lo que sigue

[SCREENCONTROLS]
! PROMPT('LOC : Default Printer:'),USE(?LOC:DefaultPrinter:Prompt)
! ENTRY(@s128),USE(LOC:DefaultPrinter)
[REPORTCONTROLS]
! STRING(@s128),USE(LOC:DefaultPrinter)
LOC:DefaultPrinter STRING(128)
!!> IDENT(4294965500),PROMPT('LOC : Default Printer:'),HEADER('LOC : Default Printer'),PICTURE(@s128)
[SCREENCONTROLS]
! PROMPT('LOC : Receipt Printer:'),USE(?LOC:ReceiptPrinter:Prompt)
! ENTRY(@s126),USE(LOC:ReceiptPrinter)
[REPORTCONTROLS]
! STRING(@s126),USE(LOC:ReceiptPrinter)
LOC:ReceiptPrinter STRING(126)
!!> IDENT(4294965498),PROMPT('LOC : Receipt Printer:'),HEADER('LOC : Receipt Printer'),PICTURE(@s126)

! Codigo ....
! guardo la impresora predeterminada y la cambio por una matricial

LOC:DefaultPrinter = (PRINTER{PROPPRINT:Device}) ! Guardo la Impresora 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,72>',,0) ! Longitud pagina a 72 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

.
.
..
LinePrint(FF) ! salto de pagina

! una vez que terminas devolves la impresora que tenias como predeterminada al inicio
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

Gracias a todos por sus respuestas.

Si es una hoja continua pero no se imprimen en impresora matricial sino laser, cada hoja contiene 3 recibos como les comente.

Ya tengo en propiedades del servidor de impresión el formato de mi recibo y tambien en el reporte le puse que el tamaño es Otro.

Les comento, en mi reporte solo tengo un detalle de tal forma que segun yo lo mas facil es crear los controles al vuelo y mandar a imprimir el detalle y todo estaria bien.

No se hace lo que esperaba, nunca baja el detalle como con un reporte normal.
Las posiciones las manipulo por código puesto que el cliente puede decidir en que lugar se imprime un campo en especifico.

Espero haber sido claro cualquir duda con gusto la aclaro. Espero su ayuda porque no logro conseguir mi impresión.