ｏｒａｃｌｅ 生成汉字字符串的拼音首字符

CREATE OR REPLACE FUNCTION FUNC_GET_STRING_PY(strs varchar2)
return varchar2
is
/***********************************
过程名称：FUNC_GET_STRING_PY
功能：生成汉字字符串的拼音首字符
作者：谭超
**********************************/

v_length number;
v_char varchar2(2);
v_charlength number;
v_charPY varchar2(2);
i int:=1;
myresult varchar2(500):='';

begin
--获取字符串长度
v_length:=length(strs);
while i<=v_length
loop
--按顺序取得字符
v_char:=substr(strs,i,1);
v_charlength:=lengthb(rtrim(v_char));
v_charPY:=rtrim(v_char);
--判断是否是汉字
if v_charlength=2 then
v_charPY:=pub_get_py(rtrim(v_char));
end if;
--将拼音进行连接
myresult:=myresult || v_charPY;
i:=i+1;
end loop;

return myresult;
end FUNC_GET_STRING_PY;