-- -- category_tree__new/9 -- create or replace function category_tree__new( p_tree_id integer, p_locale character varying, p_tree_name character varying, p_description character varying, p_site_wide_p boolean, p_creation_date timestamp with time zone, p_creation_user integer, p_creation_ip character varying, p_context_id integer ) returns int4 as $$ DECLARE v_tree_id integer; BEGIN v_tree_id := acs_object__new ( p_tree_id, -- object_id 'category_tree', -- object_type p_creation_date, -- creation_date p_creation_user, -- creation_user p_creation_ip, -- creation_ip p_context_id, -- context_id p_tree_name, -- title null -- package_id ); insert into category_trees (tree_id, site_wide_p) values (v_tree_id, p_site_wide_p); perform acs_permission__grant_permission ( v_tree_id, -- object_id p_creation_user, -- grantee_id 'category_tree_read' -- privilege ); perform acs_permission__grant_permission ( v_tree_id, -- object_id p_creation_user, -- grantee_id 'category_tree_write' -- privilege ); perform acs_permission__grant_permission ( v_tree_id, -- object_id p_creation_user, -- grantee_id 'category_tree_grant_permissions' -- privilege ); insert into category_tree_translations (tree_id, locale, name, description) values (v_tree_id, p_locale, p_tree_name, p_description); return v_tree_id; END; $$ language plpgsql;