topic-33593

Posts: 400

Joined: Fri May 11, 2007 08:20 PM

error al totalizar columna xbrowse
Posted: Fri Feb 03, 2017 11:52 PM

Hola foro
estoy tratando de totalizar una columna en xbrowse pero me tira este error:

AGGR_SUM , totaliza la columna por si sola?

   XBrNumFormat( 'A', .t. )
   REDEFINE XBROWSE oBrwDet                                               ;        //19
      FIELDS DETPARTET->articu                                            ;
            ,Articulo->DesG                                               ;
            ,DETPARTET->Cantid                                            ;
            ,articulo->Cap*DETPARTET->Cantid                              ;
            ,DETPARTET->Precio                                            ;
            ,round((articulo->Cap*DETPARTET->Cantid)*DETPARTET->Precio,2) ;
      FIELDSIZES 65,200,70,70,70,70                    ;
      HEADERS "Codigo"                                 ;
             ,"Descripción"                            ;
             ,"Cant."                                  ;
             ,"Metros"                                 ;
             ,"Precio"                                 ;
             ,"Importe"                                ;            
      ID 4001 OF oDlgDet                               ;
      LINES CELL NOBORDER UPDATE FOOTERS
      
      WITH OBJECT oBrwDet
          :aCols[3]:nFooterType        := AGGR_SUM
          :MakeTotals()
      END

fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql

joseluisysturiz

Posts: 2064

Joined: Fri Jan 06, 2006 09:28 PM

Re: error al totalizar columna xbrowse
Posted: Sat Feb 04, 2017 12:59 AM

Me funciona bien asi....saludos... :shock:

WITH OBJECT aBrw[9] // COLUMNAS
:aCols[2]:cFooter := "Total --->"
***
:aCols[3]:nTotal := 0 // PARA TOTALIZAR COL.(MakeTotals)
END

Dios no está muerto...

Gracias a mi Dios ante todo!

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: error al totalizar columna xbrowse
Posted: Sat Feb 04, 2017 08:51 AM

IMPORTANT:

Please add

Code (fw): Select all Collapse

ALIAS "articulo"

to the REDEFINE command.
It is important that Browse knows the alias name when you define xbrowse.

If you are calling oBrw:SetRDD() later, please do not call it.

Regards

G. N. Rao.

Hyderabad, India

artu01

Posts: 400

Joined: Fri May 11, 2007 08:20 PM

Re: error al totalizar columna xbrowse
Posted: Mon Feb 06, 2017 10:01 PM

Thank Mr. Rao and JoseLuis
Now run Ok
this is my code

Code (fw): Select all Collapse

   XBrNumFormat( 'A', .t. )
   REDEFINE XBROWSE oBrwDet  ;
      ALIAS "DETPARTET"       ;
      COLUMNS "ARTICU","ARTICULO->DESG","CANTID","ARTICULO->CAP*CANTID","PRECIO","round((articulo->Cap*Cantid)*Precio,2)";
      FIELDSIZES 65,200,70,70,70,70                    ;
      HEADERS "Codigo"                                 ;
             ,"Descripción"                            ;
             ,"Cant."                                  ;
             ,"Metros"                                 ;
             ,"Precio"                                 ;
             ,"Importe"                                ;            
      ID 4001 OF oDlgDet                               ;
      LINES CELL NOBORDER UPDATE FOOTERS
      
      WITH OBJECT oBrwDet
        :aCols[2]:cFooter:="Total -->"      
          :aCols[3]:nTotal:=0
        :aCols[4]:nTotal:=0
        :aCols[6]:nTotal:=0        
          :MakeTotals()
      END

fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: error al totalizar columna xbrowse
Posted: Tue Feb 07, 2017 08:52 AM

This is better

Code (fw): Select all Collapse

     WITH OBJECT oBrwDet
        :aCols[2]:cFooter:="Total -->"      
        :aCols[3]::nFooterType := AGGR_SUM
        :aCols[4]::nFooterType := AGGR_SUM
        :aCols[6]::nFooterType := AGGR_SUM        
        :MakeTotals()
      END

Regards

G. N. Rao.

Hyderabad, India

artu01

Posts: 400

Joined: Fri May 11, 2007 08:20 PM

Re: error al totalizar columna xbrowse
Posted: Tue Feb 07, 2017 05:38 PM

run perfect!

Thank you Mr. Rao

fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql

FiveTech Support Forums

Continue the discussion