Перезаписать программно значение доп. реквизита типа булево в ложь Номенклатуры в УТ
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(3)
// "Иван Иваныч Иванов с утра ходит без штанов!" (С) "Афоня"
ФизЛицоСсылка = Справочники.ФизическиеЛица.НайтиПоНаименованию("Иван Иваныч Иванов", Истина);
Если ФизЛицоСсылка <> Неопределено Тогда
Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя","ХодитБезШтанов");
Если ЗначениеЗаполнено(Свойство) Тогда
СтрокаДопРеквизитов = ФизЛицоСсылка.ДополнительныеРеквизиты.Найти(Свойство, "Свойство");
Если СтрокаДопРеквизитов <> Неопределено Тогда
СтрокаДопРеквизитов.Значение = Истина;
КонецЕсли;
КонецЕсли;
КонецЕсли;
Показать
Я бы еще дополнил, если нет этой строки в ТЧ
(9)// "Иван Иваныч Иванов с утра ходит без штанов!" (С) "Афоня"
ФизЛицоСсылка = Справочники.ФизическиеЛица.НайтиПоНаименованию("Иван Иваныч Иванов", Истина);
Если ФизЛицоСсылка <> Неопределено Тогда
Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя","ХодитБезШтанов");
Если ЗначениеЗаполнено(Свойство) Тогда
СтрокаДопРеквизитов = ФизЛицоСсылка.ДополнительныеРеквизиты.Найти(Свойство, "Свойство");
Если СтрокаДопРеквизитов <> Неопределено Тогда
СтрокаДопРеквизитов.Значение = Истина;
Иначе
НоваяСтрока = ФизЛицоСсылка.ДополнительныеРеквизиты.Добавить();
НоваяСтрока.Свойство = Свойство;
НоваяСтрока.Значение = Истина;
КонецЕсли;
КонецЕсли;
КонецЕсли;
(9)// "Иван Иваныч Иванов с утра ходит без штанов!" (С) "Афоня"
ФизЛицоСсылка = Справочники.ФизическиеЛица.НайтиПоНаименованию("Иван Иваныч Иванов", Истина);
Если ФизЛицоСсылка <> Неопределено Тогда
Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя","ХодитБезШтанов");
Если ЗначениеЗаполнено(Свойство) Тогда
СтрокаДопРеквизитов = ФизЛицоСсылка.ДополнительныеРеквизиты.Найти(Свойство, "Свойство");
Если СтрокаДопРеквизитов <> Неопределено Тогда
СтрокаДопРеквизитов.Значение = Истина;
Иначе
НоваяСтрока = ФизЛицоСсылка.ДополнительныеРеквизиты.Добавить();
НоваяСтрока.Свойство = Свойство;
НоваяСтрока.Значение = Истина;
КонецЕсли;
КонецЕсли;
КонецЕсли;
(10) Ну да, наверное так будет лучше, но тогда уж:
Зачем две строки присваивания одного итого же?
// "Иван Иваныч Иванов с утра ходит без штанов!" (С) "Афоня"
ФизЛицоСсылка = Справочники.ФизическиеЛица.НайтиПоНаименованию("Иван Иваныч Иванов", Истина);
Если ФизЛицоСсылка <> Неопределено Тогда
Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя","ХодитБезШтанов");
Если ЗначениеЗаполнено(Свойство) Тогда
ФизЛицоОбъект = ФизЛицоСсылка.ПолучитьОбъект();
СтрокаДопРеквизитов = ФизЛицоОбъект.ДополнительныеРеквизиты.Найти(Свойство, "Свойство");
Если СтрокаДопРеквизитов = Неопределено Тогда
СтрокаДопРеквизитов = ФизЛицоОбъект.ДополнительныеРеквизиты.Добавить();
СтрокаДопРеквизитов.Свойство = Свойство;
КонецЕсли;
СтрокаДопРеквизитов.Значение = Истина;
ФизЛицоОбъект.Записать();
КонецЕсли;
КонецЕсли;
ПоказатьЗачем две строки присваивания одного итого же?
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот