把序列调整到指定值的存储过程(Oracle)
CREATE OR REPLACE procedure AdjustSeqValue(pSeqName in varchar2,pValue in number) is/******************************************************************************将指定序列的值调整到指定的值，需要创建、删除序列的仅限。******************************************************************************/v_value number;begin begin execute immediate 'drop sequence '||pSeqName; exception when others then null; end; if(pValue<0 or pValue is NULL) then v_value:=1; else v_value:=pValue; end if; execute immediate 'CREATE SEQUENCE '||pSeqName || ' START WITH ' ||v_value|| ' INCREMENT BY 1 MINVALUE 1 MAXVALUE 999999 NOCACHE CYCLE' ; end AdjustSeqValue;/
