Версия для печати темы (https://pro1c.org.ua/index.php?s=79d181707adebb50af5f765926af56a7&showtopic=48891)

Нажмите сюда для просмотра этой темы в обычном формате

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 _ Программирование в 1С Предприятие 8.3 _ При ПолучитьОбъект(); выдает Элемент не выбран!

Автор: burza 15.11.18, 13:22

Есть документ с таблицой внутри, нужно сменить цены авто. Конфа Ут

    Запрос = Новый Запрос;
   Запрос.Текст = "ВЫБРАТЬ
                    |    УстановкаЦенНоменклатурыТовары.Ссылка,
                    |    УстановкаЦенНоменклатурыТовары.НомерСтроки,
                    |    УстановкаЦенНоменклатурыТовары.Номенклатура,
                    |    УстановкаЦенНоменклатурыТовары.Характеристика,
                    |    УстановкаЦенНоменклатурыТовары.ВидЦены,
                    |   УстановкаЦенНоменклатурыТовары.Ссылка.Номер КАК Номер,
                    |    УстановкаЦенНоменклатурыТовары.Цена
                    |    ИЗ
                    |    Документ.УстановкаЦенНоменклатуры.Товары КАК УстановкаЦенНоменклатурыТовары
                    |ГДЕ
                    |    УстановкаЦенНоменклатурыТовары.Ссылка.Дата = &Дата
                    |    И УстановкаЦенНоменклатурыТовары.Ссылка.Номер = &Номер";
    
    Запрос.УстановитьПараметр("Дата", Объект.Дата);
    Запрос.УстановитьПараметр("Номер", Объект.Номер);
    Выборка = Запрос.Выполнить().Выбрать();
    
    
    
    Пока Выборка.Следующий() Цикл

    Док =Документы.УстановкаЦенНоменклатуры.НайтиПоНомеру(Выборка.Номер);
    
    Док = Док.Ссылка.ПолучитьОбъект();
    
    
    Для Каждого Строка из Док Цикл
        
        Если Строка.Товары.Цена = 418 тогда
        
        Строка.Товары.Цена =  510
        
        КонецЕсли;
        
      КонецЦикла;
    
     КонецЦикла;
    
     Док.Записать();


burza @ Сегодня, 13:11 * ,
Сделал так ошибка теперь другая
{ВнешняяОбработка.ПрайсСменаЦен.Форма.Форма.Форма(36)}: Итератор для значения не определен
Для Каждого Строка из Док Цикл

    
    Запрос = Новый Запрос;
   Запрос.Текст = "ВЫБРАТЬ
                    |    УстановкаЦенНоменклатурыТовары.Ссылка,
                    |    УстановкаЦенНоменклатурыТовары.НомерСтроки,
                    |    УстановкаЦенНоменклатурыТовары.Номенклатура,
                    |    УстановкаЦенНоменклатурыТовары.Характеристика,
                    |    УстановкаЦенНоменклатурыТовары.ВидЦены,
                    |   УстановкаЦенНоменклатурыТовары.Ссылка.Номер КАК Номер,
                    |    УстановкаЦенНоменклатурыТовары.Цена
                    |    ИЗ
                    |    Документ.УстановкаЦенНоменклатуры.Товары КАК УстановкаЦенНоменклатурыТовары
                    |ГДЕ
                    |    УстановкаЦенНоменклатурыТовары.Ссылка.Дата = &Дата
                    |    И УстановкаЦенНоменклатурыТовары.Ссылка.Номер = &Номер";
    
    Запрос.УстановитьПараметр("Дата", Объект.Дата);
    Запрос.УстановитьПараметр("Номер", Объект.Номер);
    Выборка = Запрос.Выполнить().Выбрать();
    

        
    Пока Выборка.Следующий() Цикл
        
    Док =Документы.УстановкаЦенНоменклатуры.НайтиПоНомеру(Выборка.Номер);
    Док =Документы.УстановкаЦенНоменклатуры.ПолучитьСсылку();

    
    Док = Док.ПолучитьОбъект();
    
    
    Для Каждого Строка из Док Цикл
        
        Если Строка.Товары.Цена = 418 тогда
        
        Строка.Товары.Цена =  510
        
        КонецЕсли;
        
      КонецЦикла;
    
     КонецЦикла;
    
     Док.Записать();



Автор: burza 15.11.18, 15:05

burza @ Сегодня, 13:22 * ,
вот так сделал, с начало чет тупанул, можно же без запроса)

Док =Документы.УстановкаЦенНоменклатуры.НайтиПоНомеру(Объект.Номер);
    Док =Документы.УстановкаЦенНоменклатуры.ПолучитьСсылку();
    Док = Док.ПолучитьОбъект();
    
    
    Для Каждого Строка из Док.Товары Цикл
        
        Если Строка.Цена = 418 тогда
        
        Строка.Цена =  510
        
        КонецЕсли;
        
      КонецЦикла;
    
     Док.Записать();


теперь лезет вот
{ВнешняяОбработка.ПрайсСменаЦен.Форма.Форма.Форма(11)}: Значение не является значением объектного типа (Товары)
Для Каждого Строка из Док.Товары Цикл

burza @ Сегодня, 14:24 * ,
что никто не поможет?(((

burza @ Сегодня, 14:49 * ,

Автор: Petre 15.11.18, 15:07

burza @ Today, 15:05 * ,
В чем сложность в отладчике проверить чему равно "Док" в цикле?

Автор: burza 15.11.18, 15:17

Petre @ Сегодня, 15:07 * ,



Автор: Vofka 15.11.18, 15:25

Док = Документы.УстановкаЦенНоменклатуры.НайтиПоНомеру(Объект.Номер, Дата("20170101"));

Автор: burza 15.11.18, 15:37

Vofka @ Сегодня, 15:25 * ,
Объект не найдет((


burza @ Сегодня, 15:28 * ,
Получается я не могу получить обьект? как исправить?



Автор: Petre 15.11.18, 15:49

burza @ Today, 15:28 * ,
Ну посмотрите на свой код. Вы сначала присвоили ссылку, потом присвоили пустую ссылку...

Автор: burza 15.11.18, 15:51

Petre @ Сегодня, 15:49 * ,
ну так помогиТЕ как нужно) прошу напишите.


 ! 

http://pro1c.org.ua/index.php?act=announce&id=2: 1
 

Автор: Vofka 15.11.18, 15:52

Ссылка = Документы.УстановкаЦенНоменклатуры.НайтиПоНомеру(Объект.Номер, Дата("20170101"));
Док = Ссылка.ПолучитьОбъект();

Автор: burza 15.11.18, 15:55

Vofka @ Сегодня, 15:52 * ,
Спасибо большое))

Автор: andr_andrey 15.11.18, 16:19

В контексте ФормыДокумента получать ССылку на этот же документ через поиск по номеру объекта?

У меня чуть глаза не вытекли.

Автор: Vidocq05 15.11.18, 16:35

Правильней было бы создать реквизит обработки например с именем "СсылкаНаДок" с типом "ДокументСсылка.УстановкаЦенНоменклатуры", а не "Номер" и "Дата". И у Вас был бы код

Док = Объект.СсылкаНаДок.ПолучитьОбъект();

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua