[Resolvido] erro na procedure

Boa tarde estou estudando essa procedure e parei esse erro da linha 10, oq é esse erro?

create or replace PROCEDURE PRC_CL_USUARIO_GRUPO_ACESSO

IS PRC_OPCAO CHAR(1);
 PR_ID_GRUPO INT;
 PR_ID_USUARIO INT;
 PR_DT_INCLUSAO DATE;
 PR_DT_ALTERACAO DATE;
 PR_ATIVO INT;

BEGIN
DECLARE
CONT INT; -- (ERROR na linha 10: PLS-00488: declaração inválida de variável: o objeto 'CONT' deve ser um tipo ou subtipo)
SET CONT :=0;
BEGIN
IF PRC_OPCAO = 'I' THEN
BEGIN

 SELECT CONT INTO CL_USUARIO_GRUPO_ACESSO
 FROM CL_USUARIO_GRUPO_ACESSO WHERE CL_USUARIO_GRUPO_ACESSO := PRC_CL_USUARIO_GRUPO_ACESSO;
 IF (CONT != 1) THEN
 INSERT INTO CL_USUARIO_GRUPO_ACESSO VALUES(
 PR_ID_GRUPO ,
 PR_ID_USUARIO ,
 PR_DT_INCLUSAO ,
 PR_DT_ALTERACAO,
 PR_ATIVO );
 ELSE
 IF (PRC_OPCAO ='U') THEN
 BEGIN
 UPDATE CL_USUARIO_GRUPO_ACESSO
 SET CL_USUARIO_GRUPO_ACESSO = PR_CL_USUARIO_GRUPO_ACESSO,
 ID_USUARIO = PR_ID_USUARIO ,
 DATA_ALTERACAO = PR_DT_ALTERACAO,
 ATIVO = PR_ATIVO
 WHERE ID_GRUPO = PR_ID_GRUPO ;
 END;
 ELSE
 UPDATE CL_USUARIO_GRUPO_ACESSO
 SET DATA_ALTERACAO = PR_DT_ALTERACAO,
 ATIVO = 0
 WHERE ID_GRUPO = PR_ID_GRUPO;
 END IF;
 END IF;
 END;
 END IF;
END;
END PRC_CL_USUARIO_GRUPO_ACESSO;

desde ja grato