soxranenie_nastroek_polzovatelja_cherez_xranilische_obschix_nastroek [wiki.hostingcloud.com.ua]

Эта страница только для чтения. Вы можете посмотреть её исходный текст, но не можете его изменить. Сообщите администратору, если считаете, что это неправильно.
**Сохранение настроек пользователя через хранилище общих настроек под конкретного пользователя**
**Сохранение настроек через хранилище настроек общее для всех пользователей**
<code>
&НаСервере
Процедура ЗагрузитьНастройки()
	мНастройки	=	ОбщегоНазначения.ХранилищеОбщихНастроекЗагрузить("НастройкиОповещенийОЗаявкахСборкиРазборки","ТаблицаВариантовНастройкиОповещенийОЗаявкахСборкиРазборки",,,"ПользовательВариантовНастройкиОповещений");
	
	Если мНастройки<>Неопределено Тогда
		Если мНастройки.свойство("НастройкиОповещений") Тогда 
			Для Каждого стр из мНастройки.НастройкиОповещений Цикл 
				НоваяСтрока	=	НастройкиОповещений.Добавить();
				ЗаполнитьЗначенияСвойств(НоваяСтрока,стр);
			КонецЦикла;
		КонецЕсли;
	КонецЕсли;
			
КонецПроцедуры
</code>
<code>
&НаСервере
Процедура ЗагрузитьНастройки()
	
	мНастройки	=	ОбщегоНазначения.ХранилищеОбщихНастроекЗагрузить("НастройкиЗагрузкиСпецификацииНовойПочты",,,,ПараметрыСеанса.ТекущийПользователь);
	
	Если мНастройки<>Неопределено Тогда 
		ЗаполнитьЗначенияСвойств(ЭтотОбъект,мНастройки);
	КонецЕсли;
		
КонецПроцедуры
</code>

<code>
&НаСервере
Процедура СохранитьНастройки()
	
	мНастройки	=	Новый Структура;
	мНастройки.Вставить("excel_СтрокаНачала",excel_СтрокаНачала);
	мНастройки.Вставить("СтатьяРасходовВнутреннееПеремещение",СтатьяРасходовВнутреннееПеремещение);
	мНастройки.Вставить("СтатьяРасходовДляПередачиДокументов",СтатьяРасходовДляПередачиДокументов);
	мНастройки.Вставить("СтатьяРасходовОтгрузкаКлиентам",СтатьяРасходовОтгрузкаКлиентам);
	
	ОбщегоНазначения.ХранилищеОбщихНастроекСохранить("НастройкиЗагрузкиСпецификацииНовойПочты",,мНастройки,,ПараметрыСеанса.ТекущийПользователь);
	
КонецПроцедуры
</code>


<code>
&НаСервере
Процедура СохранитьНастройки()
	
	мНастройки	=	Новый Структура;
	мНастройки.Вставить("НастройкиОповещений",НастройкиОповещений.Выгрузить());
	
	ОбщегоНазначения.ХранилищеОбщихНастроекСохранить("НастройкиОповещенийОЗаявкахСборкиРазборки","ТаблицаВариантовНастройкиОповещенийОЗаявкахСборкиРазборки",мНастройки,,"ПользовательВариантовНастройкиОповещений");	
	
КонецПроцедуры
</code>

**Схожий матеріал:** [[rabota_s_xranilischem_obschix_nastroek|]]