static void ExportUsersAndRoles(Args _args)
{
SysExcelApplication xlsApplication;
SysExcelWorkBooks xlsWorkBookCollection;
SysExcelWorkBook xlsWorkBook;
SysExcelWorkSheets xlsWorkSheetCollection;
SysExcelWorkSheet xlsWorkSheet;
SysExcelRange xlsRange;
CustTable custTable;
int row = 1;
str fileName;
SecurityUserRole _SecurityUserRole;
SecurityRoleTaskGrant _SecurityRoleTaskGrant;
SecurityTask _SecurityTask;
SecurityRole _SecurityRole;
UserInfo _UserInfo;
//UserPermission _UserPermission;
;
fileName = "C:\\Users\\mohan.somashekara\\Desktop\\UsersAndRoles.xlsx";
xlsApplication = SysExcelApplication::construct();
xlsWorkBookCollection = xlsApplication.workbooks();
xlsWorkBook = xlsWorkBookCollection.add();
xlsWorkSheetCollection = xlsWorkBook.worksheets();
xlsWorkSheet = xlsWorkSheetCollection.itemFromNum(1);
xlsWorkSheet.cells().item(row,1).value("User Role");
xlsWorkSheet.cells().item(row,2).value("User Id");
xlsWorkSheet.cells().item(row,3).value("Legal Entity");
row++;
while select _UserInfo
{
while select _SecurityUserRole where _SecurityUserRole.User==_UserInfo.id
{
while select _SecurityRole where _SecurityRole.RecId==_SecurityUserRole.SecurityRole
{
xlsWorkSheet.cells().item(row,1).value(_SecurityRole.Name);
xlsWorkSheet.cells().item(row,2).value(_UserInfo.id);
xlsWorkSheet.cells().item(row,3).value(_UserInfo.company);
row++;
}
}
}
if(WinApi::fileExists(fileName))
WinApi::deleteFile(fileName);
xlsWorkbook.saveAs(fileName);
xlsApplication.visible(true);
}
Comments
Post a Comment