使用JDBC以用戶定義的記錄作為其IN參數調用PL / SQL過程

Question

我試圖調用下面的PL / SQL過程，該過程將用戶定義的記錄類型作為IN參數。

   -- User Defined Record
   TYPE EMP_REC IS RECORD
   (
    id employees.employee_id%type,
    name employees.last_name%type,
    dept_name departments.department_name%type,
    job_title jobs.job_title%type,
    salary employees.salary%type,
    manager_id employees.employee_id%type,
    city locations.city%type,
    phone employees.phone_number%type
   );

這是用戶定義記錄的定義：

  -- PURPOSE: Prints all employee information from the employee record 
  -- Example Of: PROCEDURE that takes in a parameter of RECORD type 
  PROCEDURE print_employee_all_details(empl1 emp_rec , emp_rec_string OUT VARCHAR2)

我正在查看Oracle JDBC文檔 ，該文檔表明JDBC不支持RECORDS之類的復合類型：

搜索互聯網將我帶到此鏈接

這是我為了將用戶定義的記錄傳遞給PL / SQL過程而嘗試的代碼：

     public String printEmployeeAllDetails()
     {
         Connection conn = null;
         CallableStatement callStmt = null;
         String empDetails = null;

         try 
         {
            // Register the Jdbc Driver
            // Class.forName(JDBC_DRIVER_ORACLE);

            // Create a Database Connection
            conn = DriverManager.getConnection(DB_URL,DB_USER,DB_PWD);

            // Create a query string
            String callProc = "{call HR.EMP_PKG.print_employee_all_details( ? , ?) }";

            // Create a Callable Statement
            callStmt = conn.prepareCall(callProc);


            // Create descriptor for the Oracle Record type "EMP_REC" required
            StructDescriptor recDescriptor = StructDescriptor.createDescriptor("EMP_REC", conn);

            // Stage values for each field in the Oracle record in an array
            Object[] javaEmpRec = new Object[8];


            // Populate those values in the Array
            javaEmpRec[0] = 100;
            javaEmpRec[1] = "Joe Matthew";
            javaEmpRec[2] = "IT";
            javaEmpRec[3] = "Senior Consultant";
            javaEmpRec[4] = 20000;
            javaEmpRec[5] = 101;
            javaEmpRec[6] = "lombard";
            javaEmpRec[7] = "222333444";

            // Cast the java array into the oracle record type
            STRUCT oracleEmpRec = new STRUCT(recDescriptor , conn , javaEmpRec);


            // Bind Values to the IN parameter
            callStmt.setObject(1, oracleEmpRec);

            // Register OUT parameter
            callStmt.registerOutParameter(2, java.sql.Types.VARCHAR);

            // Execute the Callable Statement
            callStmt.execute();

            // Retrieve the value from the OUT parameter
            empDetails = callStmt.getString(2);
            System.out.println("Emp Details: " + empDetails);

         } 
         catch (SQLException se) 
         {
            System.out.println("Exception occured in the database");
            System.out.println("Exception message: "+ se.getMessage());
            System.out.println("Database error code: "+ se.getErrorCode());
            se.printStackTrace();
         }
         finally
         {
            // Clean up
            if(callStmt != null)
            {
                try
                {
                    callStmt.close();
                } 
                catch (SQLException se2) 
                {
                    se2.printStackTrace();
                }
            }

            if(conn != null)
            {
                try
                {
                    conn.close();
                } 
                catch (SQLException se2) 
                {
                    se2.printStackTrace();
                }
            }
         }

         return empDetails;
     }

運行此代碼時，出現以下異常：

Exception occured in the database
Exception message: invalid name pattern: HR.EMP_REC
java.sql.SQLException: invalid name pattern: HR.EMP_REC
    at oracle.jdbc.oracore.OracleTypeADT.initMetadata(OracleTypeADT.java:554)
    at oracle.jdbc.oracore.OracleTypeADT.init(OracleTypeADT.java:471)
    at oracle.sql.StructDescriptor.initPickler(StructDescriptor.java:324)
    at oracle.sql.StructDescriptor.<init>(StructDescriptor.java:254)
    at oracle.sql.StructDescriptor.createDescriptor(StructDescriptor.java:135)
    at oracle.sql.StructDescriptor.createDescriptor(StructDescriptor.java:103)
Database error code: 17074
    at oracle.sql.StructDescriptor.createDescriptor(StructDescriptor.java:72)
    at com.rolta.HrManager.printEmployeeAllDetails(HrManager.java:1214)
    at com.rolta.HrManager.main(HrManager.java:1334)

我現在用的是ojdbc6.jar的第一個罐子標題下的JDBC Thin for All Platforms的Oracle Database 11g Release 2 (11.2.0.4) JDBC Drivers 此頁面上 。

我想知道是否允許將用戶定義的記錄（作為IN參數）傳遞給PL / SQL過程？ 有沒有人嘗試做以上？

Answer 1

是的，允許使用JDBC將用戶定義的數據類型作為IN參數傳遞。 但這不能是RECORD 。 它必須是架構級別的對象，例如

CREATE TYPE EMP_REC AS OBJECT
(
 id employees.employee_id%type,
 name employees.last_name%type,
 dept_name departments.department_name%type,
 job_title jobs.job_title%type,
 salary employees.salary%type,
 manager_id employees.employee_id%type,
 city locations.city%type,
 phone employees.phone_number%type
);

在您的PL / SQL中，您可以將對記錄的引用更改為新的對象類型，或者，如果您無法更改其余代碼，則可以編寫一個快速的小型翻譯器函數以將對象類型轉換為記錄類型。

Answer 2

如果您可以執行匿名PL / SQL塊（據我所知，這是可能的），則可以執行以下操作：

declare
  rec EMP_REC;
begin
  rec.id := :ID;
  rec.name:= :NAME;
  -- and so on, rest of fields of record...
  ...
  my_procedure(rec);
end;
/

在這種情況下，您不需要創建新的數據庫對象或更改現有的對象。 您只需要傳遞參數值即可填充記錄。

Answer 3

無法傳遞記錄。 因為它必須是要引用的SQL對象，而不是純PL/SQL對象。

創建一個對象就像

   -- User Defined Record
   CREATE TYPE EMP_REC AS OBJECT
   (
    id  NUMBER,
    name VARCHAR2(100),
    dept_name ...,
    job_title ..,
    salary ..,
    manager_id ..,
    city ..,
    phone ...
   );

然而，這又是一次痛苦。 您不能在此處使用TYPE屬性。 因為TYPE不能那樣依賴。 而是指定確切的數據類型。

Answer 4

我想補充Dmitry的答案 ，它建議您可以通過JDBC使用匿名PL / SQL塊，並手動和顯式地RECORD類型。 如果您正在尋找單個存儲過程的解決方案，則可以手動編寫該塊。 但是，如果您正在尋找為所有具有IN ， OUT或IN OUT RECORD參數的過程生成代碼的通用解決方案 ，則可能應該編寫一個代碼生成器，該代碼生成器根據以下查詢生成存根

SELECT
  x.TYPE_OWNER, x.TYPE_NAME, x.TYPE_SUBNAME, a.ARGUMENT_NAME ATTR_NAME,
  a.SEQUENCE ATTR_NO, a.TYPE_OWNER ATTR_TYPE_OWNER,
  nvl2(a.TYPE_SUBNAME, a.TYPE_NAME, NULL) package_name,
  COALESCE(a.TYPE_SUBNAME, a.TYPE_NAME, a.DATA_TYPE) ATTR_TYPE_NAME,
  a.DATA_LENGTH LENGTH, a.DATA_PRECISION PRECISION, a.DATA_SCALE SCALE
FROM SYS.ALL_ARGUMENTS a
JOIN (
  SELECT
    a.TYPE_OWNER, a.TYPE_NAME, a.TYPE_SUBNAME,
    MIN(a.OWNER) KEEP (DENSE_RANK FIRST ORDER BY a.OWNER ASC, a.PACKAGE_NAME ASC, a.SUBPROGRAM_ID ASC, a.SEQUENCE ASC) OWNER,
    MIN(a.PACKAGE_NAME) KEEP (DENSE_RANK FIRST ORDER BY a.OWNER ASC, a.PACKAGE_NAME ASC, a.SUBPROGRAM_ID ASC, a.SEQUENCE ASC) PACKAGE_NAME,
    MIN(a.SUBPROGRAM_ID) KEEP (DENSE_RANK FIRST ORDER BY a.OWNER ASC, a.PACKAGE_NAME ASC, a.SUBPROGRAM_ID ASC, a.SEQUENCE ASC) SUBPROGRAM_ID,
    MIN(a.SEQUENCE) KEEP (DENSE_RANK FIRST ORDER BY a.OWNER ASC, a.PACKAGE_NAME ASC, a.SUBPROGRAM_ID ASC, a.SEQUENCE ASC) SEQUENCE,
    MIN(next_sibling) KEEP (DENSE_RANK FIRST ORDER BY a.OWNER ASC, a.PACKAGE_NAME ASC, a.SUBPROGRAM_ID ASC, a.SEQUENCE ASC) next_sibling,
    MIN(a.DATA_LEVEL) KEEP (DENSE_RANK FIRST ORDER BY a.OWNER ASC, a.PACKAGE_NAME ASC, a.SUBPROGRAM_ID ASC, a.SEQUENCE ASC) DATA_LEVEL
  FROM (
    SELECT
      lead(a.SEQUENCE, 1, a.SEQUENCE) OVER (
        PARTITION BY a.OWNER, a.PACKAGE_NAME, a.SUBPROGRAM_ID, a.DATA_LEVEL
        ORDER BY a.SEQUENCE ASC
      ) next_sibling,
      a.TYPE_OWNER, a.TYPE_NAME, a.TYPE_SUBNAME, a.OWNER, a.PACKAGE_NAME, 
      a.SUBPROGRAM_ID, a.SEQUENCE, a.DATA_LEVEL, a.DATA_TYPE
    FROM SYS.ALL_ARGUMENTS a
    WHERE a.OWNER IN ('MY_SCHEMA')     -- Possibly replace schema here
    ) a
  WHERE (a.TYPE_OWNER IN ('MY_SCHEMA') -- Possibly replace schema here
  AND a.OWNER         IN ('MY_SCHEMA') -- Possibly replace schema here
  AND a.DATA_TYPE      = 'PL/SQL RECORD')
  GROUP BY a.TYPE_OWNER, a.TYPE_NAME, a.TYPE_SUBNAME
  ) x
ON ((a.OWNER, a.PACKAGE_NAME, a.SUBPROGRAM_ID) = ((x.OWNER, x.PACKAGE_NAME, x.SUBPROGRAM_ID))
AND a.SEQUENCE BETWEEN x.SEQUENCE AND next_sibling
AND a.DATA_LEVEL = (x.DATA_LEVEL + 1))
ORDER BY x.TYPE_OWNER ASC, x.TYPE_NAME ASC, x.TYPE_SUBNAME ASC, a.SEQUENCE ASC

這將為您提供MY_SCHEMA模式中包含的所有包中所有RECORD類型的正式定義，您可以從中生成類似於Dmitry答案中的代碼的存根：

declare
  rec EMP_REC;
begin
  rec.id := :ID;
  rec.name:= :NAME;
  -- and so on, rest of fields of record...
  ...
  my_procedure(rec);
end;
/

在此博客文章（從中進行查詢）中了解有關此技術的更多詳細信息 。