create or replace package examplepackage as
procedure p_set_var(val varchar2);
pragma restrict_references(p_set_var, rnps, rnds, wnds);
function f_get_var return varchar2;
pragma restrict_references(f_get_var, wnps, rnds, wnds);
end examplepackage;
/
show errors;
create or replace package body examplepackage as
privatevar varchar2(32);
procedure p_set_var(
val varchar2
) AS
begin
privatevar := val;
end;
function f_get_var return varchar2 AS
begin
return privatevar;
end;
end examplepackage;
/
show errors;
execute examplepackage.p_set_var('a');
select examplepackage.f_get_var from dual;
Сайт использует файлы cookie для корректной работы и повышения удобства. Нажимая кнопку «Принять» или продолжая пользоваться сайтом, вы соглашаетесь на их использование в соответствии с Политикой в отношении обработки cookie ООО «ППГ», в том числе на передачу данных из файлов cookie сторонним статистическим и рекламным службам. Вы можете управлять настройками cookie через параметры вашего браузера