Index: openacs-4/packages/acs-kernel/sql/oracle/acs-relationships-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/oracle/acs-relationships-create.sql,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/acs-kernel/sql/oracle/acs-relationships-create.sql	1 Nov 2018 08:38:00 -0000	1.16
+++ openacs-4/packages/acs-kernel/sql/oracle/acs-relationships-create.sql	3 Sep 2024 15:37:33 -0000	1.17
@@ -52,7 +52,7 @@
 	max_n_rels_two	integer
 			constraint acs_rel_types_max_n_2_ck
 			check (max_n_rels_two >= 0),
-    composable_p boolean default 't' not null,
+    composable_p char(1) default 't' not null,
 	constraint acs_rel_types_n_rels_one_ck
 	check (min_n_rels_one <= max_n_rels_one),
 	constraint acs_rel_types_n_rels_two_ck
@@ -131,7 +131,8 @@
     object_type_two	in acs_rel_types.object_type_two%TYPE,
     role_two		in acs_rel_types.role_two%TYPE default null,
     min_n_rels_two	in acs_rel_types.min_n_rels_two%TYPE,
-    max_n_rels_two	in acs_rel_types.max_n_rels_two%TYPE
+    max_n_rels_two	in acs_rel_types.max_n_rels_two%TYPE,
+    composable_p        in char default 't'
   );
 
   procedure drop_type (
@@ -215,7 +216,8 @@
     object_type_two	in acs_rel_types.object_type_two%TYPE,
     role_two		in acs_rel_types.role_two%TYPE default null,
     min_n_rels_two	in acs_rel_types.min_n_rels_two%TYPE,
-    max_n_rels_two	in acs_rel_types.max_n_rels_two%TYPE
+    max_n_rels_two	in acs_rel_types.max_n_rels_two%TYPE,
+    composable_p        in char default 't'
   )
   is
   begin
@@ -237,13 +239,15 @@
       object_type_one, role_one,
       min_n_rels_one, max_n_rels_one,
       object_type_two, role_two,
-      min_n_rels_two, max_n_rels_two)
+      min_n_rels_two, max_n_rels_two,
+      composable_p)
     values
      (create_type.rel_type,
       create_type.object_type_one, create_type.role_one,
       create_type.min_n_rels_one, create_type.max_n_rels_one,
       create_type.object_type_two, create_type.role_two,
-      create_type.min_n_rels_two, create_type.max_n_rels_two);
+      create_type.min_n_rels_two, create_type.max_n_rels_two,
+      create_type.composable_p);
   end;
 
   procedure drop_type (
