FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Obtener Totales en Report
Posts: 46
Joined: Tue Oct 11, 2005 02:23 PM
Obtener Totales en Report
Posted: Fri Jul 30, 2010 06:57 PM
Hola Foro: Necesito obtener los totales de las columnas listadas en un report por grupos .... hice esto pero siempre me devuelve 0
GROUP ON oPagos:FieldGetByName('tip_desc');
FOOTER "Total Registros "+oReport:aGroups[1]:cValue+" "+LTrim(Str(oReport:aGroups[1]:nCounter))+" -----> "+Str(oReport:aGroups[1]:aTotal[1],6,2) ;
FONT 1

Desde ya muchas gracias .....
Carlos Gustavo Marucco

Rio Gallegos - Santa Cruz

PATAGONIA ARGENTINA

FWH 10.08 - Eagle1 Ver 6.0 - xHarbour 1.2.1 Rev 6717

xMate Ver 1.15 - Workshop Ver 4.5 - Windows 7
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: Obtener Totales en Report
Posted: Fri Jul 30, 2010 07:40 PM
prueba colocando TOTAL a la columna

Code (fw): Select all Collapse
COLUMN TITLE "Total" Temp->Total FONT 2 PICTURE "@E 999,999,999"  TOTAL SIZE 10
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 46
Joined: Tue Oct 11, 2005 02:23 PM
Re: Obtener Totales en Report
Posted: Fri Jul 30, 2010 11:03 PM

Gracias por el aporte Patricio, pero no es lo que necesito, eso que comentas en el el report comun, lo que necesito es obtener los totales en un GROUP ON ...

gracias

Carlos Gustavo Marucco

Rio Gallegos - Santa Cruz

PATAGONIA ARGENTINA

FWH 10.08 - Eagle1 Ver 6.0 - xHarbour 1.2.1 Rev 6717

xMate Ver 1.15 - Workshop Ver 4.5 - Windows 7
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Obtener Totales en Report
Posted: Mon Aug 02, 2010 02:59 AM
cmarucco wrote:Gracias por el aporte Patricio, pero no es lo que necesito, eso que comentas en el el report comun, lo que necesito es obtener los totales en un GROUP ON ...

gracias

oCol:lTotals := .t. // to show totals in report and export to excel
oCol:nTotal := <anynumericvalue> // oBrw:MakeTotals() to work

From version 10.5 onwards it is enough to write
oCol:nFooterType := AGGR_SUM
Regards



G. N. Rao.

Hyderabad, India
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: Obtener Totales en Report
Posted: Mon Aug 02, 2010 07:35 AM
Carlos: Prueba así (a ver si entendí tu requerimiento)

FOOTER "Total Registros "+oReport:aGroups[1]:cValue+" "+LTrim(Str(oReport:aGroups[1]:nCounter))+" -----> "+Transform(oReport:aGroups[1]:aTotal[4] ,"999,999,999.99") //[4] es la columna en el reporte, que totalizas

además:
ACTIVATE REPORT oReport ON STARTGROUP ( oReport:aColumns[4]:=0 ,oReport:NewLine() )

Saludos.
Francisco Alegria P.
Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 46
Joined: Tue Oct 11, 2005 02:23 PM
Re: Obtener Totales en Report
Posted: Tue Aug 03, 2010 05:33 PM

Hola Foro:
respecto a este tema... y probando.... debo decir que lo que patricio comento , si funciona... es decir, que aparentemente, para obtener los totales en los grupos, hay que referenciar TOTAL en las columnas numericas que deseamos se totalicen al final del grupo, pero lo que pasa, es que ademas, al momento de imprimir, me pone los dos totales y encimados ( por ahora), .....
Ejemplo de patricio
COLUMN TITLE "Total" Temp->Total FONT 2 PICTURE "@E 999,999,999" TOTAL SIZE 10
de esta forma, si va acumulando en los totales del grupo ......
Alguna otra sugerencia ,.,...
MUCHAS GRACIAS

Carlos Gustavo Marucco

Rio Gallegos - Santa Cruz

PATAGONIA ARGENTINA

FWH 10.08 - Eagle1 Ver 6.0 - xHarbour 1.2.1 Rev 6717

xMate Ver 1.15 - Workshop Ver 4.5 - Windows 7
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: Obtener Totales en Report
Posted: Tue Aug 03, 2010 08:12 PM
Hola

yo lo hago de esta manera

Code (fw): Select all Collapse
    if cRutPro = NIL
        COLUMN TITLE "Rut"                                        DATA Tempo->Rut_Cli   FONT 1 SIZE 10
        COLUMN TITLE iif( lCli, "Clientes", "Proveedor" ) DATA Tempo->Nom_Cli   FONT 1      SIZE 30
    endif

    COLUMN TITLE "Documento"        DATA Tempo->Tip_Doc                 FONT 1 SIZE 15
    COLUMN TITLE "Fecha", "Emisión"    DATA Tempo->FeC_Emi                     FONT 1 SIZE 10
    COLUMN TITLE "Fecha", "Vto."        DATA Tempo->Fec_Vto                 FONT 1 SIZE 10
    COLUMN TITLE "Total","Documento" DATA Tempo->Total                  FONT 1 PICTURE "@E 99,999,999"  SIZE 10
    COLUMN TITLE "Total", "Abonos"  DATA Tempo->Abono                   FONT 1 PICTURE "@E 99,999,999"  SIZE 10
    COLUMN TITLE "Total"                    DATA Tempo->Total-Tempo->Abono   FONT 2 PICTURE "@E 99,999,999"  SIZE 10 TOTAL
    COLUMN TITLE "Saldo","Acumulado"    DATA Tempo->Saldo                   FONT 1 PICTURE "@E 99,999,999"  SIZE 10

    if cRutPro = NIL
        GROUP ON Tempo->RUT FOOTER "Sub-Total"  FONT 2
    endif

    END REPORT

    oReport:bSkip := { || Tempo->( dbSkip() ) }
    oReport:cName := "Sistema Administrativo Comercial"
    oReport:oDevice:cDocument := "Control de impresión"
    oReport:cGrandTotal := "   Total General  "
    oReport:cPageTotal  := "   Total acumulado"





Uploaded with ImageShack.us
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

Continue the discussion