Сохранить значения формы

&НаСервере

Процедура СохранитьЗначенияФормы()

ПараметрыФормы = Новый Структура;

ПараметрыФормы.Вставить("ДатаВыгрузки", Объект.ДатаВыгрузки);

ПараметрыФормы.Вставить("rrc", Объект.rrc);

ХранилищеОбщихНастроек.Сохранить("ВыгрузкаВРозетку","ПараметрыФормы",ПараметрыФормы, , Пользователи.ТекущийПользователь());

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

&НаСервере

Процедура ВосстановитьЗначенияФормы()

ПараметрыФормы = ХранилищеОбщихНастроек.Загрузить("ВыгрузкаВРозетку","ПараметрыФормы");

Если ПараметрыФормы = Неопределено Тогда 

            Возврат; 

КонецЕсли; 

Если ПараметрыФормы.Свойство("ДатаВыгрузки ") Тогда

Объект.Товары.Загрузить(ПараметрыФормы.Товары);

КонецЕсли;  

Если ПараметрыФормы.Свойство("rrc") Тогда

Объект.rrc = ПараметрыФормы.rrc;

КонецЕсли;

КонецЕсли;

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

&НаКлиенте

Процедура ПриЗакрытии()

СохранитьЗначенияФормы();

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

&НаСервере

Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)

            ВосстановитьЗначенияФормы();

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