Вывод печатной формы обработки на печать

@jediAlex · Регистрация: 12.07.2011

Студворк — интернет-сервис помощи студентам

Здравствуйте. Делаю собственную конфигурацию 1С8.3 Есть документ "ОбъектныйГрафик" с ТЧ Задания. Есть обработка, в форме которой выводятся все задания по всем текущим графикам для руководителя подразделения, которые он должен выдать в другие (смежные) подразделения. Факт выдачи задания оформляется соответствующим документом "Задание". На данном этапе делаю упрощенный вариант - создание печатной формы выбранного задания. Скрин макет задания в приложении Вот код вывода печатной формы:

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
&НаСервере
Функция ПечатьЗаданияНаСервере(ОбъектныйГрафик,ВыдающийОтдел,ПринимающийОтдел,ДатаВыдачиПлан,Задание)
    // Вставить содержимое обработчика.
    //Макет=Обработки.ЗаданияПоАктивнымГрафикам.ПолучитьМакет("Задание");
    График=ОбъектныйГрафик.ПолучитьОбъект();
    
    ТабДок = Обработки.ЗаданияПоАктивнымГрафикам.ПолучитьМакет("Задание");
    //ТабДок.Очистить();
 
    Шапка = ТабДок.ПолучитьОбласть("Шапка");
    Шапка.Параметры.ОбъектныйГрафик=ОбъектныйГрафик;
    Шапка.Параметры.ВыдающийОтдел=ВыдающийОтдел;
    Шапка.Параметры.ПлощадкаПроектирования=График.ПлощадкаПроектирования;
    Шапка.Параметры.Объект=График.ШифрОбъекта;
    Шапка.Параметры.ДатаВыдачиПлан=Формат(ДатаВыдачиПлан,"ДФ=dd.MM.yyyy");
    Шапка.Параметры.Стадия=ОбъектныйГрафик.Стадия;
    Шапка.Параметры.ГИП=ОбъектныйГрафик.ГИП;
        ТабДок.Вывести(Шапка);
    ОбластьЗадания = ТабДок.ПолучитьОбласть("ОбластьЗадания");
    ОбластьЗадания.Параметры.НаименованиеРабот=График.НаименованиеОбъекта;
     ОбластьЗадания.Параметры.Задание=Задание;
            ТабДок.Вывести(ОбластьЗадания);
    Подвал=Табдок.ПолучитьОбласть("Подвал");
    Подвал.Параметры.ГлавныйСпециалистВыдающейГруппы=ГлавСпециалистВыдающийЗадание(ОбъектныйГрафик,ВыдающийОтдел);
    Подвал.Параметры.ГлавныйСпециалистПринимающейГруппы=ГлавСпециалистПринимающийЗадание(ОбъектныйГрафик,ПринимающийОтдел);
    ТабДок.Вывести(Подвал);
Возврат ТабДок;
КонецФункции
&НаКлиенте
Процедура ПечатьЗадания(Команда)
    ТекСтрока=Элементы.Задания.ТекущиеДанные;
    ТабДок=ПечатьЗаданияНаСервере(ТекСтрока.График,ТекСтрока.Выдающийотдел,ТекСтрока.ПринимающийОтдел,ТекСтрока.ДатаВыдачиПлан,ТекСтрока.Задание);
    ТабДок.Показать();
    КонецПроцедуры

В результате у меня почему то на экран выводится двойная форма -вверху пустая с разметкой, а ниже - заполненная, как во вложении "Результат". Что не так делаю? помогите пожалуйста.

@polax · 12.07.2018, 23:26

Смешались в кучу кони, люди...." © )))
Области получаете в макете, а выводите табдок. А так у вас все вместе вываливает и макет и заполнение макета

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
&НаСервере
Функция ПечатьЗаданияНаСервере(ОбъектныйГрафик,ВыдающийОтдел,ПринимающийОтдел,ДатаВыдачиПлан,Задание)
   
    График=ОбъектныйГрафик.ПолучитьОбъект(); // а на фига получать Объект? К вопросу не относится, но непонятно абсолютно
    
    Макет = Обработки.ЗаданияПоАктивнымГрафикам.ПолучитьМакет("Задание");
    ТабДок = Новый ТабличныйДокумент;
 
    Шапка = Макет.ПолучитьОбласть("Шапка");
    Шапка.Параметры.ОбъектныйГрафик=ОбъектныйГрафик;
    Шапка.Параметры.ВыдающийОтдел=ВыдающийОтдел;
    Шапка.Параметры.ПлощадкаПроектирования=График.ПлощадкаПроектирования;
    Шапка.Параметры.Объект=График.ШифрОбъекта;
    Шапка.Параметры.ДатаВыдачиПлан=Формат(ДатаВыдачиПлан,"ДФ=dd.MM.yyyy");
    Шапка.Параметры.Стадия=ОбъектныйГрафик.Стадия;
    Шапка.Параметры.ГИП=ОбъектныйГрафик.ГИП;
        ТабДок.Вывести(Шапка);
    ОбластьЗадания = Макет.ПолучитьОбласть("ОбластьЗадания");
    ОбластьЗадания.Параметры.НаименованиеРабот=График.НаименованиеОбъекта;
     ОбластьЗадания.Параметры.Задание=Задание;
            ТабДок.Вывести(ОбластьЗадания);
    Подвал=Макет.ПолучитьОбласть("Подвал");
    Подвал.Параметры.ГлавныйСпециалистВыдающейГруппы=ГлавСпециалистВыдающийЗадание(ОбъектныйГрафик,ВыдающийОтдел);
    Подвал.Параметры.ГлавныйСпециалистПринимающейГруппы=ГлавСпециалистПринимающийЗадание(ОбъектныйГрафик,ПринимающийОтдел);
    ТабДок.Вывести(Подвал);
Возврат ТабДок;
КонецФункции

@jediAlex · 13.07.2018, 09:19 **[ТС]**

не пойму. Сделал так:

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Макет=Обработки.ЗаданияПоАктивнымГрафикам.ПолучитьМакет("Задание");
    График=ОбъектныйГрафик.ПолучитьОбъект();
    
    //ТабДок = Обработки.ЗаданияПоАктивнымГрафикам.ПолучитьМакет("Задание");
    //ТабДок.Очистить();
 
    Шапка = Макет.ПолучитьОбласть("Шапка");
    Если ОбъектныйГрафик.Ревизия <>0 тогда
    Шапка.Параметры.ОбъектныйГрафик=ОбъектныйГрафик.НомерГрафика+" ревизия "+ОбъектныйГрафик.ревизия;
КонецЕсли;
Если ОбъектныйГрафик.Ревизия =0 тогда
    Шапка.Параметры.ОбъектныйГрафик=ОбъектныйГрафик.НомерГрафика;
КонецЕсли;
    Шапка.Параметры.ВыдающийОтдел=ВыдающийОтдел;
    Шапка.Параметры.ПлощадкаПроектирования=График.ПлощадкаПроектирования;
    Шапка.Параметры.Объект=График.ШифрОбъекта;
    Шапка.Параметры.ДатаВыдачиПлан=Формат(ДатаВыдачиПлан,"ДФ=dd.MM.yyyy");
    Шапка.Параметры.Стадия=ОбъектныйГрафик.Стадия;
    Шапка.Параметры.ГИП=ОбъектныйГрафик.ГИП;
        макет.Вывести(Шапка);
    ОбластьЗадания = Макет.ПолучитьОбласть("ОбластьЗадания");
    ОбластьЗадания.Параметры.НаименованиеРабот=График.НаименованиеОбъекта;
     ОбластьЗадания.Параметры.Задание=Задание;
            макет.Вывести(ОбластьЗадания);
    Подвал=Макет.ПолучитьОбласть("Подвал");
    Подвал.Параметры.ГлавныйСпециалистВыдающейГруппы=ГлавСпециалистВыдающийЗадание(ОбъектныйГрафик,ВыдающийОтдел);
    Подвал.Параметры.ГлавныйСпециалистПринимающейГруппы=ГлавСпециалистПринимающийЗадание(ОбъектныйГрафик,ПринимающийОтдел);
    макет.Вывести(Подвал);
Возврат макет;
КонецФункции

Получается то же самое.. вообще не пойму, что не так...

@polax · 13.07.2018, 10:49

jediAlex, Не так то, что вы не разделяете Макет и ТабДок. Посмотрите мой код. Получаете Макет, именованные области получаете из Макета, а выводите заполненные эти области уже не в Макет, а в ТабДок

@jediAlex · 13.07.2018, 11:32 **[ТС]**

спасибо, разобрался))

Новые блоги и статьи Все статьи Все блоги /
Access VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .	Фото: Daniel Greenwood kumehtar 13.11.2025

@polax 5356 / 1710 / 624 Регистрация: 16.01.2015 Сообщений: 7,178
	13.07.2018, 10:49
	jediAlex, Не так то, что вы не разделяете Макет и ТабДок. Посмотрите мой код. Получаете Макет, именованные области получаете из Макета, а выводите заполненные эти области уже не в Макет, а в ТабДок 1

@jediAlex 5 / 5 / 6 Регистрация: 12.07.2011 Сообщений: 713
	13.07.2018, 11:32 [ТС]
	спасибо, разобрался)) 0