Cursor

Conectando como System
conn system/coti	
					
Criar Tabela
create table funcionario( 
	id number(5) primary key, 
	nome varchar(50), 
	salario number(15,2), 
	setor varchar(15) 
	);	
						
Inserção de dados
insert into funcionario values (100, 'fadinha', 1000, 'inf'); 
insert into funcionario values (101, 'fadinha ref', 2000, 'inf'); 
insert into funcionario values (102, 'jhon', 3000, 'inf'); 
insert into funcionario values (103, 'marcio', 4000, 'eng'); 
insert into funcionario values (104, 'diego', 6000, 'inf'); 
insert into funcionario values (105, 'lu', 5000, 'des'); 
insert into funcionario values (106, 'marcia', 3000, 'des'); 
commit;

select * from funcionario;
							
Cursor
declare cursor linha (fim number) is select * from funcionario where id=fim; 
reg_linha funcionario%rowtype; 
begin 
open linha(102); 
loop 
fetch linha into reg_linha; 
exit when linha%notfound; 
dbms_output.put_line('Nome: '|| reg_linha.nome); 
dbms_output.put_line('Salario: '|| reg_linha.salario); 
dbms_output.put_line('Setor: '|| reg_linha.setor); 
end loop; 
close linha; 
end; 
/