Oracle数组冒泡排序,如何实现类似于冒泡排序的函数

写着玩的啊，不需要写函数的，bell那个用的是wmsys,你看你有这个吗，或者看精华帖行转列，很多的

CREATE OR REPLACE FUNCTION bubbleSort(str IN VARCHAR2)

RETURN VARCHAR2 IS

type  type_tt is varray(1000) of varchar2(100);

var type_tt;

temp varchar2(100);

flag boolean;

results VARCHAR2(4000);

BEGIN

select  substr(str,level,1) bulk collect into  var

from dual connect by level <=length(str);

<>

for i in  1 .. var.count-1 loop

flag := false;

for j in reverse i .. var.count-1 loop

if var(j+1)

temp := var(j+1);

var(j+1) := var(j);

var(j) := temp;

flag := true;

end if;

end loop;

if (not flag) then

exit outer_scope;

end if;

end loop;

for i in var.first .. var.last loop

results :=concat(results,var(i));

end loop;

return results;

END bubbleSort;

/

SQL> select bubbleSort('bacca') x from dual;

X

--------------------------------------------------------------------------------

aabcc