Свойство добавочного реквизита

Если добавляется новый добавочный реквизит, то смотрим его наименование то есть свойство и "вытаскиваем" значения из этого реквизита.



// Чтение Дополнительных Реквизитов
ЗапросДополнРеквизит = Новый Запрос;
ЗапросДополнРеквизит.УстановитьПараметр("Ссылка", Объект.Ссылка);
ЗапросДополнРеквизит.Текст = "ВЫБРАТЬ
| КонтрагентыДополнительныеРеквизиты.Ссылка,
| КонтрагентыДополнительныеРеквизиты.НомерСтроки,
| КонтрагентыДополнительныеРеквизиты.Свойство,
| КонтрагентыДополнительныеРеквизиты.Значение,
| КонтрагентыДополнительныеРеквизиты.ТекстоваяСтрока
|ИЗ
| Справочник.Контрагенты.ДополнительныеРеквизиты КАК КонтрагентыДополнительныеРеквизиты
|ГДЕ
| КонтрагентыДополнительныеРеквизиты.Ссылка = &Ссылка";
РезультатДополнРеквизит  = ЗапросДополнРеквизит.Выполнить();    
ВыборкаДетальныеЗаписиДополнРеквизит = РезультатДополнРеквизит.Выбрать();


  // Чтение "Значения" Дополнительных Реквизитов для сохранения в XML файл с уникальными тегами.
Пока ВыборкаДетальныеЗаписиДополнРеквизит.Следующий() Цикл
Если Формат(ВыборкаДетальныеЗаписиДополнРеквизит.Свойство) = "Транспортная компания (Контрагент)" Тогда
Запись.ЗаписатьНачалоЭлемента("TRANSPORT_COMPANY");
Запись.ЗаписатьТекст(Формат(ВыборкаДетальныеЗаписиДополнРеквизит.Значение));
Запись.ЗаписатьКонецЭлемента();
ИначеЕсли Формат(ВыборкаДетальныеЗаписиДополнРеквизит.Свойство) = "Комментарий по ТК (Контрагент)"  Тогда
Запись.ЗаписатьНачалоЭлемента("COMMENT_BY_TC");
Запись.ЗаписатьТекст(Формат(ВыборкаДетальныеЗаписиДополнРеквизит.Значение));
Запись.ЗаписатьКонецЭлемента()
КонецЕсли;
КонецЦикла;