DECLARE
TYPE typ_text IS table of VARCHAR2(32767);
tab_text typ_text;
BEGIN
EXECUTE IMMEDIATE ' SELECT text FROM
(SELECT 2 ord, ename||empno text FROM scott.emp
UNION ALL
SELECT 0 ord, ''BEGIN'' text FROM DUAL
UNION ALL
SELECT 1 ord, ''P'' text FROM DUAL
UNION ALL
SELECT 3 ord, ''/P'' text FROM DUAL
UNION ALL
SELECT 4 ord, ''END'' text FROM DUAL)
ORDER BY ord'
BULK COLLECT INTO tab_text;
FOR I IN 1..tab_text.count
LOOP
dbms_output.put_line(tab_text(I));
END LOOP;
END; |