Имя: Пароль:
1C
 
ERP 2.5 как отображать в связанных документах Заказа на производства наименование этапа
,
0 rizarus
 
31.05.24
09:41
Добрый день! При формировании в Заказе на производство связанных документов, формируется безликий перечень этапов (скрин 1). При этом у каждого этапа есть свое наименование (скрин 2). Возможно ли как то в перечне видеть этапы с названием, что бы можно было ориентироваться?
1 FIXXXL
 
31.05.24
09:47
(0) действие в лоб: подправить в модуле менеджера процедуру отображения представления
НО - это будет отражаться во всех местах

Ну или подкорявить отчет о связанных документах...
2 DJ Anthon
 
31.05.24
09:48
возможно. у меня этот отчет вообще весь переписан. общая форма СвязанныеДокументы, например, эта функция

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

    ПредставлениеОбъекта = Выборка.Представление;
    МетаданныеОбъекта = Выборка.Ссылка.Метаданные();

    Если ОбщегоНазначения.ЭтоДокумент(МетаданныеОбъекта) Тогда
        Если (Выборка.СуммаДокумента <> 0) И (Выборка.СуммаДокумента <> NULL) Тогда
            ПредставлениеОбъекта = ПредставлениеОбъекта
            + " " + НСтр("ru = 'на сумму';
            |en = 'in the amount of'")
            + " " + Выборка.СуммаДокумента
            + " " + Выборка.Валюта;
        КонецЕсли;
#Вставка
        Если МетаданныеОбъекта.Имя = "КорректировкаНазначенияТоваров" Тогда
            ПредставлениеОбъекта = ПредставлениеОбъекта + ?(Выборка.Ссылка.Товары.Количество() = 0, " - ПУСТАЯ",
                " " + ?(Выборка.Ссылка.Товары[0].НовоеНазначение.Пустая(), "- СНЯТИЕ - ", "- ПРИВЯЗКА - ") + Выборка.Ссылка.Товары[0].Склад);
        ИначеЕсли МетаданныеОбъекта.Реквизиты.Найти("СкладОтправитель") <> Неопределено И МетаданныеОбъекта.Реквизиты.Найти("СкладПолучатель") <> Неопределено Тогда
            ПредставлениеОбъекта = ПредставлениеОбъекта + " " + Выборка.Ссылка.СкладОтправитель + " -> " + Выборка.Ссылка.СкладПолучатель;
        ИначеЕсли МетаданныеОбъекта.Реквизиты.Найти("Склад") <> Неопределено Тогда
            Если МетаданныеОбъекта.Имя = "ЗаказКлиента" Тогда
                Транзит = Справочники.Склады.НайтиПоНаименованию("Москва транзит");
                Склады = Выборка.Ссылка.Товары.Выгрузить(
                    Выборка.Ссылка.Товары.НайтиСтроки(Новый Структура("ВариантОбеспечения", Перечисления.ВариантыОбеспечения.СоСклада)), "Склад");
                Склады.Свернуть("Склад");
                Склады.Колонки.Добавить("Приоритет", Новый ОписаниеТипов("Число"));
                Для Каждого СтрокаСклады Из Склады Цикл
                    Если Выборка.Ссылка.НачальныйСклад = СтрокаСклады.Склад Тогда
                        СтрокаСклады.Приоритет = 1;
                    ИначеЕсли Выборка.Ссылка.КонечныйСклад = СтрокаСклады.Склад Тогда
                        СтрокаСклады.Приоритет = 4;
                    ИначеЕсли Транзит = СтрокаСклады.Склад Тогда
                        СтрокаСклады.Приоритет = 3;
                    Иначе
                        СтрокаСклады.Приоритет = 2;
                    КонецЕсли;
                КонецЦикла;
                Склады.Сортировать("Приоритет");
                Для Каждого СтрокаСклады Из Склады Цикл
                    ПредставлениеОбъекта = ПредставлениеОбъекта + " " + ДР_ОбщийМодульСервер.СкладКратко(СтрокаСклады.Склад);
                КонецЦикла;
            ИначеЕсли МетаданныеОбъекта.Имя = "СчетФактураВыданный" Тогда
                ПредставлениеОбъекта = ПредставлениеОбъекта +
                    ?(Выборка.Ссылка.ДокументОснование.Метаданные().Реквизиты.Найти("Склад") = Неопределено, "", " " + Выборка.Ссылка.ДокументОснование.Склад);
            Иначе
                ПредставлениеОбъекта = ПредставлениеОбъекта + " " + Выборка.Ссылка.Склад;
            КонецЕсли;
        КонецЕсли;
        Если МетаданныеОбъекта.Реквизиты.Найти("Получатель") <> Неопределено Тогда
            ПредставлениеОбъекта = ПредставлениеОбъекта + " -> " + Выборка.Ссылка.Получатель;
        КонецЕсли;
        Если МетаданныеОбъекта.Реквизиты.Найти("Статус") <> Неопределено Тогда
            ПредставлениеОбъекта = ПредставлениеОбъекта + " / " + ?(Выборка.Ссылка.ПометкаУдаления, "УДАЛЁН",
                ?(МетаданныеОбъекта.Имя = "РеализацияТоваровУслуг", ?(Выборка.Ссылка.Отпустил.Пустая(), ВРЕГ(Выборка.Ссылка.Статус), "ОТГРУЖЕН"), ВРЕГ(Выборка.Ссылка.Статус)));
        КонецЕсли;
        Если МетаданныеОбъекта.Реквизиты.Найти("Назначение") <> Неопределено Тогда
            Возврат Новый Структура("ПредставлениеОбъекта,Валюта", ПредставлениеОбъекта, Выборка.Ссылка.Назначение);
        КонецЕсли;
        //Если МетаданныеОбъекта.Имя = "ЗаказКлиента" Тогда
        //    ПредставлениеОбъекта = ЗаголовокТранзит(Выборка.Ссылка) + " " + ПредставлениеОбъекта;
        //КонецЕсли;
    ИначеЕсли Истина Тогда
        ПредставлениеОбъекта = ПредставлениеОбъекта + " (" + ОбщегоНазначения.ПредставлениеОбъекта(МетаданныеОбъекта) + ")";
        Если МетаданныеОбъекта.Имя = "Назначения" Тогда
            Если Выборка.Ссылка.Заказ.Метаданные().Имя = "ЗаказКлиента" Тогда
                ПредставлениеОбъекта = ДР_ОбщийМодульСервер.ЗаголовокТранзит(Выборка.Ссылка.Заказ, " > ", "", Истина) + " " + ПредставлениеОбъекта;
            КонецЕсли;
        КонецЕсли;
#КонецВставки
    Иначе
        ПредставлениеОбъекта = ПредставлениеОбъекта + " (" + ОбщегоНазначения.ПредставлениеОбъекта(МетаданныеОбъекта) + ")";
    КонецЕсли;

    Возврат ПредставлениеОбъекта;

КонецФункции
3 Мультук
 
гуру
31.05.24
09:52
(0)

Идём в модуль "СтруктураПодчиненностиПереопределяемый"

И пишем что-то вроде

Процедура ПриПолученииПредставления(ТипДанных, Данные, Представление, СтандартнаяОбработка) Экспорт
    
    Если типЗнч(Данные.ссылка) = тип("ДокументСсылка.ЗаказНаПеремещение")
    или типЗнч(Данные.ссылка) = тип("ДокументСсылка.ПеремещениеТоваров") Тогда
    
    пСтр = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Данные.ссылка, "СкладОтправитель,СкладПолучатель");
    
    Представление = стрШаблон("%1  %2 -> %3", Данные.Представление, пСтр.СкладОтправитель, пСтр.СкладПолучатель);
    СтандартнаяОбработка = Ложь;
     Конецесли;    

    
КонецПроцедуры
4 WebberNSK
 
31.05.24
09:54
А чего не хватает в отчете Структура заказа? Или в других рабочих местах?
5 rizarus
 
31.05.24
09:55
Может есть варианты когда не требуется привлечение программиста?
6 FIXXXL
 
31.05.24
09:55
(2) не тормозит? :)
7 Мультук
 
гуру
31.05.24
10:02
(5)

>> Может есть варианты когда не требуется привлечение программиста?

Как без программиста?
Ну нет. "Ради этого всё и затевалось"(с)
8 rizarus
 
31.05.24
10:04
(4) Может быть как вариант Структура заказа. Спасибо за мысль
9 DJ Anthon
 
31.05.24
10:09
(5) ерп без программиста?? )) а вы экстремалы
10 Krendel
 
31.05.24
12:02
(9) ЕРП можно настроить в примитивную конфу, нафига там тебе прог?
11 DJ Anthon
 
31.05.24
12:07
(10) тогда почему бы не использовать примитивную конфу? даже в зуп и в бухии надо постоянно вмешиваться программисту, не представляю себе ут, ка и ерп без вмешательства. тогда это будет просто учебная база
12 Krendel
 
31.05.24
12:10
(11) В ЗУП посчитай мне просрочку по дебиторке
Компьютеры — это как велосипед. Только для нашего сознания. Стив Джобс