![]() |
Программная установка параметров в СКД Подскажите как программно установить параметры НачалоПериода и ОкончаниеПериода в СКД при открытии формы? |
Если на форме, то Процедура ПриОткрытии НачалоПериода=НачПер; ОкончаниеПериода=КонПер; КонецПроцедуры А если передавать внутрь то что то типа Если КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ДатаНачала").Использование = Истина Тогда НачПериода = КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ДатаНачала").Значение; КонецЕсли; Если КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ДатаОкончания").Использование = Истина Тогда КонПериода = КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ДатаОкончания").Значение; КонецЕсли; И затем КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ДатаНачала").Использование = Истина; Если ЗначениеЗаполнено(НачПериода) Тогда КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ДатаНачала").Значение = НачПериода; Иначе КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ДатаНачала").Значение = Неопределено; КонецЕсли; КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ДатаОкончания").Использование = Истина; Если ЗначениеЗаполнено(КонПериода) Тогда КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ДатаОкончания").Значение = КонецДня(КонПериода); Иначе КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ДатаОкончания").Значение = Неопределено; КонецЕсли; Где то так.... |
Текущее время: 18:43. Часовой пояс GMT +3. |