verificar con procedimiento almacenado

[fedelphi]

Muchisimas gracias Lepe, funciona una barbaridad pero lo hice con un IBStoredProc asi

Código Delphi [-]
 with modulodatos.IBSPEsRobado do
  begin
    Close;
    parambyname('PEID_TICKET').AsInteger:=id_ticket;
    parambyname('PENRO_TICKET').AsString:=nro_ticket; //aux;
    execproc;
    if parambyname('PSES_ROBADO').AsString='si' then
      result:=False
    else
      result:=True;
  end;

ya que al querer evaluar el parametro de salida con el IBQuery me decia que no estaba definido el parametro, y en la propiedad params no esta, pense que cuando se le hacia open al query no habia problemas pero no, no lo pude hacer funcionar con el query, como deberia definir este parametro de salida?.
Con respecto a lo de los numeros hay algunos que son de hasta 15 digitos, y en realidad no se como trabajar con ellos en firebird, lo voy a probar y luego la sigo.
Muchas gracias
Fede

[[Lepe]]

Acabo de editar mi mensaje anterior, ya que primero lo hice pensando en un SP de selección y usaba query1.Open

Al realizarlo por SP de ejecución, hay que llamar a Query1.ExecSql (o usar un IBStoreProcedure, que es exactamente lo mismo). Si no recuerdo mal, (y dado que no te funciona ) habrá que usar Fieldbyname para leer el parámetro de salida.

Saludos