Index: openacs-4/contrib/packages/general-comments/sql/postgresql/general-comments-plsql-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/general-comments/sql/postgresql/Attic/general-comments-plsql-create.sql,v diff -u -N -r1.2 -r1.3 --- openacs-4/contrib/packages/general-comments/sql/postgresql/general-comments-plsql-create.sql 5 May 2003 01:21:05 -0000 1.2 +++ openacs-4/contrib/packages/general-comments/sql/postgresql/general-comments-plsql-create.sql 8 May 2003 11:20:20 -0000 1.3 @@ -11,16 +11,39 @@ p_parent_id alias for $4; p_context_id alias for $5; p_title alias for $6; - p_content alias for $7; - p_creation_user alias for $8; - p_creation_date alias for $9; - p_creation_ip alias for $10; + p_description alias for $7 + p_content alias for $8; + p_creation_user alias for $9; + p_creation_date alias for $10; + p_creation_ip alias for $11; + p_mime_type alias for $12; v_item_id cr_items.item_id%TYPE; begin - v_item_id := content_item__new( + v_item_id := select nextval(acs_object_id_seq); + + PERFORM content_item__new( + ''general_comment_'' || p_parent_id || ''_'' || v_item_id, + p_parent_id, + v_item_id, + NULL, + p_creation_date, + p_creation_user, + p_context_id, + p_creation_ip, + ''content_item'', + ''general_comment'', + p_title, + p_description, + p_mime_type, + p_content, + ''text'' ); + v_revision_id := select latest_revision + from cr_items + where item_id=v_item_id - p_revision_id := content_revision__new( + PERFORM content_revision__new( + ); insert into general_comments