按类似书目章节排序查询数据 _MySQL, Oracle及数据库讨论区_Weblogic技术|Tuxedo技术|中间件技术|Oracle论坛|JAVA论坛|Linux/Unix技术|hadoop论坛_联动北方技术论坛  
网站首页 | 关于我们 | 服务中心 | 经验交流 | 公司荣誉 | 成功案例 | 合作伙伴 | 联系我们 |
联动北方-国内领先的云技术服务提供商
»  游客             当前位置:  论坛首页 »  自由讨论区 »  MySQL, Oracle及数据库讨论区 »
总帖数
1
每页帖数
101/1页1
返回列表
0
发起投票  发起投票 发新帖子
查看: 1940 | 回复: 0   主题: 按类似书目章节排序查询数据         下一篇 
dansmall
注册用户
等级:新兵
经验:52
发帖:71
精华:0
注册:2011-10-27
状态:离线
发送短消息息给dansmall 加好友    发送短消息息给dansmall 发消息
发表于: IP:您无权察看 2015-8-24 14:42:48 | [全部帖] [楼主帖] 楼主

-- 建立测试表

CREATETABLE t1 (a VARCHAR2 (500));

-- 生成测试数据

INSERTINTO t1 (a)

VALUES ('1.11');

INSERTINTO t1 (a)

VALUES ('1.9');

INSERTINTO t1 (a)

VALUES ('1.21');

INSERTINTO t1 (a)

VALUES ('2.1.0.1');

INSERTINTO t1 (a)

VALUES ('2.2.1');

INSERTINTO t1 (a)

VALUES ('2.11.9.1');

INSERTINTO t1 (a)

VALUES ('2.1.9.1');

INSERTINTO t1 (a)

VALUES ('1.1.1');

INSERTINTO t1 (a)

VALUES ('123.99');

INSERTINTO t1 (a)

VALUES ('1.9.0');

INSERTINTO t1 (a)

VALUES ('1.9.0.0');

COMMIT;

-- 建立存储过程,返回排序后的结果集

CREATEORREPLACEPROCEDURE p_order (ret OUT SYS_REFCURSOR)

IS

s_select       VARCHAR2 (32767)

:= 'select rtrim(a,''.'') from (select a, to_number(substr(a,1,instr(a,''.'',1,1) -1 )) c1 ';

l_max_length   INT := 0;

s_order        VARCHAR2 (2000) := ' order by c1 nulls first ';

j              INT := 0;

BEGIN

SELECTMAX (LENGTH (TRANSLATE (a, '.' || a, '.')))

INTO l_max_length

FROM t1;

FOR i IN 1 .. l_max_length

LOOP

j := i + 1;

s_select :=

s_select

|| ', to_number(substr(a,instr(a,''.'',1'

|| i

|| ') +1, instr(a,''.'',1,'

|| j

|| ') - instr(a,''.'',1'

|| i

|| ') -1)) c'

|| j;

s_order := s_order || ', c' || j || ' nulls first';

END LOOP;

s_select := s_select || ' from (select a||''.'' a from t1))' || s_order;

-- dbms_output.put_line(s_select);

OPEN ret FOR s_select;

END;

/

-- 测试

VARIABLE x REFCURSOR;

EXEC p_order(:x);

PRINT x;

--转自 北京联动北方科技有限公司




赞(0)    操作        顶端 
总帖数
1
每页帖数
101/1页1
返回列表
发新帖子
请输入验证码: 点击刷新验证码
您需要登录后才可以回帖 登录 | 注册
技术讨论