FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Primera Linea de Report.
Posts: 350
Joined: Wed Nov 02, 2005 03:28 PM

Primera Linea de Report.

Posted: Mon Feb 08, 2010 05:41 PM

Hola, Tengo que hacer un report, que suma bases imponibles,pero tengo que poner yo el valor inicial , ejemplo: Yo le daria el valor de 1023,23 con un get.

Titulo Report

                          Base Imponible
                         ==============

Suma anterior 1.023,23
Factura xxx 100,23
Total 1.123.23

Los valores de Factura xxx lo saca de un fichero, pero no es logico insertar registros para que lo haga.
¿Alguna idea? Gracias.

Saludos,
Regards,

Jose Luis Alepuz
joseluis@mancomputer.com
www.mancomputer.com
Posts: 1088
Joined: Fri Oct 07, 2005 03:33 PM

Re: Primera Linea de Report.

Posted: Mon Feb 08, 2010 06:46 PM

Hola,

haber se me ocurre algo asi

lFirst : = .T.

COLUMN ... DATA IF( lFirst, 'valor inicial', dbf -> campo ) ....

...

oReport:bSkip ;= {|| IF( lFirst, lFirst := .F., dbf -> ( DBSKIP() ) }

es medio locura, pero creo que funcionaria :-)

saludos

Marcelo

Posts: 350
Joined: Wed Nov 02, 2005 03:28 PM

Re: Primera Linea de Report.

Posted: Tue Feb 09, 2010 10:59 AM

Primera pruebas ok.

Saludos,
Regards,

Jose Luis Alepuz
joseluis@mancomputer.com
www.mancomputer.com
Posts: 350
Joined: Wed Nov 02, 2005 03:28 PM

Re: Primera Linea de Report.

Posted: Tue Feb 09, 2010 07:12 PM

Hola Marcelo, gracias por tu ayuda y abusando un poquito más de ti a ver si me hechas una mano (no al cuello,jajajaja)

Me esta funcionando perfectamente para poder poner yo en la primera hoja la suma anterior, puesto que se saca de procesos distintos
y hay que poner el valor inicial a mano.
Pero he intentando ponerlo en la segunda hoja tambien el "suma anterior" poniendo oReport:bStartPage := {|| lfirst:=.t. }
pero no me hace caso. ¿Alguna sugerencia?

Gracias.

Saludos,
Regards,

Jose Luis Alepuz
joseluis@mancomputer.com
www.mancomputer.com
Posts: 1088
Joined: Fri Oct 07, 2005 03:33 PM

Re: Primera Linea de Report.

Posted: Tue Feb 09, 2010 11:05 PM

Hola,

prueba con

oReport:bEndPage := {|| lFirst := .T. }

saludos

Marcelo

Posts: 350
Joined: Wed Nov 02, 2005 03:28 PM

Re: Primera Linea de Report.

Posted: Wed Feb 10, 2010 08:56 AM

Hola me ha funcionado correctamente.
El problema me parece que era que tenia dos oReport:bEndPage,
He puesto estos en una sola linea y parece que va todo ok.
Voy a seguir haciendo pruebas.

Muchas Gracias.

Saludos,
Regards,

Jose Luis Alepuz
joseluis@mancomputer.com
www.mancomputer.com

Continue the discussion