Этюд: Редактирование булево значения в форме списка не открывая формы элемента

19.11.08

Разработка - Работа с интерфейсом

Есть: Табличное поле с типом значения *Список, у объекта есть реквизит с типом булево. Требуется: Редактировать значение реквизита не открывая формы элемента.

Для реализации потребуются два события элемента управления табличное поле

1. ПриПолученииДанных
Размещение флажка и значения флажка в ячейке табличного поля
2. ПриИзмененииФлажка
Получение и изменение значения объекта

Пример:
В справочнике есть реквизит "закрыт".

Процедура СправочникСписокПриИзмененииФлажка(Элемент, Колонка)
	
	Строка = Элемент.ТекущиеДанные;
	Если Строка <> Неопределено Тогда
		Ссылка = Строка.Ссылка;
		Если Не Ссылка.ЭтоГруппа Тогда
			Объект = Ссылка.ПолучитьОбъект();
			Объект.Закрыт = Не Объект.Закрыт;
			Объект.Записать();
		КонецЕсли;
	КонецЕсли;

КонецПроцедуры

Процедура СправочникСписокПриПолученииДанных(Элемент, ОформленияСтрок)
	
	Колонка = Элемент.Колонки.Найти("Закрыт");
	Если Колонка <> Неопределено И Колонка.Видимость Тогда
		Для Каждого ОформлениеСтроки Из ОформленияСтрок Цикл
			ДанныеСтроки = ОформлениеСтроки.ДанныеСтроки;
			Если ДанныеСтроки = Неопределено Тогда
				Продолжить;
			КонецЕсли;
			Ссылка = ДанныеСтроки.Ссылка;
			Если Не Ссылка.ЭтоГруппа Тогда
				ОформлениеСтроки.Ячейки.Закрыт.УстановитьФлажок(Ссылка.Закрыт);
			КонецЕсли;
		КонецЦикла;
КонецПроцедуры


P.S. Особенность внесения изменений в существующие формы: в свойстве "данные флажка" колонки табличного поля должно быть пустое значение.


пример

См. также

Работа с интерфейсом Рабочее место Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Платные (руб)

Богатый редактор картинок 1С предназначен для обработки изображений в режиме «Предприятие», с возможностью РИСОВАТЬ на них. Поддерживается работа как в обычных формах (толстый клиент) так и на управляемых формах (тонкий клиент). Обработка позволяет редактировать как картинки, хранимые в базе, так и графические файлы с диска на файловой системе. Помимо базовых функций (изменение размеров, преобразование формата, обрезание картинки, повороты и т.п.) – редактор имеет богатый набор инструментов для рисования. Доступна функция вставки изображения из буфера обмена. Объект может быть использован: на стороне клиента, на стороне сервера, из внешнего соединения. Обработка будет особенно полезна тем, кто вносит картинки в базу (изображения номенклатуры, фотографии физических лиц и т.п.). Функционал реализуется с использованием JavaScript и бесплатного ПО ImageMagick (без использования внешних компонент).

6000 руб.

16.01.2015    63100    44    59    

82

Работа с интерфейсом Программист Платформа 1С v8.3 Конфигурации 1cv8 1С:ERP Управление предприятием 2 Платные (руб)

Обработка предназначена для создания и управления дашбордами.

2400 руб.

29.06.2020    18969    26    6    

41

Работа с интерфейсом Программист Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Россия Платные (руб)

Редактор графов в 1С - внешний отчет, который формирует графы на основе таблицы значений, используя рисунки табличного документа. Есть возможность добавления, редактирования объектов графа и выгрузки результата в таблицу значений.

1500 руб.

06.10.2020    10330    7    7    

10

WEB-интеграция Универсальные функции Механизмы платформы 1С Программист Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

При работе с интеграциями рано или поздно придется столкнуться с получением JSON файлов. И, конечно же, жизнь заставит проверять файлы перед тем, как записывать данные в БД.

28.08.2023    15109    YA_418728146    7    

169

Пакетная печать Печатные формы Адаптация типовых решений Универсальные функции Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Абонемент ($m)

Расширение для программ 1С:Управление торговлей, 1С:Комплексная автоматизация, 1С:ERP, которое позволяет распечатывать печатные формы для непроведенных документов. Можно настроить, каким пользователям, какие конкретные формы документов разрешено печатать без проведения документа.

2 стартмани

22.08.2023    3673    57    progmaster    8    

4

Работа с интерфейсом Программист Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

"MVC плохо применима в 1С" - познакомьтесь с моделью состояния и, возможно, ваше мнение поменяется! Представленное решение является эволюционным развитием идеи реализации MVC для 1С. В новой версии добавлены DSL для описания модели состояния, а также параметризация свойств параметров и элементов формы.

1 стартмани

05.07.2022    6067    kalyaka    6    

33
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. kisser 2 31.01.17 08:07 Сейчас в теме
Для варианта редактирования списка документов.

В реквизиты добавлено "Оплачено" - тип булево и "ДатаОплаты" - тип дата.
На форме списка добавлены колонки "Оплачено" - тип "флажок" и "ДатаОплаты" - тип "поле календаря" без привязки к данным.

Процедура ДокументСписокПриПолученииДанных(Элемент, ОформленияСтрок)
        Колонка = Элемент.Колонки.Найти("Оплачено");
	Если Колонка <> Неопределено И Колонка.Видимость Тогда 
		Для Каждого ОформлениеСтроки Из ОформленияСтрок Цикл
			ДанныеСтроки = ОформлениеСтроки.ДанныеСтроки;
			Если ДанныеСтроки = Неопределено Тогда 
				Продолжить;
			КонецЕсли;
			Ссылка = ДанныеСтроки.Ссылка;
			ОформлениеСтроки.Ячейки.Оплачено.УстановитьФлажок(Ссылка.Оплачено);
			ОформлениеСтроки.Ячейки.ДатаОплаты.Значение = Ссылка.ДатаОплаты;
		КонецЦикла;
	КонецЕсли;
	
        --//--

КонецПроцедуры

Процедура ДокументСписокПриАктивизацииЯчейки(Элемент)
	Перем ДатаОплаты;
	Строка = Элемент.ТекущиеДанные;
	Если Элемент.ТекущаяКолонка.Имя = "ДатаОплаты" Тогда
        	Ссылка = Строка.Ссылка;
			Объект = Ссылка.ПолучитьОбъект();
			ВвестиДату(ДатаОплаты,"Введите дату оплаты.");
			Объект.ДатаОплаты = ДатаОплаты;
			Объект.Записать();
    КонецЕсли;
КонецПроцедуры

Процедура ДокументСписокПриИзмененииФлажка(Элемент, Колонка)
	Строка = Элемент.ТекущиеДанные;
	Если Колонка.Имя = "Оплачено" Тогда
        	Ссылка = Строка.Ссылка;
			Объект = Ссылка.ПолучитьОбъект();
			Объект.Оплачено = Не Объект.Оплачено;
			Если Объект.Оплачено = Ложь Тогда
				Объект.ДатаОплаты = "";	
			КонецЕсли;
			Объект.Записать();
	КонецЕсли;
КонецПроцедуры
Показать
casha777@mail.ru; Danil.Potapov; +2 Ответить
Оставьте свое сообщение