create or replace procedure StockPoolAdjust( gpCode in varchar2,
msg out varchar2,
flag out varchar2)
as
inum integer;
begin
--是否在公司库
select count(1) into inum from uf_stock_pool where stockcode = gpCode;
if inum > 0 then
msg := '不能申请';
flag := '-1';
return;
end if;
Exception
when others then
flag := '-1';
end;
测试:
begin
-- Call the procedure
stockpooladjust(gpcode => :'119125',
msg => :msg,
flag => :flag);
end;
错误信息: