CREATE TABLE "TEST" (COL1 NUMBER, COL2 NUMBER, COL3 VARCHAR2(200))
GO

//Create Package REPORT_UTILS1
CREATE OR REPLACE PACKAGE c##project.REPORT_UTILS1 AS
    PROCEDURE ADD_TEST;
    PROCEDURE DEL_TEST;
END;
GO

//Create Package REPORT_UTILS1
CREATE OR REPLACE PACKAGE BODY c##project.REPORT_UTILS1 AS 
    PROCEDURE ADD_TEST AS
    BEGIN
        INSERT INTO "TEST" VALUES (1,2,'test');
    END;
 
    PROCEDURE DEL_TEST
AS
    BEGIN
       INSERT INTO "TEST" VALUES (1,2,'test');
    END;
END;
GO


===================================================================================
//Create Package
CREATE OR REPLACE PACKAGE "REPORT_UTILS" AS
    PROCEDURE ADD_TEST;
    PROCEDURE DEL_TEST (COL1_IN NUMBER);
END;
GO

//Create Package Body
CREATE OR REPLACE PACKAGE BODY "REPORT_UTILS" AS 
    PROCEDURE ADD_TEST AS
    BEGIN
        INSERT INTO "TEST" VALUES (1,2,'test');
    END;
 
    PROCEDURE DEL_TEST(COL1_IN IN NUMBER) AS
    BEGIN
        DELETE FROM "TEST" WHERE COL1 = COL1_IN;
    END;
END; 

================================================================================
//Create Package
CREATE OR REPLACE PACKAGE "Abhi" as
   a number;
   b number;
   PROCEDURE add_number;
   FUNCTION mul_number RETURN integer;
 --public variable which is as explained before is accessible to other program units.
end;
GO

CREATE OR REPLACE PACKAGE BODY "Abhi" as
   PROCEDURE add_number AS
    BEGIN
        select 1 into a from dual;
    END; 
end;
GO

============================================================================
create or replace package demo_pkg
   as
          type rc is ref cursor;
 
            procedure show_me_the_code( p_pkg_name in varchar2, p_code in out rc );
   end;
   /


 create or replace package body demo_pkg
   as
  
   procedure show_me_the_code( p_pkg_name in varchar2, p_code in out rc )
    is
   begin
           open p_code
            for
            select text
             from user_source
           where name = upper(p_pkg_name)
            order by type, line;
   end;
   end;

===========================================================

 create or replace package demo_pkg
    as
            procedure p1;
            procedure p2;
           procedure p3;
           procedure p4;
   end;
   /
create or replace package body demo_pkg
   as
           procedure p10 as begin null; end;
           procedure p9 as begin null; end;
           procedure p8 as begin null; end;
           procedure p7 as begin null; end;
           procedure p6 as begin null; end;
           procedure p5 as begin null; end;
           procedure p4 as begin null; end;
           procedure p3 as begin null; end;
           procedure p2 as begin null; end;
           procedure p1 as begin null; end;
   end;
   /

=====================================================
//Create Table
create table x (a number)
Go
//Create Package demo_pkg_1
create or replace package demo_pkg_1
   as
          type rc is ref cursor;
 
            procedure show_me_the_code( p_pkg_name in varchar2, p_code in out rc );
   end;
   /

//Create Package Body demo_pkg_1
 create or replace package body demo_pkg_1
   as
  
   procedure show_me_the_code( p_pkg_name in varchar2, p_code in out rc )
    is
   begin
           open p_code
            for
            select text
             from user_source
           where name = upper(p_pkg_name)
            order by type, line;
   end;
   end;

=================================================

//Create Package 
CREATE OR REPLACE PACKAGE functionbyfour1 AS
    FUNCTION functone( first number, second number) RETURN NUMBER ;
    FUNCTION functtwo( first number, second number, third number) RETURN NUMBER ;
    FUNCTION functthree(first number, second number, third number, fourth number) RETURN     NUMBER ;
    FUNCTION functfour( first number, second number, third number, fourth number,fifth   number) RETURN NUMBER ;
   END  functionbyfour1;
   /

//Create Package Body
CREATE OR REPLACE PACKAGE BODY functionbyfour1 AS
      FUNCTION functone (first number, second number ) RETURN number AS total number;
    BEGIN
       total:=first + second - 1;
       RETURN total;
       DBMS_OUTPUT.PUT_LINE(total);
     END functone;
     FUNCTION functtwo (first number, second number, third number ) RETURN number AS  total     number;
     BEGIN
      total:=first + second + third - 1;
       RETURN total;
       DBMS_OUTPUT.PUT_LINE(total);
     END functtwo;
     FUNCTION functthree (first number, second number,third number, fourth number )     RETURN     number AS total number;
     BEGIN
       total:=first + second + third + fourth - 1;
       RETURN total;
       DBMS_OUTPUT.PUT_LINE(total);
    END functthree;
     FUNCTION functfour (first number, second number, third number, fourth number, fifth     number ) RETURN number AS total number;
     BEGIN
       total:=first + second + third + fourth + fifth - 1;
       RETURN total;
       DBMS_OUTPUT.PUT_LINE(total);
    END functfour;
  END functionbyfour1;