Hi Geoff.

My comment is probably due to you simplifying your case to make it
understandable for the rest of us :o) But why do you use SUSPEND when
there's no SELECT in this procedure? My ancient language reference (IB 4.0)
from long before I started using IB says "Not recommended for executable
procedures".

Set

At 22:13 27.03.2001 +1000, Geoff wrote:

> CREATE PROCEDURE CHANGEVAL(
> CONTROLVAL VARCHAR(4),
> INVAL INTEGER )
> RETURNS( OUTVAL ) AS
> BEGIN
> IF CONTROLVAL = 'ABCD' THEN
> OUTVAL = GEN_ID(AGEN,1);
> ELSE
> OUTVAL = INVAL;
> SUSPEND;
> END