Page 1 of 1
TReport y Groups
Posted: Fri Jun 09, 2006 10:54 pm
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
Posted: Sat Jun 10, 2006 2:02 pm
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
Posted: Sat Jun 10, 2006 2:55 pm
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.
Posted: Sun Apr 08, 2007 9:07 pm
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.
Posted: Mon Apr 09, 2007 1:11 am
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
Posted: Mon Apr 09, 2007 5:18 am
by José Ríos
!Armando Muchas Gracias!.
Problema arreglado anexando un oReport:end() al inicio del StartGroup.
Saludos.
Posted: Mon Apr 09, 2007 5:19 am
by José Ríos
Corrijo.
Problema arreglado anexando un oReport:endLine() al inicio del StartGroup.