1C 8.2 УП Как очистить регистр расчета?

Запрос=Новый Запрос;
 Запрос.Текст = "ВЫБРАТЬ РАЗЛИЧНЫЕ
 | УправленческиеНачисления.Регистратор
 |ИЗ
 | РегистрРасчета.УправленческиеНачисления КАК УправленческиеНачисления";
 РезультатЗапроса = Запрос.Выполнить();
 Выборка = РезультатЗапроса.Выбрать();
 Кол=0;
 БылиОшибки=Ложь;
 
 //РегистрыНакопления.ЗаказыМагазинов.УстановитьИспользованиеИтогов(Ложь);
 
 Пока Выборка.Следующий() цикл
 //ОбработкаПрерыванийПользователя();
 
 Набор = РегистрыРасчета.УправленческиеНачисления.СоздатьНаборЗаписей();
 Набор.Отбор.Регистратор.Значение = Выборка.Регистратор;
 Попытка
 Набор.Записать();
 Исключение
 БылиОшибки=Истина;
 КонецПопытки;
 Кол=Кол+1;
 ЕСЛИ Кол%100=0 Тогда
 Сообщить("Отработано "+Кол+" документов из "+Выборка.Количество());
 КонецЕсли;
 КонецЦикла;
 //РегистрыНакопления.ЗаказыМагазинов.УстановитьИспользованиеИтогов(Истина);
 
 
 Если БылиОшибки Тогда
 Предупреждение("Обработка завершена. Регистр очищен не до конца!!!");
 КонецЕсли;