连TOM也答不上来的SQL问题，你来试试看！

〇〇

你的更加通用,我的超过38个逗号就不行了
SQL> select bitand(1e39,1e35) from dual;
select bitand(1e39,1e35) from dual
       *
第 1 行出现错误:
ORA-01426: 数字溢出

ocpdba591

sql真强大啊，特别是oracle的sql

dingjun123

我那个效率不好，有笛卡尔积的，所以有distinct,数量多了很慢

jiqing1004

with tmp as
    (select  TRIM(REGEXP_SUBSTR('a,b,c,d,e', '[^,]+', 1, level)) val from dual
       connect by level <= length(regexp_replace('a,b,c,d,e','[^,]*'))+1)
select replace(col1,',') col1,
           replace(translate('a,b,c,d,e',col1,' '),' ') col2
   from (select sys_connect_by_path (val, ',') col1
           from (select val, rownum rn from tmp)
        connect by val > prior val )
   where replace(translate('a,b,c,d,e',col1,' '),' ') is not null
  order by col1;

可以不用表链接吧,直接取rownum就可以
逗号的问题是比较麻烦些,不知道还有什么好的办法 呵呵

dingjun123

还可以简化下
with tmp as
    (select  TRIM(REGEXP_SUBSTR('a,b,c,d,e', '[^,]+', 1, level)) val from dual
       connect by level <= length(regexp_replace('a,b,c,d,e','[^,]*'))+1)
select replace(col1,',') col1,
           replace(translate('a,b,c,d,e',col1,' '),' ') col2
   from (select sys_connect_by_path (val, ',') col1
           from tmp
        connect by val > prior val )
    where   replace(translate('a,b,c,d,e',col1,' '),' ') is not null
  order by col1;
  

COL1                                                                         COL2
-------------------------------------------------------------------------------- --------------------------------------------------------------------------------
a                                                                               bcdefghijklm
ab                                                                             cdefghijklm
abc                                                                            defghijklm
abcd                                                                          efghijklm
abcde                                                                        fghijklm
abcdef                                                                       ghijklm
abcdefg                                                                     hijklm
abcdefgh                                                                   ijklm
abcdefghi                                                                   jklm
abcdefghij                                                                  klm
abcdefghijk                                                                lm
abcdefghijkl                                                               m
abcdefghijkm                                                             l
-----

dingjun123

power(2,n)-2种，这个没有笛卡尔积了，其实能解决逗号问题的，大不了可以写个函数，我想逗号问题肯定还有好办法

nyfor

各位好强大...

kmpx

最近脑子不好使，凑合看看
SQL> with tmp as (select 'a,b,c' col from dual)
  2  select decode(length(a.col),1,a.col,substr(a.col,0,1)||','||substr(a.col,2,1)) col,
decode(length(b.col),1,b.col,substr(b.col,0,1)||','||substr(b.col,2,1)) col1 from
(select distinct decode(a.col,b.col,a.col,c.col,a.col,a.col||decode(b.col,c.col,b.col,b.col||c.col)) col from
(select substr(col,rownum,1) col,rownum rn from (select replace(col,',') col from tmp) connect by rownum<=length(col)) a,
(select substr(col,rownum,1) col,rownum rn from (select replace(col,',') col from tmp) connect by rownum<=length(col)) b,
(select substr(col,rownum,1) col,rownum rn from (select replace(col,',') col from tmp) connect by rownum<=length(col)) c
where a.rn<=b.rn and a.rn<=c.rn and b.rn<=c.rn) a,
(select distinct decode(a.col,b.col,a.col,c.col,a.col,a.col||decode(b.col,c.col,b.col,b.col||c.col)) col from
(select substr(col,rownum,1) col,rownum rn from (select replace(col,',') col from tmp) connect by rownum<=length(col)) a,
(select substr(col,rownum,1) col,rownum rn from (select replace(col,',') col from tmp) connect by rownum<=length(col)) b,
(select substr(col,rownum,1) col,rownum rn from (select replace(col,',') col from tmp) connect by rownum<=length(col)) c
where a.rn<=b.rn and a.rn<=c.rn and b.rn<=c.rn) b
where a.col not like '%'||b.col||'%' and b.col not like '%'||a.col||'%'
and length(a.col)<>length(b.col) and length(a.col)<>3 and length(b.col)<>3  3    4    5    6    7    8    9   10   11   12   13   14   15  ;

COL    COL1
------ ------
a,b    c
a      b,c
b      a,c
a,c    b
c      a,b
b,c    a

jiqing1004

with tmp as
    (select  TRIM(REGEXP_SUBSTR('a,b,c,d,e', '[^,]+', 1, level)) val from dual
       connect by level <= length(regexp_replace('a,b,c,d,e','[^,]*'))+1)
select LTRIM(col1,',') col1,
       LTRIM(REGEXP_REPLACE(translate('a,b,c,d,e',col1,','),'(,){2,}', ','),',') col2
  from (select sys_connect_by_path (val, ',') col1
          from tmp
        connect by val > prior val )
where LTRIM(translate('a,b,c,d,e',col1,','),',') is not null
order by col1;

改成正则表达式替换逗号  呵呵

[ 本帖最后由 jiqing1004 于 2010-4-9 13:58 编辑 ]

kingtsi

SYSTEM@dp > with t as (select rownum rn,trim(regexp_substr('a,b,c,d,e', '[^,]+', 1, level)) x from dual
connect by level <= length(regexp_replace('a,b,c,d,e','[^,]*'))+1)
,m as (select sys_connect_by_path(x,',')||',' p,x,level from t where level<=(select count(rn)/2 from t) connect by prior rn<rn)
,n as (select trim(both ',' from p) j,(select wm_concat(x) from t where instr(m.p,','||x||',')=0) k from m order by p)
select j col1,k col2 from n union select k ,j from n;
  2    3    4    5  
COL1           COL2
---------- ----------
a           b,c,d,e
a,b           c,d,e
a,b,c           d,e
a,b,c,d    e
a,b,c,e    d
a,b,d           c,e
a,b,d,e    c
a,b,e           c,d
a,c           b,d,e
a,c,d           b,e
a,c,d,e    b
a,c,e           b,d
a,d           b,c,e
a,d,e           b,c
a,e           b,c,d
b           a,c,d,e
b,c           a,d,e
b,c,d           a,e
b,c,d,e    a
b,c,e           a,d
b,d           a,c,e
b,d,e           a,c
b,e           a,c,d
c           a,b,d,e
c,d           a,b,e
c,d,e           a,b
c,e           a,b,d
d           a,b,c,e
d,e           a,b,c
e           a,b,c,d

30 rows selected.

SYSTEM@dp > with t as (select rownum rn,trim(regexp_substr('a,b,c,d,e,f', '[^,]+', 1, level)) x from dual
connect by level <= length(regexp_replace('a,b,c,d,e,f','[^,]*'))+1)
,m as (select sys_connect_by_path(x,',')||',' p,x,level from t where level<=(select count(rn)/2 from t) connect by prior rn<rn)
,n as (select trim(both ',' from p) j,(select wm_concat(x) from t where instr(m.p,','||x||',')=0) k from m order by p)
select j col1,k col2 from n union select k,j from n;
  2    3    4    5  
COL1           COL2
---------- ----------
a           b,c,d,e,f
a,b           c,d,e,f
a,b,c           d,e,f
a,b,c,d    e,f
a,b,c,d,e  f
a,b,c,d,f  e
a,b,c,e    d,f
a,b,c,e,f  d
a,b,c,f    d,e
a,b,d           c,e,f
a,b,d,e    c,f
a,b,d,e,f  c
a,b,d,f    c,e
a,b,e           c,d,f
a,b,e,f    c,d
a,b,f           c,d,e
a,c           b,d,e,f
a,c,d           b,e,f
a,c,d,e    b,f
a,c,d,e,f  b
a,c,d,f    b,e
a,c,e           b,d,f
a,c,e,f    b,d
a,c,f           b,d,e
a,d           b,c,e,f
a,d,e           b,c,f
a,d,e,f    b,c
a,d,f           b,c,e
a,e           b,c,d,f
a,e,f           b,c,d
a,f           b,c,d,e
b           a,c,d,e,f
b,c           a,d,e,f
b,c,d           a,e,f
b,c,d,e    a,f
b,c,d,e,f  a
b,c,d,f    a,e
b,c,e           a,d,f
b,c,e,f    a,d
b,c,f           a,d,e
b,d           a,c,e,f
b,d,e           a,c,f
b,d,e,f    a,c
b,d,f           a,c,e
b,e           a,c,d,f
b,e,f           a,c,d
b,f           a,c,d,e
c           a,b,d,e,f
c,d           a,b,e,f
c,d,e           a,b,f
c,d,e,f    a,b
c,d,f           a,b,e
c,e           a,b,d,f
c,e,f           a,b,d
c,f           a,b,d,e
d           a,b,c,e,f
d,e           a,b,c,f
d,e,f           a,b,c
d,f           a,b,c,e
e           a,b,c,d,f
e,f           a,b,c,d
f           a,b,c,d,e

62 rows selected.

[ 本帖最后由 kingtsi 于 2010-4-9 13:56 编辑 ]