Job to export all AX 2009 security groups to files

static void ExportSecurityGroups(Args _args)
{
    SysSecurityUserGroup    sysSecurity = SysSecurityUserGroup::construct();
    UserGroupInfo           userGroupInfo;

    #file
    Dialog                dialog  = new Dialog("@SYS14863");
    DialogField           dialogFileName;
    Object                formdialog;

    ;
    dialogFileName = dialog.addField(typeid(FilePath),"@SYS16423");
    dialog.doInit();
    formdialog = dialog.formRun();
    formdialog.filenameLookupTitle("@SYS53669");

    if (dialog.run() && WinAPI::pathExists(dialogFileName.value()))
    {
        while select userGroupInfo
        {
            sysSecurity.parmUserGroupId(userGroupInfo.id);
            sysSecurity.load();
            sysSecurity.export(dialogFileName.value() + @'\' + userGroupInfo.id + '.asg');
        }
    }
    else
        warning("No action taken...");
    
    info("Done");
}