Index: openacs-4/packages/dotlrn/sql/oracle/dotlrn-init.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/oracle/dotlrn-init.sql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/dotlrn/sql/oracle/dotlrn-init.sql	5 Oct 2001 15:14:21 -0000	1.3
+++ openacs-4/packages/dotlrn/sql/oracle/dotlrn-init.sql	8 Oct 2001 21:38:37 -0000	1.4
@@ -71,94 +71,96 @@
 	acs_rel_type.create_role ('teaching_assistant', 'Teaching Assistant', 'Teaching Assistants');
 	acs_rel_type.create_role ('instructor', 'Instructor', 'Instructors');
 	acs_rel_type.create_role ('admin', 'Administrator', 'Administrators');
+	
+	-- a lot of the following stuff is commented out because it has to be done in TCL
 
 	-- create relationships
-	acs_rel_type.create_type (
-	  rel_type => 'admin_rel',
-	  supertype => 'membership_rel',
-	  pretty_name => 'Administration Relation',
-	  pretty_plural => 'Administration Relationships',
-	  package_name => 'dotlrn_admin_rel',
-	  table_name => 'dotlrn_admin_rel',
-	  id_column => 'XXX',
-	  object_type_one => 'dotlrn_community', role_one => NULL,
-	  min_n_rels_one => 0, max_n_rels_one => null,
-	  object_type_two => 'party', role_two => 'admin',
-	  min_n_rels_two => 0, max_n_rels_two => null
-	);
+-- 	acs_rel_type.create_type (
+-- 	  rel_type => 'admin_rel',
+-- 	  supertype => 'membership_rel',
+-- 	  pretty_name => 'Administration Relation',
+-- 	  pretty_plural => 'Administration Relationships',
+-- 	  package_name => 'dotlrn_admin_rel',
+-- 	  table_name => 'dotlrn_admin_rel',
+-- 	  id_column => 'XXX',
+-- 	  object_type_one => 'dotlrn_community', role_one => NULL,
+-- 	  min_n_rels_one => 0, max_n_rels_one => null,
+-- 	  object_type_two => 'party', role_two => 'admin',
+-- 	  min_n_rels_two => 0, max_n_rels_two => null
+-- 	);
 
-	acs_rel_type.create_type (
-	  rel_type => 'instructor_rel',
-	  supertype => 'admin_rel',
-	  pretty_name => 'Instructor Relation',
-	  pretty_plural => 'Instructor Relationships',
-	  package_name => 'dotlrn_instructor_rel',
-	  table_name => 'dotlrn_instructor_rel',
-	  id_column => 'XXX',
-	  object_type_one => 'dotlrn_class', role_one => NULL,
-	  min_n_rels_one => 0, max_n_rels_one => null,
-	  object_type_two => 'party', role_two => 'instructor',
-	  min_n_rels_two => 0, max_n_rels_two => null
-	);
+-- 	acs_rel_type.create_type (
+-- 	  rel_type => 'instructor_rel',
+-- 	  supertype => 'admin_rel',
+-- 	  pretty_name => 'Instructor Relation',
+-- 	  pretty_plural => 'Instructor Relationships',
+-- 	  package_name => 'dotlrn_instructor_rel',
+-- 	  table_name => 'dotlrn_instructor_rel',
+-- 	  id_column => 'XXX',
+-- 	  object_type_one => 'dotlrn_class', role_one => NULL,
+-- 	  min_n_rels_one => 0, max_n_rels_one => null,
+-- 	  object_type_two => 'party', role_two => 'instructor',
+-- 	  min_n_rels_two => 0, max_n_rels_two => null
+-- 	);
 
-	acs_rel_type.create_type (
-	  rel_type => 'ta_rel',
-	  supertype => 'admin_rel',
-	  pretty_name => 'TA Relation',
-	  pretty_plural => 'TA Relationships',
-	  package_name => 'dotlrn_ta_rel',
-	  table_name => 'dotlrn_ta_rel',
-	  id_column => 'XXX',
-	  object_type_one => 'dotlrn_class', role_one => NULL,
-	  min_n_rels_one => 0, max_n_rels_one => null,
-	  object_type_two => 'party', role_two => 'teaching_assistant',
-	  min_n_rels_two => 0, max_n_rels_two => null
-	);
+-- 	acs_rel_type.create_type (
+-- 	  rel_type => 'ta_rel',
+-- 	  supertype => 'admin_rel',
+-- 	  pretty_name => 'TA Relation',
+-- 	  pretty_plural => 'TA Relationships',
+-- 	  package_name => 'dotlrn_ta_rel',
+-- 	  table_name => 'dotlrn_ta_rel',
+-- 	  id_column => 'XXX',
+-- 	  object_type_one => 'dotlrn_class', role_one => NULL,
+-- 	  min_n_rels_one => 0, max_n_rels_one => null,
+-- 	  object_type_two => 'party', role_two => 'teaching_assistant',
+-- 	  min_n_rels_two => 0, max_n_rels_two => null
+-- 	);
 
-	acs_rel_type.create_type (
-	  rel_type => 'student_rel',
-	  supertype => 'membership_rel',
-	  pretty_name => 'Student Relation',
-	  pretty_plural => 'Student Relationships',
-	  package_name => 'dotlrn_student_rel',
-	  table_name => 'dotlrn_student_rel',
-	  id_column => 'XXX',
-	  object_type_one => 'dotlrn_class', role_one => NULL,
-	  min_n_rels_one => 0, max_n_rels_one => null,
-	  object_type_two => 'party', role_two => 'student',
-	  min_n_rels_two => 0, max_n_rels_two => null
-	);
+-- 	acs_rel_type.create_type (
+-- 	  rel_type => 'student_rel',
+-- 	  supertype => 'membership_rel',
+-- 	  pretty_name => 'Student Relation',
+-- 	  pretty_plural => 'Student Relationships',
+-- 	  package_name => 'dotlrn_student_rel',
+-- 	  table_name => 'dotlrn_student_rel',
+-- 	  id_column => 'XXX',
+-- 	  object_type_one => 'dotlrn_class', role_one => NULL,
+-- 	  min_n_rels_one => 0, max_n_rels_one => null,
+-- 	  object_type_two => 'party', role_two => 'student',
+-- 	  min_n_rels_two => 0, max_n_rels_two => null
+-- 	);
 
 	-- add permissible stuff
-	insert into group_type_rels
-	(group_rel_type_id, group_type, rel_type)
-	values
-	(acs_object_id_seq.nextval, 'dotlrn_class', 'admin_rel');
+-- 	insert into group_type_rels
+-- 	(group_rel_type_id, group_type, rel_type)
+-- 	values
+-- 	(acs_object_id_seq.nextval, 'dotlrn_class', 'admin_rel');
 
-	insert into group_type_rels
-	(group_rel_type_id, group_type, rel_type)
-	values
-	(acs_object_id_seq.nextval, 'dotlrn_club', 'admin_rel');
+-- 	insert into group_type_rels
+-- 	(group_rel_type_id, group_type, rel_type)
+-- 	values
+-- 	(acs_object_id_seq.nextval, 'dotlrn_club', 'admin_rel');
 
-	insert into group_type_rels
-	(group_rel_type_id, group_type, rel_type)
-	values
-	(acs_object_id_seq.nextval, 'dotlrn_club', 'membership_rel');
+-- 	insert into group_type_rels
+-- 	(group_rel_type_id, group_type, rel_type)
+-- 	values
+-- 	(acs_object_id_seq.nextval, 'dotlrn_club', 'membership_rel');
 
-	insert into group_type_rels
-	(group_rel_type_id, group_type, rel_type)
-	values
-	(acs_object_id_seq.nextval, 'dotlrn_class', 'student_rel');
+-- 	insert into group_type_rels
+-- 	(group_rel_type_id, group_type, rel_type)
+-- 	values
+-- 	(acs_object_id_seq.nextval, 'dotlrn_class', 'student_rel');
 
-	insert into group_type_rels
-	(group_rel_type_id, group_type, rel_type)
-	values
-	(acs_object_id_seq.nextval, 'dotlrn_class', 'instructor_rel');
+-- 	insert into group_type_rels
+-- 	(group_rel_type_id, group_type, rel_type)
+-- 	values
+-- 	(acs_object_id_seq.nextval, 'dotlrn_class', 'instructor_rel');
 
-	insert into group_type_rels
-	(group_rel_type_id, group_type, rel_type)
-	values
-	(acs_object_id_seq.nextval, 'dotlrn_class', 'ta_rel');
+-- 	insert into group_type_rels
+-- 	(group_rel_type_id, group_type, rel_type)
+-- 	values
+-- 	(acs_object_id_seq.nextval, 'dotlrn_class', 'ta_rel');
 
 	
 end;