142: l_env_org_id number;
143: begin
144: -- get environment org ID
145: select X_ORG_ID
146: into l_env_org_id from dual;
147:
148: -- remove dangling dim hierarchies and tree fragments
149: delete from cn_hierarchy_nodes e where dim_hierarchy_id in
150: (select dim_hierarchy_id
403: FUNCTION Default_Header RETURN NUMBER IS
404: Ret_Val NUMBER(15);
405: BEGIN
406:
407: SELECT cn_head_hierarchies_s.nextval INTO Ret_Val FROM dual;
408:
409: RETURN Ret_Val;
410:
411: END Default_Header;