Версия для печати темы (https://pro1c.org.ua/index.php?s=587dd1f46b2dac71438e31de79225518&showtopic=49691)

Нажмите сюда для просмотра этой темы в обычном формате

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 _ Программирование в 1С Предприятие 8.3 _ Вывод на печать номера документа

Автор: klevenets 29.12.18, 10:09

Всем привет.
Есть требование - НЕ выводить на печать номер документа

Например Реализация товаров и услуг:

СЕЙЧАС ТАК: Расходная накладная № 35 от 29 декабря 2018 г.
НАДО ТАК: Расходная накладная от 29 декабря 2018 г.



1С:Предприятие 8.3 (8.3.8.1784)
"Управление торговлей для Украины", редакция 2.3.


ПЛИЗ HELP!!!


Автор: Vofka 29.12.18, 10:48

klevenets, уберите из макета номер. В чем именно сложность?

Автор: sava1 29.12.18, 10:53

в процедуре печати самому прописать Заголовок

Автор: klevenets 29.12.18, 12:21

Vofka @ Сегодня, 10:48 * ,

Где именно - не могу найти строку????


 ! 

Вставлять сюда модуль целиком и спрашивать куда именно что вставить? Рукалицо.
 

Автор: sava1 29.12.18, 12:32

здесь

Если Шапка.ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СКомиссионером Тогда
ОбластьМакета.Параметры.ТекстЗаголовка = ОбщегоНазначения.СформироватьЗаголовокДокумента(Шапка, НСтр("ru='Расходная накладная (на комиссию)';uk='Видаткова накладна (на комісію)'",КодЯзыкаПечать),КодЯзыкаПечать);
Иначе
ОбластьМакета.Параметры.ТекстЗаголовка = ОбщегоНазначения.СформироватьЗаголовокДокумента(Шапка, НСтр("ru='Расходная накладная';uk='Видаткова накладна'",КодЯзыкаПечать),КодЯзыкаПечать);
КонецЕсли;


пишите
ОбластьМакета.Параметры.ТекстЗаголовка = НСтр("ru='Расходная накладная';uk='Видаткова накладна'",КодЯзыкаПечать) + ..........

Автор: klevenets 29.12.18, 12:48

sava1 @ Сегодня, 12:32 * ,
Подскажите плиз подробней
вставить взамен какого текста?
или как новую строку?
Я просто не опытен в этом

Автор: sava1 29.12.18, 13:03

После первого фрагмента вставляете второй.
Во втором после "+" дописываете "от " + Формат(Дата," здесь строка форматирования ")

Автор: klevenets 29.12.18, 14:37

sava1 @ Сегодня, 13:03 * ,
Большая просьба
написать текст/строки как у меня должно быть и вместо чего или под чем
Я болван и не могу понять где первый фрагмент где второй.

Куда вставлять после "КонецЕсли"?


ВОТ МОЙ КОД:

Если Шапка.ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СКомиссионером Тогда
ОбластьМакета.Параметры.ТекстЗаголовка = ОбщегоНазначения.СформироватьЗаголовокДокумента(Шапка, НСтр("ru='Расходная накладная (на комиссию)';uk='Видаткова накладна (на комісію)'",КодЯзыкаПечать),КодЯзыкаПечать);
Иначе
ОбластьМакета.Параметры.ТекстЗаголовка = ОбщегоНазначения.СформироватьЗаголовокДокумента(Шапка, НСтр("ru='Расходная накладная';uk='Видаткова накладна'",КодЯзыкаПечать),КодЯзыкаПечать);
КонецЕсли;



Автор: Prospero 30.12.18, 11:26

klevenets @ Вчера, 15:37 * ,
Вам для всех документов надо?
Или только для расходной?
Посмотрите код в самой функции

СформироватьЗаголовокДокумента

в
ТекстЗаголовка

возвращается уже сформированный заголовок.
Уберите номер на стадии формирования.
Не смотрел как в 8.3, но в УТ 8.2 у меня формируется строкой
Возврат "" + ?(НЕ ЗначениеЗаполнено(НазваниеДокумента), ДокументОбъект.Метаданные().Синоним, НазваниеДокумента) + " № " + ПолучитьНомерНаПечать(ДокументОбъект)

закомментируйте конец строки, чтобы было
Возврат "" + ?(НЕ ЗначениеЗаполнено(НазваниеДокумента), ДокументОбъект.Метаданные().Синоним, НазваниеДокумента)

только тогда для всех не будет выводиться...
Или сделайте проверку, какой документ заходит параметром
НазваниеДокумента

и от этого отталкивайтесь...

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua