7

プログラムの結果のスプールについて質問があります。サンプル SQL スクリプトは次のようになります。

  whenever sqlerror exit failure rollback
  set heading off
  set arraysize 1
  set newpage 0
  set pages 0
  set feedback off
  set echo off
  set verify off

 declare
 ab varchar2(10) := 'Raj';
 cd varchar2(10);
 a number := 10;
 c number;
 d number;
 begin
 c := a+10;
 select ab,c into cd,d from dual;
 end;

 SPOOL 
 select cd,d from dual;
 SPOOL OFF
 EXIT;

上記のスクリプトは機能しませんが、begin end ブロックでいくつかの値を計算し、それらの結果をスプールしたい場合に、このようなことをしたいと考えています。

ありがとう。

4

4 に答える 4

16

これにより、匿名ブロックからの出力output_<YYYYMMDD>.txtが、ローカルPCのルートにあるというファイルにスプールされます。C：ドライブ。<YYYYMMDD>現在の日付は次のとおりです。

SET SERVEROUTPUT ON FORMAT WRAPPED
SET VERIFY OFF

SET FEEDBACK OFF
SET TERMOUT OFF

column date_column new_value today_var
select to_char(sysdate, 'yyyymmdd') date_column
  from dual
/
DBMS_OUTPUT.ENABLE(1000000);

SPOOL C:\output_&today_var..txt

DECLARE
   ab varchar2(10) := 'Raj';
   cd varchar2(10);
   a  number := 10;
   c  number;
   d  number; 
BEGIN
   c := a+10;
   --
   SELECT ab, c 
     INTO cd, d 
     FROM dual;
   --
   DBMS_OUTPUT.put_line('cd: '||cd);
   DBMS_OUTPUT.put_line('d: '||d);
END; 

SPOOL OFF

SET TERMOUT ON
SET FEEDBACK ON
SET VERIFY ON

PROMPT
PROMPT Done, please see file C:\output_&today_var..txt
PROMPT

それが役に立てば幸い...

編集：

カーソルの反復ごとに値を出力するコメントの後（この例では各値は同じになると思いますが、私が行っていることの要点を理解する必要があります）：

BEGIN
   c := a+10;
   --
   FOR i IN 1 .. 10
   LOOP
      c := a+10;
      -- Output the value of C
      DBMS_OUTPUT.put_line('c: '||c);
   END LOOP;
   --
END;
于 2011-12-21T14:16:27.813 に答える
2

スプール付き：

  set heading off
  set arraysize 1
  set newpage 0
  set pages 0
  set feedback off
  set echo off
  set verify off

variable cd varchar2(10);
variable d number;

 declare
 ab varchar2(10) := 'Raj';
 a number := 10;
 c number;
 begin
 c := a+10;
 select ab,c into :cd,:d from dual;
 end;

 SPOOL 
 select :cd,:d from dual;
 SPOOL OFF
 EXIT;
于 2011-12-21T14:22:56.743 に答える
-3

plsql でスプール ファイルを実行するには、[ファイル] -> [新規] -> [コマンド ウィンドウ] -> [コードを貼り付け] -> [実行] に移動します。ディレクトリに移動すると、ファイルが見つかります。

于 2012-06-20T16:14:01.207 に答える