Процедура Тест()
    
    Если РольДоступна("ИмяРоли") Тогда
        //
    КонецЕсли
    
КонецПроцедуры