Como Evaluar :maketotals() con una funcion propia ?

Board index FiveWin para Harbour/xHarbour Como Evaluar :maketotals() con una funcion propia ?

Posts: 400

Joined: Tue Oct 16, 2007 05:51 PM

Como Evaluar :maketotals() con una funcion propia ?
Posted: Tue Dec 04, 2012 01:21 PM

Buen Dia,

Pues bien como lo digo en la pregunta..
como puedo hacer que en un xBrowse, el metodo ::maketotals() use una funcion de usuario,
por lo que veo en xBrowse.prg, el metodo ::maketotals() se evalua de acuerdo al valor de ::nFooterType // AGGR_TOTAL, AGGR_STD .... etc

Necesito hacer unos calculos propios en una columna de un xBrowse y que el Footer de la misma me muestre el resultado que necesito..

gracias,

albeiro,

Saludos,
Regards,

Albeiro Valencia
www.avcsistemas.com

albeiroval

Posts: 400

Joined: Tue Oct 16, 2007 05:51 PM

(Resuelto) Como Evaluar :maketotals() con una funcion propia
Posted: Tue Dec 04, 2012 02:23 PM

Bien,

Me respondo a mi mismo..

Por lo pronto lo he solventado asi :

Code (fw): Select all Collapse

 WITH OBJECT oBrw:MontoCaja
    :bFooter:= {|| Str(TotalCol01(oBrw),12,2)}
    :nFooterType:= AGGR_TOTAL
  END

 WITH OBJECT oBrw
    :lFooter = TRUE 
    :bChange    = {|| oBrw:MakeTotals() }
    :MakeTotals()
  END     

 ........

static function TotalCol01( oBrw )
  local Total
  
  Total:= ( oBrw:aArrayData[1,2]+oBrw:aArrayData[2,2]+oBrw:aArrayData[3,2]+oBrw:aArrayData[4,2] )-;
             ( oBrw:aArrayData[5,2]+oBrw:aArrayData[6,2] ) 
  
  oBrw:MontoCaja:nTotal = Total
Return Total

No se si es la mejor opcion pero funciona,

Saludos,

Saludos,
Regards,

Albeiro Valencia
www.avcsistemas.com

joseluisysturiz

Posts: 2064

Joined: Fri Jan 06, 2006 09:28 PM

Re: Como Evaluar :maketotals() con una funcion propia ?
Posted: Wed Dec 05, 2012 02:47 AM

Saludos, gracias por el tips, buscaba algo parecido, saludos... :shock:

Dios no está muerto...

Gracias a mi Dios ante todo!

FiveTech Support Forums

Continue the discussion