4

我在将游标中的值提取到变量中时遇到问题：

create or replace 
procedure projectinfo(num clubs.clubid%type) 
as
--identify variables
p_cln clubs.clubname%type;
p_projn projects.projectname%type;
p_projnum number;
p_taskn tasks.taskname%type;
p_tasknum number;

cursor cur is 
select c.clubname, p.projectname, t.taskname 
from clubs c join projects p on  c.clubid=p.clubid
join tasks t on t.projectid=p.projectid
where c.clubid=num;
--I have checked the above cursor and it's worked fine!!!
begin
p_projnum:=0;
p_tasknum:=0;

open cur;

loop

fetch cur into p_cln,p_projn, p_taskn;
dbms_output.put_line(p_cln|| ' ' ||p_projn|| ' ' || p_taskn);
-- the above command does not print variable values!!!
exit when cur%notfound;

p_projnum:=p_projnum+1;

dbms_output.put_line(' ************************ ');
dbms_output.put_line(' club name : ' ||p_cln);
dbms_output.put_line( ' project ' ||p_projnum|| ' ' || p_projn);

loop   
p_tasknum:=p_tasknum+1;
dbms_output.put_line('Task: ' ||p_tasknum|| ' '  || p_taskn);

fetch cur into p_cln,p_projn, p_taskn;
exit when cur%notfound;
end loop;
end loop;
close cur;
end projectinfo;

我检查了我的光标，它确实包含我需要的所有值。我的程序编译 FINE 但不打印任何输出！！！

4

1 回答 1

6

您使用什么工具来运行您的程序？默认情况下，大多数工具不会为dbms_output写入分配缓冲区，也不会显示写入的任何内容dbms_output。这就是为什么你永远不会依赖dbms_output任何真正的代码。

如果您使用的是 SQL*Plus，则需要serveroutput在执行过程之前启用

SQL> set serveroutput on;
SQL> exec projectinfo( <<some number>> );

如果您使用的是 GUI，那么 GUI 几乎肯定有办法启用dbms_output. 但这对于不同的应用程序会有很大的不同。例如，在 SQL Developer 中，您需要确保DBMS Output窗口可见，单击绿色的“加号”图标，然后选择要启用的连接dbms_output。

于 2013-08-24T00:05:02.920 回答