ORACLE 写文件保存到服务器

 procedure p_get_csv_file(o_filename   out VARCHAR2 )  is
  VSFILE UTL_FILE.FILE_TYPE; --定义用于接收文件类型的变量
  V_CNT NUMBER; --统计每个文件加载行数

BEGIN
 
    VSFILE := UTL_FILE.FOPEN('file_addr', 'file_name.CSV', 'W');
     o_filename := 'file_name.CSV';
    
    /*参数介绍：
   UTL_FILE.FOPEN(LOCATION IN VARCHAR2, FILENAME IN VARCHAR2, OPEN_MODE IN VARCHAR2) RETURN FILE_TYPE;
   LOCATION 是文件存放的DB目录名称，-------执行用户要有对DIR目录的读写权限
   FILENAME 是文件名，
   OPEN_MODE是打开模式（'R'是读文本，'W'是写文本，'A'是附加文本，参数不分大小写，如果指定'A'但是文件不存在，它会用'W'先创建出来，'W'有覆盖的功能）*/
  
    --文件字段标头打印
    UTL_FILE.PUT_LINE(VSFILE,'col1,col2,col3');
  
    --每个文件加载行数[每次进入循环都赋值为0].排除标头部分
    V_CNT := 0;
    --将FOR循环查询的内容
      FOR cols IN (SELECT 1 col1,2 col2,