CREATE OR REPLACE VIEW obj_views AS
WITH x AS (
    SELECT /*+ MATERIALIZE */
        app.get_app_id()            AS app_id,
        app.get_item('$VIEW_NAME')  AS view_name
    FROM DUAL
),
r AS (
    SELECT
        d.name                  AS view_name,
        --
        LISTAGG(CASE WHEN d.referenced_type = 'TABLE'
            THEN '<a href="' || app.get_page_link(951, in_names => 'P951_TABLE_NAME', in_values => d.referenced_name) || '">' || d.referenced_name || '</a>' END, ', ')
            WITHIN GROUP (ORDER BY d.referenced_name)
            AS referenced_tables,
        --
        LISTAGG(CASE WHEN d.referenced_type = 'VIEW'
            THEN '<a href="' || app.get_page_link(955, in_names => 'P955_VIEW_NAME', in_values => d.referenced_name) || '">' || d.referenced_name || '</a>' END, ', ')
            WITHIN GROUP (ORDER BY d.referenced_name)
            AS referenced_views
    FROM user_dependencies d
    CROSS JOIN x
    WHERE d.type                = 'VIEW'
        AND d.name              = NVL(x.view_name, d.name)
    GROUP BY d.name
),
u AS (
    SELECT
        d.referenced_name                                       AS view_name,
        LISTAGG(d.name, ', ') WITHIN GROUP (ORDER BY d.name)    AS used_in_objects
    FROM user_dependencies d
    WHERE d.referenced_type     = 'VIEW'
    GROUP BY d.referenced_name
),
p AS (
    SELECT
        r.table_name,
        LISTAGG(DISTINCT '<a href="' ||
            app.get_page_link(910,
                in_names    => 'P910_PAGE_ID',
                in_values   => r.page_id
            ) || '">' || r.page_id || '</a>', ', ')
            WITHIN GROUP (ORDER BY r.page_id) AS used_on_pages
    FROM apex_application_page_regions r
    JOIN x
        ON x.app_id             = r.application_id
    WHERE r.query_type_code     = 'TABLE'
    GROUP BY r.table_name
),
s AS (
    SELECT
        s.name              AS view_name,
        COUNT(s.line)       AS count_lines
    FROM user_source_views s
    GROUP BY s.name
)
SELECT
    CASE
        WHEN c.comments LIKE '[%]%'
            THEN REGEXP_SUBSTR(c.comments, '^\[([^]]+)\]', 1, 1, NULL, 1)
        ELSE REGEXP_SUBSTR(REGEXP_REPLACE(v.view_name, '^P\d+$', 'PAGE#'), '^[^_]+')
        END AS view_group,
    --
    v.view_name,
    s.count_lines,
    --
    u.used_in_objects,
    p.used_on_pages,
    r.referenced_tables,
    r.referenced_views,
    --
    NULLIF(v.read_only, 'N') AS is_readonly,
    --
    CASE WHEN v.bequeath = 'DEFINER' THEN 'Y' END AS is_definer,
    --
    LTRIM(RTRIM(REGEXP_REPLACE(c.comments, '^\[[^]]+\]\s*', ''))) AS comments,
    --
    o.last_ddl_time
FROM user_views v
JOIN user_objects o
    ON o.object_name            = v.view_name
    AND o.object_type           = 'VIEW'
CROSS JOIN x
LEFT JOIN r
    ON r.view_name              = v.view_name
LEFT JOIN u
    ON u.view_name              = v.view_name
LEFT JOIN p
    ON p.table_name             = v.view_name
LEFT JOIN s
    ON s.view_name              = v.view_name
LEFT JOIN user_tab_comments c
    ON c.table_name             = v.view_name
WHERE v.view_name               = NVL(x.view_name, v.view_name);