[Talkman]

Доброе время суток. Помогите пожалуйста найти ошибку и скажите что делаю не так...

ДокР = СоздатьОбъект("Документ");
...
Пока ПустаяСтрока(Файл)=0 Цикл
Если ДокР.НайтиПоНомеру(Прав(Строчка,СтрДлина(Строчка)-1),Дата(док.ПолучитьАтрибут("date_doc")),"РасходнаяНакладная") = 1 Тогда
     Сообщить("Найдена РН под номером "+ДокР.НомерДок); 
      Ок = 1;
иначе
    Cообщить("!!!!!!!!!!!!  Не найдена РасходняНакладная под номером "+Прав(Строчка,СтрДлина(Строчка)-1)+" с датой "+Дата(док.ПолучитьАтрибут("date_doc")));
КонецЕсли;
Если Ок = 1 Тогда
     Если Флаг = 1 Тогда
    ДокР.СостОтгр = Ошибка; 
    ДокР.Записать();
     иначе
    ДокР.СостОтгр = "Ок";
    ДокР.Записать();
     КонецЕсли;
иначе    
     Сообщить("Что то не то. Не могу найти файл "+Прав(Строчка,СтрДлина(Строчка)-1));
КонецЕсли;
                ДокР = ПолучитьПустоеЗначение("Документ");
КонецЦикла;

Ошибка на второй итерации при попытке найти документ по номеру.

Сообщение отредактировал MATEVI - 22.11.12, 11:22

[alex040269]

ДокР = СоздатьОбъект("Документ");
... Пока ПустаяСтрока(Файл)=0 Цикл

попробуйте так:

Пока ПустаяСтрока(Файл)=0 Цикл
     ДокР = СоздатьОбъект("Документ");

[Talkman]

Работает. На сколько я понял нелья юзать НайтиПоНомеру() если уже выбран другой документ?

[Ardi]

Это разные типы объектов.

1. Выборка документов.
2. ДокументСсылка

[Cthulhu]

попробуйте так:...

за "СоздатьОбъект" в теле цикла - убивать на месте.
Достаточно просто выкинуть (или закомментировать - если выкидывать жалко, или хочется видеть памятники своим ошибкам) строку

ДокР = ПолучитьПустоеЗначение("Документ");