Проект

Общее

Профиль

Структура подчиненности (связанные объекты) » История » Версия 1

Всеволод Дорофеев, 15.09.2025 17:19

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