Index: openacs-4/contrib/packages/portal/sql/oracle/layout-package-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/portal/sql/oracle/layout-package-create.sql,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/portal/sql/oracle/layout-package-create.sql	25 Oct 2002 21:29:17 -0000	1.1
+++ openacs-4/contrib/packages/portal/sql/oracle/layout-package-create.sql	25 Sep 2003 02:12:15 -0000	1.2
@@ -39,6 +39,11 @@
         p_context_id                in acs_objects.context_id%TYPE default null
     ) return portal_layouts.layout_id%TYPE;
 
+    procedure add_region (
+        p_layout_id                 in portal_layout_regions.layout_id%TYPE,
+        p_region                    in portal_layout_regions.region%TYPE
+    );
+
     procedure delete (
         p_layout_id                 in portal_layouts.layout_id%TYPE
     );
@@ -84,6 +89,19 @@
 
     end new;
 
+    procedure add_region (
+        p_layout_id                 in portal_layout_regions.layout_id%TYPE,
+        p_region                    in portal_layout_regions.region%TYPE
+    )
+    is
+    begin
+        insert into portal_layout_regions
+        (layout_id, region)
+        values
+        (p_layout_id, p_region);
+    end add_region;
+
+
     procedure delete (
         p_layout_id                 in portal_layouts.layout_id%TYPE
     )
