CREATE OR REPLACE PACKAGE TEST_PACKAGE AS
FUNCTION TEST_FUNCTION RETURN VARCHAR2;
PROCEDURE TEST_PROCEDURE;
END TEST_PACKAGE;
/
CREATE OR REPLACE PACKAGE BODY TEST_PACKAGE AS
FUNCTION TEST_FUNCTION RETURN VARCHAR2 AS
V_TEST VARCHAR2(10);
V_TEST2 VARCHAR2(10) NOT NULL := 'test2';
BEGIN
V_TEST := 'test';
RETURN V_TEST;
END TEST_FUNCTION;
PROCEDURE TEST_PROCEDURE IS
BEGIN
NULL;
END TEST_PROCEDURE;
END TEST_PACKAGE;
/
|