每天凌晨清空sequence，让sequence每天从1开始

job:

?

create or replace procedure ClearSeq(seqName in varchar) as  n_count number(8);  v_sql   varchar(500);  v_code  NUMBER;  v_errm  VARCHAR2(64);  --mahongminbegin  select count(1)    into n_count    from user_sequences t  --where t.sequence_name = 'SEQ_SN_ID';   where t.sequence_name = seqName;  if n_count > 0 then    execute immediate 'drop sequence ' || seqName;  end if;  v_sql := 'create sequence ' || seqName ||           ' minvalue 1 maxvalue 99999999 start with 1 increment by 1 NOCYCLE cache 20';  execute immediate v_sql;exception  when others then    v_code := SQLCODE;    v_errm := SUBSTR(SQLERRM, 1, 64);    DBMS_OUTPUT.PUT_LINE('重置sequence时， Error code ' || v_code || ': ' ||                         v_errm);end;