PL/SQL中如何让程序每隔几秒插入一条数据

在编写ORACLE PL/SQL中，如果需要程序执行中暂停几秒钟再继续执行，可以通过oracle内置的dbms_lock.sleep来实现，不过dbms_lock包需要用户自己安装。

[root@oraclevm ~]# su - oracle

[oracle@oraclevm ~]$ sqlplus / as sysdba

SQL*Plus: Release 11.2.0.4.0 Production on Mon May 25 16:36:12 2015

Copyright (c) 1982, 2013, Oracle.  All rights reserved.

Connected to:

Oracle Database 11g Enterprise Edition Release 11.2.0.4.0 - 64bit Production

With the Partitioning, OLAP, Data Mining and Real Application Testing options

SQL> startup    

SQL> @?/rdbms/admin/dbmslock.sql

Package created.

Synonym created.

Grant succeeded.

SQL> grant execute on dbms_lock to public;　--授权PUBLIC执行权限  

Grant succeeded.  

SQL> create table test1(id number,name varchar2(40),time date);   --创建test1临时表  

Table created.  

SQL> select * from test1;  --无数据  

no rows selected    

SQL> SET TIMING ON     --打开时间显示  

SQL> begin             --开始执行测试脚本  

  2    insert into test1(id,name,time) values(1,'Andy',sysdate);  

  3    DBMS_LOCK.SLEEP(10);  --让程序暂时10秒钟  

  4    insert into test1(id,name,time) values(2,'Shirley',sysdate);  

  5    commit;  

  6  end;  

  7  /  

PL/SQL procedure successfully completed.  

Elapsed: 00:00:10.04  --程序执行时间为10.04秒  

SQL> SELECT ID,NAME,TO_CHAR(TIME,'YYYY/MM/DD HH24:MI:SS') AS TIME FROM TEST1;　

--查询执行结果  

        ID NAME                           TIME  

---------- -------------------------   -----------------  

         1 Andy                        2014/12/10 10:09:03   --第一条的插入时间是09:03  

         2 Shirley                     2014/12/10 10:09:13   --第二条的插入时间是09:13

刚好比第一条晚了10秒钟    

SQL> drop table test1;  

Table dropped.  

下面给个例子：

每隔一秒插入一条数据

vi /tmp/11.sh

#/bin/sh

su - oracle <<EOF

sqlplus / as sysdba <<EOF

drop table test;

drop sequence test_seq;

create table test (id int,hostname varchar2(50),datetime date);

create sequence test_seq

minvalue 1

maxvalue 100000

start with 1

increment by 1

cache 20;

declare

maxrecords constant int:=100000;

i int :=1;

begin

for i in 1..maxrecords loop

insert into test

(id,hostname,datetime)

values

(test_seq.nextval,'oraclevm',sysdate);

commit;

dbms_lock.sleep(1);

end loop;

end;

/

exit;

EOF

[root@oraclevm ~]#chmod 755 /tmp/11.sh

[root@oraclevm ~]#cd /tmp

[root@oraclevm ~]#./11.sh

即可执行。

先设置一下时间格式

export NLS_DATE_FORMAT="YYYY-MM-DD HH24:MI:SS"

最后进行数据查询

spool /tmp/test_oracle

set linesize 80

col hostname format a8;

set colsep' ';

set pagesize 0;

SQL> select id,hostname,to_char(datetime,'YYYY-MM-DD HH24:MI:SS') from test;

         1 oraclevm 2014-12-27 10:19:09

         2 oraclevm 2014-12-27 10:19:10

         3 oraclevm 2014-12-27 10:19:11

         4 oraclevm 2014-12-27 10:19:12

         5 oraclevm 2014-12-27 10:19:13

         6 oraclevm 2014-12-27 10:19:14

         7 oraclevm 2014-12-27 10:19:15

         8 oraclevm 2014-12-27 10:19:16

         9 oraclevm 2014-12-27 10:19:17

        10 oraclevm 2014-12-27 10:19:18

spool用法：

spool是Oracle SQL*PLUS下的命令，可以用它来导出表中的大量数据，生成格式可以由自己手动控制。

1. 编写spool.sql脚本，存放在/tmp目录下

set trimspool on 
set linesize 120 
set pagesize 2000 
set newpage 1 
set heading off 
set term off 
set echo off
set feedback off
spool /tmp/data.txt 
select deptno || ',' || dname || ',' || loc from dept;
spool off

2. 在sql*plus上用scott用户登录，执行上面的sql脚本

!/tmp/spool.sql(linux下)

@d:\spool.sql（windows下）

3.观察相应目录，生成了data.txt文件，txt中的内容如下：

10,ACCOUNTING,NEW YORK
20,RESEARCH,DALLAS
30,SALES,CHICAGO
40,OPERATIONS,BOSTON

总结：

利用spool可以方便地导出所需要的表，进而可以利用导出的数据进行不同数据库间的数据迁移。

下面介绍使用spool的一些常用设置：

set colsep ' ';　　　 //域输出分隔符 
set echo off;　　　　//显示start启动的脚本中的每个sql命令，缺省为on 
set feedback off;　　//回显本次sql命令处理的记录条数，缺省为on 
set heading off;　　 //输出域标题，缺省为on 
set pagesize 0;　　　//输出每页行数，缺省为24,为了避免分页，可设定为0。 
set termout off;　　 //显示脚本中的命令的执行结果，缺省为on(可以缩写为term)
set trimout on;　　　//去除标准输出每行的拖尾空格，缺省为off 
set trimspool on;　　//去除重定向（spool）输出每行的拖尾空格，缺省为off 

注意：

如果直接在sql*plus中执行上面的spool.sql命令，而不通过执行脚本来进行，那么在生成的txt文件中会存在执行的sql语句。