oracle for in loop

 function get_irc_pn(p_irc    in pnrreg.irc%type,
                        p_partid in pnrreg.partid%type) return varchar2 is
        o_irc_pn varchar2(200);
        -- p_pnrreg pnrreg%rowtype;
    begin
    
        FOR cur in (select * from pnrreg pn where pn.irc = p_irc) loop
            if cur.partid  <> p_partid then
              o_irc_pn := o_irc_pn ||cur.realpn || '   '; 
            end if;
        end loop;
    
        return o_irc_pn;
    end get_irc_pn;