Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 10-06-2004
Avatar de wonder boy
wonder boy wonder boy is offline
Miembro
 
Registrado: mar 2004
Ubicación: Argentina
Posts: 50
Poder: 21
wonder boy Va por buen camino
obtener valor de un campo despues de un insert + applyupdates(0)

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!!!
Responder Con Cita
  #2  
Antiguo 10-06-2004
Avatar de guillotmarc
guillotmarc guillotmarc is offline
Miembro
 
Registrado: may 2003
Ubicación: Huelva
Posts: 2.638
Poder: 23
guillotmarc Va por buen camino
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.:

Código SQL [-]
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.
__________________
Marc Guillot (Hi ha 10 tipus de persones, els que saben binari i els que no).
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 11:59:26.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi