una de report

una de report

Postby wilsongamboa » Fri Mar 10, 2006 9:30 pm

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 'W' Gamboa A
Wilson.josenet@gmail.com
User avatar
wilsongamboa
 
Posts: 549
Joined: Wed Oct 19, 2005 6:41 pm
Location: Quito - Ecuador

Postby Armando » Sun Mar 12, 2006 2:23 am

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
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3106
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Postby wilsongamboa » Sun Mar 12, 2006 2:38 am

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
Wilson 'W' Gamboa A
Wilson.josenet@gmail.com
User avatar
wilsongamboa
 
Posts: 549
Joined: Wed Oct 19, 2005 6:41 pm
Location: Quito - Ecuador

Postby wilsongamboa » Mon Mar 13, 2006 2:48 am

Armando, funciono perfecto, gracias y Saludos
Wilson 'W' Gamboa A
Wilson.josenet@gmail.com
User avatar
wilsongamboa
 
Posts: 549
Joined: Wed Oct 19, 2005 6:41 pm
Location: Quito - Ecuador

Postby Armando » Mon Mar 13, 2006 2:54 am

Wilson:

Me alegra haber ayudado.

Ahora sí ya podemos terminar de descorchar la botella, :-)

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
Armando
 
Posts: 3106
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México

Postby wilsongamboa » Mon Mar 13, 2006 3:40 am

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
Wilson 'W' Gamboa A
Wilson.josenet@gmail.com
User avatar
wilsongamboa
 
Posts: 549
Joined: Wed Oct 19, 2005 6:41 pm
Location: Quito - Ecuador


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 37 guests