oracle创建函数为什么调用显示处于无效状态？

Question

create or replace function myfun(x number)
return varchar as sushu varchar(100);
begin
c number := 0;
i number := 2;
while i < x loop
if mod(x,i) =0 then
c := c+1;
exit;
end if;
i := i + 1;
end loop;
if c = 1 then
sushu := '不是素数';
else
sushu :='是素数';
end if;
return sushu;
end;

Answer 1

首先，你的变量定义放错位置了，编译都是通不过的，c和i定义应该放在begin前
如下：

 create or replace function myfun(x number)
return varchar as sushu varchar(100);
c number := 0;
i number := 2;
begin
while i < x loop
if mod(x,i) =0 then
c := c+1;
exit;
end if;
i := i + 1;
end loop;
if c = 1 then
sushu := '不是素数';
else
sushu :='是素数';
end if;
return sushu;
end;

调用函数：

 SET SERVEROUTPUT ON;
DECLARE
sushu varchar(100);
BEGIN
sushu := myfun(97);
dbms_output.put_line('sushu='||sushu);
END;