- Reorganized menus

sql/postgresql/upgrade/upgrade-5.0.4.0.3-5.0.4.0.4.sql

+SELECT acs_log__debug('/packages/intranet-core/sql/postgresql/upgrade/upgrade-5.0.4.0.3-5.0.4.0.4.sql','');
+
+
+update im_menus
+set parent_menu_id = (select menu_id from im_menus where label = 'portfolio')
+where label in (
+	'project_portfolio_list',
+	'risk_vs_roi',
+	'strategic_vs_roi',
+	'projects_resources_assignation_percentage',
+	'portfolio_planner',
+	'capacity-planning',
+	'portfolio_dashboard',
+	'resource_management_home',
+	'projects_admin_gantt_resources',
+	'resource_management',
+	'portfolio_planner2'
+);
+
+
+
+update im_menus set url = '/intranet/projects/dashboard' where label = 'portfolio';

www/projects/dashboard.adp

 <master src="/packages/intranet-core/www/master">
 <property name="doc(title)">@page_title@</property>
-<property name="main_navbar_label">projects</property>
+<property name="main_navbar_label">portfolio</property>
 <property name="left_navbar">@left_navbar_html;literal@</property>
 <property name="sub_navbar">@dashboard_navbar_html;literal@</property>
 

www/projects/index.adp

 <master src="../master">
 <property name="doc(title)">@page_title;literal@</property>
 <property name="context">#intranet-core.context#</property>
-<property name="main_navbar_label">projects</property>
+<property name="main_navbar_label">@main_navbar_label@</property>
 <property name="sub_navbar">@project_navbar_html;literal@</property>
 <property name="left_navbar">@left_navbar_html;literal@</property>
 <property name="show_context_help">@show_context_help_p;literal@</property>

www/projects/index.tcl

@@ -183,6 +183,7 @@ if { "" != $end_date } {
     }
 }
 
+
 # ---------------------------------------------------------------
 # 3. Defined Table Fields
 # ---------------------------------------------------------------
@@ -1021,3 +1022,11 @@ append left_navbar_html "
 	$action_html
 	$admin_html
 "
+
+
+# Show "Portfolio" menu highlighted when showing the list of portfolios...
+set main_navbar_label "projects"
+if {"project_portfolio_list" eq $view_name} {
+    set main_navbar_label "portfolio"
+}
+