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.8 -r1.9
--- openacs-4/packages/new-portal/sql/oracle/api-create.sql	3 Oct 2001 18:05:42 -0000	1.8
+++ openacs-4/packages/new-portal/sql/oracle/api-create.sql	3 Oct 2001 18:24:24 -0000	1.9
@@ -290,7 +290,7 @@
 		config_required_p	in portal_datasource_def_params.config_required_p%TYPE default null,
 		configured_p		in portal_datasource_def_params.configured_p%TYPE default null,
 		key			in portal_datasource_def_params.key%TYPE,
-		value			in portal_datasource_def_params.value%TYPE default null,
+		value			in portal_datasource_def_params.value%TYPE default null
 	);
 
 
@@ -364,23 +364,21 @@
 		config_required_p	in portal_datasource_def_params.config_required_p%TYPE default null,
 		configured_p		in portal_datasource_def_params.configured_p%TYPE default null,
 		key			in portal_datasource_def_params.key%TYPE,
-		value			in portal_datasource_def_params.value%TYPE default null,
+		value			in portal_datasource_def_params.value%TYPE default null
 	)
 	is
 		v_parameter_id  portal_datasource_def_params.parameter_id%TYPE;
 	begin
-		v_parameter_id := select acs_object_id_seq.nextval from dual;
+
+		select acs_object_id_seq.nextval into v_parameter_id from dual;
 		    
 		insert into portal_datasource_def_params
 			(parameter_id, datasource_id, config_required_p, configured_p, key, value)
 		values
-			(v_parameter_id, datasource_id, config_required_p, configured_p, key, value)
-		return v_datasource_id;		    
+			(v_parameter_id, datasource_id, config_required_p, configured_p, key, value);
 
+	end set_def_param;
 
-
 end portal_datasource;
 /
 show errors
-
--- AKS XXX Do we need an API for datasource def params?
