Почему таблица значений заполняется только после второго выбора заявки?

[Odineski]

&НаСервере
Процедура ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПослеНаСервере()

Если Не ЗначениеЗаполнено(Запись.ЗаявкаНаПроизводство) Тогда
// Очистить реквизит формы через ЗначениеВРеквизитФормы
ПустаяТЗ = Новый ТаблицаЗначений;
ПустаяТЗ.Колонки.Добавить(«Номенклатура»);
ПустаяТЗ.Колонки.Добавить(«Количество»);
ПустаяТЗ.Колонки.Добавить(«ЕдиницаИзмерения»);
ПустаяТЗ.Колонки.Добавить(«Включать»);
ЗначениеВРеквизитФормы(ПустаяТЗ, «НоменклатураЗаказовПереработчику»);
Возврат;
КонецЕсли;

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

// Формируем обычную ТЗ
ТЗ = Новый ТаблицаЗначений;
ТЗ.Колонки.Добавить(«Номенклатура»);
ТЗ.Колонки.Добавить(«Количество»);
ТЗ.Колонки.Добавить(«ЕдиницаИзмерения»);
ТЗ.Колонки.Добавить(«Включать»);

Для Каждого Стр Из Результат Цикл
НоваяСтрока = ТЗ.Добавить();
НоваяСтрока.Номенклатура = Стр.Номенклатура;
НоваяСтрока.Количество = Стр.Количество;
НоваяСтрока.ЕдиницаИзмерения = Стр.Упаковка;
НоваяСтрока.Включать = Ложь;
КонецЦикла;

// Явная синхронизация с формой
ЗначениеВРеквизитФормы(ТЗ, «НоменклатураЗаказовПереработчику»);

КонецПроцедуры

&НаКлиенте
Процедура ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПосле(Элемент, ВыбранноеЗначение, ДополнительныеДанные, ВыборДобавлением, СтандартнаяОбработка)
ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПослеНаСервере();
КонецПроцедуры почему таблица значений на форме НоменклатураЗаказовПереработчику заполняется только после того как выбрать заявку переработчику 2 раз, после первого раза таблица значений на форме пуста хотя и имеет в себе данные

[Odin — Одинэсник]

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

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

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

### Исправленный вариант

1С (Код)

&НаКлиенте Процедура ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПосле( Элемент, ВыбранноеЗначение, ДополнительныеДанные, ВыборДобавлением, СтандартнаяОбработка) Если ЗначениеЗаполнено(ВыбранноеЗначение) Тогда Запись.ЗаявкаНаПроизводство = ВыбранноеЗначение; Иначе Запись.ЗаявкаНаПроизводство = Неопределено; КонецЕсли; ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПослеНаСервере( ВыбранноеЗначение); КонецПроцедуры

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

&НаКлиенте Процедура ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПосле(     Элемент,     ВыбранноеЗначение,     ДополнительныеДанные,     ВыборДобавлением,     СтандартнаяОбработка)       Если ЗначениеЗаполнено(ВыбранноеЗначение) Тогда         Запись.ЗаявкаНаПроизводство = ВыбранноеЗначение;     Иначе         Запись.ЗаявкаНаПроизводство = Неопределено;     КонецЕсли;       ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПослеНаСервере(         ВыбранноеЗначение);   КонецПроцедуры

Серверную процедуру нужно изменить, чтобы она принимала ссылку параметром:

1С (Код)

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

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55

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

Ключевые изменения:

1. В клиентской процедуре используется ВыбранноеЗначение.
2. Выбранное значение сразу присваивается реквизиту:

1С (Код)

Запись.ЗаявкаНаПроизводство = ВыбранноеЗначение;

1	Запись.ЗаявкаНаПроизводство = ВыбранноеЗначение;

3. Эта же ссылка явно передается на сервер:

1С (Код)

ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПослеНаСервере( ВыбранноеЗначение);

1 2	ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПослеНаСервере(     ВыбранноеЗначение);

4. На сервере запрос использует параметр процедуры, а не Запись.ЗаявкаНаПроизводство:

1С (Код)

Запрос.УстановитьПараметр( "Ссылка", ЗаявкаНаПроизводство);

1 2 3

Запрос.УстановитьПараметр(     "Ссылка",     ЗаявкаНаПроизводство);

Дополнительно обратите внимание на этот момент:

1С (Код)

НоваяСтрока.ЕдиницаИзмерения = Стр.Упаковка;

1	НоваяСтрока.ЕдиницаИзмерения = Стр.Упаковка;

В запросе поле называется Упаковка, а в таблице формы колонка называется ЕдиницаИзмерения. Это допустимо, если вы сознательно хотите записать упаковку в единицу измерения. Но если в форме должна отображаться именно единица измерения номенклатуры, нужно получать ее отдельным полем запроса, например через Номенклатура.ЕдиницаИзмерения, если такое поле есть в вашей конфигурации.

Можно также оставить вашу текущую серверную процедуру и просто передавать туда выбранную ссылку:

1С (Код)

&НаКлиенте Процедура ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПосле( Элемент, ВыбранноеЗначение, ДополнительныеДанные, ВыборДобавлением, СтандартнаяОбработка) Запись.ЗаявкаНаПроизводство = ВыбранноеЗначение; ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПослеНаСервере( ВыбранноеЗначение); КонецПроцедуры

1 2 3 4 5 6 7 8 9 10 11 12 13 14

&НаКлиенте Процедура ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПосле(     Элемент,     ВыбранноеЗначение,     ДополнительныеДанные,     ВыборДобавлением,     СтандартнаяОбработка)       Запись.ЗаявкаНаПроизводство = ВыбранноеЗначение;       ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПослеНаСервере(         ВыбранноеЗначение);   КонецПроцедуры

И сервер:

1С (Код)

&НаСервере Процедура ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПослеНаСервере( ЗаявкаНаПроизводство) Если Не ЗначениеЗаполнено(ЗаявкаНаПроизводство) Тогда // очистка таблицы Возврат; КонецЕсли; // Запрос использовать с параметром ЗаявкаНаПроизводство Запрос.УстановитьПараметр( "Ссылка", ЗаявкаНаПроизводство); КонецПроцедуры

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

&НаСервере Процедура ВДС_ЗаявкаНаПроизводствоОбработкаВыбораПослеНаСервере(     ЗаявкаНаПроизводство)       Если Не ЗначениеЗаполнено(ЗаявкаНаПроизводство) Тогда         // очистка таблицы         Возврат;     КонецЕсли;       // Запрос использовать с параметром ЗаявкаНаПроизводство     Запрос.УстановитьПараметр(         "Ссылка",         ЗаявкаНаПроизводство);   КонецПроцедуры

Главная ошибка была именно здесь:

1С (Код)

Запрос.УстановитьПараметр("Ссылка", Запись.ЗаявкаНаПроизводство);

1	Запрос.УстановитьПараметр("Ссылка", Запись.ЗаявкаНаПроизводство);

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

[Автор]

Записи