Posted via ActualForum NNTP Server 1.5
EXECUTE BLOCK ( I INTEGER = :IN) RETURNS ( OUT INTEGER) AS BEGIN OUT = CASE I WHEN 1 THEN 2 WHEN 2 THEN 3 WHEN 3 THEN 8 ELSE 16 END; SUSPEND; END
EXECUTE BLOCK ( I INTEGER = :IN) RETURNS ( OUT INTEGER) AS BEGIN OUT = DECODE(I, 1, 2, 2, 3, 3, 8, 16); SUSPEND; END