FiveTech Software tech support forums

richard-service wrote:Mr. RAO

This function support TMySQL and MakeTotal

XBrowse's functionality works the same way for any datasource, whether it is tmysql, dbf, ado, etc.

Mr. RAO

This function support TMySQL and MakeTotal

Rao I have a couple of questions for you .. here is my MakeTotals() and xBrowse Header code ..  REDEFINE xBROWSE oLbxC             ;         RECORDSET oRsQuota           ;         COLUMNS "PERSNO",            ;                 "EMPLOYEE", ...

... con 2 campos, un campo caracter que uso para Marcar y Desmarcar, segun los documentos que se seleccionan o no y un campo importe donde hago un maketotal, quiero mostrar el total de los documentos marcados, no marcados y todos, osea si tengo 10 documentos y solo selecciono/marco 3, quisiera ...

... en el browse, no para la edición... si, utilizando trans() funciona pero me transforma la columna de nca a alfanca y luego no la reconoce el maketotal , etc Silvina Has intentado con TRANSFORM oCol:bEditValue :={|| TRANS(CAMPO,"@Z 999,999.99) }

... lo copie de otra funcion donde si trabaja bien, es mas, es para el mismo trato con la unica diferencia que en el que me hace el salto extraño uso maketotal, la 1ra.columna no es editable, la 2da.si y la tercera no, y la 3ra. su valor es igual al valor fijo de la 1ra.multiplicado por el valor entrado ...

... lo obtengo asi: oBrw:MakeTotals() oBrw:Refresh() nTotalCol := oBrw:Monto:nTotal nTotalCol recibe el valor oBrw:Monto es la columna donde usas el maketotal,, puede ser el header de la columna o el numero, ejemplo aCol[n] nTotal contiene el valor resultante de maketotal espero sea lo que necesitas, ...

... 0. O sea la consulta sería: como obtengo el valor de dicha columna? Mario, si entiendo bien lo que quieres, nMonto de la columna cuando defines maketotal mantiene ese valor, yo lo uso cuando en una columna hay diferentes valores y quiero que maketotal sea condicionado dependiendo del valor de ...

This is the fix in xbrowse.prg
In the method Value( uVal ) CLASS TXBrwColumn, all the old code was commented out and new program code was introduced. The bug is in the new code.
Please delete the entire new code and uncomment the old code. This fixes the problem.

Many thanks for your reply.

Birol Betoncu

Yes. This is bug in 10.3.

Till bug fix is published, a temporary work around is :
ACTIVATE DIALOG oDlg ..... ON INIT ( oBrw:MakeTotals(), oBrw:RefreshFooters() )

After I upgrade to FWH 10.3 Maketotals not working.
No problem on DBF's but If you use an array it is not working.
Try testxbr3 in samples folder.

Birol Betoncu

... ) local oBrush, n cFunc := ProcName( 0 ) USE CUSTOMER NEW ALIAS (cAlias) SHARED VIA "DBFCDX" SET ORDER TO TAG STATE GO TOP MakeTotal() DEFINE BRUSH oBrush RESOURCE "STONE" DEFINE WINDOW ownd MDICHILD OF WndMain() TITLE "RDD - Selected Cols" @ 0,0 XBROWSE ...

Antonio, en samples el Testxbr3.prg utiliza esta funcion MakeTotal() Donde consigo informacion de lo que hace??? La busque por todos lados y no encuentro nada. Disculpa la ignorancia. Un abrazo. El Loco =>)) Me contesto yo mismo :oops: Ya lo encontre ...

Antonio, en samples el Testxbr3.prg utiliza esta funcion MakeTotal()
Donde consigo informacion de lo que hace???
La busque por todos lados y no encuentro nada.
Disculpa la ignorancia.

Un abrazo. El Loco =>))