По теме из базы знаний
- Внешние печатные формы по кадровым документам и зарплате в БП 3.0
- Счет-фактура выданный (внешняя печатная форма) с выбором подписантов и с печатью с грузополучателем или без.
- [ШАБЛОН] Внешняя печатная форма с отладкой
- Комплект внешних печатных форм для 1С:Комплексная автоматизация 2.5: ТОРГ-12, Счет-фактура, счет на оплату, универсальный передаточный документ (УПД)
- Внешняя печатная форма в формате Word (.docx, .doc) с помощью средств БСП
Найденные решения
Процедура Печать(МассивОбъектов, КоллекцияПечатныхФорм, ОбъектыПечати, ПараметрыВывода) Экспорт
ДокументРезультат = Новый ТабличныйДокумент;
ДокументРезультат.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ТрудовойДоговор";
ДокументРезультат.ОриентацияСтраницы= ОриентацияСтраницы.Портрет;
ДокументРезультат.АвтоМасштаб = Истина;
//ВалютаУчета = ЗарплатаКадры.ВалютаУчетаЗаработнойПлаты();
Если ЛЕВ(МассивОбъектов[0].Контрагент.Наименование,2) = "ИП" Тогда
Макет = ПолучитьМакет("MXL_ТрудовойДоговор");
ИНАЧЕ
Макет = ПолучитьМакет("MXL_ТрудовойДоговор1");
КОНЕЦЕсли
//ОбластьСтрокаТаблицы = Макет.ПолучитьОбласть("СтрокаТаблицы");
//ОбластьПодвалПриказа = Макет.ПолучитьОбласть("ПодвалПриказа");
ДанныеДляПечати = ДанныеДляПечати(МассивОбъектов);
ПервыйПриказ = Истина;
Для Каждого ОписаниеПараметров Из ДанныеДляПечати Цикл
МассивДанныхЗаполнения = ОписаниеПараметров.Значение;
НомерСтрокиНачало = ДокументРезультат.ВысотаТаблицы + 1;
Для каждого ПараметрыМакета Из МассивДанныхЗаполнения Цикл
//Если МассивОбъектов.Количество() = 1
// И ЗначениеЗаполнено(ПараметрыМакета.EMail) Тогда
//
// ПараметрыВывода.ПараметрыОтправки.Получатель = ПараметрыМакета.EMail;
// ПараметрыВывода.ПараметрыОтправки.Тема = НСтр("ru='Трудовой договор'");
//
// Если ЗначениеЗаполнено(ПараметрыМакета.ТрудовойДоговорНомер) Тогда
// ПараметрыВывода.ПараметрыОтправки.Тема = ПараметрыВывода.ПараметрыОтправки.Тема + " №" + ПараметрыМакета.ТрудовойДоговорНомер;
// КонецЕсли;
//
// Если ЗначениеЗаполнено(ПараметрыМакета.ТрудовойДоговорДата) Тогда
//
// ПараметрыВывода.ПараметрыОтправки.Тема = ПараметрыВывода.ПараметрыОтправки.Тема
// + " " + НСтр("ru='от'") + " " + ПараметрыМакета.ТрудовойДоговорДата;
//
// КонецЕсли;
//
//КонецЕсли;
Если Не ПервыйПриказ Тогда
ДокументРезультат.ВывестиГоризонтальныйРазделительСтраниц();
Иначе
ПервыйПриказ = Ложь;
КонецЕсли;
Макет.Параметры.Заполнить(ПараметрыМакета);
ДокументРезультат.Вывести(Макет);
КонецЦикла;
УправлениеПечатью.ЗадатьОбластьПечатиДокумента(ДокументРезультат, НомерСтрокиНачало, ОбъектыПечати, ОписаниеПараметров.Ключ);
КонецЦикла;
УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "ТрудовойДоговорС", "Трудовой договор", ДокументРезультат);
ПоказатьОстальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(2)Есть внешняя печатная форма, в нее еще добавить макет, при условии вызывать их. Проблема в том, что я не знаю, как написать условие, если у меня организация в документе указана ИП, то выводить на печать первый макет, если организация ООО, то выводить второй макет.
Процедура Печать(МассивОбъектов, КоллекцияПечатныхФорм, ОбъектыПечати, ПараметрыВывода) Экспорт
ДокументРезультат = Новый ТабличныйДокумент;
ДокументРезультат.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ТрудовойДоговор";
ДокументРезультат.ОриентацияСтраницы= ОриентацияСтраницы.Портрет;
ДокументРезультат.АвтоМасштаб = Истина;
//ВалютаУчета = ЗарплатаКадры.ВалютаУчетаЗаработнойПлаты();
Макет = ПолучитьМакет("MXL_ТрудовойДоговор");
Макет2 = ПолучитьМакет("MXL_ТрудовойДоговор1");
//ОбластьСтрокаТаблицы = Макет.ПолучитьОбласть("СтрокаТаблицы");
//ОбластьПодвалПриказа = Макет.ПолучитьОбласть("ПодвалПриказа");
ДанныеДляПечати = ДанныеДляПечати(МассивОбъектов);
ПервыйПриказ = Истина;
Для Каждого ОписаниеПараметров Из ДанныеДляПечати Цикл
МассивДанныхЗаполнения = ОписаниеПараметров.Значение;
НомерСтрокиНачало = ДокументРезультат.ВысотаТаблицы + 1;
Для каждого ПараметрыМакета Из МассивДанныхЗаполнения Цикл
//Если МассивОбъектов.Количество() = 1
// И ЗначениеЗаполнено(ПараметрыМакета.EMail) Тогда
//
// ПараметрыВывода.ПараметрыОтправки.Получатель = ПараметрыМакета.EMail;
// ПараметрыВывода.ПараметрыОтправки.Тема = НСтр("ru='Трудовой договор'");
//
// Если ЗначениеЗаполнено(ПараметрыМакета.ТрудовойДоговорНомер) Тогда
// ПараметрыВывода.ПараметрыОтправки.Тема = ПараметрыВывода.ПараметрыОтправки.Тема + " №" + ПараметрыМакета.ТрудовойДоговорНомер;
// КонецЕсли;
//
// Если ЗначениеЗаполнено(ПараметрыМакета.ТрудовойДоговорДата) Тогда
//
// ПараметрыВывода.ПараметрыОтправки.Тема = ПараметрыВывода.ПараметрыОтправки.Тема
// + " " + НСтр("ru='от'") + " " + ПараметрыМакета.ТрудовойДоговорДата;
//
// КонецЕсли;
//
//КонецЕсли;
Если Не ПервыйПриказ Тогда
ДокументРезультат.ВывестиГоризонтальныйРазделительСтраниц();
Иначе
ПервыйПриказ = Ложь;
КонецЕсли;
Макет.Параметры.Заполнить(ПараметрыМакета);
ДокументРезультат.Вывести(Макет);
КонецЦикла;
УправлениеПечатью.ЗадатьОбластьПечатиДокумента(ДокументРезультат, НомерСтрокиНачало, ОбъектыПечати, ОписаниеПараметров.Ключ);
КонецЦикла;
УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "ТрудовойДоговорС", "Трудовой договор", ДокументРезультат);
ДокументРезультат = Новый ТабличныйДокумент;
ДокументРезультат.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ТрудовойДоговор";
ДокументРезультат.ОриентацияСтраницы= ОриентацияСтраницы.Портрет;
ДокументРезультат.АвтоМасштаб = Истина;
//ВалютаУчета = ЗарплатаКадры.ВалютаУчетаЗаработнойПлаты();
Макет = ПолучитьМакет("MXL_ТрудовойДоговор");
Макет2 = ПолучитьМакет("MXL_ТрудовойДоговор1");
//ОбластьСтрокаТаблицы = Макет.ПолучитьОбласть("СтрокаТаблицы");
//ОбластьПодвалПриказа = Макет.ПолучитьОбласть("ПодвалПриказа");
ДанныеДляПечати = ДанныеДляПечати(МассивОбъектов);
ПервыйПриказ = Истина;
Для Каждого ОписаниеПараметров Из ДанныеДляПечати Цикл
МассивДанныхЗаполнения = ОписаниеПараметров.Значение;
НомерСтрокиНачало = ДокументРезультат.ВысотаТаблицы + 1;
Для каждого ПараметрыМакета Из МассивДанныхЗаполнения Цикл
//Если МассивОбъектов.Количество() = 1
// И ЗначениеЗаполнено(ПараметрыМакета.EMail) Тогда
//
// ПараметрыВывода.ПараметрыОтправки.Получатель = ПараметрыМакета.EMail;
// ПараметрыВывода.ПараметрыОтправки.Тема = НСтр("ru='Трудовой договор'");
//
// Если ЗначениеЗаполнено(ПараметрыМакета.ТрудовойДоговорНомер) Тогда
// ПараметрыВывода.ПараметрыОтправки.Тема = ПараметрыВывода.ПараметрыОтправки.Тема + " №" + ПараметрыМакета.ТрудовойДоговорНомер;
// КонецЕсли;
//
// Если ЗначениеЗаполнено(ПараметрыМакета.ТрудовойДоговорДата) Тогда
//
// ПараметрыВывода.ПараметрыОтправки.Тема = ПараметрыВывода.ПараметрыОтправки.Тема
// + " " + НСтр("ru='от'") + " " + ПараметрыМакета.ТрудовойДоговорДата;
//
// КонецЕсли;
//
//КонецЕсли;
Если Не ПервыйПриказ Тогда
ДокументРезультат.ВывестиГоризонтальныйРазделительСтраниц();
Иначе
ПервыйПриказ = Ложь;
КонецЕсли;
Макет.Параметры.Заполнить(ПараметрыМакета);
ДокументРезультат.Вывести(Макет);
КонецЦикла;
УправлениеПечатью.ЗадатьОбластьПечатиДокумента(ДокументРезультат, НомерСтрокиНачало, ОбъектыПечати, ОписаниеПараметров.Ключ);
КонецЦикла;
УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "ТрудовойДоговорС", "Трудовой договор", ДокументРезультат);
Процедура Печать(МассивОбъектов, КоллекцияПечатныхФорм, ОбъектыПечати, ПараметрыВывода) Экспорт
ДокументРезультат = Новый ТабличныйДокумент;
ДокументРезультат.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ТрудовойДоговор";
ДокументРезультат.ОриентацияСтраницы= ОриентацияСтраницы.Портрет;
ДокументРезультат.АвтоМасштаб = Истина;
//ВалютаУчета = ЗарплатаКадры.ВалютаУчетаЗаработнойПлаты();
Если ЛЕВ(МассивОбъектов[0].Контрагент.Наименование,2) = "ИП" Тогда
Макет = ПолучитьМакет("MXL_ТрудовойДоговор");
ИНАЧЕ
Макет = ПолучитьМакет("MXL_ТрудовойДоговор1");
КОНЕЦЕсли
//ОбластьСтрокаТаблицы = Макет.ПолучитьОбласть("СтрокаТаблицы");
//ОбластьПодвалПриказа = Макет.ПолучитьОбласть("ПодвалПриказа");
ДанныеДляПечати = ДанныеДляПечати(МассивОбъектов);
ПервыйПриказ = Истина;
Для Каждого ОписаниеПараметров Из ДанныеДляПечати Цикл
МассивДанныхЗаполнения = ОписаниеПараметров.Значение;
НомерСтрокиНачало = ДокументРезультат.ВысотаТаблицы + 1;
Для каждого ПараметрыМакета Из МассивДанныхЗаполнения Цикл
//Если МассивОбъектов.Количество() = 1
// И ЗначениеЗаполнено(ПараметрыМакета.EMail) Тогда
//
// ПараметрыВывода.ПараметрыОтправки.Получатель = ПараметрыМакета.EMail;
// ПараметрыВывода.ПараметрыОтправки.Тема = НСтр("ru='Трудовой договор'");
//
// Если ЗначениеЗаполнено(ПараметрыМакета.ТрудовойДоговорНомер) Тогда
// ПараметрыВывода.ПараметрыОтправки.Тема = ПараметрыВывода.ПараметрыОтправки.Тема + " №" + ПараметрыМакета.ТрудовойДоговорНомер;
// КонецЕсли;
//
// Если ЗначениеЗаполнено(ПараметрыМакета.ТрудовойДоговорДата) Тогда
//
// ПараметрыВывода.ПараметрыОтправки.Тема = ПараметрыВывода.ПараметрыОтправки.Тема
// + " " + НСтр("ru='от'") + " " + ПараметрыМакета.ТрудовойДоговорДата;
//
// КонецЕсли;
//
//КонецЕсли;
Если Не ПервыйПриказ Тогда
ДокументРезультат.ВывестиГоризонтальныйРазделительСтраниц();
Иначе
ПервыйПриказ = Ложь;
КонецЕсли;
Макет.Параметры.Заполнить(ПараметрыМакета);
ДокументРезультат.Вывести(Макет);
КонецЦикла;
УправлениеПечатью.ЗадатьОбластьПечатиДокумента(ДокументРезультат, НомерСтрокиНачало, ОбъектыПечати, ОписаниеПараметров.Ключ);
КонецЦикла;
УправлениеПечатью.ВывестиТабличныйДокументВКоллекцию(КоллекцияПечатныхФорм, "ТрудовойДоговорС", "Трудовой договор", ДокументРезультат);
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот