在Oracle中使用序列创建唯一流水号

先创建序列;

create sequence SEQ_DJLSH
minvalue 1
maxvalue 9999999999
start with 1920
increment by 1
cache 20;

使用序列得到唯一流水号

create or replace procedure RF_G002_GETDJLSH(p_djlsh out t_djls.flowid%type) is
/*
得到单据流水号
ljg
2008-03-03
*/
v_flowid number(12, 0);
begin
select seq_djlsh.nextval into v_flowid from dual;
p_djlsh := v_flowid;
exception
when others then
p_djlsh := 0;
end;