declare
  cursor cur_prop is
    select prop_name, qcid from property;
    where qcid <= 50
  r_prop cur_prop%ROWTYPE;
begin
  open cur_prop;
  loop
    fetch cur_prop into r_prop;
  exit when cur_prop%NOTFOUND
  end loop;
  close cur_prop;
end;
/