sqlplus set用法

矫情吗；* 2022-05-22 04:49 261阅读 0赞

set heading off等问题2010-09-01 11:03set heading off——不显示每行的列名  
set echo off——不重复显示所要执行的sql语句  
set line 200——设置每行显示200字符  
set pages 0——不进行分页显示  
set feed off——不显示sql语句的运行结果（selected N rows）  
  
  
  
  
SQL code   
\-- 这些代码的目的是将COMPONENT表的数据  
\-- 导出Insert语句  
\-- one\_table.sql的代码是通过all\_tab\_columns，  
\-- 将表的列写成查询语句,并且加上set feedback off等设置命令  
\-- 并在./data/以导出表的名称命名的Sql文件,然后在执行这个文件，  
\-- 形成./data/以导出表的名称加\_data命名的Sql文件。  
  
  
\--\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*  
\--File main.sql  
\--\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*  
set echo off         -- 是否显示脚本中正在执行的SQL语句 on 显示 off 不显示  
set serveroutput on  -- 使用dbms\_output.put\_line时，是否在屏幕上显示信息 on 显示 off 不显示  
set feedback off     -- 是否显示当前sql语句查询或修改的行数 off 不显示查询或修改的行数　      
set trimspool on     -- 是否去除重定向（spool）输出每行的拖尾空格，on 去除　off 不去除  
set line 10000       -- 设置一行显示的字符总数  
set verify off       -- 是否显示替代变量被替代前后的语句 on 显示 off 不显示  
set head off         -- 是否显示列标题 on 显示 off 不显示  
  
  
@@ one\_table.sql 'COMPONENT';  -- 执行main.sql目录下的one\_table.sql 'COMPONENT' 是输入的参数  
  
  
set head on          
set line 100   
set feedback on   
set termout on   -- 是否显示脚本中的命令的执行结果　on 显示 off 不显示  
set echo on        
  
  
\--\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*  
\--File one\_table.sql  
\--\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*  
prompt \*\*\* Process &1 ...;       -- 在屏幕上显示  \*\*\* Process COMPONENT ...  
  
  
set serveroutput on   
set echo off   
set feedback off   
set trimspool on   
set line 10000   
set verify off   
set feedback off   
set head off   
set termout off  
define tab\_name = '&1'           -- 定义变量 tab\_name 并且将 'COMPONENT' 赋值给tab\_name  
  
  
spool ./data/&tab\_name..sql      -- 将屏幕显示的结果输出到./data/COMPONENT.sql文件中  
declare                          -- 声明变量 关键字  
  -- 定义 游标 C1 有两个入口参数 v\_owner v\_tab\_name  
  cursor c1(v\_owner varchar2, v\_tab\_name varchar2) is  
  select column\_name, data\_type  
    from all\_tab\_columns  
   where table\_name = v\_tab\_name  
     and owner = v\_owner;  
  -- 变量的注释只能用猜的  
  field\_list      varchar2(4000);  -- 存储表列的列表  
  field\_list\_sel  varchar2(4000);  -- 存储选择的表列的列表  
  fmt\_field       varchar2(200);         
  date\_format     varchar2(30) := 'yyyymmddhh24miss'; -- 日期格式  
  v\_owner varchar2(30) := user;    
  v\_tab\_name varchar2(30) := upper(trim('&tab\_name'));   
begin  
  dbms\_output.enable(1000000);   -- 设置dmbs\_output输出的缓冲区大小  
  dbms\_output.put\_line('set echo off feedback off'); -- 在屏幕上输出 "set echo off feedback off" 信息  
  dbms\_output.put\_line('spool ./data/&tab\_name' || '\_data.sql');  
  -- Print the insert field   
  dbms\_output.put\_line('variable field\_list varchar2(4000);');  
  dbms\_output.put\_line('begin');  
  dbms\_output.put\_line(' :field\_list := ''insert into &tab\_name (''' );  
  -- 打开游标并c1并循环提取游标数据  
  for rec1 in c1(v\_owner, v\_tab\_name) loop  
    if c1%rowcount = 1 then  -- 检查游标是否只有一条数据  
      field\_list := ' || '' ' || rec1.column\_name || '''';  
    else  
      field\_list := ' || '',' || rec1.column\_name || '''';  
    end if;  
    dbms\_output.put\_line(field\_list);  
  end loop;  
  
  
  dbms\_output.put\_line('||'')''||chr(10)||''values ('';');  
  dbms\_output.put\_line('end;');  
  dbms\_output.put\_line('/');   
  
  
  -- For select SQL to generate insert statement  
  dbms\_output.put\_line('select :field\_list || chr(10) ||');  
  for rec1 in c1(v\_owner, v\_tab\_name) loop  
    -- For insert values clause  
    if rec1.data\_type = 'DATE' then  
      fmt\_field := '''to\_date(''''''||to\_char(' || rec1.column\_name || ', ''' ||   
      date\_format || ''')||'''''',''''' || date\_format || ''''')''';  
    elsif rec1.data\_type in ('CHAR', 'VARCHAR2') then  
      fmt\_field := ''''''''' || replace(' || rec1.column\_name || ','''''''', '''''''''''')|| ''''''''';  
    else  
      fmt\_field := 'to\_char(' || rec1.column\_name || ')';  
    end if;  
    if c1%rowcount = 1 then  
      field\_list\_sel := fmt\_field;  
    else   
      field\_list\_sel := ' ||'','' || ' || fmt\_field;  
    end if;  
    dbms\_output.put\_line(field\_list\_sel);  
  end loop;  
  dbms\_output.put\_line('|| '');''');  
  dbms\_output.put\_line('from &tab\_name ;');  
  dbms\_output.put\_line('spoo off;');  
end;  
/  
spool off;  
  
  
@ ./data/&tab\_name..sql  
  
  
set head on   
set line 100  
set termout on