Удаление дополнительных картинок/файлов УНФ3

Опасный скрипт. Помечает на удаление все дополнительные и файлы картинок из номенклатуры, оставляет только основное изображение:

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

После отработки можно визуально проверить помеченные на удаление позиции и спокойно выполнить удаление помеченных.

В реальной практике использовалось, чтобы несколько раз залить в базу файлы дополнительных картинок. Основные назначали вручную.

Среда: УНФ 3.0.7.95