7.7 как удалить документы

1С ТиС 7.70.988 как быстро удалить документы на дату ?
очень много документов и не знаю как их быстро удалить

таким способом удаление происходит более 24 часов
Док=СоздатьОбъект("Документ");
Док.ВыбратьДокументы();
Пока Док.ПолучитьДокумент()=1 Цикл
если Док.Склад = ВыбСклад тогда
Сообщить(Док.ТекущийДокумент());
Док.Удалить(1);
конецесли;
КонецЦикла;

--- Объединение сообщений, 27 апр 2017 ---

мб можете поделиться как прямыми запросами удалять?

1. думаю должны
2.удалить полностью...

ребят я вот создал поле списка для документов и заполняю его вот таким методом


как теперь мне правильно к этому полю обратится чтобы удалить документы

Код:

//===================Заполняем таблицу документов - ДОКУМ  
Процедура ТабДок()
   
    Докум.УдалитьВсе();///это поле со списком
   
    СчетчикДок = 0;
   
    Для СчетчикДок = 1 По Метаданные.Документ() Цикл 
       
        ДокВид = СоздатьОбъект("Документ."+Метаданные.Документ(СчетчикДок).Идентификатор);
       
        Если ДокВид.ВыбратьДокументы(ДатаНач,ДатаКон) = 1 Тогда
             Докум.ДобавитьЗначение(Метаданные.Документ(СчетчикДок));           
             Докум.Пометка(Докум.РазмерСписка(), 1);
        КонецЕсли;
       
    КонецЦикла;
   
КонецПроцедуры

процедура удаления сейчас вот такая

Код:

НачатьТранзакцию();
    Док = СоздатьОбъект("Документ");
    Док.ВыбратьДокументы(ДатаНач,ДатаКон);   
    Пока Док.ПолучитьДокумент() =1 Цикл
        ЧислоДок=ЧислоДок+1;
        Сообщить("Удалене документ: "+"№"+ЧислоДок+", Вид документа: "+Док);       
        Док.Удалить(1);
        сч=сч+1;
        Если (сч % 100) = 0 Тогда
            ЗафиксироватьТранзакцию();
            НачатьТранзакцию();
        КонецЕсли;
    КонецЦикла;
    ЗафиксироватьТранзакцию();

А потом обратно та обработочкой ставить ??

Ну не в монопольном он не даст наверное

Опечатался. Не в монопольном он не даст изменить ТА наверное*

чтобы не плодить темы при обновление вышла такая ошибка как ее убрать можно?

перед обновлением увеличить длину номера документа

Так они одинаковой длины

Самое интересное в тестовой базе запусьил перед этим перенумирацию и все прошло идеально

На вид номера доков все разные дублей не вижу

Делал , все тоже самое
Главное если с ошибками делаю номера не изменились визуально