create or replace type &Name as object ( -- Author : $OSUSER -- Created : $DATE $TIME -- Purpose : &Purpose -- Attributes , -- Member functions and procedures member procedure ( ) ) / create or replace type body &Name is -- Member procedures and functions member procedure ( ) is begin ; end; end; /