create or replace function F_GET_KOSGU(nrn in number) return varchar2 is
  nKOSGU varchar2(20);
begin
  select max( m.sagngrp)
    into nKOSGU
    from V_UNAGGRSP m, agnlist a
   where m.nagent = a.rn
     and a.rn = [color=red]F_GET_KOSGU.nrn[/color];

  return nKOSGU;
exception 
  when others then
    return sqlerrm;
end;