Набор функций можно встроить, например, в ОбщийМодуль и получить массив документов подчинения. иногда выводит документов больше, чем штатный механизм.
На примере в черной рамочке это все один документ Заказ клиента, выведенный 1С в дерево. Снизу то, что выводит мой механизм. Да, он медленнее, чем штатный. Кто захочет оптимизировать - берите, делайте.
Старт функции
Функция ПолучитьДеревоПодчиненности(_ссылка) экспорт
Кусочек кода для заполнения счета-фактуры на аванс для УПД
ПлатежноРасчетныеДокументы.Очистить();
мПКО=новый массив;
мБн=новый массив;
для каждого стр из СписокОснований цикл
м=HelmerСервер.ПолучитьДеревоПодчиненности(стр.Значение);//массив подчин док
Для каждого стр1 из м цикл
Если ТипЗнч(стр1)=тип("ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств") тогда
мБн=HelmerСервер.ПолучитьДеревоПодчиненности(стр1);
п=ПлатежноРасчетныеДокументы.Добавить(); //оплата
п.НомерПлатежноРасчетногоДокумента=стр1.НомерВходящегоДокумента;
п.ДатаПлатежноРасчетногоДокумента=стр1.ДатаВходящегоДокумента;
п.док=стр1;
ИначеЕсли ТипЗнч(стр1)=тип("ДокументСсылка.ПриходныйКассовыйОрдер") тогда
мПКО=HelmerСервер.ПолучитьДеревоПодчиненности(стр1);
п=ПлатежноРасчетныеДокументы.Добавить(); //оплата
п.НомерПлатежноРасчетногоДокумента=ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(стр1.Номер);
п.ДатаПлатежноРасчетногоДокумента=стр1.Дата;
п.док=стр1;
КонецЕсли;
КонецЦикла;
КонецЦикла;
С совместимостью конфигураций не стал заморачиваться. Еще раз - будет работать там, где есть возможность построить запрос
Просьба не писать неконструктивную критику в ветке публикации, типа да, я делал и у меня круче! Если есть чем поделиться - делись кодом, пойдет на пользу общества. стоимость такая - беру за потраченное время на оформление публикации. В инете много воды на эту тему - а рабочих вариантов для своих нужд я не нашел.
Проверено на следующих конфигурациях и релизах:
- Управление торговлей, редакция 11, релизы 11.4.14.181
Вступайте в нашу телеграмм-группу Инфостарт
