create or replace procedure pro_loop(userid in varchar2)
is
departid number(4);
begin
begin
declare
cursor list is select departid from departmment ;
rs list%rowtype;
begin
for rs in list loop
dbms_output.put_line(rs.departid);
end loop;
end;
end;
/************************************************以上是存储过程******************************************/
PROCEDURE COMPANY.PRO_LOOP编译错误
错误:PLS-00103: Encountered the symbol "end-of-file" when expecting one of the following:
begin case declare end exception exit for goto if loop mod
null pragma raise return select update while with
<an identifier> <a double-quoted delimited-identifier>
<a bind variable> << close current delete fetch lock insert
open rollback savepoint set sql execute commit forall merge
pipe
/*********************************************************************************************************/
烦请各位高手指正一二