--定义一个存储过程 里面定义一个函数和一个子的存储过程
create or replace procedure checks(firstNum in number) is
secondNum number:=100;
function checkScore return number is
secondNum number:=-100;
begin
if checks.firstNum<=50
then
return secondNum;
else
return checks.secondNum;
end if;
end;
procedure test is
begin
dbms_output.put_line('this is defined in declare');
end test;
begin
dbms_output.put_line(checkScore);
test;
end checks;
--调用这个存储过程
-- Created on 7/9/2013 by 024911
declare
begin
-- Test statements here
checks(200);
end;
--输出
100
this is defined in declare
create or replace procedure checks(firstNum in number) is
secondNum number:=100;
function checkScore return number is
secondNum number:=-100;
begin
if checks.firstNum<=50
then
return secondNum;
else
return checks.secondNum;
end if;
end;
procedure test is
begin
dbms_output.put_line('this is defined in declare');
end test;
begin
dbms_output.put_line(checkScore);
test;
end checks;
--调用这个存储过程
-- Created on 7/9/2013 by 024911
declare
begin
-- Test statements here
checks(200);
end;
--输出
100
this is defined in declare