复制内容到剪贴板
代码:
create or replace type tabstr_t as table of varchar2(4000);
/
create or replace function tabstr (
p_str in varchar2,
p_sep in varchar2 default '#'
)
return tabstr_t
is
l_str long := p_str || p_sep;
l_tabstr tabstr_t := tabstr_t();
begin
while l_str is not null loop
l_tabstr.extend(1);
l_tabstr(l_tabstr.count) := rtrim(substr(
l_str,1,instr(l_str,p_sep)),p_sep);
l_str := substr(l_str,instr(l_str,p_sep)+1);
end loop;
return l_tabstr;
end;
/
var s varchar2(100)
exec :s := 'king,turner,ward'
select upper(column_value) from table(cast(tabstr('213,343,234,234,234#234,234,234.23,sfa') as tabstr_t));