Fórum Erro ao criar uma Stored procedure #57506

Por favor me ajudem a encontrar este erro?Já verifiquei a linha e não encontro erros??


Dynamic SQL Error
SQL error code = -104
Token unknown - line 30, char -1
IF
Statement: CREATE PROCEDURE SP_PRODUTOR(
CODIGO VARCHAR(8),
NOME VARCHAR(80),
MUNICIPIO VARCHAR(80),
EMISSAOPROPRIA CHAR(1),
AREATOTAL NUMERIC(18, 2),
TIPO INTEGER
)
AS
BEGIN
if (tipo=1) then
begin
INSERT INTO PRODUTOR (
CODIGO,
NOME,
MUNICIPIO,
EMISSAOPROPRIA,
AREATOTAL)
VALUES (
:CODIGO,
:NOME,
:MUNICIPIO,
:EMISSAOPROPRIA,
:AREATOTAL);
WHEN SQLCODE -803 DO
EXCEPTION DUPLICIDADE;
END
SUSPEND;
END
IF(TIPO=2) THEN
BEGIN
UPDATE PRODUTOR
SET
NOME = :NOME,
MUNICIPIO = :MUNICIPIO,
EMISSAOPROPRIA = :EMISSAOPROPRIA,
AREATOTAL = :AREATOTAL
WHERE
(CODIGO = :CODIGO);
END
IF (tIPO=3) THEN
BEGIN
DELETE FROM PRODUTOR
WHERE
(CODIGO = :CODIGO);
SUSPEND;
END
END