уже всю голову сломал. Вылетает ошибка когда пытаюсь записать НЕновый документ, если добавляю в него строку.


   Док = СоздатьОбъект("Документ");
   флИзменен = 0;
   СписокУдалённыхСтрок = СоздатьОбъект("СписокЗначений");

   ОбщаяТаблица.ВыбратьСтроки();
   Пока ОбщаяТаблица.ПолучитьСтроку() = 1 Цикл
       Если Док.Выбран()=1 Тогда
           Если Док.ТекущийДокумент()<>ОбщаяТаблица.Документ Тогда
               Если (СписокУдалённыхСтрок.РазмерСписка()>0) Тогда
                   СписокУдалённыхСтрок.Сортировать(-1);
                   Для Идн=1 По СписокУдалённыхСтрок.РазмерСписка() Цикл
                       Док.ПолучитьСтрокуПоНомеру(СписокУдалённыхСтрок.ПолучитьЗначение(Идн));
                       Док.УдалитьСтроку();
                       флИзменен=1;
                   КонецЦикла;
               КонецЕсли;
               Если флИзменен<>0 Тогда
                   Сообщить(""+Док.ТекущийДокумент());
                   Док.Записать(); //*** тут ошибка выскакивает
                   Док.Провести();
               КонецЕсли;
               Док.НайтиДокумент(ОбщаяТаблица.Документ);
               флИзменен = 0;
               СписокУдалённыхСтрок.УдалитьВсе();
           КонецЕсли;
       Иначе
           Док.НайтиДокумент(ОбщаяТаблица.Документ);
           флИзменен = 0;
           СписокУдалённыхСтрок.УдалитьВсе();
       КонецЕсли;
       
       // тут обновляются реквизиты шапки документа

       Если ОбщаяТаблица.НомерСтрокиДокумента>0 Тогда
           Если ОбщаяТаблица.флТиС=0 Тогда
               СписокУдалённыхСтрок.ДобавитьЗначение(ОбщаяТаблица.НомерСтрокиДокумента);
               флИзменен = 1;
               Продолжить;
           КонецЕсли;
           Док.ПолучитьСтрокуПоНомеру(ОбщаяТаблица.НомерСтрокиДокумента);
       Иначе
           Док.НоваяСтрока(); //*** ошибка возникает, когда добавляется новая строка
           флИзменен = 1;
       КонецЕсли;

       // тут обновляются реквизиты ТЧ документа
       
   КонецЦикла;




Док.Записать();
{D:\1C\TMP1\ERT\БУХГАЛТЕРИЯ\ЗАГРУЗКА РЕАЛИЗАЦИИ ИЗ ТИС В БУХ.ERT(516)}: Неверный номер документа!

помогите, люди добрые. В чем проблема?

А ручками перезаписывается документ?

А что говорит товарищ Отладчик?

(1) да

(2) не могу пока проверить. Ибо эта шняга взлетит только на живой базе, а там бушки

по-моему надо получить именно документ. но вообще мне непонятно, где берется Док. сначала создается. а потом сразу проверка на Выбран()... откуда получаешь Док?

что в 516-й строке?

(6) а так трудно догадаться?

(7) извини, но у тебя код какой-то пьяный, так что догадаться трудно

(5) ОбщаяТаблица создается и заполняется ранее.

   ОбщаяТаблица = СоздатьОбъект("ТаблицаЗначений");
   ОбщаяТаблица.НоваяКолонка("Документ", "Документ");

(4) Отладчик и к живой цепляется

(8) я даже подсказку написал

Док.Записать(); //*** тут ошибка выскакивает

(10) отладчику нужен монопольный доступ

(12) не нужен

Не нужен отладчику монопольный доступ, ерунда это

Что значит "тут обновляются реквизиты шапки документа"?
Дату не меняешь?

(11) ну всё ж очевидно тогда, нумерация сбилась

пытаешься записать док с №, который уже есть

(17) естественно есть. Документ-то не новый. Интерактивно записывается без проблем

а находится ли документ? :)

(12) С чего вдруг..

(18) "Документ-то не новый" а вот почему ты так в этом уверен? ты в обоих местах не проверяешь результат нахождения документа

(21) я в этом уверен, потому что в коде нет Док.Новый()

(15) кажется прав, уточняю

проверь - находится ли документ

(24) находится 100%

ДатаДок и НомерДок меняются на те же самые

кажись тут загвоздка

если дата дока уходит в смежный период, нужно устанавливать новый номер

Всё, нашёл. Мой косяк. Прав был Мимо Проходил
я обновлял реквизиты шапки до того как выяснял, нужно ли удалять строку документа. Поэтому в документе затирались ДатаДок и НомерДок