Имя: Пароль:
1C
1С v8
Структура подчинённости, новый документ в расширении
0 picom
 
19.06.24
09:17
Приветствую!

https://wonderland.v8.1c.ru/blog/razvitie-rasshireniy-dobavlenie-biznes-protsessov-i-zadach-i-drugie-dorabotki/

тут написано, что на 25 платформе жизнь наладится, но что-то не взлетает( 🤦

как в современном мире (УНФ 3.0.6) добавить документ расширения в цепочку структуры подчиненности и вывести кнопку вывода структуры в этот документ по версии БСП?
1 spiller26
 
19.06.24
09:25
(0) А версия БСП какая должна быть при этом всём?
2 Ненавижу 1С
 
19.06.24
09:27
(0) запускали в режиме ЗапуститьОбновлениеИнформационнойБазы?
3 picom
 
19.06.24
09:48
(2) да там даже при заимствовании структуры подчинённости в расширение тянет все объекты цепочкой ....
А потом еще и не видит добавленный реквизит в документ
4 picom
 
19.06.24
09:50
И где взять пример, файл "Расширение связанные документы"
в описании про него сказано, а в составе нету...
5 DJ Anthon
 
19.06.24
10:02
(0) правится пара запросов, все летает уже не один год.
6 picom
 
19.06.24
10:07
(5) не верю, структура последнее время часто меняется.
через #Изменения все отлетает
7 DJ Anthon
 
19.06.24
10:12
(6) может, мы про разные вещи говорим

общая форма СвязанныеДокументы

для просто чтобы работало

&НаСервере
&ИзменениеИКонтроль("ВывестиРодительскиеОбъекты")
Процедура ДР_ВывестиРодительскиеОбъекты

&НаСервере
&ИзменениеИКонтроль("ОбъектыПоКритериюОтбора")
Функция ДР_ОбъектыПоКритериюОтбора

для красоты

&НаСервере
&ИзменениеИКонтроль("ВывестиПредставлениеИКартинку")
Процедура ДР_ВывестиПредставлениеИКартинку

&НаСервере
&ИзменениеИКонтроль("ВывестиТекущийОбъект")
Процедура ДР_ВывестиТекущийОбъект

&НаСервере
&ИзменениеИКонтроль("ДобавитьСтрокуВДерево")
Функция ДР_ДобавитьСтрокуВДерево

а вот до этого 1с вообще не додумалась
&НаКлиенте
Процедура Назад

&НаКлиенте
Процедура Вперед(


но это на ERP. сомневаюсь, что на унф сложнее. или это теперь платформенная фича?
8 DJ Anthon
 
19.06.24
10:14
ну поправилась структура - залез в запросики, подправил под себя снова и профит. вот пример

&НаСервере
&ИзменениеИКонтроль("ОбъектыПоКритериюОтбора")
Функция ДР_ОбъектыПоКритериюОтбора(ЗначениеКритерияОтбора)

    Если Не Метаданные.КритерииОтбора.СвязанныеДокументы.Тип.СодержитТип(ТипЗнч(ЗначениеКритерияОтбора))  Тогда
#Вставка
        Если СокрЛП(ТипЗнч(ЗначениеКритерияОтбора)) = "Перемещение товаров" Тогда
            УстановитьПривилегированныйРежим(Истина);

            Запрос = Новый Запрос;
            Запрос.Текст = "ВЫБРАТЬ РАЗЛИЧНЫЕ
            |    СвязанныеДокументы.Назначение
            |ИЗ
            |    Документ.ПеремещениеТоваров.Товары КАК СвязанныеДокументы
            |ГДЕ
            |    СвязанныеДокументы.Ссылка = &ЗначениеКритерияОтбора
            |ОБЪЕДИНИТЬ ВСЕ
            |ВЫБРАТЬ
            |    СвязанныеДокументы.Назначение
            |ИЗ
            |    Документ.ПеремещениеТоваров КАК СвязанныеДокументы
            |ГДЕ
            |    СвязанныеДокументы.Ссылка = &ЗначениеКритерияОтбора
            |ОБЪЕДИНИТЬ ВСЕ
            |ВЫБРАТЬ
            |    СвязанныеДокументы.НазначениеТранзит
            |ИЗ
            |    Документ.ПеремещениеТоваров.Товары КАК СвязанныеДокументы
            |ГДЕ
            |    СвязанныеДокументы.Ссылка = &ЗначениеКритерияОтбора";

            Запрос.УстановитьПараметр("ЗначениеКритерияОтбора", ЗначениеКритерияОтбора);
            Возврат Запрос.Выполнить().Выгрузить();
        Иначе
            Возврат Неопределено;
        КонецЕсли;
    ИначеЕсли Ложь Тогда
#КонецВставки
        Возврат Неопределено;
    КонецЕсли;
9 picom
 
19.06.24
10:19
Вопрос закрыт

на 8.3.25.1286 все работает как в ссылке шапки, все норм и без кода. 🔥

режим совместимости 8.3.21
2 + 2 = 3.9999999999999999999999999999999...