开源俱乐部

PL/SQL程序包中，
方法一：
           包头：
           create or replace package   XXXX_X_XXX_PKG    is

                   PROCEDURE   A(errbuf           OUT VARCHAR2,
                            retcode                   OUT    VARCHAR2,
                            p_1                        IN    VARCHAR2,
                            p_2                        IN    NUMBER);

           end XXXX_X_XXX_PKG ;

 注：包头中声明一个Procedure, 包体中声明一个主Procedure(例如: A),多个从Procedure(一般是些共用方法)(例如：B), 注意包体中Procedure实现次序，应先声明B ,
在A过程里，可以调用B.

方法二: 
      包头: 
      create or replace package   XXXX_X_XXX_PKG    is

                   PROCEDURE    A(errbuf           OUT VARCHAR2,
                            retcode                   OUT    VARCHAR2,
                            p_1                        IN    VARCHAR2,
                            p_2                        IN    NUMBER);

                   PROCEDURE    B( retcode          OUT    VARCHAR2,
                            p_1                        IN    VARCHAR2,);

           end XXXX_X_XXX_PKG ;
      包体中,此时A可以直接引用B,不论实现次序.