Hi,

> Can you tell me please why this procedure returns nothing ???
> But when i look at fields (in IB_SQL) it returns good results.

So, what does it do - does it return results, or doesn't it
return results?

With regards,

Martijn Tonies
Database Workbench - developer tool for InterBase, Firebird, MySQL & MS SQL
Server.
Upscene Productions
http://www.upscene.com

>
> Alter procedure nb_affectation(pilotenum smallint)
> returns(pilnb smallint,nb_aff smallint)
> as
> declare variable tour smallint;
> begin
>
> nb_aff=0;
> if ((pilotenum is null) OR (not exists (select 1 from pilote where
> idpilote=:pilotenum))) then
> exception data_error;
> else
> begin
>
> for select idpilote
> from affectation
> where
> idpilote=:pilotenum
> into : piln
> do
> begin
> nb_aff=nb_aff + 1;
> end
>
> suspend;
>
> end
> end !!
> set term; !!