SQLPlus - spooling to multiple files from PL/SQL blocks

后端 未结 6 1034
说谎
说谎 2020-12-17 04:06

I have a query that returns a lot of data into a CSV file. So much, in fact, that Excel can\'t open it - there are too many rows. Is there a way to control spool

6条回答
  •  眼角桃花
    2020-12-17 04:50

    Try this for a pure SQL*Plus solution...

    set pagesize 0
    set trimspool on  
    set headsep off 
    set feedback off
    set echo off 
    set verify off
    set timing off
    set linesize 4000
    
    DEFINE rows_per_file = 50
    
    
    -- Create an sql file that will create the individual result files
    SET DEFINE OFF
    
    SPOOL c:\temp\generate_one.sql
    
    PROMPT COLUMN which_dynamic NEW_VALUE dynamic_filename
    PROMPT
    
    PROMPT SELECT 'c:\temp\run_#'||TO_CHAR( &1, 'fm000' )||'_result.txt' which_dynamic FROM dual
    PROMPT /
    
    PROMPT SPOOL &dynamic_filename
    
    PROMPT SELECT *
    PROMPT   FROM ( SELECT a.*, rownum rnum
    PROMPT            FROM ( SELECT object_id FROM all_objects ORDER BY object_id ) a
    PROMPT           WHERE rownum <= ( &2 * 50 ) )
    PROMPT  WHERE rnum >= ( ( &3 - 1 ) * 50 ) + 1
    PROMPT /
    
    PROMPT SPOOL OFF
    
    SPOOL OFF
    
    SET DEFINE &
    
    
    -- Define variable to hold number of rows
    -- returned by the query
    COLUMN num_rows NEW_VALUE v_num_rows
    
    -- Find out how many rows there are to be
    SELECT COUNT(*) num_rows
      FROM ( SELECT LEVEL num_files FROM dual CONNECT BY LEVEL <= 120 );
    
    
    -- Create a master file with the correct number of sql files
    SPOOL c:\temp\run_all.sql
    
    SELECT '@c:\temp\generate_one.sql '||TO_CHAR( num_files )
                                       ||' '||TO_CHAR( num_files )
                                       ||' '||TO_CHAR( num_files ) file_name
      FROM ( SELECT LEVEL num_files 
               FROM dual 
            CONNECT BY LEVEL <= CEIL( &v_num_rows / &rows_per_file ) )
    /
    
    SPOOL OFF
    
    -- Now run them all
    @c:\temp\run_all.sql
    

提交回复
热议问题