哪位高手能给小弟我解释一下这个小程序是什么意思

谁能给我解释一下这个小程序是什么意思？

CREATE OR REPLACE PROCEDURE RIVUS.UTL_FILE_DIR_WRITE_SAMPLE
AS
vHandle UTL_FILE.FILE_TYPE;
vDirname VARCHAR2(250);
vFilename VARCHAR2(250);
vOutput VARCHAR2(32767);
BEGIN
vDirname := '/u05/file_storage/send_dir'; -- 1 vFilename := 'test.txt';
vHandle := UTL_FILE.FOPEN(vDirname ,vFilename,'w', 32767); -- 1
 
vOutput := '初期化パラメータ UTL_FILE_DIR 経由でのファイル出力です'; -- 1
UTL_FILE.PUT_LINE(vHandle, vOutput); -- 1
UTL_FILE.FCLOSE(vHandle);
EXCEPTION WHEN OTHERS THEN
UTL_FILE.FCLOSE_ALL;
RAISE;
END;
/

四个-- 1的地方，都是什么意思呢？？ 谢谢了！！

------解决方案--------------------
第一个是定义打开文件的目录位置
第二个是打开指定的目录下的文件，把句柄赋给变量。
第三个是给一个变量赋字符串值
第四个是把字符串中的值写到文件中。


CREATE OR REPLACE PROCEDURE RIVUS.UTL_FILE_DIR_WRITE_SAMPLE 
AS 
vHandle UTL_FILE.FILE_TYPE; 
vDirname VARCHAR2(250); 
vFilename VARCHAR2(250); 
vOutput VARCHAR2(32767); 
BEGIN 
vDirname := '/u05/file_storage/send_dir'; -- 1 vFilename := 'test.txt'; 
vHandle := UTL_FILE.FOPEN(vDirname ,vFilename,'w', 32767); -- 1 

vOutput := '初期化パラメータ UTL_FILE_DIR 経由でのファイル出力です'; -- 1 
UTL_FILE.PUT_LINE(vHandle, vOutput); -- 1 
UTL_FILE.FCLOSE(vHandle); 
EXCEPTION WHEN OTHERS THEN 
UTL_FILE.FCLOSE_ALL; 
RAISE; 
END; 
/ 

探讨

....
我的意思是我注释所在的行是什么意思，呵呵

------解决方案--------------------
unix下的，不是windows下的