Проект

Общее

Профиль

Использование дополнительных реквизитов и сведений » История » Версия 4

Всеволод Дорофеев, 05.02.2017 14:14

1 1 Всеволод Дорофеев
h1. Использование дополнительных реквизитов и сведений
2 1 Всеволод Дорофеев
3 1 Всеволод Дорофеев
h3. Использование дополнительных реквизитов и сведений в БП 2.0
4 1 Всеволод Дорофеев
5 1 Всеволод Дорофеев
* Справочник ЗначенияСвойствОбъектов
6 1 Всеволод Дорофеев
* План видов характеристик НазначенияСвойствКатегорийОбъектов
7 1 Всеволод Дорофеев
* План видов характеристик СвойстваОбъектов
8 1 Всеволод Дорофеев
* Регистр сведений ЗначенияСвойствОбъектов
9 1 Всеволод Дорофеев
10 3 Всеволод Дорофеев
h3. Использование дополнительных реквизитов и сведений в БП 3.0, УТ11,..
11 1 Всеволод Дорофеев
12 1 Всеволод Дорофеев
* План видов характеристик ДополнительныеРеквизитыИСведения
13 1 Всеволод Дорофеев
* Справочник НаборыДополнительныхРеквизитовИСведений
14 1 Всеволод Дорофеев
* Регистр сведений ДополнительныеСведения
15 1 Всеволод Дорофеев
* Табличная часть "Дополнительные реквизиты" справочников и документов
16 1 Всеволод Дорофеев
17 1 Всеволод Дорофеев
Пример:
18 1 Всеволод Дорофеев
<pre>
19 1 Всеволод Дорофеев
	//получение доп.реквизита для объекта "Источник"
20 1 Всеволод Дорофеев
	ЭлементПВХ = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Серия", Истина);
21 1 Всеволод Дорофеев
	НайденнаяСтрока = Источник.ДополнительныеРеквизиты.Найти(ЭлементПВХ, "Свойство");
22 1 Всеволод Дорофеев
</pre>
23 2 Всеволод Дорофеев
24 2 Всеволод Дорофеев
<pre>
25 2 Всеволод Дорофеев
	//УТ11
26 2 Всеволод Дорофеев
	//Доп.сведение
27 2 Всеволод Дорофеев
	ЭлементПВХ = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Тип", Истина);
28 2 Всеволод Дорофеев
	МассивСвойств = новый массив;
29 2 Всеволод Дорофеев
	МассивСвойств.Добавить(ЭлементПВХ);	
30 2 Всеволод Дорофеев
	ТаблицаСвойств = УправлениеСвойствами.ПолучитьЗначенияСвойств(Источник, ложь, истина, МассивСвойств);
31 2 Всеволод Дорофеев
	НайденнаяСтрока = ТаблицаСвойств.Найти(ЭлементПВХ, "Свойство");
32 2 Всеволод Дорофеев
	Если не НайденнаяСтрока = Неопределено Тогда
33 2 Всеволод Дорофеев
		Значение = НайденнаяСтрока.Значение;
34 2 Всеволод Дорофеев
	КонецЕсли;
35 2 Всеволод Дорофеев
	
36 4 Всеволод Дорофеев
</pre>
37 2 Всеволод Дорофеев
38 4 Всеволод Дорофеев
<pre>
39 4 Всеволод Дорофеев
//Установка доп.реквизита Объекта
40 4 Всеволод Дорофеев
&НаСервере
41 4 Всеволод Дорофеев
Процедура УстановитьДополнительныйРеквизитОбъекта(Объект, ИмяРеквизита, ЗначениеРеквизита)
42 4 Всеволод Дорофеев
43 4 Всеволод Дорофеев
    ЭлПВХ_Ссылка = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Заголовок",ИмяРеквизита);
44 4 Всеволод Дорофеев
    Если ЭлПВХ_Ссылка.Пустая() Тогда
45 4 Всеволод Дорофеев
        Сообщить("Не найден доп. реквизит "+ИмяРеквизита+", значение не установлено!");
46 4 Всеволод Дорофеев
        Возврат;
47 4 Всеволод Дорофеев
    КонецЕсли;
48 4 Всеволод Дорофеев
49 4 Всеволод Дорофеев
    СтрДопРеквизиты = Объект.ДополнительныеРеквизиты.Найти(ЭлПВХ_Ссылка, "Свойство");
50 4 Всеволод Дорофеев
    Если СтрДопРеквизиты = Неопределено Тогда
51 4 Всеволод Дорофеев
        СтрДопРеквизиты = Объект.ДополнительныеРеквизиты.Добавить();
52 4 Всеволод Дорофеев
    КонецЕсли;
53 4 Всеволод Дорофеев
    СтрДопРеквизиты.Свойство = ЭлПВХ_Ссылка;
54 4 Всеволод Дорофеев
    СтрДопРеквизиты.Значение = ЗначениеРеквизита;
55 4 Всеволод Дорофеев
56 4 Всеволод Дорофеев
КонецПроцедуры
57 2 Всеволод Дорофеев
</pre>