Передать реквизит формы документа в форму списка
По теме из базы знаний
- Конфигурация "Весовая ред. 3.0" для Платформы 8.3
- Выделение документов в динамическом списке
- Меняем стандартную форму выбора для реквизита формы на свою форму с запросом
- Как вывести дополнительные реквизиты на форму списка справочника Графики работы сотрудников. Управляемые формы. Без снятия конфигурации с поддержки
- Неочевидные нюансы записи управляемой формы
Найденные решения
Была такая задача. В документ добавить реквизит "Возвращен ли оригинал документа в бухгалтерию". Добавили реквизит в документ. На форму списка добавили поляну "оригинал" с типом перечисления.ДаНет. И взависимости от этого реквизита подсвечивали строки в списке документов. Вот такой код:
Если конечно я Вас правильно понял. Данная процедура написана была для УТП 1.2
Процедура ДокументСписокПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
Док = ДанныеСтроки.Ссылка.ПолучитьОбъект();
Если Док.ОригиналДаНет = 1 Тогда
ОформлениеСтроки.Ячейки.СтатусДокумента.Текст = "Оригинал";
ОформлениеСтроки.Ячейки.СтатусДокумента.ОтображатьТекст = Истина;
ОформлениеСтроки.Ячейки.СтатусДокумента.ЦветФона = WebЦвета.БледноЗеленый;
Иначе
ОформлениеСтроки.Ячейки.СтатусДокумента.Текст = "Нет";
ОформлениеСтроки.Ячейки.СтатусДокумента.ОтображатьТекст = Истина;
ОформлениеСтроки.Ячейки.СтатусДокумента.ЦветФона = WebЦвета.БледноКрасноФиолетовый;
КонецЕсли;
КонецПроцедуры
ПоказатьЕсли конечно я Вас правильно понял. Данная процедура написана была для УТП 1.2
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Была такая задача. В документ добавить реквизит "Возвращен ли оригинал документа в бухгалтерию". Добавили реквизит в документ. На форму списка добавили поляну "оригинал" с типом перечисления.ДаНет. И взависимости от этого реквизита подсвечивали строки в списке документов. Вот такой код:
Если конечно я Вас правильно понял. Данная процедура написана была для УТП 1.2
Процедура ДокументСписокПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
Док = ДанныеСтроки.Ссылка.ПолучитьОбъект();
Если Док.ОригиналДаНет = 1 Тогда
ОформлениеСтроки.Ячейки.СтатусДокумента.Текст = "Оригинал";
ОформлениеСтроки.Ячейки.СтатусДокумента.ОтображатьТекст = Истина;
ОформлениеСтроки.Ячейки.СтатусДокумента.ЦветФона = WebЦвета.БледноЗеленый;
Иначе
ОформлениеСтроки.Ячейки.СтатусДокумента.Текст = "Нет";
ОформлениеСтроки.Ячейки.СтатусДокумента.ОтображатьТекст = Истина;
ОформлениеСтроки.Ячейки.СтатусДокумента.ЦветФона = WebЦвета.БледноКрасноФиолетовый;
КонецЕсли;
КонецПроцедуры
ПоказатьЕсли конечно я Вас правильно понял. Данная процедура написана была для УТП 1.2
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот