在编写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 <sqlplus / as sysdba <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语句。
本文标题：PL/SQL中如何让程序每隔几秒插入一条数据
新闻来源：http://cdkjz.cn/article/ijjohj.html
