Управляемое приложение. Результат запроса, выгруженный в ТЗ, пытаюсь загрузить в табличную часть документа


&НаКлиенте
Процедура ТипЦеныПриИзменении(Элемент)
   
   ОбщийСервер.ПоменятьТипЦенТабличнойЧастиСервер(Объект.ТипЦены,Объект.Ссылка,Объект.Дата);
   ЭтаФорма.ОбновитьОтображениеДанных();
   
КонецПроцедуры


содержимое общего модуля
&НаСервере
Процедура ПоменятьТипЦенТабличнойЧастиСервер(ТипЦены,Документ,Дата) Экспорт

                 //{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
   // Данный фрагмент построен конструктором.
   // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

   Запрос = Новый Запрос;
   Запрос.Текст =
       "ВЫБРАТЬ
       |    ПоступлениеТовараТовар.НомерСтроки,
       |    ПоступлениеТовараТовар.Номенклатура,
       |    ПоступлениеТовараТовар.Брак,
       |    ПоступлениеТовараТовар.Количество,
       |    ПоступлениеТовараТовар.Сумма,
       |    ПоступлениеТовараТовар.ЕдиницаИзмерения
       |ИЗ
       |    Документ.ПоступлениеТовара.Товар КАК ПоступлениеТовараТовар
       |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&Дата, ТипЦены.Ссылка = &ТипЦены) КАК ЦеныНоменклатурыСрезПоследних
       |        ПО ПоступлениеТовараТовар.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура
       |ГДЕ
       |    ПоступлениеТовараТовар.Ссылка = &Ссылка";

   Запрос.УстановитьПараметр("Ссылка", Документ);
   Запрос.УстановитьПараметр("Дата", Дата);
   Запрос.УстановитьПараметр("ТипЦены", ТипЦены);

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

Открываю существующий документ и меняю тип цен. Цены на форме остаются прежние, хотя должны выставиться в соответствии с запросом.
Почему не обновляется содержимое формы документа?

(0)[Документ.ПолучитьОбъект().Товар.Загрузить(Результат);]
ну и у какого объекта ты ТЧ загрузил ?

(0) А где ты цену определяешь?

(2) Вручную в независимом регистре сведений ЦеныНоменклатуры

в коде где?

(4) Опеределяю запросом срез последних цен на дату документа

(5) и что?

(5) Ткни пальцем в строчку запроса

(7)РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&Дата, ТипЦены.Ссылка = &ТипЦены) КАК ЦеныНоменклатурыСрезПоследних

(8) ну и нахрена ты его присоединил? что-то получил из него в выборку данных?

(8) а дальше? Где у тебя эта самая ЦеныНоменклатурыСрезПоследних используется для расчета суммы в ТЧ?

К тому же метод Загрузить очищает строки в ТЧ. И колонка с ценой у тебя должна очиститься, что никак не вяжется с "Цены на форме остаются прежние"

(9) В ТЗ получается нужный мне набор данных. Запрос отрабатывает нормально вроде, но в форму дока, точнее в таб.часть не попадают новые цены.

То что автор суёт свою ТЗ в абсолютно левый ДокОбъект (который живет то всего пару строк) никого не смутило?

(13) как это не смутило (1) ?

+(13) Даже не пару строк, а одну, и то с натяжкой ))

(14) А, пропустил. Как и автор, походу...

(12) ну нет в выборке цены, хоть ты лопни
   "ВЫБРАТЬ
       |    ПоступлениеТовараТовар.НомерСтроки,
       |    ПоступлениеТовараТовар.Номенклатура,
       |    ПоступлениеТовараТовар.Брак,
       |    ПоступлениеТовараТовар.Количество,
       |    ПоступлениеТовараТовар.Сумма,
       |    ПоступлениеТовараТовар.ЕдиницаИзмерения

жуть то какая.

Снеговика недавно ковыряю, так что извиняйте...
(13) почему левый? ссылка на текущий документ по-идее?

(19)[ссылка на текущий документ по-идее]
ну здравствуй пятница

+(18) если вкратце:
Документ.ПолучитьОбъект() на выходе дает нефига не тот объект, с которым взаимодействует открытая форма.

почитай еще в СП про РеквизитФормыВЗначение и ЗначениеВРеквизитФормы.

РеквизитФормыВЗначение тут, конечно, нахер не нужен, но почитать всё равно стоит.

(21) Странно, в отладчике кажет ссылку на мой док

(24) ссылка <> Объект.

(23) просвети, как тогда ТЧ Объекта перезаполнить методом в (0)?

ааа. сорри, речь шла про получитьобъект()

(26) Объект.Товары.Загрузить(ТЗ);
ДанныеФормыКоллекция прекрасно жрет таблицы значений, получать объект тут не нужно.

(28) результат запроса - скушает?

+(29) ну в принципе там ТЗ на выходе. Пасиб.

(29) Результат запроса не скушает. Скушает ТЗ полученную выгрузкой из результата запроса. Ну если в терминах.

(27) ну так понял - чего сделать то надо?

(32) каким-то образом получить контекст объекта для моего дока?

(33) Объект передай на сервер и там заполняй его.

(33) Он там уже есть.

Запрос = Новый Запрос;
   Запрос.Текст =
       "ВЫБРАТЬ
       |    ПоступлениеТовараТовар.НомерСтроки,
       |    ПоступлениеТовараТовар.Номенклатура,
       |    ПоступлениеТовараТовар.Брак,
       |    ПоступлениеТовараТовар.Количество,
       |    ПоступлениеТовараТовар.Сумма,
       |    ПоступлениеТовараТовар.ЕдиницаИзмерения,
       |    ЦеныНоменклатурыСрезПоследних.Цена
       |ИЗ
       |    Документ.ПоступлениеТовара.Товар КАК ПоступлениеТовараТовар
       |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&Дата, ТипЦены.Ссылка = &ТипЦены) КАК ЦеныНоменклатурыСрезПоследних
       |        ПО ПоступлениеТовараТовар.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура
       |ГДЕ
       |    ПоступлениеТовараТовар.Ссылка = &Ссылка";

   Запрос.УстановитьПараметр("Ссылка", Документ);
   Запрос.УстановитьПараметр("Дата", Дата);
   Запрос.УстановитьПараметр("ТипЦены", ТипЦены);

   Результат = Запрос.Выполнить().Выгрузить();
   Документ.Товар.Загрузить(Результат);

(0) кстати, это самописка такая что ли? Нафига из за одного конкретного документа, это все в общий модуль вытаскивать?

А блин, это ещё общий модуль? Не. Без серверного вызова в форме не взлетит. Теоретически можно но зачем такой гимор?

в общий модуль как бы более широкого назначения вещи выводятся. Посмотри типовые конфигурации. Впрочем, с нуля, это тяжеловато будет.

(38) да учится чел. Я сам там конструктор с первого раза не увидел. Меня еще - ЭтаФорма.ОбновитьОтображениеДанных() убило. Чего я в сторону  РеквизитФормыВЗначение то кинулся.

Перенести сереверную процедуру в модуль формы документа и передавать в неё объект вместо объект.ссылка, я правильно понял?

в Модуль объекта, а не формы

хм. походу быстрее будет так...


&НаКлиенте
Процедура ТипЦеныПриИзменении(Элемент)
   
   ПоменятьТипЦенТабличнойЧастиСервер();
   
КонецПроцедуры

// Там же в форме

&НаСервере
Процедура ПоменятьТипЦенТабличнойЧастиСервер() Экспорт

                 //{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА

   // Данный фрагмент построен конструктором.

   // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!


   Запрос = Новый Запрос;
   Запрос.Текст =
       "ВЫБРАТЬ
       |    ПоступлениеТовараТовар.НомерСтроки,
       |    ПоступлениеТовараТовар.Номенклатура,
       |    ПоступлениеТовараТовар.Брак,
       |    ПоступлениеТовараТовар.Количество,
       |    ПоступлениеТовараТовар.Сумма,
       |    ПоступлениеТовараТовар.ЕдиницаИзмерения
       |ИЗ
       |    Документ.ПоступлениеТовара.Товар КАК ПоступлениеТовараТовар
       |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&Дата, ТипЦены.Ссылка = &ТипЦены) КАК ЦеныНоменклатурыСрезПоследних
       |        ПО ПоступлениеТовараТовар.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура
       |ГДЕ
       |    ПоступлениеТовараТовар.Ссылка = &Ссылка";

   Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка);
   Запрос.УстановитьПараметр("Дата", Объект.Дата);
   Запрос.УстановитьПараметр("ТипЦены", Объект.ТипЦены);

   Результат = Запрос.Выполнить().Выгрузить();
   Объект.Товар.Загрузить(Результат);

   КонецПроцедуры // ПоменятьТипЦенТабличнойЧастиСервер()

(41) общий модуль используется для вещей более широкого назначения.

(43) ну только в данном случае нужна контролька, что документ не новый.

да и экспорт в данном случае не нужен.

+(43) Кошерно конечно вынести процедуру в модуль объекта и заполнять через тот же ЗначениеВРеквизитФормы. Но это уже можно и потом вынести после того как из формы работать будет.

Ха. Только вникнул в запрос.... Блин всё не то.

а вообще, заполнение и изменение табличных частей обычно выносится в модуль объекта со словом экспорт, на случай их использования в случае программного создания объекта.

дык - вечер четверга. Пятница почти. Против биоритмов не попрешь. Мозг уже отключается ))))

Запрос надо делать по ТЗ табличной части с временными таблицами и т.п. Иначе это лажа.

(50) Да, до кучи и с запросом чето намудрил я (

(0) возьми та ты мил человек учебник Радченко и пройди его. Таким самотыком учиться - ну его нафиг. Карму себе - однозначно испортишь.
(50) +100500 согласен.

+(52) у франей набор по обучению программированию Цена вопроса где то 600 рублев.

(51) у тебя просто самого подходе еще нету к решению подобных задач.

Господа, гляньте подправленный вариант. Так лучше?

Модуль формы дока
&НаСервере
Процедура ПоменятьТипЦенТабличнойЧасти()
   
   Док = РеквизитФормыВЗначение("Объект");
   Док.ПоменятьТипЦенТабличнойЧастиСервер(Объект.ТипЦены,Объект.Ссылка,Объект.Дата);
   ЗначениеВРеквизитФормы(Док,"Объект");
   
КонецПроцедуры    

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

   Запрос.УстановитьПараметр("Ссылка", Документ);
   Запрос.УстановитьПараметр("Дата", Дата);
   Запрос.УстановитьПараметр("ТипЦены", ТипЦены);
   Товар.Загрузить(Запрос.Выполнить().Выгрузить(););

       
КонецПроцедуры // ПоменятьТипЦенТабличнойЧастиСервер()

Хотя б синтаксис что ль проверил бы.

(55) однокуйственно

(56)а что с синтаксисом? там просто процедуры из 2-х модулей разных, так скопировалось
(57) Как в (47) советовали перенёс в модуль объекта процедуру заполнения ТЧ дока, ну и запрос подредактировал.

(58) а цену то он у тебя не выбирает - результат не достигнут

(58) Ты синтаксис контроль выполнял? У тебя как минимум в последней строке ошибка

в модуле объекта необязательно было это делать. Вполне с данными формы можно работать было.

(58) Ну вроде вот эта строка выбирает цену из вирт.таблицы

|    ЦеныНоменклатурыСрезПоследних.Цена,

(62) -> (59)

(63) сорри, ожидал увидеть ее в конце

Внутреннее соединение убьет строки с номенклатурой без цен.
И запрос надо делать не по документу (документ может быть тупо не записан, например, и тогда запрос вообще ничего не даст или состояние ТЧ на форме не соответствовать той, что записана в базу), а выгрузить ТЧ с формы документа и уже ее пихать в запрос (временная таблица и пакетный запрос).