Showing posts with label security roles. Show all posts
Showing posts with label security roles. Show all posts

Friday, 22 January 2016

Modules as per company using X++ codes and security roles in Ax 2012 R2

Process of Hiding Modules as per company using X++ codes and security roles in Ax 2012 R2

Hello everybody,
In this post I am going to show how to hide modules for specific companies. In a peculiar requirement, I had to create some customized modules having some customized menuitems. For a particular company, let us take “ABCD”, these modules should be visible and standard modules of AX should be hidden. Also, for the other companies, the customized modules should be hidden.
To achieve this, first of all we have to figure out what are the classes and form methods which triggers on company change. In ax we have three areas which invokes a change or initiation of a company namely:
  1. Info(Class)->startupPost(): This method is triggered when you open AX. This method invokes the default company set when opening AX.
  2. Application(Class)->setDefaultCompany(): This class method is triggered when you change the company using the address bar drop down.
  3. SysDataAreaSelect(form)->SwitchCompany(): This method is triggered when you change the company using the form in the status bar.(on the lower right corner of AX window).
Therefore, we have to call our code when these methods are invoked.
Let us follow the steps:
  1. First we will create a class with name HideModulesAsPerCompany.
  2. create a method. Name it as “HideStandardModuleForRole”

         public static void HideStandardModuleForRole()
{
                      container cont_navButtons, cont_navButtonsHide;
                      container cont_UserRoles;
                      TreeNode menunode;
TreeNode mainmenunode;
TreeNodeIterator menuitemiter;
str aotName;
int i = 1;
int j = 1;
int loc;
boolean isAdmin = false;
SecurityRole securityRole;
SecurityUserRole securityUserRole;
#AOT
#define.Zero(‘0’)
#define.MainMenuLocation(‘\\Menus\\MainMenu’)
//Fetch all roles for currently logged in User and insert in variable cont_UserRoles.
while select securityUserRole
join securityRole
where securityUserRole.User == curUserId()
&& securityRole.RecId == securityUserRole.SecurityRole
{
cont_UserRoles += securityRole.AotName;
if (securityRole.AotName == ‘-SysAdmin-‘)
{
isAdmin = true;
}
}
if(isAdmin && curext() == ‘ABCD’) //ABCD is the company for which standard modules will be hidden
{
mainmenunode = TreeNode::findNode(#MainMenuLocation);
menuitemiter = mainmenunode.AOTiterator();
menunode = menuitemiter.next();
while(menunode != null)
{
aotName = menunode.AOTname();
if(aotName == ‘SystemAdministration’ || aotName == ‘AccountsPayable’
|| aotName == ‘AccountsReceivable’ || aotName == ‘Budgeting’
|| aotName == ‘CashAndBankManagement’ || aotName == ‘ComplianceAndInternalControls’
|| aotName == ‘FixedAssets’ || aotName == ‘InventoryManagement’ || //and so on)
{
// Prefix 1 to show module
cont_navButtons = conIns(cont_navButtons, j, ‘0’ + aotName);
}
else
{
// Prefix 0 to hide module
cont_navButtonsHide = conIns(cont_navButtonsHide, j, ‘1’ + aotName);
}
j++;
menunode = menuitemiter.next();
}
// Hide Modules with 0 as prefix
infolog.navPane().setCurrMenuButtons(cont_navButtons);
}
if(isAdmin && curext() != ‘ABCD’)//if the selected company is not ABCD, the customized modules will be                                                                                   //hidden
{
mainmenunode = TreeNode::findNode(#MainMenuLocation);
menuitemiter = mainmenunode.AOTiterator();
menunode = menuitemiter.next();
while(menunode != null)
{
aotName = menunode.AOTname();
if(aotName == ‘ABCDAssets’
|| aotName == ‘ABCDBillingAndCollections’ || aotName == ‘ABCDConnections’
|| aotName == ‘ABCDCRM’ || aotName == ‘ABCDFinanceManagement’
|| aotName == ‘ABCDHumanResources’ || aotName == ‘ABCDInventoryManagement’
|| aotName == ‘ABCDMeterManagement’ || aotName == ‘ABCDPayroll’
|| aotName == ‘ABCDProjectmanagementandAccounting’)
{
// Prefix 1 to show module
cont_navButtons = conIns(cont_navButtons, j, ‘0’ + aotName);
}
else
{
// Prefix 0 to hide module
cont_navButtonsHide = conIns(cont_navButtonsHide, j, ‘1’ + aotName);
}
j++;
menunode = menuitemiter.next();
}
// Hide Modules with 0 as prefix
infolog.navPane().setCurrMenuButtons(cont_navButtons);
}
}

Now this method has to be called wherever a company change is triggered:
In Info(Class)->startupPost():

UserInfo UserInfo;
#AviFiles
SysOperationProgress progress = new SysOperationProgress();
int i;
;
//HideModulesAsPerRole::HideModulesForRole();
HideModulesAsPerRole::HideStandardModuleForRole();

In Application(Class)->setDefaultCompany(): add just before “return” of the method

//added by Mrigs on 02/04/2015
//start–>
if (infolog.navPane())
{
InfoLog.navPane().loadStartupButtons();
Infolog.navPane().refreshFavorites(infolog.navPane().selectedFavoriteGroup(),xInfo::currentWorkspaceNum());
HideModulesAsPerRole::HideStandardModuleForRole();
}
//end–>

In SysDataAreaSelect(form)->SwitchCompany():
if (NewWorkspace)
{
InfoLog.createWorkspaceWindow();
}
else
{
if (infolog.navPane())
{
InfoLog.navPane().loadStartupButtons();
Infolog.navPane().refreshFavorites(infolog.navPane().selectedFavoriteGroup(),xInfo::currentWorkspaceNum());
//added by Mrigs on 02/04/2015
//start–>
HideModulesAsPerRole::HideStandardModuleForRole();
//end–>
}
else
{
infolog.updateCurrentCompany();
//added by Mrigs on 02/04/2015
//start–>
HideModulesAsPerRole::HideStandardModuleForRole();
//end–>
}
}

Do a Incremental CIL and then close and open AX. Done!!
Happy AXing!!!

Labels

#veryusefulcode (1) AIF (8) AOT Maps (1) Args (1) Ax 2009 Reports (2) AX 2012 navigation (1) Ax 2012 Interview Questions (1) AX 7 (2) AX Architecture (1) Ax Backup (1) AX Workflow (2) AX2012 (1) AX2012 R2 (1) Ax2012R3 (1) AX2012R3 Dynamics Connector Step by Step Installation and Configuration (1) AX2012R3 EP Step by Step Installation and Configuration EP R3 (1) AX2012R3 HelpServer Step by Step Installation and Configuration (1) AX2012R3 Rapid Start Connector Step by Step Installation and Configuration (1) AX2012R3 Report Server and Analysis Server Step by Step Installation and Configuration (1) AX7 (1) Best practices (1) Blocking user to enter (1) Collection Classes (1) Container (1) D365FO (3) Data Migration Frame Work ax 2012R3 (1) Deleting duplicate Record from Table – Ax2012 (1) Delivery due date notification workflow in Ax 2012 (1) Development Steps EP (1) Dimensions (1) DIXF (1) DMF in Ax 2012 R3 (1) Dynamics Ax 2012 Interview Questions (1) DYNAMICS AX 2012 INTERVIEW QUESTIONS PART 2 (1) DYNAMICS AX 7 (1) EDT relation Migration Tool (1) EP AX 2012 (1) Ep Lookup (1) Error (1) Event Handler (1) F5 (1) File Handling (4) Filter on AX2012 Listpage (1) filtering (2) financial dimensions in AX 2012 (3) form (1) images (1) Installation and Configration (4) Installation and Configuration (11) Installation of Management Reporter 2012 for AX 2012 (1) Interaction class in ax 2012 (1) Interview Question (1) Interview Questions For Ax 2012 (1) Invent DIm (1) Jobs (2) license (1) List page and form menuitem enable code (1) Methods (1) microsoft Dynamics AX 365FO (1) Number Sequence Generation – AX 2012 (5) Number Sequence2012 (1) OLTP-OLAP (1) Passing Args (1) Passing form caller and menu item caller in ax 2012 (1) Passing Multiple Records Args (1) Posting in Ax 2012 (1) POSTING PURCHASE ORDER (1) Query (1) Query Filter Form (2) Query Ranges in X++ (1) Question and Answer (1) Report (1) Reports Controller class (1) RLS in ax 2009 (1) SALES ORDER IMPORT/EXPORT FRAMEWORK BY DMF (1) Security (1) security roles (1) Security Sysqueryrangeutil (1) Sharepoint 2016 (1) SQL SERVER (1) SSRS (2) SSRS Reports Controller class (2) Table collections & Virtual company (1) Time (1) TIPS AND TRICKS (1) Web service AIF (3) Web Services on IIS (AIF) Step by Step Installation and Configuration (1) workflow ax2012 (1) Workflow installation (1) Workflow Method (3) X++ (1)