SELECT DISTINCT all_objects."OWNER",all_objects."OBJECT_NAME",all_objects."SUBOBJECT_NAME",all_objects."OBJECT_ID",all_objects."DATA_OBJECT_ID",all_objects."OBJECT_TYPE",all_objects."CREATED",all_objects."LAST_DDL_TIME",all_objects."TIMESTAMP",all_objects."STATUS",all_objects."TEMPORARY",all_objects."GENERATED",all_objects."SECONDARY",all_objects."NAMESPACE",all_objects."EDITION_NAME",all_objects."SHARING",all_objects."EDITIONABLE",all_objects."ORACLE_MAINTAINED",
decode(idl_char$.part,null,'F',0,'F','T') debuginfo
FROM idl_char$, all_objects
WHERE all_objects.object_id = idl_char$.obj# (+)
AND (idl_char$.part IS NULL OR
(idl_char$.part = 0 -- Diana
AND NOT EXISTS (SELECT *
FROM idl_char$
WHERE all_objects.object_id = idl_char$.obj#
AND idl_char$.part = 1))
OR idl_char$.part = 1 -- PCode
)
SELECT DISTINCT ALL_OBJECTS."OWNER"
, ALL_OBJECTS."OBJECT_NAME"
, ALL_OBJECTS."SUBOBJECT_NAME"
, ALL_OBJECTS."OBJECT_ID"
, ALL_OBJECTS."DATA_OBJECT_ID"
, ALL_OBJECTS."OBJECT_TYPE"
, ALL_OBJECTS."CREATED"
, ALL_OBJECTS."LAST_DDL_TIME"
, ALL_OBJECTS."TIMESTAMP"
, ALL_OBJECTS."STATUS"
, ALL_OBJECTS."TEMPORARY"
, ALL_OBJECTS."GENERATED"
, ALL_OBJECTS."SECONDARY"
, ALL_OBJECTS."NAMESPACE"
, ALL_OBJECTS."EDITION_NAME"
, ALL_OBJECTS."SHARING"
, ALL_OBJECTS."EDITIONABLE"
, ALL_OBJECTS."ORACLE_MAINTAINED"
,
DECODE(IDL_CHAR$.PART
, NULL
, 'F'
, 0
, 'F'
, 'T') DEBUGINFO
FROM IDL_CHAR$
, ALL_OBJECTS
WHERE ALL_OBJECTS.OBJECT_ID = IDL_CHAR$.OBJ# (+)
AND (IDL_CHAR$.PART IS NULL OR
(IDL_CHAR$.PART = 0 -- DIANA
AND NOT EXISTS (SELECT *
FROM IDL_CHAR$
WHERE ALL_OBJECTS.OBJECT_ID = IDL_CHAR$.OBJ#
AND IDL_CHAR$.PART = 1))
OR IDL_CHAR$.PART = 1 -- PCODE
)
|
|
|