Clarion - Salto de pág. en Reporte

 
Vista:

Salto de pág. en Reporte

Publicado por Fernando  (18 intervenciones) el 23/03/2009 16:56:16
Hola a todos, estoy haciendo un reporte y necesito que no haga saltos de página, que solo me respete el espacio del fin de grupo, porque quiero imprimirlo en hoja continua.
Si alguien sabe como hacerlo, le agradecería compartirlo.

Muchas Gracias

Saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

RE:Salto de pág. en Reporte

Publicado por Marcelo Madelon (572 intervenciones) el 26/03/2009 12:07:51
Hola Fernando.

Tendría que saber si al reporte lo estás generando en forma normal o con los templates LinePrint o PrintDrv.

Creo que lo que queres hacer es imprimir original y duplicado en una misma hoja.
La pregunta es A4 o Continuo?

Si la impresión la generas en forma normal. Lo que yo hago es manejarme todo con detalles.
Uno para el Encabezado, otro para el detalle y uno para el total.

Luego en RerportProperties - Filters properties le indico FALSE y marco en ExcludeUnfiltered
Luego los imprimo a mano
Aca tengo una Queue cargada con los datos de las lineas.
Primero imprimo el Encabezado y por ultimo el total y lo repito segun las copias que necesite.

C# = 0
Loop
If C# = 2 ! 3 si necesitas triplicado ! 4......
break ! sale del loop
end
Print(RPT:Cabeza) ! Imprimo el detalle que se llama Cabeza
Loop I# = 1 to records(QLineas) ! leo la Queue
get(QLineas,I#)
Print(RPT:Lineas) ! Imprimo el detalle que se llama Lineas
END
Print(RPT:Totales) ! Imprimo el Total
C# += 1
End

! Con LinePrint........
!!!! Ejemplo de imprimir usando line print
! aca no uso un Reporte sino un proceso

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

! te paso la impresion de algunos campos con su formato

! Es Igual escribir: Para setear la letra Normal
LinePrint(CHR(27)&CHR(18)....) o
LinePrint('<27,18>'....)
! Por costumbre las lines de Seteo, saltos de pag., etc. uso:
LinePrint('<27,64>',,0)
! y las que son de impresión de datos uso:
LinePrint(CHR(27)&CHR(18)&' '&AC1:ApellidoNombre)
LinePrint(CHR(27)&CHR(15)&' '&AC1:Direccion) ! Condensado
! A continuación va un ejemplo

LinePrint('<27,64>',,0) ! Inicializo Impresora
LinePrint('<27,67,72>',,0) ! Longitud pagina a 72 Líneas
LinePrint('<27,102,1,1>',,0) ! Salta 1 Lineas
LinePrint(CHR(27)&CHR(18)&' '&ATI:DenominacionCbte)
LinePrint('<27,102,1,2>',,0) ! Salta 2 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) ! Letra Normar
LinePrint(CHR(27)&CHR(15)&' '&AC1:Direccion) ! Letra Condensada
LinePrint(CHR(27)&CHR(18)&Format(AC1:CodPostal,@P(####-##)P)&' '&AEN:Localidad&' '&Format(AC1:Cuit,@P##-########-#P)&' '|
&ASI:Abreviatura)

LinePrint('<27,102,1,2>',,0) ! Salta 2 Lineas
LinePrint(FF) ! salto de página
!!! PrintDrv es un poco diferente a LinePrint pero no mucho (Line Print es Gratis)
! FIJATE QUE LOS COMANDO DE IMPRESIÓN SON LOS MISMOS QUE USABAMOS EN COBOL (DOS puro)
Si no los tenes fijate en el manual de la impresora.

Un abarazo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar