-- traitement 2 (i,il,j) =

is
    cursor c is 
        select ide
           from exemplaire
           where idl = il
             and ide not in (select ide
                      from emprunt);
    l_ide ...
begin
    open c;
    fetch c into l_ide;
    if c%found then
        insert into emprunt values(ie,i);  
--   renvoie : ie ou vide
--   si ie alors
--     insert into emprunt values(ie,i);
--     return ie;
--   sinon -- vide
--     insert into reservation values(il,i,j);
--     return -1;
