Имя: Пароль:
1C
1С v8
Выбор стандартного периода
0 Dimon1C
 
05.08.15
13:50
Подскажите как сделать интерактивный выбор стандартного периода:

Что-то типа такого:

ВыбПериод = Новый СтандартныйПериод;
Если ВвестиЗначение(ВыбПериод) Тогда
...
1 trooba
 
05.08.15
13:54
&НаКлиенте
Процедура ВыбратьПериодНажатие(Элемент)
    
    Диалог = Новый ДиалогРедактированияСтандартногоПериода();
        
    СтандартныйПериод = Новый СтандартныйПериод();

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


&НаКлиенте
Процедура ОбработкаВыбораПериода(Период,Параметры) Экспорт

    Если Период <> Неопределено Тогда
        
        Объект.НачалоПериода = Период.ДатаНачала;
        Объект.КонецПериода = Период.ДатаОкончания;
        
        
        
    КонецЕсли;

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