Index: openacs-4/packages/new-portal/sql/oracle/api-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/sql/oracle/api-create.sql,v
diff -u -r1.22 -r1.23
--- openacs-4/packages/new-portal/sql/oracle/api-create.sql	26 Nov 2001 17:38:02 -0000	1.22
+++ openacs-4/packages/new-portal/sql/oracle/api-create.sql	26 Nov 2001 18:57:43 -0000	1.23
@@ -53,6 +53,7 @@
 	is
 		v_portal_id portals.portal_id%TYPE;
 		v_theme_id portals.theme_id%TYPE;
+		v_layout_id portal_layouts.layout_id%TYPE;
 	begin
 		v_portal_id := acs_object.new (
 			object_id	=> portal_id,
@@ -65,14 +66,15 @@
 
 
 		select max(theme_id) into v_theme_id from portal_element_themes;
+		select min(layout_id) into v_layout_id from portal_layouts;
 
 		insert into portals (portal_id, 
 				    name, 
 				    layout_id, 
 				    theme_id)
 		       values (v_portal_id,
 			       'Untitled',  
-			       layout_id, 
+			       v_layout_id, 
 			       v_theme_id);
 
 		return v_portal_id;