Exemples de copie des fonctions PL/SQL

Ces exemples présentent la DDL générée lorsque vous copiez des fonctions PL/SQL entre des bases de données hétérogènes.

La DDL générée est présentée sur la page Aperçu du fichier DDL dans l'assistant Coller des objets de base de données.

Le tableau 1 présente des exemples de la DDL générée pour la copie des fonctions PL/SQL d'une base de données source Oracle 11g vers une base de données cible DB2 Version 9.7 for Linux, UNIX, and Windows.

Tableau 1. Exemples de copie des fonctions PL/SQL d'une base de données Oracle 11g vers une base de données DB2 Version 9.7 for Linux, UNIX, and Windows
Définition de la fonction PL/SQL de la base de données Oracle 11g DDL générée pour la base de données DB2 Version 9.7
CREATE OR REPLACE FUNCTION func_authid2
RETURN NUMBER
AUTHID DEFINED
AS
   x   NUMBER(9,2);
BEGIN
   x := 65400;
   RETURN x;
END;
/
CREATE FUNCTION func_authid2
RETURN NUMBER
AUTHID DEFINED
AS
   x   NUMBER(9,2);
BEGIN
   x := 65400;
   RETURN x;
END func_authid2;
CREATE OR REPLACE FUNCTION func_cursr
  ( p_job VARCHAR2 )
RETURN SYS_REFCURSOR
IS
   emp_refcur   SYS_REFCURSOR;
BEGIN
   OPEN emp_refcur FOR
   SELECT empno, ename
   FROM emp
   WHERE job = p_job;
   RETURN emp_refcur;
END;
/
CREATE FUNCTION func_cursr (
   p_job VARCHAR2 )
RETURN SYS_REFCURSOR
IS
   emp_refcur   SYS_REFCURSOR;
BEGIN
   OPEN emp_refcur FOR
   SELECT empno, ename
   FROM emp
   WHERE job = p_job;
   RETURN emp_refcur;
END func_cursr;
CREATE OR REPLACE FUNCTION func_cursr2
  ( p_job VARCHAR2,
    c SYS_REFCURSOR )
RETURN SYS_REFCURSOR
IS
   emp_refcur   SYS_REFCURSOR;
BEGIN
   OPEN emp_refcur
   FOR SELECT empno, ename
   FROM emp
   WHERE job = p_job;
   RETURN emp_refcur;
END;
/
CREATE FUNCTION func_cursr2 (
    p_job VARCHAR2,
    c SYS_REFCURSOR )
RETURN SYS_REFCURSOR
IS
   emp_refcur   SYS_REFCURSOR;
BEGIN
   OPEN emp_refcur
   FOR SELECT empno, ename
   FROM emp
   WHERE job = p_job;
   RETURN emp_refcur;
END func_cursr2;
CREATE OR REPLACE FUNCTION func_inout
  ( p_job IN VARCHAR2,
    p_job2 OUT VARCHAR2,
    p_job3 IN OUT VARCHAR2 )
RETURN SYS_REFCURSOR
IS
   emp_refcur   SYS_REFCURSOR;
BEGIN
   OPEN emp_refcur
   FOR SELECT empno, ename
   FROM emp
   WHERE job = p_job;
   RETURN emp_refcur;
END;
/
CREATE FUNCTION func_inout (
   p_job IN VARCHAR2,
   p_job2 OUT VARCHAR2,
   p_job3 IN OUT VARCHAR2 )
RETURN SYS_REFCURSOR
IS
   emp_refcur   SYS_REFCURSOR;
BEGIN
   OPEN emp_refcur
   FOR SELECT empno, ename
   FROM emp
   WHERE job = p_job;
   RETURN emp_refcur;
END func_inout;
CREATE OR REPLACE FUNCTION func_inout2
  ( p_job IN VARCHAR2,
    p_job2 OUT NOCOPY VARCHAR2,
    p_job3 IN OUT VARCHAR2 )
RETURN SYS_REFCURSOR
IS
   emp_refcur   SYS_REFCURSOR;
BEGIN
   OPEN emp_refcur
   FOR SELECT empno, ename
   FROM emp
   WHERE job = p_job;
   RETURN emp_refcur;
END;
/
CREATE FUNCTION func_inout2 (
   p_job IN VARCHAR2,
   p_job2 OUT NOCOPY VARCHAR2,
   p_job3 IN OUT VARCHAR2 )
RETURN SYS_REFCURSOR
IS
   emp_refcur   SYS_REFCURSOR;
BEGIN
   OPEN emp_refcur
   FOR SELECT empno, ename
   FROM emp
   WHERE job = p_job;
   RETURN emp_refcur;
END func_inout2;
CREATE FUNCTION sal_ok2
  ( salary  NUMBER,
    title   VARCHAR2 )
RETURN BOOLEAN
IS
   min_sal NUMBER;
   max_sal NUMBER;
   -- AUTHID CURRENT_USER
   -- PARALLEL_ENABLE
BEGIN
   SELECT losal, hisal
   INTO min_sal, max_sal
   FROM sals
   WHERE job = title;
   RETURN (salary >= min_sal)
      AND (salary <= max_sal);
END;
/
CREATE FUNCTION sal_ok2 )
   salary  NUMBER,
   title   VARCHAR2 )
RETURN BOOLEAN
IS
   min_sal NUMBER;
   max_sal NUMBER;
   -- AUTHID CURRENT_USER
   -- PARALLEL_ENABLE
BEGIN
   SELECT losal, hisal
   INTO min_sal, max_sal
   FROM sals
   WHERE job = title;
   RETURN (salary >= min_sal)
      AND (salary <= max_sal);
END sal_ok2;

Le tableau 2 présente un exemple de la DDL générée pour la copie d'une fonction PL/SQL d'une base de données source DB2 Version 9.7 for Linux, UNIX, and Windows vers une base de données cible Oracle 11g.

Tableau 2. Exemple de copie de la fonction PL/SQL de la base de données DB2 Version 9.7 for Linux, UNIX, and Windows vers la base de données Oracle 11g
Définition de la fonction PL/SQL de la base de données DB2 Version 9.7 DDL générée pour la base de données Oracle 11g
CREATE FUNCTION F047(
     pID     INTEGER,
     pFName  CHAR,
     pLNAME  VARCHAR
-- , pmyLONGVARCHAR LONG VARCHAR
)
RETURN CHAR
AS
BEGIN
   RETURN pFName;
END F047;
CREATE FUNCTION F047
    (pID  INTEGER,
     pFName CHAR,
     pLNAME VARCHAR
--, pmyLONGVARCHAR LONG VARCHAR
)
RETURN CHAR
AS
BEGIN
   RETURN pFName;
END F047;

Commentaires