Ver Mensaje Individual
  #1  
Antiguo 18-08-2008
Raptor Raptor is offline
No confirmado
 
Registrado: jul 2003
Ubicación: Santo Domingo R.D.
Posts: 105
Reputación: 0
Raptor Va por buen camino
Unhappy Ayuda con ADOStoredProc + Interbase, por favor

Hola chicos, como estan espero que bien, tenia un rato que no entraba a este foro.

Si le he posible por favor necesito una manito con este caso, es mi primera ve que uso ADO con interbase, y estoy tratando de ejecutar un Store Procedure en mi base de datos de interbase desde delphi con ADO y me arroja un error (Dynamic SQL Error
-SQL error = -104
-Token unknown - line 1, char 0
- EXEC)

mi SP funciona muy bien corriendolo desde la misma base de datos, pero cuando lo pongo en delphi tengo el mencionado error.

mi sp :
CREATE PROCEDURE SP_GET_SECUENCIA (ID INTEGER)
returns (VSECUENCIA INTEGER)
AS

begin
vSecuencia=0;
FOR SELECT ult_secuencia
From control_secuencia
Where ID =:ID
into :vSecuencia
DO

BEGIN
vsecuencia=:vsecuencia + 1;
UPDATE control_secuencia
Set ult_secuencia=:vsecuencia
Where ID =:ID;
END
SUSPEND;
end


Codigo en delphi.

Try
With ADOStoredProc1 Do
Begin
Parameters.Clear;
ProcedureName:='SP_GET_SECUENCIA';
Parameters.Add;
parameters[0].name:='id';
parameters[0].value:=1;
ExecProc;
//active:=true;
End;

Except
On Error: Exception Do
raise;
End;


Tengo este mismo sp usandolo con BDE y funciona bien pero con ADO no.


gracias por su ayuda.

Nota : Estuve buscando este error en el foro y no lo encontre disculpe si ya estaba y no lo vi..
Responder Con Cita