FiveTech Support Forums

compañeros buenas tardes
necesito al final de un reporte con report imprimir
una informacion al final del listado, a veces termina en media pagina, a veces al final

Como determino en report el valor de la fila actual cuando se termina el listado ?, he intentado muchas cosas pero resulta

en que parte del report pongo dicho codigo
por ahora esta en on endpage
y leppongo en posiciones fijas pero a veces hay mas dato y ahi hay problema

ah y perdon por la ignorancia nunca pude dominar estas clases

Saludos

Wilson:

A ver si no he llegado demasiado tarde, utiliza los siguiente:

Cuando ya tengas definido el reporte incluyes esta línea

oReporte:bPostEnd := { || Totales(oReporte,oCab)}

Observa que estamos asignando una función que se ejecuta despues de los totales "normales" del report, en esta función debes imprimir todo lo que tu quieras, no importa en que parte de la página haya terminado el reporte eso lo vamos a revisar un poco más adelante.

FUNCTION Totales(oReporte,oCab)
oReporte:STARTLINE()
oReporte:SAY( 2,"FKcc:",,RPT_RIGHT)
oReporte:SAY( 3,TRANSFORM(oCab:HDR_FKC,"@Z 999.9999"),,RPT_RIGHT)
oReporte:SAY( 8,"A N T I C I P O S",2,RPT_RIGHT)
oReporte:SAY(14,"RESUMEN DE GASTOS",2,RPT_RIGHT)
oReporte:ENDLINE()
OverFlow(oReporte)
RETURN(.T.)

Apoyate de las funciones STARTLINE() y ENDLINE() para saltar de renglón, observa la función OverFlow(oReporte), ahí esta el truco !

FUNCTION OverFlow(oReporte)
IF oReporte:NeedNewPage()
oReporte:EndPage()
oReporte:StartPage()
ENDIF
RETURN(.T.)

Saludos, espero haber sido lo suficientemente explicito, si lo fui y la ayuda te sirvió, ya podemos terminar de descorchar la botella, jeje
si no es así, estoy a tus ordenes para enviarte un ejemplo mas completo

Armando

Armando por fin !!!!!!!!!
alguien me escucha, gracias lo voy a probar,
tengo un problema grave con la ultima version de fwh la 2.7
y report y xHarbour (ultima version), me aparecen solo pantallas vacias en el preview
pero si el mismo codigo lo hago un solo programa (sacando del programa grande) si me funciona correctamente (el preview)

que puede ser?????
gracias x tu interes y si tienes ejemplos mas completos, gracias

a decir verdad pataleo mucho con las impresiones en windows

Saludos

Armando, funciono perfecto, gracias y Saludos

Wilson:

Me alegra haber ayudado.

Ahora sí ya podemos terminar de descorchar la botella,

Saludos

Armando, gracias x todo, ahora tengo otro problema y este si no tiene ni pies ni cabeza

En un programa de Fwh que funciona perfecto con fwh 2.4 y harbour de aquella epoca

le he logrado compilar con Fwh27 (Me he asegurado de que los includes esten bien aountados, las librerias, etc)

y tengo le problema que no muestra el preview del report con fwh27, pero ahi lo raro si saco este codigo (funcion de report) fuera del programa y le hago un ejecutable y lo llamo desde el programa grande si funciona el preview, he probado de todo, no se que hacer, lo mismo me esta pasando en un programa que estoy escribiendo desde cero nunca sale el preview
que podra ser ??

Saludos y gracias