Erro procedure (dbms_output) PL/SQL

[cfreis01 0]

Bom dia galera,

Estou com um erro de execução na criação de uma procedure.

Eu vou passar uma cidade como parametro e ela me retorna os funcionarios que trabalham nessa cidade se nao encontrar retorna nao encontrado.

Tem que ser por dbms_output.

Se eu executo o bloco fora de procedure ele executa, quando coloco o script numa procedure ela compila mas se eu executo:

 

BEGIN
EXECUTE FUNC_CIDADE_PROC('DALLAS');

end;

Da erro :PLS-00103: Encontrado o simbolo "EMP_CIDADE_PROC" quando um dos seguintes simbolos era esperado:
:= .(

 

Mas se compilou e executou num bloco por que esta dando erro?

 

CREATE OR REPLACE PROCEDURE EMP_CIDADE_PROC(p_cidade varchar2)
IS
contador number;
begin
 begin
    select COUNT(EMPNO)
    into contador
                   from emp emp
                       ,dept dp
                   where emp.deptno = dp.deptno
                   and dp.loc = p_cidade
                   GROUP BY LOC;
           EXCEPTION
           WHEN NO_DATA_FOUND THEN

            dbms_output.put_line('Nenhum funcionário encontrado.');
    end;
    IF(CONTADOR > 0)THEN
     FOR CUR_EMP IN( select EMP.EMPNO
                          ,EMP.JOB
                          ,EMP.SAL
                     from emp emp
                         ,dept dp
                     where emp.deptno = dp.deptno
                     and dp.loc = p_cidade)LOOP
                        dbms_output.put_line('Código: '||cur_emp.empno||' | Cargo: '||cur_emp.job||' | Salário: '||cur_emp.sal);
                     END LOOP;

    END IF;

  --

END;