|
как поправить измерение у регистра перед записью? |
☑ |
0
tmk315
02.02.21
✎
09:48
|
В модуле регистра перехватил перед записью ,
поправил измерение .
На отбор ругается .
|
|
1
Ёпрст
гуру
02.02.21
✎
09:52
|
ну дык установи его правильно
|
|
2
Фрэнки
02.02.21
✎
09:53
|
даже боюсь код спросить... если спросишь, то как вывалит простыню метров на 10 :-)
|
|
3
tmk315
02.02.21
✎
09:53
|
Пробовал , недоступно для записи . Подскажи как ?
|
|
4
Капитан Джек Воробей
02.02.21
✎
09:53
|
(0) убери с отбора измерение которое меняешь, перебери в цикле с условием твоего измерения там и поменяй
|
|
5
tmk315
02.02.21
✎
09:54
|
СвТер=ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Код территории (Территории)");
//НаборЗаписей = РегистрыСведений.грНачисленияСотрудников.СоздатьНаборЗаписей();
//НаборЗаписей.Отбор.ID.Установить(УИД);
//НаборЗаписей.Прочитать();
НаборЗаписей=ЭтотОбъект;
Для каждого Запись Из НаборЗаписей Цикл
КПП=Запись.ПодразделениеОрганизации.РегистрацияВНалоговомОргане.КПП;
Для каждого сДопРек Из Запись.ВидРабот.ДополнительныеРеквизиты Цикл
Если сДопРек.Свойство=СвТер Тогда
КодТер=сДопРек.Значение;
Иначе
КонецЕсли;
КонецЦикла;
Если ЗначениеЗаполнено(КодТер) Тогда
ТехТер=НайтиТериторию(КПП,КодТер,СвТер);
НаборЗаписей.Отбор.ТехническаяТерритория=ТехТер;
Запись.ТехническаяТерритория=ТехТер;
Иначе
КонецЕсли;
КонецЦикла;
//НаборЗаписей.Записать();
|
|
6
Капитан Джек Воробей
02.02.21
✎
09:59
|
(5)НаборЗаписей.Отбор.ТехническаяТерритория.Установить(ТехТер)
|
|
7
tmk315
02.02.21
✎
10:17
|
Спасибо . Работает.
|
|