PDA

Ver la Versión Completa : Error en insercion con Datasnap


rruffino
15-03-2010, 13:34:39
Hola gente, estoy haciendo una aplicación con datasnap. Del lado servidor tengo un modulo de datos remoto con los componentes IBDatabase, IbTransaction, IBQuery, IBUpdateSQL e IBdatasetProvider, todo enlazado a las correspondientes tablas y base de dato.
Del lado del cliente tengo el SocketConnection, Datasourece y Clientdataset. He logrado la comunicacion entre las aplicaciones y desde el cliente puedo recorrer y filtrar la información de las tablas. El problema esta cuando quiero agregar nueva información, no pasa nada, y aqui les pego el codigo del boton qe agrega
try
ClientDataSet1.Insert;
ClientDataSet1NOMBRE.Value:=Edit2.Text;
ClientDataSet1EDAD.Value:=StrToInt(Edit3.Text);
ClientDataSet1.Post;
if (ClientDataSet1.ApplyUpdates(0)>0)then
begin
showmessage('Error en servidor');
ClientDataSet1.CancelUpdates;
end;
except
ClientDataSet_cobranza.CancelUpdates;
raise
end;
ClientDataSet_cobranza.RefreshRecord;

Cabe destacar que nuca saltan excepciones el codigo finaliza como si se hubiera ejecutado exitosamente.
Desde ya agradezco cualquier ayuda.
Saludos!:)

Al González
16-03-2010, 01:19:48
¿En sí qué esperas que suceda? ¿Tiene que ver con ese RefreshRecord? ¿Para qué lo usas? :)

rruffino
16-03-2010, 13:57:57
Hola, gracias por tu respuesta. Lo que espero es que el registro quede en la tabla de manera persistente, y ahora me salta un error que dice:
Project Preoject1.exe raised exception class EDBClient with message 'At beginning of table'. Process stoped. Use step or run to continue.

Nuevamente gracias.

Al González
16-03-2010, 17:38:02
Cabe destacar que nuca saltan excepciones el codigo finaliza como si se hubiera ejecutado exitosamente.
Lo que espero es que el registro quede en la tabla de manera persistente, y ahora me salta un error que dice:
Project Preoject1.exe raised exception class EDBClient with message 'At beginning of table'.
Dos preguntas:

1. ¿Qué cambiaste de tu código para que pasara de no elevarse ninguna excepción, a elevarse esa excepción?

2. ¿Con qué finalidad usas el método RefreshRecord?

Saludos.

Al González. :)