declareoutput varchar2(200);
beginoutput:='...'; //賦值
DBMS_OUTPUT.PUT_LINE(output);
end;

(1) create table my_output{
id number(4),
txt varchar2(4000) 
);
(2) declareoutput varchar2(4000);
strSql varchar2(4500);
count number(4):=0;
beginstrSql:='delete * from my_output';
EXECUTE IMMEDIATE strSql;output:='...'; //賦值
count:=count+1;strSql:='Insert into my_output value (count,'''||output||''')';
--''在單引號中相當于字符'
EXECUTE IMMEDIATE strSql;
end;

(1) create or replace directory TMP as 'd:\testtmp';--建立一個文件夾路徑(2) declarefile_handle UTL_FILE.FILE_TYPE;output varchar2(30000);
beginoutput:="....";
file_handle := UTL_FILE.FOPEN('TMP', 'output.txt', 'w',[1-32767]);
--四個參數：目錄，文件名，打開方式，最大行數(默認為2000)
UTL_FILE.PUT_LINE(file_handle, output);
UTL_FILE.FCLOSE(file_handle);
exception
WHEN utl_file.invalid_path THEN
raise_application_error(-20000, 'ERROR: Invalid path for file or path not in INIT.ORA.');
end;