我编写的一个小程序,创建一个过程。结果提示:“SP2-0103: SQL 缓冲区中无可运行的程序。”和“警告: 创建的过程带有编译错误。”不知道怎么解决。有高手指点下,万分感谢。程序代码如下所示:
/*定义过程参数*/
set serveroutput on
create or replace procedure scott.graduateprocess(
  tempzhengzhi in scott.graduate.zhengzhi%type,
  tempyingyu in scott.graduate.yingyu%type,
  tempzhuanye1 in scott.graduate.zhuanye1%type,
  tempzhuanye2 in scott.graduate.zhuanye2%type,
  tempzhuanye3 in scott.graduate.zhuanye3%type,
  temptotalscore in scott.result.totalscore%type) as
/*定义graduaterecord为记录型变量,临时存放通过游标从graduate数据表中提取的记录*/
  graduaterecord scott.graduate%rowtype;
/*定义graduatetotalscore为数值型变量,统计总分*/
  graduatetotalscore scott.result.totalscore%type;
/*定义graduateflag为字符型变量,根据结果放入“落选”或“录取”,然后写入数据表result*/
  graduateflag varchar2(4);
/*定义游标graduatecursor,存放的是所有的graduate数据表中的记录*/
  cursor graduatecursor is select * from scott.graduate;
/*定义异常处理errormessage*/
  errormessage exception;
/*开始执行*/
begin
/*打开游标*/
  open graduatecursor;
/*如果游标没有数据,激活异常处理*/
  if graduatecursor%notfound then 
    raise errormessage;
  end if;
/*游标有数据,指针指向第一条记录,每执行fetch命令,就自动下移,循环执行到记录提取完毕为止*/
  loop
    fetch graduatecursor into graduaterecord;
/*计算总分*/
  graduatetotalscore:=graduaterecord.yingyu+graduaterecord.zhengzhi+graduaterecord.zhuanye1
  +graduaterecord.zhuanye2+graduaterecord.zhuanye3;
/*判断单科和总分是否满足录取要求,若满足,graduateflag变量值为“录取”,否则为“落选”*/
  if(graduaterecord.yingyu>=tempyingyu and
     graduaterecord.zhengzhi>=tempzhengzhi and
     graduaterecord.zhuanye1>=tempzhuanye1 and
     graduaterecord.zhuanye2>=tempzhuanye2 and
     graduaterecord.zhuanye3>=tempzhuanye3 and 
     graduatetotalscore>=temptotalscore) then
     graduateflag:='录取';
  else
     graduateflag:='落选';
   end if;
/*当游标数据提取完毕后,退出循环*/
  exit when graduatecursor%notfound;
/*向结果数据表result中插入处理后的数据*/
  insert into
  scott.result(bh,xm,lb,zhengzhi,yingyu,zhuanye1,zhuanye2,zhuanye3,totalscore,flag)
  values(graduaterecord.bh,graduaterecord.xm,graduaterecord.lb,graduaterecord.zhengzhi,graduaterecord.yingyu,
  graduaterecord.zhuangye1,graduaterecord.zhuanye2,graduaterecord.zhuanye3,graduatetotalscore,graduateflag);
end loop;
/*关闭游标*/
  close graduatecursor;
/*提交结构*/
  commit;
/*异常处理,提示错误信息*/
  exception 
  when errormessage then dbms_output.put_line('无法打开数据表');
/*程序执行结束*/
end;

解决方案 »

  1.   

    sql缓冲区太小?set serveroutput on size 1000000
    然后再试试
      

  2.   

    你好,我试了下,set serveroutput on size 1000000后,不出现“SP2-0103: SQL 缓冲区中无可运行的程序。”这个错误,但还是有警告:“警告: 创建的过程带有编译错误。”能再指点下吗?谢谢
      

  3.   

    “SP2-0103: SQL 缓冲区中无可运行的程序。”
    这个是因为第一行注释的问题,/* 加空格就没事了 。编译错误那是procdure代码的问题,你在看到警告提示后show error看看。
      

  4.   

    我想问问,show errors;添加到end;之后吗?我添加到end;之前和之后都没什么效果,还是提示编译错误。
      

  5.   

    end;
    的下一行需要有一个单独的 / 
    表示此pl/sql块结束。然后才是show error
      

  6.   

    谢谢,看到问题了。一下为提示问题。
    “PROCEDURE SCOTT.GRADUATEPROCESS 出现错误:LINE/COL ERROR
    -------- -----------------------------------------------------------------
    59/3     PL/SQL: SQL Statement ignored
    62/18    PLS-00302: 必须说明 'ZHUANGYE1' 组件
    62/18    PL/SQL: ORA-00984: 列在此处不允许”
      

  7.   

    我将"zhuangye1”修改成“zhuanye1”后提示如下问题:
    “警告: 创建的过程带有编译错误。PROCEDURE SCOTT.GRADUATEPROCESS 出现错误:LINE/COL ERROR
    -------- -----------------------------------------------------------------
    59/3     PL/SQL: SQL Statement ignored
    60/25    PL/SQL: ORA-00904: 无效列名
      

  8.   

    问题已经解决,非常感谢。能家你QQ,因为我刚开始入手学习,有很多地方可能需要学习。如果愿意,能否留QQ联系。