notfound credo vada con la fetch

i number := 0;
for rec in curs loop
i := i+1;
...
end loop;
if i = 0 then
stampa
end if;