1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
DECLARE
l_clob1 CLOB;
BEGIN
apex_json.initialize_clob_output;
apex_json.open_object;
FOR dep IN (SELECT * FROM DEPT )
LOOP
apex_json.write('dep_code', TO_CHAR(dep.DEPTNO), TRUE);
apex_json.write('dep_cname', TO_CHAR(dep.DNAME), TRUE);
apex_json.open_array('emps');
FOR em IN (
SELECT * FROM EMP WHERE DEPTNO = dep.DEPTNO
)
LOOP
apex_json.open_object;
apex_json.write('EMP_CODE', TO_CHAR(em.EMPNO), TRUE);
apex_json.write('EMP_CNAME', em.ENAME, TRUE);
apex_json.close_object;
END LOOP;
apex_json.close_array;
END LOOP;
apex_json.close_object;
l_clob1 := apex_json.get_clob_output;
apex_json.free_output;
dbms_output.put_line('---------------------------');
dbms_output.put_line(l_clob1);
dbms_output.put_line('---------------------------');
END;
|