我们在实际开发过程中, 经常需要将一个查询的结果连接成一个单行的字符串列表, 比如说将一个部门及其所有员工列在一行显示.
本文介绍了从最简单到最通用的几种方法来达到这一目的.
1. 已知列的取值范围 比如说, 有以下产品表, 每种产品只有3种颜色(R-RED, B-BLACK, W-WHITE):
scott@ORCL> DESC PROD
名称 空? 类型
----------------------------------------- -------- --------------
PRODNAME VARCHAR2(20)
COLOR VARCHAR2(1)
scott@ORCL> SELECT * FROM PROD;
PRODNAME C
-------------------- -
CAR R
CAR B
CAR W
MOTOR W
MOTOR B
我们希望列出每种产品都有哪些颜色.
这种情况下, 只要简单的使用decode()函数即可.
下面是script代码及相应的运行结果.
scott@ORCL> COLUMN COLORS FORMAT A10
scott@ORCL >select PRODNAME,
2 max(decode( COLOR, 'B', COLOR, null )) ||
3 max(decode( COLOR, 'W', COLOR, null )) ||
4 max(decode( COLOR, 'R', COLOR, null )) COLORS
5 from PROD
6 group by PRODNAME
7 /
PRODNAME COL
-------------------- ---
CAR BWR
MOTOR BW
2. 静态SQL 这种方法适合于列的取值不能预知, 由于使用静态sql, 相对方法3来说比较简单. 不过该函数只能用于特定的表.
示例所用的表及数据使用oracle随机demo表emp.
注意: 受varchar2的长度限制, 列的取值的总长度是有限制的, 在方法3中也有同样的问题.
下面是函数及其运行结果
create or replace
function list_func1( p_dept in varchar2 )
return varchar2
is
l_str varchar2(4000) default null;
l_sep varchar2(2) default null;
begin
for x in ( select empno from emp where deptno = p_dept ) loop
l_str := l_str || l_sep || to_char(x.empno);
l_sep := ', ';
end loop;
return l_str;
end;
/
scott@ORCL> column emplist format a60
scott@ORCL> select deptno, emplist1(deptno) emplist
2 from emp
3 group by deptno
4 /
DEPTNO EMPLIST
---------- ------------------------------------------------------------
10 7782, 7839, 7934
20 7369, 7566, 7788, 7876, 7902
30 7499, 7521, 7654, 7698, 7844, 7900
scott@ORCL>
3. 动态SQL 这种方法由于使用动态sql, 相对来说比较复杂, 但与此同时, 它比其方法2来说功能大大增强: 它可以用于任意表, 并可以连接表中的任意列.
函数代码:
create or replace
function list_func2( p_key_name in varchar2,
p_key_val in varchar2,
p_other_col_name in varchar2,
p_tname in varchar2 )
return varchar2
as
type rc is ref cursor;
l_str varchar2(4000);
l_sep varchar2(2);
l_val varchar2(4000);
l_cur rc;
begin
open l_cur for 'select '||p_other_col_name||'
from '|| p_tname || '
where ' || p_key_name || ' = :x '
using p_key_val;
loop
fetch l_cur into l_val;
exit when l_cur%notfound;
l_str := l_str || l_sep || l_val;
l_sep := ', ';
end loop;
close l_cur;
return l_str;
end;
/
参数说明:
p_key_name - 查询依据的列名
p_key_val - 查询依据的列名所对应的列值
p_other_col_name - 要连接成列表的列名
p_tname - 表名
下面是运行结果:
scott@ORCL> column emplist format a60
scott@ORCL> select DEPTNO,
2 list_func2('DEPTNO', DEPTNO, 'EMPNO', 'EMP') emplist
3 from emp
4 group by deptno
5 /
DEPTNO EMPLIST
---------- --------------------------------------------------
10 7782, 7839, 7934
20 7369, 7566, 7788, 7876, 7902
30 7499, 7521, 7654, 7698, 7844, 7900
