Ver Mensaje Individual
  #1  
Antiguo 27-07-2007
gaia gaia is offline
Registrado
 
Registrado: jul 2007
Posts: 2
Reputación: 0
gaia Va por buen camino
Smile mostrar resultado de procedimiento almacenado en delphi

Saludos a todos los miembros del foro

Estoy desarrollando una aplicación en delphi y el gestor de Base de datos que utilizo es SQL Server 2000

Tengo un procedimiento almacenado como el siguiente:

CREATE procedure ejemplo @num int, @tot float output
As
select fecha, nombre
from tabla
where (numero = @num)

set @tot = (select sum (monto)
from tabla
where (numero = @num)

Ejecutando este procedimiento en el analizador de consultas, devuelve todos los valores correctamente.

El código que uso en delphi es:

with DataModule1.SPejemplo do
begin
Prepare;
ParamByName('@num').AsString := Edit1.Text;
ExecProc;
Edit2.Text := ParamByName('@tot').AsString;
end;

utilizo la conexión ODBC

Mi problema es el siguiente:
Muestro los valores devueltos por el select en un dbgrid (hasta aqui todo bien), pero cuando deseo mostrar el valor de la variable @tot en un edit, sólo me muestra '0', no genera ningún error.

No sé qué está mal o cuál es el error que estoy cometiendo.

Agradezco de antemano, cualquier ayuda, comentario o referencia que puedan brindarme.

Gaia
Responder Con Cita