해당 변수와 상수를 찾을 수 없다는 오류 메시지가 출력되었다. 이렇게 외부에서 참조할 수 없는 패키지 본문에서 선언한 항목을 내부(전용)항목_{Private Item} 이라고 한다. 패키지는 이런 식으로 캡슐화를 통한 정보은닉을 구현하고 있다. 그렇다면 패키지 본문에서 선언한 변수나 상수를 외부에서 사용할 방법이 없는 것일까? 꼭 그렇지만은 않다. 직접 해당 변수와 상수를 참조하진 못하더라도, 서브 프로그램을 통해 간접적으로 참조하거나 심지어는 값을 변경할 수도 있다. 이번에는 내부 변수와 상수를 처리하는 함수와 프로시저를 만들어 볼텐데, 먼저 선언부를 작성해 보자.

입력

    CREATE OR REPLACE PACKAGE ch12_var IS
      -- 상수 선언
        c_testCONSTANTVARCHAR2(10) := 'TEST';
      -- 변수 선언
        v_testVARCHAR2(10);

      -- 내부 변수 값을 가져오는 함수
      FUNCTION fn_get_value RETURN VARCHAR2;

      -- 내부 변수 값을 변경하는 프로시저
      PROCEDURE sp_set_value ( ps_value VARCHAR2);

    END ch12_var;

결과

    PACKAGE CH12_VAR이(가) 컴파일되었습니다.