treport
Publicado: Dom Mar 05, 2006 11:31 am
Un report con groups en el ultimo de los cuales hay 2 elementos, bueno y los
que hubiese, el ultimo se lo traga siempre. Abajo tiene como clausula WHILE
!( cAlias )->( Eof() ) ???? no entiendo. te paso aqui el codigo fuente del
report, bueno parte de el para no sobrecargar esto.
GROUP oGroup OF oReport ;
ON ( cAlias )->n_categ ;
HEADER Trad_id( "Categoría", NIDIOMA ) + " : " + ;
Transform( ( cAlias )->n_categ, "999" ) + " " + Transform(
( cAlias )->c_categ, "@!X" ) ;
FOOTER " " ;
FONT 1
COLUMN TITLE Trad_id( "Contacto", NIDIOMA ) ;
DATA Alltrim( ( cAlias )->idkey ) ;
PICTURE "@X" ;
FONT 2 ;
OF oReport
......
WITH OBJECT oReport
:oHeader:aFonts[1] := 1
FOR n := 2 TO 4
:oHeader:aFonts[n] := 2
NEXT
FOR n := 1 TO 3
:oTitle:aFonts[n] := 2
NEXT
:nTitleUpLine := rlSINGLE
:nTitleDnLine := rlSINGLE
:nGridStyle := rgBOTH
:nGroupLine := rlNONE
:ntotalLine := rlNONE
END WITH
RUN REPORT oReport WHILE !( cAlias )->( Eof() )
Un saludo
que hubiese, el ultimo se lo traga siempre. Abajo tiene como clausula WHILE
!( cAlias )->( Eof() ) ???? no entiendo. te paso aqui el codigo fuente del
report, bueno parte de el para no sobrecargar esto.
GROUP oGroup OF oReport ;
ON ( cAlias )->n_categ ;
HEADER Trad_id( "Categoría", NIDIOMA ) + " : " + ;
Transform( ( cAlias )->n_categ, "999" ) + " " + Transform(
( cAlias )->c_categ, "@!X" ) ;
FOOTER " " ;
FONT 1
COLUMN TITLE Trad_id( "Contacto", NIDIOMA ) ;
DATA Alltrim( ( cAlias )->idkey ) ;
PICTURE "@X" ;
FONT 2 ;
OF oReport
......
WITH OBJECT oReport
:oHeader:aFonts[1] := 1
FOR n := 2 TO 4
:oHeader:aFonts[n] := 2
NEXT
FOR n := 1 TO 3
:oTitle:aFonts[n] := 2
NEXT
:nTitleUpLine := rlSINGLE
:nTitleDnLine := rlSINGLE
:nGridStyle := rgBOTH
:nGroupLine := rlNONE
:ntotalLine := rlNONE
END WITH
RUN REPORT oReport WHILE !( cAlias )->( Eof() )
Un saludo