Página 1 de 1

Footer en Browse para Ariel

Publicado: Dom Dic 29, 2019 3:43 am
por Carlos Ortiz
//------------------------------------------------------------------------------
METHOD SumarRegistros() CLASS TReporteVentasLaboratorio
local aTotales:=array(2)

::oDBBrowseEnca:oDataset:Select()
::oDBBrowseEnca:oDataset:gotop()
sum ::oDBBrowseEnca:oDataset:t_cantidad,;
::oDBBrowseEnca:oDataset:t_total to;
aTotales[1],;
aTotales[2] while !eof()

::oDBBrowseEnca:aCols[1]:cFooter := "Totales:"
::oDBBrowseEnca:aCols[2]:cFooter := transform(aTotales[1],AppData:cFormatoCantidad)
::oDBBrowseEnca:aCols[3]:cFooter := transform(aTotales[2],AppData:cFormatoMoneda)
::oDBBrowseEnca:oDataset:gotop()
RETURN Nil

Re: Footer en Browse para Ariel

Publicado: Jue Ene 02, 2020 12:12 pm
por Ariel
Carlos,

gracias lo reviso.
Saludos.