DECLARE

SUBTYPE MyDate IS DATE; -- Основан на типе DATE

TYPE MyRec IS RECORD (time1 INTEGER, time2 INTEGER);

SUBTYPE MyInterval IS MyRec; -- Основан на типе RECORD

SUBTYPEID_N IS tbl1.f1%TYPE; -- Основан на типе столбца

Типы, используемые при объявлении подтипа как базовые, не могут содержать ограничений длины. Для создания пользовательского типа с ограничением длины предварительно объявляется переменная такого типа и уже на ее основе определяется пользовательский тип.

Пример: