CREATE PROCEDURE PROC_SEQ_SEED_GET
( IN net_id_in bigint, --网络ID
IN comp_id_in bigint, --公司ID
IN seed_type_in integer,--序列号类型
IN seed_date_in VARCHAR(16),--当前日期yyyymmdd格式
OUT return_value VARCHAR(32) --返回值
)
P1: BEGIN
DECLARE seed_value_t integer;
DECLARE seed_date_t varchar(16);
DECLARE return_value_t integer DEFAULT 1;
DECLARE rs1 CURSOR WITH RETURN FOR
select SEED_VALUE,SEED_DATE FROM BAS_SEQ_SEED as t where t.NET_ID=net_id_in and t.COMP_ID=comp_id_in and t.SEED_TYPE=seed_type_in for update WITH RR USE AND KEEP UPDATE LOCKS;
OPEN rs1;
FETCH rs1 into seed_value_t ,seed_date_t;
IF (seed_value_t is null) then --记录不存在
begin
insert INTO BAS_SEQ_SEED(ID,NET_ID,COMP_ID,SEED_TYPE,SEED_DATE,SEED_VALUE)
VALUES
(NEXTVAL FOR SE_EXPRESSBAS,net_id_in,comp_id_in,seed_type_in,seed_date_in,1);
SET return_value_t = 1;
end;
else
begin
--set seed_date_in= SCM_WULIU.ts_fmt(current timestamp,'yyyymmdd');
if(seed_date_in=seed_date_t) then --当天
begin
update BAS_SEQ_SEED set SEED_VALUE=SEED_VALUE+1 where NET_ID=net_id_in and COMP_ID=comp_id_in and SEED_TYPE=seed_type_in;
SET return_value_t = seed_value_t+1;
end;
else --非当天
begin
update BAS_SEQ_SEED set SEED_DATE=seed_date_in,SEED_VALUE=1 where NET_ID=net_id_in and COMP_ID=comp_id_in and SEED_TYPE=seed_type_in;
SET return_value_t = 1;
end;
end if;
end;
end if;
if(return_value_t<10) then
set returnvalue=seed_date_in ||'000'||char(return_value_t);
elseif(return_value_t>=10 AND return_value_t<100) then
set returnvalue=seed_date_in ||'00'||char(return_value_t);
elseif(return_value_t>=100 AND return_value_t<1000) then
set returnvalue=seed_date_in ||'0'||char(return_value_t);
else
set returnvalue=seed_date_in||char(return_value_t);
end if;
close rs1;
END P1