oracle8.1.6
begin acs_object_type.drop_type('$group_type'); end;
BEGIN
acs_object_type.create_type (
supertype => :supertype,
object_type => :group_type,
pretty_name => :pretty_name,
pretty_plural => :pretty_plural,
table_name => upper(:table_name),
id_column => :id_column,
package_name => :package_name
);
END;
update acs_object_types set dynamic_p='t' where object_type = :group_type
insert into group_type_rels
(group_rel_type_id, rel_type, group_type)
select acs_object_id_seq.nextval, r.rel_type, :group_type
from group_type_rels r
where r.group_type = :supertype
select case when exists (select 1
from user_objects o
where o.object_type='PACKAGE'
and o.object_name = upper(:package_name))
then 1 else 0 end
from dual
drop package [DoubleApos $group_type]
begin acs_object_type.drop_type(:group_type); end;