Create or replace myprocedure

as 

   cursor mycuror is 


    select ...

     from tableA join tableb on.

Begin

   for r in mycursor
   loop

   Begin  -- inner block1
    ....

   Exception
   when others then 
   logerror()
   raise;

   Begin   -- inner block 2
    ....

   Exception
   when others then 
   logerror()
   raise;
 End 

 some execution statement  -- does here have to be some execution command, can it be empty?

Exception   --loop exception
when others then 
  logerror()
raise;
End loop

some other command;

Exception   -- procedure outer exception
when others then 
 DBMS_OUTPUT.PUT_LINE (SQLCODE ||': '|| SQLERRM );
   logerror()
   raise;
End myprocedure;