Bisa dicoba dan dimodifikasi cara berikut ini:
CREATE OR REPLACE FUNCTION rowtocol
( p_slct IN VARCHAR2,
p_dlmtr IN VARCHAR2 DEFAULT ',' )
RETURN VARCHAR2
AUTHID CURRENT_USER AS
TYPE c_refcur IS REF CURSOR;
lc_str VARCHAR2(4000);
lc_colval VARCHAR2(4000);
c_dummy c_refcur;
l number;
BEGIN
OPEN c_dummy FOR p_slct;
LOOP
FETCH c_dummy INTO lc_colval;
EXIT WHEN c_dummy%NOTFOUND;
lc_str := lc_str || p_dlmtr || lc_colval;
END LOOP;
CLOSE c_dummy;
RETURN SUBSTR(lc_str,2);
END;
/
SELECT a.deptno, a.dname, a.loc,
rowtocol('SELECT DISTINCT job FROM emp WHERE deptno = ' ||a.deptno) as jobs
FROM dept a
DEPTNO DNAME LOC JOBS
------ -------------- ------------- ----------------------------------------
10 ACCOUNTING NEW YORK CLERK,MANAGER,PRESIDENT
20 RESEARCH DALLAS ANALYST,CLERK,MANAGER
30 SALES CHICAGO CLERK,MANAGER,SALESMAN
40 OPERATIONS BOSTON
NB: Table-table emp dan dept terdapat pada script demobld.sql dari Oracle.
Salam,
Indra Armansyah
[EMAIL PROTECTED]
----- Original Message -----
From: - Gugun -
To: [email protected]
Sent: Thursday, December 07, 2006 10:17 AM
Subject: [indo-oracle] Help Me , Please........
Dear All Saudaraku..:)
saya bingung nehh
saya mau menampilkan query , tapi menyamping
misal Kolom A
1
2
3
dan yang saya inginkan :
Kolom A Kolom A Kolom A
1 2 3
contoh scriptnya seperti ini :
select
A.stuff_date,A.stuff_insp_emp_no,A.buyer,A.model_suffix,A.container_no,A.container_size,A.lot_size,C.emp_name,B.pallet_no
from
tstuffin A,
tstuffd B,
( select * from hrms.tgemp) C
where A.container_no = B.container_no
and A.stuff_insp_emp_no = c.emp_no
dan yang ingin ditampilkan secara menyamping adalah kolom Pallet_No
Sebelum nya Makasih yahh.....
regard,s
---Gugun---
__________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email
__________________________________________________________
[Non-text portions of this message have been removed]
------------------------------------------------------------------------------
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.0.409 / Virus Database: 268.15.13/577 - Release Date: 12/6/2006
[Non-text portions of this message have been removed]