한글 가나다 초성

CREATE or replace function "NAQSCOM".f_get_ganada

( p_name varchar2)

 

return varchar2

deterministic

 

is

 v_ret varchar2(10);

 

 begin

 

   v_ret := case when p_name < 'ㄱ' then substr(p_name, 1, 1)

                 when ascii('ㄱ') <= ascii(p_name) and

                      ascii(p_name) <= ascii('ㅎ') then p_name

                 when p_name < '나' then 'ㄱ'

                 when p_name < '다' then 'ㄴ'

                 when p_name < '라' then 'ㄷ'

                 when p_name < '마' then 'ㄹ'

                 when p_name < '바' then 'ㅁ'

                 when p_name < '사' then 'ㅂ'

                 when p_name < '아' then 'ㅅ'

                 when p_name < '자' then 'ㅇ'

                 when p_name < '차' then 'ㅈ'

                 when p_name < '카' then 'ㅊ'

                 when p_name < '타' then 'ㅋ'

                 when p_name < '파' then 'ㅌ'

                 when p_name < '하' then 'ㅍ'

                 else  'ㅎ'

               end;

  return v_ret;

end f_get_ganada;