  DECLARE CURSOR cities_in
     (crs_country Country.Code%TYPE)
    IS SELECT Name
       FROM City
       WHERE Country = crs_country;
  city_in cities_in%ROWTYPE;
  BEGIN
   OPEN cities_in ('D');
   FETCH cities_in INTO city_in;
   dbms_output.put_line(city_in.Name);
   FETCH cities_in INTO city_in;
   dbms_output.put_line(city_in.Name);
   CLOSE cities_in;
  END;
  /
