job 定时向数据库添加用户信息

-----创建表
create table users(
s_userid number,
s_username varchar(24),
s_address varchar2(150),
s_email varchar2(100),
s_departId number,
s_telephone varchar2(16),
s_age number
)
---创建sequence
create or replace sequence user_squence
increment by 1
start with 1
nomaxvalue
nocycle
cache 10

--创建触发器
create or replace trigger user_add_trigger
before insert on users
for each row
  declare nextid number;
  begin
  if :new.userid is null or:new.userid=0 then
    select user_sequence.nextval into nextid from sys.dual;
    :new.userid:=nextid;
 end if;
 end user_add_trigger;

---创建添加用户的存储过程
create or replace procedure pro_addUser(
s_name users.username%type,
s_address users.address%type,
s_email users.email%type,
s_departNum users.departid%type,
s_telephone users.telephone%type,
s_age users.age%type
)
is
begin
  insert into users (username,address,email,telephone,departid,age)
  values(s_name,s_address,s_email,s_telephone,s_departNum,s_age);
 end pro_addUser;
 
 --创建job
 declare job1 number;
 begin
   sys.dbms_job.submit(job => job1,
   what =>pro_addUser(a,b,c,d,e,f) ,
   next_date =>sysdate ,
   interval =>sysdate+1/1440);--每分钟（一天1440分钟）
   commit;
   end;