—创建包 create or replace package test_pkg is g_public_flag varchar2(1); function test_function(p_param1 varcha
—创建包
create or replace package test_pkg is
g_public_flag varchar2(1);
function test_function(p_param1 varchar2,
p_param2 varchar2) return varchar2;
function hello_function(p_param3 varchar2) return varchar2;
procedure ff(p1 varchar2);
end;
–包体
create or replace package body test_pkg is
g_private_flag varchar2(1) := ‘Y’;
function test_function(p_param1 varchar2,
p_param2 varchar2) return varchar2
is
val varchar2(10):=’hello’;
begin
dbms_output.put_line(‘helo’);
return val;
end ;
function hello_function(p_param3 varchar2) –参数与包头中必须保持一致
return varchar2 is
val varchar2(10):=’hello’;
begin
dbms_output.put_line(‘world’);
return val;
end;
procedure ff(p1 varchar2) is
flag number;
pp1 VARCHAR2(10):=’p’;
p2 VARCHAR2(10):=’p’;
p3 VARCHAR2(10):=’p’;
p4 VARCHAR2(10):=’p’;
begin
select count(*)into flag from all_all_tables where table_name=’LOGTABLE1′;
dbms_output.put_line(flag);
if(flag = 0) then
execute immediate
‘CREATE TABLE logtable1 (userid VARCHAR2(10), logdate VARCHAR2(10),exception_id VARCHAR2(10),exception_msg VARCHAR2(10))’;
end if;
execute immediate ‘insert into logtable1 values (:1,:2,:3,:4)’ using ‘1’,’1′,’2′,’3′; –只能动态插入
end;
end;
—-测试
declare
begin
dbms_output.put_line(test_pkg.test_function(‘1′,’1’));
dbms_output.put_line(test_pkg.hello_function(‘1’));
test_pkg.ff(‘dd’);
end;
select * from logtable1;
drop table logtable1
,
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请发送邮件至253000106@qq.com举报,一经查实,本站将立刻删除。
发布者:PHP中文网,转转请注明出处:https://www.chuangxiangniao.com/p/1894911.html