Имя: Пароль:
1C
1С v8
Ошибка при удалении и создании первой строки
0 dart909
 
22.07.15
13:24
Добрый день. Есть документ с табличной частью Маршруты. У табчасти есть два реквизита ПунктВыезда, ПунктПрибытия. Есть след. маеханизм:
При создании новой строки в табчасти значению ПунктВыезда присваевается значение ПунктПрибытия предыдущей строки. Код:

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

        КонецЕсли;
    КонецЕсли;
    //КонецЕсли
КонецПроцедуры


У меня возникает ошибка, если я создам первую строку, удалю ее и заного создам. Подскажите как это исправить?
1 Lexey_
 
22.07.15
13:35
(0) подумай, чего не хватает в твоем вопросе?
2 ВРедная
 
22.07.15
13:38
(1) призыва телепатов в топик
3 vde69
 
22.07.15
13:43
&НаКлиенте
Процедура МаршрутыПриНачалеРедактирования(Элемент, НоваяСтрока, Копирование)
    ПеременнаяСтрока = Элементы.Маршруты.ТекущаяСтрока;
если ПеременнаяСтрока = неопределеното тогда
возврат
4 dart909
 
22.07.15
13:53
(1) Проверки на на то что это первая строка?