INSERT SELECT с объектом столбца SELECT

Question

У меня есть этот код.

CREATE TABLE USERS(
    USERNAME NVARCHAR2(30), 
    USER_TYPE VARCHAR2(13) 
); 
/

CREATE OR REPLACE TYPE OBJ_USER_TYPE IS OBJECT(
    USER_TYPE VARCHAR2(13), 
    USER_LEVEL NUMBER(38, 0) 
); 
/

CREATE OR REPLACE TYPE OBJ_USER IS OBJECT(
    USERNAME NVARCHAR2(30), 
    USER_TYPE OBJ_USER_TYPE 
); 
/

CREATE OR REPLACE TYPE NST_USERS IS TABLE OF OBJ_USER; 
/

DECLARE 
    objUser OBJ_USER NOT NULL DEFAULT OBJ_USER('MARION', OBJ_USER_TYPE('USER', 3)); 
    tblUSERS NST_USERS NOT NULL DEFAULT NST_USERS(objUser); 
BEGIN 
    INSERT INTO USERS(USERNAME, USER_TYPE) 
    SELECT USERNAME, USER_TYPE.USER_TYPE 
    FROM TABLE(tblUSERS); 
END; 
/

Это вызывает ошибку "неверный идентификатор" так же, как here.
Но когда я использовал:

INSERT INTO USERS(USERNAME, USER_TYPE) 
SELECT USERNAME, TREAT(USER_TYPE AS OBJ_USER_TYPE).USER_TYPE 
FROM TABLE(tblUSERS); 

Он поднял ошибку «слишком много значений».
Что не так с этим кодом?

Answer 1

DECLARE 
    objUser OBJ_USER ; 
    tblUSERS NST_USERS; 
BEGIN 
    objUser := OBJ_USER('MARION', OBJ_USER_TYPE('USER', 3)); 
    tblUSERS := NST_USERS(objUser); 

    INSERT INTO USERS(USERNAME, USER_TYPE) 
    SELECT USERNAME, TREAT(USER_TYPE AS OBJ_USER_TYPE).USER_TYPE 
    FROM 
    TABLE(tblUSERS); 

END; 
/

Fiddle Demo