FiveTech Support Forums

Muy buenas, he compilado con la nueva version de FWPPC y no he cambiado nada de código y no me muestra los datos en los listbox, mirar yo uso la bases de datos así:

cFichero:=DATA_FOLDER + "\ctbfcli.dbf"
use &cFichero alias ctbfcli new
index on razsoc to i_fcli1

y despues con la version anterior de FWPPC mostraba los datos así:

@ 2.2,0 LISTBOX oObj[6] FIELDS TienePedido(ctbfcli->codcli),TieneCobros(ctbfcli->codcli),ctbfcli->codcli,ctbfcli->razsoc COLSIZES 18,13,35,200 HEADERS "PA","C","Cód.","Razón Social" SIZE 240,210 ALIAS "ctbfcli" FONT oFont1 COLOR COLOR_LISTBOX

Pero no me muestra ningún dato y antes si.

¿Porque puede ser?

Un Saludo.

Prueba a cambiar:

use &cFichero alias ctbfcli new

por

use ( cFichero ) alias ctbfcli new

Antonio, lo he cambiado y nada sigue igual, tambien antes y ahora me dice que el alias no existe.

¿Que podemos hacer?

Un Saludo.

Justo despues de:

index on razsoc to i_fcli1

llama a:
MsgInfo( Alias() )
MsgInfo( RecCount() )

y veamos que aparece

Me aparece
CTBFCLI
y
11258

Un Saludo.

Los valores de las cuatro columnas son todos tipo cadena ?

TienePedido(ctbfcli->codcli)
TieneCobros(ctbfcli->codcli)
ctbfcli->codcli
ctbfcli->razsoc

Si todos son de tipo cadena, si antes de cambiar a la nueva version se mostraban los datos perfectamente, y sin cambiar el código fuente y compilar con la nueva no se muestran los datos.

Un Saludo.

Perdona Antonio, he hecho un bucle para ver si tiene datos la base de datos ctbfcli y la recorre y tiene datos entonces supongo que tiene que ser algo del listbox.

Este es mi código:

@ 2.2,0 LISTBOX oObj[6] FIELDS TienePedido(ctbfcli->codcli),TieneCobros(ctbfcli->codcli),ctbfcli->codcli,ctbfcli->razsoc COLSIZES 18,13,35,200 HEADERS "PA","C","Cód.","Razón Social" SIZE 240,210 ALIAS "ctbfcli" FONT oFont1 COLOR COLOR_LISTBOX

Un Saludo.

Por favor envíame por email la DBF (suficiente con que tenga algunos registros) y lo probamos aqui, gracias

Muy buenas Antonio, ya está solucionado, realizando pruebas me he dado cuenta que al definir un WINDOW por defecto tiene nowait, entonces se ejecutaba la funcion para cerrar las bases de datos y no mostraba nada.

¿Es cierto que por defecto WINDOW viene con NOWAIT?

Un Saludo.

Si, esa modificación se hizo para mantener compatibilidad con FWH y FW.

De todas formas ACTIVATE WINDOW ... admite la cláusula MODAL en FWPPC.

Me alegro de que lo hayas localizado

Muchas gracias por todo Antonio.

Un Saludo.