Restrict Data on forms with respect of Current Company user id and Start-End Date on Ax 2009

sysuinfo

 

CODE

void clicked()
{
str 50 s ;
John_SysUserInfo jsi;

super();

s = curUserId();

select jsi where jsi.Id==s;

if(jsi.StartDate < systemDateGet() && jsi.EndDate > systemDateGet())
info(“Current user ID is ” + s +” Accessible “) ;// Your Implementation
else
info(“Current user ID is ” + s +” Not Accessible ” );

}