Учетная запись настроена

// Проверяет, настроена ли учетная запись для отправки и/или получения почты.
//
// Параметры:
//  УчетнаяЗапись - СправочникСсылка.УчетныеЗаписиЭлектроннойПочты - проверяемая учетная запись;
//  ДляОтправки  - Булево - проверять параметры, необходимые для отправки почты;
//  ДляПолучения - Булево - проверять параметры, необходимые для получения почты.
//
// Возвращаемое значение:
//  Булево - Истина, если настроена.
//
//Функция УчетнаяЗаписьНастроена(УчетнаяЗапись, Знач ДляОтправки = Неопределено, Знач ДляПолучения = Неопределено) Экспорт


УчетнаяЗапись = РаботаСПочтовымиСообщениями.СистемнаяУчетнаяЗапись();

Если РаботаСПочтовымиСообщениями.УчетнаяЗаписьНастроена(УчетнаяЗапись) Тогда
  ТекстСообщения = "Учетная запись настроена";
Иначе
  ТекстСообщения = "Учетная запись не настроена";
КонецЕсли;

ОбщегоНазначения.СообщитьПользователю(ТекстСообщения);