Thao tác này sẽ chuyển đầu ra từ khối ẩn danh vào một tệp có tên là output_<YYYYMMDD>.txt
nằm trong thư mục gốc của PC cục bộ C:ổ đĩa nơi <YYYYMMDD>
là ngày hiện tại:
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
Hy vọng nó sẽ giúp ...
CHỈNH SỬA:
Sau khi nhận xét của bạn để xuất ra một giá trị cho mỗi lần lặp lại con trỏ (tôi nhận thấy mỗi giá trị sẽ giống nhau trong ví dụ này nhưng bạn sẽ hiểu được ý chính của những gì tôi đang làm):
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;