FiveTech Software tech support forums

... oCol:cEditPicture = "99,999,999,999.99" oCol:nEditType = 0 //no editable oCol:nDataStrAlign := 1 oCol:cHeader = "Interes" oCol:lTotal := .t. //para totalizar cols a report y/o excel oCol:bFooter = {|| TRANSFORM(nTotal,"99,999,999,999.99") } oCol:nFootStrAlign := 1 ...

... ARRAY acDetalle UPDATE FOOTERS LINES AUTOCOLS CELL; ON DBLCLICK(additem(@acDetalle,oLbx2)) WITH OBJECT oLbx2:ocol('Salary') :ltotal:=.t. :ntotal:=0 END olbx2:maketotals()

oCol:ltotal, oCol:nTotal and oBrw:MakeTotals() work from 9.3 onwards. You can total yourself. In that case, assign the total to oCol:nTotal. oCol:ntotal is displayed in the footer using the oCol:cEditPicture, if any, or using ...

... From version 10.2 onwards it is enough to assign oCol:nFooterType := AGGR_TOTAL // or AGGR_SUM. It is not necessary to assign values for oCol:lTotal and oCol:nTotal. Other available options are : oCol:nFooterType := AGGR_MAX or AGGR_MIN or AGGR_COUNT or AGGR_AVERAGE/AGGR_AVG or AGGR_STD/AGGR_STDEV ...

... method totals only those columns where oCol:nTotal is numeric and displays oCol:nTotal in the footer using the oCol:cEditPicture. oCol:lTotal is used to total in export to Excel and in Report method.

oBrw:aCols[6]:lTotal := .t.
oBrw:aCols[6]:nTotal := 0 // this line also is required

oBrw:MakeTotals()

... := {|| 2 } ENDIF ACTIVATE REPORT oReport ; ON STARTGROUP ( oReport:NewLine() ); ON ENDGROUP ( oReport:nPage:=0, Eval(bCabez)); ON END oReport:lTotal:=.f. ; //No imprimir el gran total en la ultima pagina ON ENDPAGE oReport:lPageTotal:=.f. //No imprimir el acum en cada pagina oFont:End() oFont1:End() ...

... END WITH OBJECT oBrw:Amount :cEditPicture := '9,99,999.99' :nTotal := 0 // this and next line tell the browse to auto total :lTotal := .t. END WITH OBJECT oBrw:Discount :bOnChange := { |oCol,uOldVal| oBrw:Dis:Value := ( oCol:Value != 0 ), ; oBrw:MakeTotals(), oBrw:RefreshFooters() ...

nageswaragunupudi, Error description: Error BASE/1005 Class: 'NIL' has no property: LTOTAL It happens in the line:   WITH OBJECT oBrwRec:oCol( 'IMP.INI' )      :lTotal  := .t.      :nTotal  := 0   END     I repeat, thank you very much for the example. Regret ...

... is simple enough and seems to be what I'm looking for, but I get a runtime error: Error description: Error BASE/1005 Class: 'NIL' has no property: LTOTAL It happens in the line:   WITH OBJECT oBrwRec:oCol( 'IMP.INI' )      :lTotal  := .t.      :nTotal ...

... Rick Same syntax works for any data (ado, rdd, array ). After defining the columns either in @ .. xbrowse command or in ADD TO oBrw command, oCol:lTotal := .t. oCol:nTotal := 0 // if we already know the total, we can assign the total value. There is no need to separately assign cFooter or bFooter. ...

... ; columns "Last", "City", "Salary" ; setup ; ( oBrw:lFooter := .t. ,; oBrw:lFastEdit := .t. ,; oBrw:Salary:lTotal := .t. ,; oBrw:Salary:nTotal := 0 ,; oBrw:Salary:nEditType := EDIT_GET ,; oBrw:MakeTotals() ; ) return nil Se establece como pie de página la ...

... ; columns "Last", "City", "Salary" ; setup ; ( oBrw:lFooter := .t. ,; oBrw:lFastEdit := .t. ,; oBrw:Salary:lTotal := .t. ,; oBrw:Salary:nTotal := 0 ,; oBrw:Salary:nEditType := EDIT_GET ,; oBrw:MakeTotals() ; ) return nil Salary column totals are set as footer ...

... no tengo la tabla, lo cual no es grave pq se puede ir creando a medida que de errores de base de datos, etc 2.- me da errores lo siguiente: oCol:lTotal := .t. //para totalizar cols a report y/o excel oCol:bFooter = {|| TRANSFORM(nTotal2,"9,999,999,999.99") } o:nFootStrAlign := 1 oCol:bEditWhen ...

... row only otherwise. We do not have to write code to decide whether full browse is to be refreshed or only edited row is to be refreshed. If oCol:lTotal is true and oCol:bFooter is not empty the xbrowse automatically refreshes the footer also. We do not have to write code calling oCol:RefreshFooter. ...