Имя: Пароль:
1C
1С v8
Можно ли в ПередЗаписьюНаСервере добавить строку в ТЧ
0 smirnoww
 
07.04.13
14:12
Как это сделать?

&НаСервере
Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
   ...
   НовыйЛотВТЧ = Объект.Лоты.Добавить();
   НовыйЛотВТЧ.Лот = НовыйЛотВСпр.Ссылка;
КонецПроцедуры

Не прокатывает, хотя если в первый раз сделать отказ, то на форме новая запись появляется и со второго раза записывается

&НаСервере
Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
   ...
   НовыйЛотВТЧ = Объект.Лоты.Добавить();
   НовыйЛотВТЧ.Лот = НовыйЛотВСпр.Ссылка;
   Если Объект.ЗаписываемПервыйРаз Тогда
       Отказ = Истина ;
       Объект.ЗаписываемПервыйРаз = Ложь;
   КонецЕсли;
КонецПроцедуры
1 Ns33
 
07.04.13
14:24
Используй ТекущийОбъект, а еще лучше в модуле объекта.