0
1C_User_1992
27.12.16
✎
14:27
|
1. На форме документа добавил кнопку "Подобрать".
2. Команда кнопки "Подобрать" выполняет следующее:
ОткрытьФорму("Документ.ЛМБ_СкупкаЦенностей.Форма.ФормаПодбораВещи");
Где ФормаПодбораВещи - созданная мною форма документа (еще одна).
3. На форме "ФормаПодбораВещи" - динамический список. при нажатии на кнопку выбрать выполняю следующее:
&НаКлиенте
Процедура ВыбратьБилет(Команда)
ТекДанные=ЭтаФорма.ТекущийЭлемент.ТекущиеДанные;
Режим = РежимДиалогаВопрос.ДаНет;
Ответ = Вопрос("Заполнить документ по залоговому билету "+СокрЛП(ТекДанные.ЗалоговыйБилет)+"?", Режим,0) ;
Если Ответ = КодВозвратаДиалога.Да Тогда
ПеренестиДанныеВДокумент(ТекДанные.СсылкаБилета);
ЭтаФорма.Закрыть();
КонецЕсли;
КонецПроцедуры
&НаСервере
Процедура ПеренестиДанныеВДокумент(Билет)
Объект.Ценности.Очистить();
Объект.Контрагент=Билет.Залогодатель;
Запрос=Новый Запрос;
Запрос.Текст= "ВЫБРАТЬ
| ЛМБ_ВещиВЗалогеОстатки.ЗалоговаяВещь,
| ЛМБ_ВещиВЗалогеОстатки.ЗалоговаяВещь.Номенклатура КАК Номенклатура,
| ЛМБ_ВещиВЗалогеОстатки.КоличествоОстаток
|ИЗ
| РегистрНакопления.ЛМБ_ВещиВЗалоге.Остатки КАК ЛМБ_ВещиВЗалогеОстатки
|ГДЕ
| ЛМБ_ВещиВЗалогеОстатки.ЗалоговыйБилет = &ЗалоговыйБилет";
Запрос.УстановитьПараметр("ЗалоговыйБилет",Билет);
Выборка=Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
НоваяЦенность=Объект.Ценности.Добавить();
НоваяЦенность.Изделие=Выборка.ЗалоговаяВещь;
НоваяЦенность.Номенклатура=Выборка.Номенклатура;
КонецЦикла;
КонецПроцедуры;
4. Как итог данные в документ не попадают, хотя отладчиком в форме подбора Все нормально...
Вопрос - где я неправильно делаю в алгоритме подскажите плиз.
|
|