Каталог решений - Программное создание колонок в табличной части документа и сохранение значений в этом же документе

Программное создание колонок в табличной части документа и сохранение значений в этом же документе

Программное создание колонок в табличной части документа и сохранение значений в этом же документе

В наличии

Данный пример показывает, как программно создать колонку в табличной части любого документа в любой конфигурации и сохранить значения в этом же документе на платформе версии 8.3. Многие сталкиваются с проблемой, что при проведении документа значения из программно созданной колонки исчезают с формы. Пример же покажет, как сделать так, чтобы значения не исчезали при проведении документа, а при открытии документа обратно вставлялись в программно созданную колонку табличной части. Данный способ будет работать в расширении тоже.

Категория:

Описание

Конфигурация информационной базы PrimerProgramnayaColonka.cf, которая на примере показывает, как программно создать колонку в табличной части документа и как сохранить значения в этом же самом документе без использования регистров и прочего. 

1. В самом документе необходимо создать реквизит, например, с именем "ДанныеТабЧастьНоменклатура" с типом "ХранилищеЗначения". В этот реквизит и будут записываться значения из программно созданной колонки.

2. В форме документа создаем процедуру ПриСозданииНаСервере. В ней программно создаем колонку табличной части "Тест3" и типом "Число":

нРеквизиты = Новый Массив;
нРеквизиты.Добавить(Новый РеквизитФормы("Тест3", Новый ОписаниеТипов("Число"), "Объект.Номенклатура", "Тест3", Истина));
ЭтаФорма.ИзменитьРеквизиты(нРеквизиты);
	 
нЭлемент = Элементы.Добавить("Тест3", Тип("ПолеФормы"), Элементы.Номенклатура); 
нЭлемент.Вид = ВидПоляФормы.ПолеВвода; 
нЭлемент.ПутьКДанным = "Объект.Номенклатура.Тест3";

3. В форме документа создаем процедуру ПередЗаписьюНаСервере, с помощью которой и запишем в реквизит ДанныеТабЧастьНоменклатура саму программно созданную колонку табличной части "Тест3" и ее значения.

&НаСервере
Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)

	ТекущийОбъект.ДанныеТабЧастьНоменклатура = Новый ХранилищеЗначения(Объект.Номенклатура.Выгрузить()); 	
	ТекущийОбъект.Записать();

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

4. После пункта номер 3 значения сотрутся из программной колонки "Тест3", но запишутся в реквизит ДанныеТабЧастьНоменклатура, чтобы обратно вернуть значения колонки на форму, используем следующий код:

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

Все готово.

Тестирование проводилось на релизе платформы: 1С:Предприятие 8.3 (8.3.13.1690). Библиотека стандартных подсистем не требуется. 

has been added to your cart:
Оформление заказа