Header:
CREATE OR REPLACE
PACKAGE PA_PDB_UTIL AS
PROCEDURE P_PDB_SeekId (inId IN VARCHAR2, ret OUT integer);
END PA_PDB_UTIL;
Body:
CREATE OR REPLACE
PACKAGE BODY PA_PDB_UTIL AS
PROCEDURE P_PDB_SeekId (inId IN VARCHAR2, ret OUT integer) AS
BEGIN
dbms_output.put_line ('beginn!');
dbms_output.put_line (inPannenId);
select count(*) into ret from test where Id=inId;
dbms_output.put_line (ret);
dbms_output.put_line ('End');
NULL;
END P_PDB_SeekId;
END PA_PDB_UTIL;
Testen mit:
set serveroutput on;
declare ret integer;
begin
PA_PDB_UTIL.P_PDB_SeekPannenId('test', ret);
end;
No comments:
Post a Comment