---

Процедура ЗаписатьОписанияФайлов(Запись, ДокИнцидент)
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
		" ВЫБРАТЬ 
		|	ПрикрепленныеФайлы.Название,
		|	ПрикрепленныеФайлы.UUID
		| ИЗ 
		|	РегистрСведений.ПрикрепленныеФайлы КАК  ПрикрепленныеФайлы
		| ГДЕ 
		|	(ВЫРАЗИТЬ(ПрикрепленныеФайлы.ИспользуемыйДокумент КАК  Документ.Инцидент)) = &Документ";
	
	Запрос.УстановитьПараметр("Документ", ДокИнцидент.Ссылка);
	
	РезультатЗапроса = Запрос.Выполнить();
	
	ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
	
	ЕстьФайлы = НЕ РезультатЗапроса.Пустой();
	
	Запись.ЗаписатьИмяСвойства("Files");
	Запись.ЗаписатьНачалоМассива();
	
	Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
		
		Запись.ЗаписатьНачалоОбъекта();
		
		Запись.ЗаписатьИмяСвойства("UUID");
		Запись.ЗаписатьЗначение(ВыборкаДетальныеЗаписи.UUID);
		
		Запись.ЗаписатьИмяСвойства("Name");
		Запись.ЗаписатьЗначение(ВыборкаДетальныеЗаписи.Название);
				
		Запись.ЗаписатьКонецОбъекта();
		
	КонецЦикла;
	
	Запись.ЗаписатьКонецМассива();
	
КонецПроцедуры