存储过程应用实例及应用语法说明

本文链接：https://blog.youkuaiyun.com/caozhongyan/article/details/6546767

本文介绍了一个SQL存储过程，用于根据特定条件动态调整银企支付交易序号，并包含异常处理机制。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

create or replace procedure P_YQ001_01(YQ00102VALUE in VARCHAR2,
                                       YQ00108VALUE in VARCHAR2,
                                       YQ00201VALUE in VARCHAR2,
                                       YQ00206VALUE out numeric) is
--YQ00102VALUE

--YQ00108VALUE
--YQ00201VALUE

--YQ00206VALUE 返回值

value1 numeric;--当前顺序号
value2 numeric;--最大值
value3 numeric;--最小值
begin
select yq2.yq00206,yq2.yq00204 ,yq2.yq00205 into value1,value2,value3 from YQ002 yq2
   where yq2.yq00201 = YQ00201VALUE
     and yq2.yq00202 = YQ00102VALUE
     and yq2.yq00203 = YQ00108VALUE;

--当序号大于最大值或小于最小值时，进行重新设置，本例设置为最小值加1，因为最小值为0

--if()....then....elsif ().... then .... else ....end if;是存储过程中条件判断语法
if(value1>=value2) then
         value1:=value3+1;
elsif(value1<=value3) then
          value1:=value3+1;
else
        value1:=value1+1;
end if;

YQ00206VALUE:=value1;
update YQ002 yq2
     set yq2.yq00206 = YQ00206VALUE
   where yq2.yq00204 > value1
     and yq2.yq00205 < value1
     and yq2.yq00201 = YQ00201VALUE
     and yq2.yq00202 = YQ00102VALUE
     and yq2.yq00203 = YQ00108VALUE;
commit;
DBMS_OUTPUT.put_line(YQ00206VALUE);

--异常处理

exception

   when no_data_found then           --SELECT未找到记录异常
         DBMS_OUTPUT.put_line('获取银企支付交易序号控制登记薄序号信息报错，请仔细检查。');
    when others then                         --其它异常
         DBMS_OUTPUT.put_line('更新银企支付交易序号控制登记薄序号信息报错，请仔细检查。');
end;