FiveTech Software tech support forums

Has probado

oReporte:lTotal:=.f.

... AGGR_SUM :bSumCondition := { || AScan( oBry:aSelected, oBry:BookMark ) > 0 } :cFooterPicture:= "@Z 9,999,999,999.99" :nTotal := 0.00 :lTotal := (.T.) END :bOnMultiSelect := { || oBry:MakeTotals() } :bChange := { || IF( LEN( oBry:aSelected ) <= 1,( oBry:oCol(05):nTotal := oBry:oCol(05):Value,; ...

... := { || AScan( oBry:aSelected, oBry:BookMark ) > 0 } :cFooterPicture := "@Z 9,999,999,999.99" // estas lineas :nTotal := 0 :lTotal := .t. END Espero te sirva. Saludos.

Silvio.Falconi wrote:Now seem run ok
perhaps I found the error
oCol:lTotal := .t.
oCol:nTotal :=0

Do you now mean, there is no bug in xbrowse or report or round function of Harbour?

Now seem run ok
perhaps I found the error
oCol:lTotal := .t.
oCol:nTotal :=0

... } oCol:cHeader := i18n( "Importo Totale" ) oCol:nWidth := 150 oCol:nDataStrAlign := AL_RIGHT oCol:cEditPicture := PictEuros() oCol:lTotal := .t. oCol:nTotal :=0 oCol:nFooterType := AGGR_SUM oCol:nFootStrAlign := AL_RIGHT FUNCTION PictEuros() RETURN( "@E 9,999,999,999.99" ...

... Instead of ADD oCol TO oBrwSumar DATA ARRAY ELEMENT 2 ;HEADER a2m("Test") ;SIZE 50 ; PICTURE "99999" ;EDITABLEoCol:lTotal := .t.oCol:nTotal := 0 Try ADD oCol TO oBrwSumar DATA ARRAY ELEMENT 2 ;HEADER a2m("Test") ;PICTURE "999999999" ;EDITABLE ...

... the footer Example ADD oCol TO oBrwSumar DATA ARRAY ELEMENT 2 ; HEADER a2m("Test") ; SIZE 50 ; PICTURE "99999" ; EDITABLE oCol:lTotal := .t. oCol:nTotal := 0 I dont want total values like "3.0E5" // oCol:cFooterPicture := ("9999999999") // This is not possible ...

... .T. ; ALIAS cAlias AUTOSORT FOOTERS LINES CELL NOBORDER ; BACKGROUND aGrad VERTICAL added colum-colors WITH OBJECT oBrw:Salary :nTotal := 0 ; :lTotal := .t. ; :nEditType := EDIT_GET :bClrstd := {|| { If( ( oBrw:cAlias )->( Deleted() ), 255, nXbrColTxt ), ; If( ( oBrw:cAlias )->SALARY ...

... i, 4 ] Endif oCol:oDataFont := oFont NEXT WITH OBJECT oBrw WITH OBJECT oBrw:aCols[2] :nDataStrAlign := AL_RIGHT :cEditPicture := '@E 99,999.99' :lTotal := .t. :nFooterType := AGGR_SUM :nFootStrAlign := AL_RIGHT END :nStretchCol := STRETCHCOL_WIDEST :lHscroll:=.f. :lVscroll:=.T. :lRecordSelector ...

... ; oBrw:RefreshFooters() } NEXT WITH OBJECT oBrw .... WITH OBJECT oBrw:aCols[8] :nDataStrAlign := AL_RIGHT :cEditPicture := '@ €99,999.99' :lTotal := .t. * :nTotal := nTotal :nFooterType := AGGR_SUM :nFootStrAlign := AL_RIGHT :nFootBmpNo := 1 // Footer BMP END :nStretchCol := STRETCHCOL_WIDEST ...

... oQryBancos:mov_mtomovi, "@E 9,999,999.99" ) ) } :nWidth := 70 :bEditValue := "@E 9,999,999.99" :nFootStrAlign := AL_RIGHT :lTotal := .t. :nTotal := 0 // sumamtomovi( oQryBancos ) :nFooterType := AGGR_SUM :nEditType := EDIT_GET :bEditValid := { | oGet, oCol | mayorqcero( ...

WITH OBJECT oBrw:aCols[8] :bStrData := { || CALC(IN->ITQTY,IN->ITUNIT,IN->ITTAX,IN->ITDESCONT,OBRW) } :nTotal := 0 :lTotal := .t. :nFooterType := AGGR_TOTAL MakeTotals() method totals numeric result of bEditValue codeblock. Please provide bEditValue codeblock returning a numeric ...

... := {|| IIF( LEN( aItems ) = 0, SPACE(10) ,; // bEditValue TRANSFORM( aItems[oBrw:nArrayAt, 7], "@E 9,999,999.99" ) ) } :nWidth := 100 :lTotal := .t. // PARA TOTALIZAR COL. :nTotal := sumador(oBrw) // PARA TOTALIZAR COL. :nFooterType := AGGR_SUM // PARA TOTALIZAR COL. :cEditPicture := ...

... } :addbmpfile( ".\bitmaps\cassa16.bmp" ) :nDataStrAlign := AL_RIGHT :cEditPicture := '@ €99,999.99' :lTotal := .t. :nTotal :=0 :nFooterType := AGGR_SUM :nFootStrAlign := AL_RIGHT :nFootBmpNo := 1 // Footer BMP END