0025164: View Implementation access is not assigned for automatic roles after installing it with a module

# HG changeset patch
# User Shankar Balachandran <shankar.balachandran@openbravo.com>
# Date 1386139810 -19800
# Node ID 83670e8237586ed923d72fad5454d10f98648e57
# Parent  7d09925dd3043d494e8bf300c29352ab3d9e4062
Fixes Issue 25164 : View Implementation access is not assigned by default

View Implementation access is not assigned by default for modules.
Added logic to add view access when updating process access.

diff -r 7d09925dd304 -r 83670e823758 modules/org.openbravo.client.application/src-db/database/model/functions/OBUIAPP_UPDATE_ACCESS.xml
--- a/modules/org.openbravo.client.application/src-db/database/model/functions/OBUIAPP_UPDATE_ACCESS.xml	Tue Dec 03 15:28:23 2013 +0530
+++ b/modules/org.openbravo.client.application/src-db/database/model/functions/OBUIAPP_UPDATE_ACCESS.xml	Wed Dec 04 12:20:10 2013 +0530
@@ -16,7 +16,7 @@
 * under the License.
 * The Original Code is Openbravo ERP.
 * The Initial Developer of the Original Code is Openbravo SLU
-* All portions are Copyright (C) 2012 Openbravo SLU
+* All portions are Copyright (C) 2012-2013 Openbravo SLU
 * All Rights Reserved.
 * Contributor(s):  ______________________________________.
 ************************************************************************/
@@ -46,6 +46,25 @@
                      FROM OBUIAPP_Process_Access
                     WHERE OBUIAPP_Process_ID = P.OBUIAPP_Process_ID
                       AND AD_ROLE_ID = R.AD_ROLE_ID);
+
+    --update view access
+  INSERT INTO OBUIAPP_View_Role_Access
+    (
+      OBUIAPP_View_Role_Access_ID, OBUIAPP_View_Impl_ID, AD_Role_ID, AD_Client_ID,
+      AD_Org_ID, IsActive, Created,
+      CreatedBy, Updated, UpdatedBy
+    )
+  SELECT get_uuid(), V.OBUIAPP_View_Impl_ID, R.AD_ROLE_ID, R.AD_CLIENT_ID,
+    R.AD_ORG_ID, 'Y', now(),
+    '0', now(), '0'
+  FROM OBUIAPP_View_Impl V, AD_Role R
+  WHERE R.isManual = 'N'
+  AND V.isActive = 'Y'
+    AND NOT EXISTS (SELECT 1
+                     FROM OBUIAPP_View_Role_Access
+                    WHERE OBUIAPP_View_Impl_ID = V.OBUIAPP_View_Impl_ID
+                      AND AD_ROLE_ID = R.AD_ROLE_ID
+                      AND (R.ISADVANCED = 'Y' OR V.ISADVANCEDFEATURE = 'N'));
 END OBUIAPP_UPDATE_ACCESS
 ]]></body>
     </function>