Как очистить регистр накопления?!

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