Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
05 мая 2024, 20:00

Хранилище настроек

Автор Rasty, 26 мар 2015, 17:23

0 Пользователей и 1 гость просматривают эту тему.

Rasty

УТ 11.1
Ошибка при заполнении ТЧ из хранилища

Процедура ПриОткрытииСерв()

КлючОбработки = РеквизитФормыВЗначение("Объект").Метаданные().ПолноеИмя();
Объект.ТЧ.Загрузить(ХранилищеОбщихНастроек.Загрузить(КлючОбработки,"ТЧЗаполненая"));

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

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

  КлючОбработки = РеквизитФормыВЗначение("Объект").Метаданные().ПолноеИмя();
  Настройки = Новый Соответствие;
  Настройки.Вставить("ТаблицаЗначений", Объект.ТЧ.Выгрузить());
  ХранилищеОбщихНастроек.Сохранить(КлючОбработки,"ТЧЗаполненая", Настройки);

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



Ну и ошибка

{Форма.Форма.Форма(231)}: Ошибка при вызове метода контекста (Загрузить)
Объект.ТЧ.Загрузить(ХранилищеОбщихНастроек.Загрузить(КлючОбработки,"ТЧЗаполненая"));
по причине:
Несоответствие типов (параметр номер '1')
Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

Rasty

Коме интересно вот рабочий код


&НаКлиенте
Процедура ПриОткрытии(Отказ)

ПриОткрытииСерв();

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

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

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

&НаКлиенте
Процедура ПриЗакрытии()
ПриЗакрытииНаСервере();
КонецПроцедуры

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

КонецПроцедуры
Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

k_aleks80

Мне пригодиться. Спасибо за информацию :btbzdb:

Rasty

а спасибо сказать? :)
Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

k_aleks80

Сказал. Вопрос вдогонку - как мне такое же спасибо сделать? :dfbsdfbsdf:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск