create or replace function get_kpdh(p_fpdh in varchar2) return varchar2 is
 Result varchar2(100);
 
 cursor rad_cursor(v_fpdh varchar2) is
        select kpdh from a 
        where fpdh=v_fpdh;
 
begin
Result:='';
   for v_sor in rad_cursor(p_fpdh) loop
     Result:=Result||v_sor.kpdh;
    
    end loop; 
   return(Result);
end get_kpdh;
/select fpdh,get_kpdh(fpdh) kpdh from a group by fpdh;