将 Db2 过程转换为 Oracle 过程

Question

我正在尝试将程序从 db2 数据库迁移到 oracle 我有 30 多个程序有什么转换工具可以帮助这个过程吗？

例如，我在db2中有这个程序返回DYNAMIC RESULT SETS如何在oracle中重写等效程序

CREATE PROCEDURE GET_Data (
    IN P_DATA_1 VARCHAR(4),
    IN P_DATA_2 VARCHAR(4) )
  SPECIFIC SQL4234234343442343
  DYNAMIC RESULT SETS 1
  LANGUAGE SQL
  NOT DETERMINISTIC
  EXTERNAL ACTION
  MODIFIES SQL DATA
  CALLED ON NULL INPUT
  INHERIT SPECIAL REGISTERS
  OLD SAVEPOINT LEVEL
P1: BEGIN
    -- Declare cursorf
    DECLARE RESULT_SET1 CURSOR WITH RETURN TO CLIENT FOR 
        SELECT DATA_NAME, DATA_VALUE1,DATA_VALUE2
        FROM Data
        WHERE DATA_VALUE1 = P_DATA_1 AND DATA_VALUE2 = P_DATA_2;


    IF EXISTS (SELECT 1 FROM Data WHERE DATA_VALUE1 = P_DATA_1 AND DATA_VALUE2 = P_DATA_2) 
        THEN                  
           OPEN RESULT_SET1;
        ELSE 
            RETURN;
    END IF;
END P1;

此示例转换：

-- SQLINES LICENSE FOR EVALUATION USE ONLY
CREATE OR REPLACE PROCEDURE GET_Data (
    P_DATA_1 IN VARCHAR2,
    P_DATA_2 IN VARCHAR2 )
  IS 
BEGIN
  OLD
/ SAVEPOINT LEVEL
<<P1>> BEGIN
    -- Declare cursorf


    IF EXISTS (SELECT 1 FROM Data WHERE DATA_VALUE1 = P_DATA_1 AND DATA_VALUE2 = P_DATA_2) 
        THEN                  
           OPEN RESULT_SET1 FOR 
        SELECT DATA_NAME, DATA_VALUE1,DATA_VALUE2
        FROM Data
        WHERE DATA_VALUE1 = P_DATA_1 AND DATA_VALUE2 = P_DATA_2;
        ELSE 
            RETURN;
    END IF;
END P1;

Answer 1

您可能正在寻找 SYS_REFCURSOR。如果您使用的是 Oracle 版本 11g 或更早版本，您可以尝试以下代码 -

CREATE OR REPLACE PROCEDURE GET_Data (
    P_DATA_1 IN VARCHAR2,
    P_DATA_2 IN VARCHAR2,
    RESULT_SET1 OUT SYS_REFCURSOR)
  IS 
BEGIN
    -- Declare cursorf

    OPEN RESULT_SET1 FOR 
         SELECT DATA_NAME, DATA_VALUE1,DATA_VALUE2
           FROM Data
          WHERE DATA_VALUE1 = P_DATA_1
            AND DATA_VALUE2 = P_DATA_2;
END GET_Data;

从 12c 开始，您可以使用 DBMS_SQL.RETURN_RESULT 进行隐式游标返回，如下所示 -

CREATE OR REPLACE PROCEDURE GET_Data (
    P_DATA_1 IN VARCHAR2,
    P_DATA_2 IN VARCHAR2)
  IS 
BEGIN
    -- Declare cursorf

    OPEN RESULT_SET1 FOR 
         SELECT DATA_NAME, DATA_VALUE1,DATA_VALUE2
           FROM Data
          WHERE DATA_VALUE1 = P_DATA_1
            AND DATA_VALUE2 = P_DATA_2;

    DBMS_SQL.RETURN_RESULT(RESULT_SET1);

END GET_Data;

然后你可以执行这个过程得到结果。