PROCEDURE PC_CURSOR
IS
cursor c_max_salary is
SELECT employees.first_name, employees.last_name, jobs.job_id, jobs.job_title,
jobs.min_salary, jobs.max_salary
FROM jobs, employees
WHERE ((jobs.job_id = employees.job_id));
type job_emp is record (
first_name varchar2(20),
last_name varchar2(20),
job_id varchar2(10),
job_title varchar2(35),
min_salary number(6),
max_salary number(6));
jobs_record job_emp;
BEGIN
open c_max_salary;
for iInd in 1..9 loop
fetch c_max_salary into jobs_record;
dbms_output.put_line(jobs_record.last_name||' '||jobs_record.job_id||' '||jobs_record.job_title||' '||jobs_record.max_salary);
end loop;
close c_max_salary;
END; -- Procedure