TReport y Groups

Post Reply
User avatar
Armando
Posts: 2479
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México
Contact:

TReport y Groups

Post by 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
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
RenOmaS
Posts: 205
Joined: Fri Oct 07, 2005 5:07 pm

Post by RenOmaS »

Modifica en el Report.prg

Code: Select all

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

Code: Select all

  Eval( ::bStartGroup, ::aGroups[ nGroup], nGroup )
Despues ya puedes utilizar

Code: Select all

oRpt:bStartGroup := {|o,n| If( n==1, //grupo 1
                               MsgInfo( "hola Grupo 1"), ;
                               MsgInfo( "hola otro Grupo" ) }
Saludos
:twisted: :twisted:
User avatar
Armando
Posts: 2479
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México
Contact:

Post by 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.
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
José Ríos
Posts: 119
Joined: Fri Nov 04, 2005 12:23 am

Post by 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.
User avatar
Armando
Posts: 2479
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México
Contact:

Post by Armando »

José:

Algunas veces me pasa eso pero lo he solucionado con

oReport:EndLine()
oReport:StartLine()

y en _ 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
José Ríos
Posts: 119
Joined: Fri Nov 04, 2005 12:23 am

Post by José Ríos »

!Armando Muchas Gracias!.

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

Saludos.
José Ríos
Posts: 119
Joined: Fri Nov 04, 2005 12:23 am

Post by José Ríos »

Corrijo.

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