У измерений регистра в свойствах проставить галку “Заполнять из данных заполнения”
Примерный программный код:
|
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 |
&НаКлиенте Процедура ДоверенностьПредставительБалансодержателяНажатие(Элемент, СтандартнаяОбработка) СтруктураЗаполнения=Новый Структура("Подписант",Объект.ПредставительБалансодержателя); ОткрытьФормуЗаписиДоверенности(СтруктураЗаполнения); СтандартнаяОбработка=Ложь; КонецПроцедуры &НаКлиенте Процедура ОткрытьФормуЗаписиДоверенности(СтруктураЗаполнения) СтруктураЗаполнения.Вставить("Период",ТекущаяДатаСеанса()); Если Не ЕстьЗаписьПоДоверенности(СтруктураЗаполнения) Тогда СтруктураДанных=Новый Структура("ЗначенияЗаполнения",СтруктураЗаполнения) Иначе ЭтотМассив=Новый Массив; ЭтотМассив.Добавить(СтруктураЗаполнения); КлючЗаписи = Новый("РегистрСведенийКлючЗаписи.Доверенности", ЭтотМассив); СтруктураДанных=Новый Структура("Ключ",КлючЗаписи) КонецЕсли; ОткрытьФорму("РегистрСведений.Доверенности.ФормаЗаписи",СтруктураДанных,ЭтаФорма); КонецПроцедуры &НаСервереБезКонтекста Функция ЕстьЗаписьПоДоверенности(СтруктураЗаполнения) Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | ДоверенностиСрезПоследних.Период, | ДоверенностиСрезПоследних.Подписант |ИЗ | РегистрСведений.Доверенности.СрезПоследних(, Подписант = &Подписант) КАК ДоверенностиСрезПоследних"; Запрос.УстановитьПараметр("Подписант", СтруктураЗаполнения.Подписант); Результат = Запрос.Выполнить(); Выборка = Результат.Выбрать(); Пока Выборка.Следующий() Цикл СтруктураЗаполнения.Период=Выборка.Период; Возврат Истина; КонецЦикла; Возврат Ложь; КонецФункции |