Buenas.
Tengo la necesidad de pasar datos de una tabla remota de ADS a otra local en CDX, lo hago de la siguiente manera:
Pues bien, lo que he puesto arriba, funciona a la perfección, SALVO que en el momento que alguno de los campos es de tipo fecha, a partir de ahí todos los campos dse descuadran, y el campo destino de tipo fecha se queda sin valor.
¿Como podría hacerlo?
¿Donde está el error?
Gracias y un saludo
José Luis
Tengo la necesidad de pasar datos de una tabla remota de ADS a otra local en CDX, lo hago de la siguiente manera:
SELECT 0
use "TABLAADS" SHARED alias "TABLAADS" via "ADS"
ESTRUCTURA:=TABLAADS->(dbstruct())
dbcreate("c:\LOCAL\TABCDX.dbf",ESTRUCTURA,"DBFCDX")
SELECT 0
use "c:\LOCAL\TABCDX.dbf" EXCLUSIVE ALIAS "TABCDXr" VIA "DBFCDX"
TABLAADS->(dbgotop())
while !TABLAADS->(eof())
TABCDX->(dbappend())
for i=1 to TABLAADS->(fcount())
TABCDX->(fieldput(i, TABLAADS->(fieldget(i))))
next i
TABLAADS->(dbskip())
enddoPues bien, lo que he puesto arriba, funciona a la perfección, SALVO que en el momento que alguno de los campos es de tipo fecha, a partir de ahí todos los campos dse descuadran, y el campo destino de tipo fecha se queda sin valor.
¿Como podría hacerlo?
¿Donde está el error?
Gracias y un saludo
José Luis
