FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour TReport y Groups
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
TReport y Groups
Posted: Fri Jun 09, 2006 10:54 PM

Amigos del foro:

Tengo un reporte con TReport con dos Grupos definidos

GROUP gOrden ON (cDetOrd)->DET_ORD etc, etc
GROUP gTipo ON (cDetOrd)->DET_TIP etc etc

ON STARTGROUP MsgInfo("Hola")

Perooooooo, el mensaje "Hola" me lo muestra al inicio de ambos grupos, y lo que yo necesito es que se muestre solo en el primero (gOrden)
cómo puedo diferenciarlos para enviar el mensaje solo en el primero ?

Saludos a todos

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
Posts: 205
Joined: Fri Oct 07, 2005 05:07 PM
TReport y Groups
Posted: Sat Jun 10, 2006 02:02 PM
Modifica en el Report.prg
  Eval( ::bStartGroup, ::aGroups[ nGroup] )

por
  Eval( ::bStartGroup, ::aGroups[ nGroup], nGroup )


Despues ya puedes utilizar
oRpt:bStartGroup := {|o,n| If( n==1, //grupo 1
                               MsgInfo( "hola Grupo 1"), ;
                               MsgInfo( "hola otro Grupo" ) }


Saludos
:-) :-)
Saludos/regards

RenOmaS



skype: americo.balboa
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
TReport y Groups
Posted: Sat Jun 10, 2006 02:55 PM

RenOmaS:

Muchas gracias !, funcionó de maravilla.

Solo me queda pedirle a A.L. que incorpore este cambio en futuras versiones, no soy partidario de tener la LIB de FWH + otras LIBs con las modificaciones como esta.

Saludos a todos.

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
Posts: 119
Joined: Fri Nov 04, 2005 12:23 AM
TReport y Groups
Posted: Sun Apr 08, 2007 09:07 PM

Hola Armando.

     ¿A ti no te sucedio que, al imprimir el primer primer grupo del documento, el encabezado del grupo se sobreescribe con primer elemento del grupo?

     <!-- m --><a class="postlink" href="http://fivetechsoft.com/forums/viewtopic.php?t=6620">http://fivetechsoft.com/forums/viewtopic.php?t=6620</a><!-- m -->

     Saludos.
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
TReport y Groups
Posted: Mon Apr 09, 2007 01:11 AM

José:

Algunas veces me pasa eso pero lo he solucionado con

oReport:EndLine()
oReport:StartLine()

y en algunos caso más con la línea

oReport:BackLine(n) // n es el número de lineas que deseo retroceder

Saludos, 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
Posts: 119
Joined: Fri Nov 04, 2005 12:23 AM
TReport y Groups
Posted: Mon Apr 09, 2007 05:18 AM

!Armando Muchas Gracias!.

  Problema arreglado anexando un oReport:end() al inicio del StartGroup.

   Saludos.
Posts: 119
Joined: Fri Nov 04, 2005 12:23 AM
TReport y Groups
Posted: Mon Apr 09, 2007 05:19 AM

Corrijo.

Problema arreglado anexando un oReport:endLine() al inicio del StartGroup.

Continue the discussion