Buenas a todos necesito ayuda con un error.
Explico: Estoy con Delphi 7 y me conecto a una BD de FoxPro(*.DBF) por medio de los componentes ADO que trae Delphi, el ADO lo conecto por medio de un ODBC de windows.Ya tengo otros programas que se cuelgan muy bien de esas BD y extraigo informacion para hacer reportes a la medida de mis clientes, en esta ocasion y por primera vez necesito actualizar registros en la BD.
La informacion actualizada la tengo un una BD de Acces y de alli busco el registro en la tabla DBF para actualizar algunos campos.
El codigo que uso para hacerlo es el siguiente:
Código Delphi
[-]
TBLPRODMDB.First;
WHILE NOT TBLPRODMDB.Eof DO
BEGIN
IF TBLPRODDBF.Locate('CCODIGOP01',TblProdMDBCCODIGOP01.Value,[]) THEN
BEGIN
TBLPRODDBF.Edit;
TblProdDBFccontrol01.Value:=1;
IF TBLUM.Locate('CNOMBREU01',TblProdMDBCIDUNIDA01.Value,[]) THEN
TblProdDBFcidunida01.value:=tBLumcidunidad.value;
TBLPRODDBF.Post;
TBLPRODMDB.NEXT;
END;
END;
SHOWMESSAGE('Proceso Terminado');
end;
El error que me sale me dice de manera general: "Statement too long" y es al darle el POST a la tabla.
De hecho no siquiera me deja poner el 1 del campo TblProdDBFccontrol01.
Alguien ha modificado tablas DBF con Delphi?
Gracias...