Сохранение данных

[sali]

я чет туплю в край. в обработке на форме нужно сохранять все данные. поэтому это сделано через процедуру "...ПриИзменении" клиент-сервер. некоторые из реквизитов были перенесены в табличную часть. сохраняю их так

Код Выделить Развернуть

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

ОрганизацияОбъект.АдресаГУИДов.Очистить();
Для каждого стр из АдресаГУИДовПользователя Цикл

НоваяСтрока = ОрганизацияОбъект.АдресаГУИДов.Добавить();
ЗаполнитьЗначенияСвойств(НоваяСтрока, стр);
//НоваяСтрока.Дис1_Выгружать = стр.Выгружать;
//НоваяСтрока.Дис1_НаименованиеТорговойТочки = Стр.НаименованиеТорговойТочки;
//НоваяСтрока.Дис1_deviceID = стр.deviceID;

конеццикла;

ОрганизацияОбъект.Записать();

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


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

при открытии формы получаю это. то есть если я удалял строки и заново добавлял мне возвращались предыдущие и новые данные. ТЧ - рекизит формы.

Код Выделить Развернуть

&НаСервере
Процедура ПриОткрытииНаСервере()
//Пользователь = Пользователи.НайтиПоИмени(ИмяПользователя());
//Организация = ЗначениеНастроекПовтИсп.ПолучитьОрганизациюПользователяПоУмолчанию(Пользователь);
Организация = ЗначениеНастроекПовтИсп.ПолучитьОрганизациюПоУмолчанию(,Пользователи.ТекущийПользователь());
АдресСервераЭДО = Организация.Дис1_АдресСервераЭДО;
    ГуидКлиентаЭДО = Организация.Дис1_ГуидКлиентаЭДО;
ВидДК = Организация.Дис1_ВидДК;
БонуснаяПрограммаЛояльности = Организация.Дис1_БонуснаяПрограммаЛояльности;
РазрядностьОкругленияБонусов = Организация.Дис1_РазрядностьОкругленияБонусов;
ГуидТорговойТочки = Организация.Дис1_ГуидТорговойТочки;

НоваяСтрока = АдресаГУИДовПользователя.Добавить();
ЗаполнитьЗначенияСвойств(НоваяСтрока,  Организация.АдресаГУИДов);


//НаименованиеТорговойТочки = Организация.Дис1_НаименованиеТорговойТочки;
//deviceID = Организация.Дис1_deviceID;
ВидЦенЭДО = справочники.видыцен.найтипонаименованию("Розничная цена", истина); //Организация.Дис1_ВидЦенЭДО;
//СкладЭДО = Организация.Дис1_СкладЭДО;
КонецПроцедуры
[attach id=47540]Снимок экрана 2025-09-25 165059.png[/attach][attach id=47542]Снимок экрана 2025-09-25 165120.png[/attach] 

[sali]

закрыто для обсуждений!