jOOQ's code generator nội bộ sử dụng các truy vấn sau đây để chắc chắn tất cả mức gói PL/SQL RECORD loại:
SELECT
"x"."TYPE_OWNER",
"x"."TYPE_NAME",
"x"."TYPE_SUBNAME","a".subprogram_id,
"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, 99999999) 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 ('TEST') -- Possibly replace schema here
) "a"
WHERE ("a"."TYPE_OWNER" IN ('TEST') -- Possibly replace schema here
AND "a"."OWNER" IN ('TEST') -- 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
Trong trường hợp của bạn, kết quả sẽ là một cái gì đó như:
TYPE_NAME TYPE_SUBNAME ATTR_NAME ATTR_TYPE_NAME LENGTH
----------------------------------------------------------------------
TEST_PACKAGE PERSON_RECORD_TYPE FIRST_NAME VARCHAR2 1000
TEST_PACKAGE PERSON_RECORD_TYPE LAST_NAME VARCHAR2 1000
hạn chế hiện tại:
- Truy vấn sẽ chỉ tìm thấy những loại đang được tái bị lên men bởi ít nhất một loại và/hoặc thủ tục khác ở đâu đó. Đây là giới hạn được kế thừa từ chế độ xem từ điển
ALL_ARGUMENTS trong truy vấn.
%ROWTYPE loại không được trả về chính xác vì loại hàng không được tham chiếu từ các cột TYPE_NAME/TYPE_SUBNAME.
biết thêm thông tin ở đây: https://blog.jooq.org/2016/11/08/use-jooq-to-read-write-oracle-plsql-record-types
được các lĩnh vực từ bên trong cùng một gói? – tbone
@tbone: Không nhất thiết. Tôi muốn lấy các trường từ một gói khác. –
"lấy chúng" nghĩa là sử dụng chúng như thế nào? Bạn có thể đưa ra một số mã giả của những gì bạn đang cố gắng thực hiện trong gói khác này không? – tbone