Page 1 of 1

prueba de codigo...

Posted: Tue Jan 09, 2007 12:39 pm
by Elias Torres
Hola Antonio, puedes probar el siguiente código??

El tema es que esto ya lo habiamos hablado y si no recuerdo mal ya podia leer datos del tipo 'currency'...pero resulta que me da error, no al intentar leer un campo, que lo hace bien, sino al intentar crearme una tabla con ese campo....

Te pongo el siguiente ejemplo...

#include <FWCE.ch>

FUNCTION main()

dbCreate("_tst", {{"CURR", "Y", 8, 2}})
use _tst
append blank
replace CURR with 123.45
append blank
replace CURR with 345.567
append blank
replace CURR with 356.78901
append blank
replace CURR with 789.456789
close

RETURN nil


No se si cuando me actualicé a la nueva version del fwppc el compilador no era el mismo que yo tenia despues de que Przemek hiciera la comprobaciones pertinentes.... Una vez me mandastes un compilador al correo pero lo he perdido. Con ese si me funcionaba pero nose que ha pasado...


Saludos y gracias.

Elías Torres.

Posted: Thu Jan 11, 2007 2:11 pm
by Antonio Linares
Elías,

Por lo visto la DBF se crea pero el campo aparece de tipo "integer" al inspeccionarlo con VFP en vez de tipo currency.

Puedes confirmarlo ? gracias,

Posted: Thu Jan 11, 2007 4:47 pm
by Elias Torres
Antonio,

A mi ni siquiera se me crea la tabla.... me da un error que dice:

Open error
stack calls:
DBUSEAREA(0)
MAIN(6)

El codigo que estoy probando es el siguiente:

#include <FWCE.ch>

FUNCTION main()

dbCreate(CURDIR()+"\tst", {{"CURR", "Y", 8, 2}})
use (CURDIR()+"\tst")
append blank
replace CURR with 123.45
append blank
replace CURR with 345.567
append blank
replace CURR with 356.78901
append blank
replace CURR with 789.456789
close

RETURN nil

Saludos

Elías Torres

Posted: Thu Jan 11, 2007 8:13 pm
by Antonio Linares
Elías,

Sí se crea, lo que ocurre es que si no especificas CurDir() + "\tst" entonces se crea en el directorio raiz del Pocket PC

Posted: Fri Jan 12, 2007 9:40 am
by Elias Torres
Antonio,
efectivamente coloco el curdir() +"\tst" pero no me crea la tabla... no se porque... En cambio si pruebo a cambiarle el tipo de campo, por ejemplo a numerico, entonces si me crea la tabla...Ha cambiado el compilador?? Me comentas que a ti ahi si te funciona, entonces, que tengo yo diferente??


Saludos.

Elías Torres.

Posted: Fri Jan 12, 2007 11:38 am
by Antonio Linares
Elías,

Estás usando el build de Harbour que te enviamos por email ?

Posted: Fri Jan 12, 2007 1:25 pm
by Elias Torres
Antonio,

disculpa por mi despiste...Se conoce que cuando nos actualizamos a la nueva versión de FWPPC sustitui el build de Harbour que me habias mandado. Lo he rescatado del correo y lo he vuelto a instalar y...ahora si!!

Una curiosidad solamente...cuando crea la tabla, esta la crea como entero y no como currency...¿Puede haber alguna solución al respecto?


Saludos y gracias.

Elías Torres.

Posted: Fri Jan 12, 2007 1:51 pm
by Antonio Linares
Elías,

Hay que comentárselo a Przemek en la lista de correo de Harbour