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

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

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

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