##  Examples of how to exploit the package initialization section


    PACKAGE get_user_details
    AS
      .....
      Procedure .....
      Function  .....
      .....
      Xosuser  varchar2(30);
    END;


    PACKAGE body get_user_details
    AS
      Cursor C1 is 
      select v.osuser
      from   v$session v
      where  v.audsid = userenv(‘SESSIONID’);
      .....
      .....
      Procedure .....
      Function  .....
      .....
      .....
      Open  C1;               -- Package Initialization Section
      Fetch C1 into Xosuser;
      Close C1;
    END;


    >> :osuser := get_user_details.Xosuser;