Ayuda sobre un Procedimiento Almacenado

[Nuria]

Hola a tod@s:

No sé si es aquí donde debo dejar mi mensaje, pero supongo que sí.

A ver si alguno me puede hechar un cable, por que no consigo que me funcione un Procedimiento Almacenado.

Trabajo con Delphi 7 y con Interbase 6.0. El procedimiento lo cree de la siguiente manera:

set term ^;
create procedure prvsoli2(exp integer)
returns (timp decimal(12,2))
as
begin
  select sum(imp) from expeprv
       where exp= :exp
     into :timp;
end ^
set term ;^

Bien, pues de delphi hago lo siguiente: Me he creado un objeto TIBStoredProc que lo tengo enlazado con mi base de datos y en la propiedad StoredProcName = prvsoli2. Luego cuando quiero que se ejecute este procedimiento lo hago de la siguiente manera:

// Llamo al procedimiento de Cálculo 
    DM.IBP.ParamByName('EXP').AsInteger := StrToInt(idKey.Text);
    DM.IBP.ExecProc;
    showmessage(DM.IBP.FieldByName('TIMP').AsString);

Y no me devuelve ningún valor , cuando debería de devolver una cantidad ya que hay registros introducidos.

Prové el procedimiento en el SQL de IBConsole y tampoco me devuelve nada. Entonces lo siguiente que hice fue Instalarme Interbase Servidor que viene con Delphi, el 6.5. Prové el procedimiento en el IBConsole y me devolvía el valor, pero cuando lo pruebo en Delphi no va, sigue sin devolverme nada.

No sé que es lo que estoy haciendo mal, y no sé porque en Interbase 6.0 no funciona.

También me cree otro procedimiento parecido al anterior pero sin usar la instrucción SUM, por si fuera por eso pero nada tampoco me funcionaba.

Si alguien me puede dar una idea de por donde van los tiros...