存储过程.txt

很简单的小程序

create or replace procedure jdel
(
   v_sl base.jsl%type;
   re in number;
) 
is
begin
select base.jsl into v_sl 
       from base
       where base.jid=jhand.jid;
if base.jsl<jhand.jsl then 
   re=0;
end if
end;