create or replace type &Name as object ( -- Author : $OSUSER -- Created : $DATE $TIME -- Purpose : &Purpose -- Attributes [#] , -- Member functions and procedures member procedure ( ) ) /