CREATE TYPE pet_t IS OBJECT ( 
   tag_no   INTEGER 
  ,NAME     VARCHAR2 (60) 
  ,breed    VARCHAR2 (100) 
) 

Nested Table of Object Types

CREATE TYPE zoo_t IS TABLE OF pet_t 

A Walk on the Wild Side

CREATE TABLE wild_side (  
   ID NUMBER PRIMARY KEY  
 , DATA SYS.ANYDATA  
) 

Stuff Just About Anything Into That Table!

DECLARE  
   my_cat    pet_t  
          := pet_t (50, 'Sister', 'Siamese');  
   my_bird   pet_t  
      := pet_t (100  
               ,'Mercury'  
               ,'African Grey Parrot'  
               );  
   my_pets   zoo_t := zoo_t (my_cat, my_bird);  
BEGIN  
   INSERT INTO wild_side  
        VALUES (1  
               ,SYS.ANYDATA.convertnumber  
                                         (5));  
  
   INSERT INTO wild_side  
        VALUES (3  
               ,SYS.ANYDATA.convertvarchar2  
                      ('Pretty crazy stuff!'));  
  
   INSERT INTO wild_side  
        VALUES (5  
               ,SYS.ANYDATA.convertdate  
                                    (SYSDATE));  
  
   INSERT INTO wild_side  
        VALUES (2  
               ,SYS.ANYDATA.convertobject  
                                    (my_bird));  
  
   INSERT INTO wild_side  
        VALUES (7  
               ,SYS.ANYDATA.convertcollection  
                                    (my_pets));  
  
   COMMIT;  
END; 

SELECT ID, ws.DATA.gettypename () thetype 
  FROM wild_side ws