Olá,
Na verdade há alguns tipos de Cursors no Oracle e esse é um deles. Você poderia usar o open-fetch também.
No caso o r1 seria um rowtype que seria alimentado pelo c1 (cursor mesmo) e caso não retorne linha mais no cursor ele sai automaticamente do loop.
[]s Ishii
