Job to print all the roles in Dynamic AX

Hi,

static void AlfasithTotalRolesInAX(Args _args)
{
    SecurityRole        role;
   while select role order by Role.Name asc
    {
        info(strFmt("%1 --- %2",Role.Name,Role.RecId));
    }
    pause;

}

Regards,