set serveroutput on;

CREATE OR REPLACE PROCEDURE TopSalario AS

BEGIN

DECLARE 

contador number;

fim number;
v_nome empregado.nome%TYPE;
v_salario empregado.salario%TYPE;

CURSOR c_empregado IS SELECT nome, salario FROM empregado order by salario desc;


BEGIN

	SELECT COUNT(*) into contador from empregado;

	if contador<10 then
		fim := contador;
	else
		fim:=10;
	end if;

	OPEN c_empregado;

	FOR x IN 0..fim

	LOOP
		FETCH c_empregado INTO v_nome, v_salario;
		DBMS_OUTPUT.PUT_LINE ( 'nome ' || v_nome || ' -- Salario ' || v_salario);

	END LOOP;

	CLOSE c_empregado;

END;
END TopSalario;
/