Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   Procedimiento que no procesa todos los registros (https://www.clubdelphi.com/foros/showthread.php?t=48216)

sitrico 18-09-2007 22:20:34

Procedimiento que no procesa todos los registros
 
Buenas, tengo un procedimiento que debería ajustar el valor de un campo en otra tabla por cada ocurrencia del campo clave:

Código SQL [-]
CREATE PROCEDURE AD_ANULARPROFORMA (
    elidproforma integer)
as
declare variable vidservasig integer;
declare variable vcantidad integer;
declare variable vcodigo char(20);
begin
  For select idservasig, Cantidad, Codigo
  from ad_detalleproformas
  Where IdProforma = :elidproforma
  Into :vidservasig, :VCantidad, :vcodigo Do
     Begin
     UPDATE ad_serviciosasignados SET idproforma = 0
     WHERE ad_serviciosasignados.idservasig = :vidservasig;
     suspend;
  End
end

Se supone que por cada idservasig encontrado ajustará

idproforma = 0

Pero no ejecuta si tengo más de un registro :confused:

Alguien me puede echar una mano? Gracias

jhonny 18-09-2007 22:42:57

El suspend; sobra, a lo mejor quitandolo se solucione el problema ;).

sitrico 18-09-2007 22:51:18

Cita:

El suspend; sobra, a lo mejor quitandolo se solucione el problema .
:eek:

1000 gracias Jhonny, tenía 2 horas rompiendome la cabeza :D

jhonny 18-09-2007 22:57:46

Cita:

Empezado por sitrico (Mensaje 232024)
:eek:

1000 gracias Jhonny, tenía 2 horas rompiendome la cabeza :D

Bueno, pues que bueno :).


La franja horaria es GMT +2. Ahora son las 17:20:31.

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