Oracle反转倒置函数
来源：程序员人生 发布时间：2015-03-28 08:51:23 阅读次数：4670次
Oracle提供了1个反转颠倒函数reverse，但此函数不能分组颠倒，本文提供了1个便可分组颠倒的函数，以下所示：
CREATE OR REPLACE FUNCTION REVERSE_F(p_str VARCHAR2, p_delimiter VARCHAR2:='')
RETURN VARCHAR2 IS
v_return VARCHAR2(4000);
vp_str VARCHAR2(4000) := p_str;
v_idx number;
vp_len number := length(p_delimiter);
BEGIN
if (p_delimiter is null) then
select reverse(p_str) into v_return from dual;
else
loop
v_idx := instr(vp_str, p_delimiter);
if (v_idx = 0) then
v_return := vp_str || v_return;
exit;
elsif (v_idx = 1) then
v_return := substr(vp_str, 1, vp_len) || v_return;
vp_str := substr(vp_str, vp_len + 1);
else
v_return := substr(vp_str, 1, v_idx - 1) || v_return;
vp_str := substr(vp_str, v_idx);
end if;
end loop;
end if;
RETURN v_return;
END REVERSE_F;
生活不易，码农辛苦
如果您觉得本网站对您的学习有所帮助,可以手机扫描二维码进行捐赠
