- Added source_invoice_names variable for list of documents

  from which the current document was created

sql/postgresql/upgrade/upgrade-5.0.3.0.2-5.0.3.0.3.sql

@@ -7,7 +7,7 @@ SELECT im_category_hierarchy_new(3740,3708); -- Customer Purchase Order is a cus
 
 
 
--- Setup the "Customer Purchase Order" admin menu for Company Documents
+-- Setup the "Customer Purchase Order" admin menus for Company Documents
 --
 create or replace function inline_0 ()
 returns integer as $body$
@@ -22,8 +22,9 @@ begin
     select group_id into v_senman from groups where group_name = 'Senior Managers';
     select group_id into v_accounting from groups where group_name = 'Accounting';
     select menu_id into v_invoices_new_menu from im_menus where label = 'invoices_customers';
-    select count(*) into v_count from im_menus where label = 'invoices_customers_new_customer_purchase_order';
 
+
+    select count(*) into v_count from im_menus where label = 'invoices_customers_new_customer_purchase_order';
     IF v_count = 0 THEN
 	    v_menu_id := im_menu__new (
 		null, 'im_menu', now(), null, null, null,
@@ -40,6 +41,27 @@ begin
 	    PERFORM acs_permission__grant_permission(v_menu_id, v_accounting, 'read');
     END IF;
 
+
+
+    select count(*) into v_count from im_menus where label = 'invoices_customers_new_invoice_from_customer_purchase_order';
+    IF v_count = 0 THEN
+	    v_menu_id := im_menu__new (
+		null, 'im_menu', now(), null, null, null,
+		'intranet-invoices',			-- package_name
+		'invoices_customers_new_invoice_from_customer_purchase_order',	-- label
+		'New Customer Invoice from Customer Purchase Order',		-- name
+		'/intranet-invoices/new-copy?target_cost_type_id=3700&source_cost_type_id=3740', -- url
+		350,					-- sort_order
+		v_invoices_new_menu,			-- parent_menu_id
+		null					-- visible_tcl
+	    );
+	
+	    PERFORM acs_permission__grant_permission(v_menu_id, v_senman, 'read');
+	    PERFORM acs_permission__grant_permission(v_menu_id, v_accounting, 'read');
+    END IF;
+
+
+
     return 0;
 end; $body$ language 'plpgsql';
 select inline_0 ();