Имя: Пароль:
1C
1С v8
В веб-клиент не сохраняются внесенные изменения реквизитов
0 ManInCity
 
15.11.12
02:31
Конфигурация самописная, форма управляемая, платформа 8.2.16.368.
В веб клиенте не сохраняются внесенные изменения, в тонком клиент данные сохраняются.
  На форме обработки расположен реквизит Магазин(тип Справочник Магазины), у которого есть реквизит Директор(тип СправСсылка.ФизЛица), если добавлять на форму реквизит МагазинДиректор, то редактирование реквизит МагзинДиректор запрещено.
  Делаю следующим образом: добавляю в обработку новый реквизит Директор(Тип Справочник ФизЛица), добавляю его на форму. В событиях указываю следующее:

События: ДиректорПриИзменении().

Текст процедур:

&НаКлиенте
Процедура ДиректорПриИзменении(Элемент)
   ИзменитьДиректора(Элемент.ТекстРедактирования);
КонецПроцедуры

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

Подскажите в чем ошибка? Или же подход к решению неправильный, тогда каким образом лучше реализовать данную возможность редактирования реквизита  на форме обработки, при работе через веб клиент?
1 ManInCity
 
15.11.12
03:08
Помогите пожалуйста!!!
2 Noroving
 
15.11.12
03:26
&НаКлиенте
Процедура ДиректорПриИзменении(Элемент)
   ИзменитьДиректораСервер();
КонецПроцедуры

&НаСервере
Процедура ИзменитьДиректораСервер()

   Справ = Объект.Магазин.Ссылка.ПолучитьОбъект();
   Справ.Директор = Директор;
   Если ТекстРедакт = "" Тогда
       Справ.Директор = Справочники.ФизическиеЛица.ПустаяСсылка();
   КонецЕсли;
   Справ.Записать();

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

Нащет веб клиента не знаю. Не работал)
3 Noroving
 
15.11.12
03:27
&НаСервере
Процедура ИзменитьДиректораСервер()

   Справ = Объект.Магазин.Ссылка.ПолучитьОбъект();
   Справ.Директор = Директор;
   Справ.Записать();

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

поправочка)
4 ManInCity
 
15.11.12
03:44
Спасибо!!! Заработало.

&НаКлиенте
Процедура ДиректорПриИзменении(Элемент)
   ИзменитьДиректораСервер();
КонецПроцедуры


&НаКлиенте
Процедура ДиректорПриИзменении(Элемент)
   ИзменитьДиректора();
КонецПроцедуры

&НаСервере
Процедура ИзменитьДиректора()
   
   Справ = Объект.Магазин.Ссылка.ПолучитьОбъект();
   Справ.Директор = Объект.Директор;
   Справ.Записать();
   
КонецПроцедуры
5 ManInCity
 
15.11.12
03:45
&НаКлиенте
Процедура ДиректорПриИзменении(Элемент)
   ИзменитьДиректора();
КонецПроцедуры

&НаСервере
Процедура ИзменитьДиректора()
   
   Справ = Объект.Магазин.Ссылка.ПолучитьОбъект();
   Справ.Директор = Объект.Директор;
   Справ.Записать();
   
КонецПроцедуры