Имя: Пароль:
1C
1С v8
Как вставить внешний отчет.
0 ЗлаяЗая
 
21.11.19
11:47
Конфигурация "Охрана труда."
Есть внешний отчет.
Вставила его в пункте меню "Дополнительные отчеты и обработки." Указала, в каком разделе он должен быть.
А вот в пункте "Отчеты" его не видно.
И в отчетах соответствующего раздела тоже.
Подскажите, пожалуйста, как сделать?
1 Beduin
 
21.11.19
11:47
Пользователя нужно указать
2 ЗлаяЗая
 
21.11.19
11:51
Это ответственный? Так он указан.
3 unenu
 
21.11.19
11:51
СведенияОВнешнейОбработке()
приведите код, возможно там перепутан вид
4 Darych
 
21.11.19
11:52
смотрите в пункте доп отчеты
5 Beduin
 
21.11.19
11:53
(2) Быстрый доступ
6 ЗлаяЗая
 
21.11.19
12:18
(3) Функция СведенияОВнешнейОбработке() Экспорт
    МетаданныеОбъекта = Метаданные();
    Версия = МетаданныеОбъекта.Комментарий;
    Если Найти(Версия, "(") Тогда
        Версия = СокрЛП(Лев(Версия, Найти(Версия, "(") - 1));
    КонецЕсли;

    ПараметрыРегистрации = ДополнительныеОтчетыИОбработки.СведенияОВнешнейОбработке(СтандартныеПодсистемыСервер.ВерсияБиблиотеки());

    ПараметрыРегистрации.Вид = ДополнительныеОтчетыИОбработкиКлиентСервер.ВидОбработкиДополнительныйОтчет();
    ПараметрыРегистрации.Версия = Версия;
    ПараметрыРегистрации.Назначение.Добавить("Подсистема.СпецодеждаИСИЗ");
    //ПараметрыРегистрации.ОпределитьНастройкиФормы = Истина;
    ПараметрыРегистрации.Наименование = НСтр("ru = 'Отчет: """ + МетаданныеОбъекта.Синоним + """'");
    ПараметрыРегистрации.Информация = НСтр("ru = 'Внешний отчет: """ + МетаданныеОбъекта.Синоним + """'");

    НоваяКоманда = ПараметрыРегистрации.Команды.Добавить();
    НоваяКоманда.Представление = НСтр("ru = 'Отчет: """ + МетаданныеОбъекта.Синоним + """'");
    НоваяКоманда.Идентификатор = НСтр("ru = '" + МетаданныеОбъекта.Синоним + "'");
    НоваяКоманда.Использование = ДополнительныеОтчетыИОбработкиКлиентСервер.ТипКомандыОткрытиеФормы();
    НоваяКоманда.ПоказыватьОповещение = Ложь;

    НовыйВариант = ПараметрыРегистрации.ВариантыОтчета.Добавить();
    НовыйВариант.КлючВарианта = СхемаКомпоновкиДанных.ВариантыНастроек[0].Имя;
    НовыйВариант.Подсистема = "Подсистема.СпецодеждаИСИЗ";
    НовыйВариант.Описание = НСтр("ru = 'Отчет выводит штатное расписание с указанием норм.'");

    Возврат ПараметрыРегистрации;

КонецФункции
7 ЗлаяЗая
 
21.11.19
12:20
(5) сделала. не выходит.
8 ЗлаяЗая
 
21.11.19
12:22
(4) да там в нескольких местах эти Доп.отчеты.
В одном я добавила отчет. Во-втором не видно.
9 ЗлаяЗая
 
21.11.19
13:30
надо было заполнить "разместить в разделах"
Есть два вида языков, одни постоянно ругают, а вторыми никто не пользуется.