FireBird 1.5 Final.
==================================================================================
set term ^;

CREATE PROCEDURE sp_GeraConta_SO(
pr_MesRef char(7),
pr_FirstRow integer,
pr_BetweenIniID_SO integer,
pr_BetweenFimID_SO integer )
RETURNS ( pr_RowsAff integer)
AS
BEGIN

if (:pr_BetweenIniID_SO <= 0 or :pr_BetweenFimID_SO <= 0) then
EXCEPTION Ex_ParInvalido 'Valores dos Parâmentros do "Intervalo" Inválidos!';

if ( :pr_FirstRow = -1) then
EXCEPTION Ex_ParInválido 'Valor inválido para o número de "primeiras linhas"!';

/*
insert into ...
...
*/

END^

set term ;^
=================================================================================

ERROR: "unexpected end of command."

[Non-text portions of this message have been removed]