Ver Mensaje Individual
  #4  
Antiguo 04-05-2007
OscarBravo OscarBravo is offline
Miembro
 
Registrado: feb 2007
Posts: 23
Reputación: 0
OscarBravo Va por buen camino
No puedo grabar los gegidtros

Cita:
Empezado por Caral
Hola OscarBravo
Lo importante seria saber primero, si sabes grabar los registros o si no te deja grabar los registros, son dos cosas diferentes.
Que componentes usas de ado, como llamas a la consulta?
Saludos
De antemano muchas gracias por la colaboración que me haz brindado.

Te comento lo siguiente:

Para conectarme a las tablas (Directorio donde estan las tablas), utilizo un ODBC. La conexion que utilizo es ADOConnection.

Esta es el código con el que intento grabar los registros.

NumRec := Format('%.8d',[(Dm.TableLbcMafcc.RecordCount + 1)]);
Dm.TableLbcMafcc.Append;

Dm.TableLbcMafcccodfac.Value := Numrec;
Dm.TableLbcMafcccodemp.Value := Dm.QrFacturacionident.Value;
Dm.TableLbcMafcccodrec.Value := Dm.QrFacturacionexamen.Value;
Dm.TableLbcMafccfecini.Value := Dm.QrFacturacionfecha.Value;
Dm.TableLbcMafccfecFin.Value := Dm.QrFacturacionfecha.Value;
Dm.TableLbcMafcctotal.Value := Total;
Dm.TableLbcMafccabono.Value := 0;
Dm.TableLbcMafcccontabil.Value := False;
Dm.TableLbcMafcc.Post;

Este codigo tampoco me funcionó

(* Dm.TableLbcMafcc.AppendRecord([Numrec,
Dm.QrFacturacionident.Value,
Dm.QrFacturacionexamen.Value,
Dm.QrFacturacionfecha.Value,
Dm.QrFacturacionfecha.Value,
Total,
0,
False]);*)
Responder Con Cita