-------------------------------------------------------------------------------
-- corr_pl_curseurs.txt
-------------------------------------------------------------------------------
-- curseurs (table)

proc affiche :
  cursor c :
    select nom, age, jour
    from client, voyage
    where age < 25
      and client.idc = voyage.idc
begin
  for x in c : 
    print x.nom, x.age, x.jour
end

appel : affiche

-------------------------------------------------------------------------------