TReport y Groups

[Armando]

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

[RenOmaS]

Modifica en el Report.prg

Code: Select all  Expand view  RUN

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


por

Code: Select all  Expand view  RUN

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


Despues ya puedes utilizar

Code: Select all  Expand view  RUN

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

Saludos

[Armando]

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.

[José Ríos]

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?

http://fivetechsoft.com/forums/viewtopic.php?t=6620

Saludos.

[Armando]

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

[José Ríos]

!Armando Muchas Gracias!.

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

Saludos.

[José Ríos]

Corrijo.

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