执行匿名过程时出错

Question

我收到错误了 ORA-06550：第21行，第0列： PLS-00103：遇到以下其中一项时遇到符号“文件结束”：    开始函数编译指示程序

执行程序时，请找到以下程序

declare
procedure p2;
procedure p3;
          procedure p1
                    is
                      begin
                           dbms_output.put_line('CAlling procedure P1');
                           p2;
                 end p1;
           procedure p2 is
                       begin
                            dbms_output.put_line('CAlling procedure P2');
                           p3;
                  end p2;
           procedure p3 is
                       begin
                            dbms_output.put_line('CAlling procedure P3');
                   end p3;

Plz帮助我解决问题。

Answer 1

declare
   procedure p2;
   procedure p3;
   procedure p1 is
   begin
      dbms_output.put_line('CAlling procedure P1');
      p2;
   end p1;
   procedure p2 is
   begin
      dbms_output.put_line('CAlling procedure P2');
      p3;
   end p2;
   procedure p3 is
   begin
      dbms_output.put_line('CAlling procedure P3');
   end p3;
begin
   p1;
end;                   
/