PDA

Ver la Versión Completa : obtener valor de un campo despues de un insert + applyupdates(0)


wonder boy
10-06-2004, 22:23:54
Hola, aclaro de antemano que estoy usando IB6 + DBExpress + D7
Quisiera saber como hago para obtener el valor que se genera para un campo clave atraves de un trigger en interbase, lo que estoy haciendo hoy es algo similar a esto:

with clientdataset do begin
insert;
fieldvalues['nombre'] := 'Pablo Gonzalez';
applyupdates(0);
end;

esta tabla tiene un campo CODIGO que tiene a su vez un trigger que genera el valor para este, cuando hago el applyupdates(0), no hay manera de que me devuelva otra cosa que no sea null, si hago un refresh, veo el valor pero pierdo la ubicacion del registro, si tomo la ubicacion antes del applyupdates o despues de este no me deja en el mismo registro, sino en cualquier otra parte, y yo necesito imperiosamente ese valor para insertar registros en otras tablas. Si no me explique bien, diganmelo y vuelvo a formular la pregunta, y si no que alguien me ayudeeeee!!!!!

desde ya, muchas gracias!!!

guillotmarc
10-06-2004, 23:05:39
Hola.

Si el valor que se asigna en el trigger, es la clave primaria, yo prefiero utilizar un procedimiento almacenado que devuelva el nuevo valor, y asignarlo directamente al clientdataset en Delphi (en lugar de que se haga automaticamente en un trigger).

Ejplo.:


CREATE PROCEDURE "CLIENTS_AutoInc"
RETURNS (NOU_ID INTEGER)
AS
BEGIN
NOU_ID = GEN_ID(CLIENTS_GEN, 1);
END


PD : Si el trigger no está asignando la clave primaria, entonces antes de llamar al ApplyUpdates, guardate en una variable el valor de clave primaria. Después de llamar al ApplyUpdates refresca el clientdataset, y posicionate de nuevo en el registro, mediante un Locate con la clave primaria que está en la variable.

Saludos.