Footers con texto xBrowse

Post Reply
User avatar
JoseAlvarez
Posts: 807
Joined: Sun Nov 09, 2014 5:01 pm

Footers con texto xBrowse

Post by JoseAlvarez »

Hola amigos, saludos

Al entrar a una funcion, hago una consulta SELECT y cargo un oQuery
ese resultado lo paso a un array y luego lo muestro en un xBrowse, colocandole un footer asi:

Code: Select all | Expand

:aCols[2]:cFooter:=" Total Participantes Activos -> "+transform( len(aPart), "@E 9,999,999.99")
pues funciona perfecto la primera vez, al entrar y construir el browse, pero al trabajar y agregar mas datos al arreglo y hacer los respectivos refresh(), maketotals e incluso el RefreshFooters() , nada, no se actualiza el footers. Si al entrar habia 3 registros y agrego 2 mas, sigue mostrando 3.

que me esta faltando?
"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.
JESUS MARIN
Posts: 176
Joined: Wed Jan 02, 2019 8:36 am

Re: Footers con texto xBrowse

Post by JESUS MARIN »

Buenos dias
Al tratarse de un array, debes refrescar los datos.
Prueba de esta manera :

Code: Select all | Expand

oBrw:aArrayData=aDatos         // donde aDatos es tu array con la info actualizada
oBrw:Refresh()
 
Saludos
Jesús Marín
User avatar
JoseAlvarez
Posts: 807
Joined: Sun Nov 09, 2014 5:01 pm

Re: Footers con texto xBrowse

Post by JoseAlvarez »

JESUS MARIN wrote:Buenos dias
Al tratarse de un array, debes refrescar los datos.
Prueba de esta manera :

Code: Select all | Expand

oBrw:aArrayData=aDatos         // donde aDatos es tu array con la info actualizada
oBrw:Refresh()
 
Saludos
Hola Jesús,
Gracias por tu ayuda.

Sí, de hecho, luego de ingresar o eliminar un registro a la tabla hago esto:

Code: Select all | Expand

    aPart:={}
    aPart:=oQuery:FillArray()
    oBrwPart:aArrayData:=aPart
    oBrwPart:MakeTotals()
    oBrwPart:RefreshFooters()
    oBrwPart:Refresh()
 
y nada, no totaliza.

uso fw 19.06, mariaDB (local) y MySql (remoto), tdolphin y harbour
"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.
User avatar
cmsoft
Posts: 1293
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina

Re: Footers con texto xBrowse

Post by cmsoft »

Jose:
Entiendo que es porque lo que pones como footer es un texto fijo (aunque tiene una variable), al momento de armarse toma el valor de dicha variable y ya no cambia.
Lo que puedes hacer es cambiar el cFooter por bFooter asi

Code: Select all | Expand

   :aCols[2]:bFooter:= {|| " Total Participantes Activos -> "+transform( len(aPart), "@E 9,999,999.99")}
...

    aPart:={}
    aPart:=oQuery:FillArray()
    oBrwPart:aArrayData:=aPart
    oBrwPart:RefreshFooters()
    oBrwPart:Refresh()
 
User avatar
JoseAlvarez
Posts: 807
Joined: Sun Nov 09, 2014 5:01 pm

Re: Footers con texto xBrowse

Post by JoseAlvarez »

cmsoft wrote:Jose:
Entiendo que es porque lo que pones como footer es un texto fijo (aunque tiene una variable), al momento de armarse toma el valor de dicha variable y ya no cambia.
Lo que puedes hacer es cambiar el cFooter por bFooter asi

Code: Select all | Expand

   :aCols[2]:bFooter:= {|| " Total Participantes Activos -> "+transform( len(aPart), "@E 9,999,999.99")}
...

    aPart:={}
    aPart:=oQuery:FillArray()
    oBrwPart:aArrayData:=aPart
    oBrwPart:RefreshFooters()
    oBrwPart:Refresh()
 
César, un gran saludo amigo.
Voy a probar y te comento.
"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.
User avatar
JoseAlvarez
Posts: 807
Joined: Sun Nov 09, 2014 5:01 pm

Re: Footers con texto xBrowse

Post by JoseAlvarez »

Listo César,

Tal como indicaste,

Muchas Gracias !!
"Los errores en programación, siempre están entre la silla y el teclado..."

Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin

Carora, Estado Lara, Venezuela.
Post Reply