Сбилась нумирация документов

Если документов мало, то можно без автоматической обработки, вручную перенумеровать "непорядоШные" документы ;)
И будет всё по порядку опять...

Я не смогу исправить номера этих документов ручным способом, потому что ДАННЫЕ ДОКУМЕНТЫ НА РУКАХ У КЛИЕНТОВ И БУХГАЛТЕРА ПРОТИВ ЭТОГО.
СЕЙЧАС НАПИСАЛИ ОБРАБОТКУ

if новый =1 then
счБЗ = 0;
докБЗ = СоздатьОбъект("Документ.я_БланкЗаказ");
Если докБЗ.ВыбратьДокументы(ДатаДок-1, ДатаДок+1) = 1 Тогда
Пока докБЗ.ПолучитьДокумент() = 1 Цикл
счБЗ = Макс(счБЗ, Число(Сред(докБЗ.НомерДок,2)));
КонецЦикла;
КонецЕсли;
счБЗ =счБЗ +1;
префМес = Прав("000000" + Строка(счБЗ), 6);
НомерДок =префМес ;
Активизировать("НомерДок");
endif;


она б может и работала только опять бухгалтер накосячил и поставил номер отличный от предыдущих(

ЕСЛИ ДРУГОЙ СПОСОБ исправить эту беду?

есть, специально для долбодятлов... ;-)
если бы знали(учили) правила нумерации то решение задачи было бы очевидно... в тех доках, которые на руках у юзверей поставьте вперди номера точку (сократив один ноль). после этого - обычная нумерация пойдет своим чередом...

Я это извините тоже знала. Но и этот вариант бухов не устраивает.

ну сними автонумерацию, пусть сами как хотят, так и ставят.
или просто пошли их гнах

Даже выбрав и релизовав другой способ, "бухгалтер опять накосячит". Выберите, с чем бороться: с 1С или с бухами?