Skip to main content

Code to Restrict multiple user login in axapta


I need help to get solution for following problem if you have idea then reply me your response.

I am using following code in info class

 void startupPost()  
 {  
 // To restrict user login form second login  
 xSession session;  
 SysClientSessions SysClientSessions;  
 UserId currentUserId;  
 int counter;  
 ;  
 currentUserId = curUserId();  
 if(currentUserId!="Admin")// Allow Admin User to login multiple time  
 {  
 while select SysClientSessions  
 where SysClientSessions.userId == currentUserId &&  
 SysClientSessions.Status == 1 // 1 : Login 0 : Logout  
 {  
 session = new xSession(SysClientSessions.SessionId, true);  
 if (session && session.userId())  
 {  
 counter++;  
 }  
 }  
 if(counter>=2)  
 {  
 Box::stop("The same user can't log in twice.");  
 infolog.shutDown(true);  
 }  
 }  
As I am working for case

We need code to allow open only one instace per user at a time except admin login.

I  implemented code in application class its working fine but problem is

if admin login then he can open multiple instance and other user which are not admin but admin
group added then they can not open multiple instance that right and its requirement.

but if admin group is not added to the user then they also able to open multiple instance that  I
need to restrict to open multiple instance.

problem is if admin group is not added to user then application class does not execute so code effect
not coming.

so I want any class name which execute at startup of instance for all user.

Popular posts from this blog

strScan and Find a first occurrence of a string in a string using x++

strScan (Find a first occurrence of a string in a string) info("int strScan(str _text1,str _text2,int _position,int _number)"); info("Searches a text string for the occurrence of another string."); info("_text1 - The text string to search."); info("_text2 - The string to find."); info("_position - The position at which the search should start."); info("_number - The number of characters that should be searched."); info(int2str(strScan("ABCDEFGHIJ","DE",1,10)));

Code to get customer Primary Address in Ax 2012

Below Code to get customer Primary Address in Ax 2012. CustTable custTable_P; DirPartyTable dirPartyTable_P; DirPartyLocation dirPartyLocation_P; DirPartyLocationRole dirPartyLocationRole_P; LogisticsLocation logisticsLocation_P; LogisticsLocationRole logisticsLocationRole_P; LogisticsPostalAddress logisticsPostalAddress_P; LogisticsPostalAddress primaryAddress_P; while select custTable_P where custTable_P.AccountNum =='ED_01029' join dirPartyTable_P where dirPartyTable_P.RecId == custTable_P.Party join dirPartyLocation_P where dirPartyLocation_P.Party == custTable_P.Party && dirPartyLocation_P.IsPrimary==NoYes::Yes join dirPartyLocationRole_P where dirPartyLocationRole_P.PartyLocation == dirPartyLocation_P.RecId join logisticsLocationRole_P where logisticsLocationRole_P.RecId == dirPartyLocationRole

Get record from table on the basis of field id in Microsoft dynamics axapta x++

How to Get record from table on the basis of field id in dynamics axapta x++. just try following code in job to understand better way. emplTable emplTable; FieldId fieldId; ; fieldId = fieldNum(emplTable, Emplid); select emplTable; info(emplTable.(fieldId)); select emplTable where emplTable.(fieldId) == '1101'; info(emplTable.Name);