Показано с 11 по 12 из 12
Тема: Вывести данные на печать
Древовидный режим
-
16.05.2014, 00:28 #1
- Регистрация
- 11.04.2013
- Сообщений
- 17
- Сказал(а) спасибо
- 2
- Поблагодарили 0 раз(а) в 0 сообщениях
Вывести данные на печать
Доброго времени суток.
Будьте добры, ну никак не могу добиться вывода на печатную форму выделенные данные, что на снимке
имею такой код
Код:// Выводим шапку накладной СведенияОПокупателе = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.Покупатель, Шапка.Дата,,,КодЯзыкаПечать ); СведенияОПоставщике = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.Поставщик, Шапка.Дата,,,КодЯзыкаПечать); // отключаем условие (оригинал "Счет" Если Тип = "Счету" Тогда ОбластьМакета = Макет.ПолучитьОбласть("ЗаголовокСчета"); ОбластьМакета.Параметры.НазваниеОрганизации = СведенияОПоставщике.ПолноеНаименование; ОбластьМакета.Параметры.ЕДРПОУОрганизации = УправлениеКонтактнойИнформацией.ПолучитьКодОрганизации(СведенияОПоставщике); Если ТипЗнч(СтруктурнаяЕдиница) = Тип("СправочникСсылка.БанковскиеСчета") Тогда Банк = СтруктурнаяЕдиница.Банк; МФО = Банк.Код; НомерСчета = СтруктурнаяЕдиница.НомерСчета; // БанкПок = СтруктурнаяЕдиница.Банк; МФОПок = Банк.Код; НомерСчПок = СтруктурнаяЕдиница.НомерСчета; // Иначе // покажем банковские реквизиты основного счета организации Банк = СведенияОПоставщике.Банк; МФО = СведенияОПоставщике.МФО; НомерСчета = СведенияОПоставщике.НомерСчета; // БанкПокупателя = СведенияОПокупателе.Банк; МФОПокупателя = СведенияОПокупателе.МФО; НомерСчетаПокупателя = СведенияОПокупателе.НомерСчета; // КонецЕсли; ОбластьМакета.Параметры.БанкОрганизации = Банк; ОбластьМакета.Параметры.МФОБанкаОрганизации = МФО; ОбластьМакета.Параметры.НомерРасчетногоСчетаОрганизации = НомерСчета; Если НЕ Шапка.ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СКомиссионером И НЕ Шапка.ВалютаДокумента <> мВалютаРегламентированногоУчета Тогда ТабДокумент.Вывести(ОбластьМакета); КонецЕсли; КонецЕсли; ОбластьМакета = Макет.ПолучитьОбласть("Заголовок"); Если Шапка.ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СКомиссионером Тогда ОбластьМакета.Параметры.ТекстЗаголовка = ОбщегоНазначения.СформироватьЗаголовокДокумента(Шапка, НСтр("ru='Список товаров на комиссию';uk='Список товарів на комісію'",КодЯзыкаПечать),КодЯзыкаПечать); Иначе ОбластьМакета.Параметры.ТекстЗаголовка = ОбщегоНазначения.СформироватьЗаголовокДокумента(Шапка, НСтр("ru='Счет на оплату';uk='Рахунок на оплату'",КодЯзыкаПечать),КодЯзыкаПечать); КонецЕсли; ТабДокумент.Вывести(ОбластьМакета); ОбластьМакета = Макет.ПолучитьОбласть("Поставщик"); ОбластьМакета.Параметры.Заполнить(Шапка); ОбластьМакета.Параметры.ПредставлениеПоставщика = ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОПоставщике, "ПолноеНаименование,",,КодЯзыкаПечать); Если Тип = "Счет" Тогда ОбластьМакета.Параметры.РеквизитыПоставщика = НСтр("ru='Р/с ';uk='Р/р '",КодЯзыкаПечать) + НомерСчета + НСтр("ru=', Банк ';uk=', Банк '",КодЯзыкаПечать) + Банк + НСтр("ru=', МФО ';uk=', МФО '",КодЯзыкаПечать) + МФО + Символы.ПС + ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОПоставщике, "ЮридическийАдрес,Телефоны,/,КодПоЕДРПОУ,КодПоДРФО,ИНН,НомерСвидетельства,/,ИнформацияОСтатусеПлательщикаНалогов,",,КодЯзыкаПечать); КонецЕсли; ТабДокумент.Вывести(ОбластьМакета); ОбластьМакета = Макет.ПолучитьОбласть("Покупатель"); ОбластьМакета.Параметры.Заполнить(Шапка); ОбластьМакета.Параметры.ПредставлениеПокупателя = ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОПокупателе, "ПолноеНаименование,",,КодЯзыкаПечать); ОбластьМакета.Параметры.РеквизитыПокупателя = НСтр("ru='Р/с ';uk='Р/р '",КодЯзыкаПечать) + НомерСчПок + НСтр("ru=',Банк ';uk=', Банк '",КодЯзыкаПечать) + БанкПок + НСтр("ru=', МФО ';uk=', МФО '",КодЯзыкаПечать) + МФОПок + Символы.ПС + ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОПокупателе, "ЮридическийАдрес,Телефоны,/,КодПоЕДРПОУ,КодПоДРФО,ИНН,НомерСвидетельства,/,ИнформацияОСтатусеПлательщикаНалогов,",,КодЯзыкаПечать); //ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОПокупателе,"Телефоны,",,КодЯзыкаПечать); ТабДокумент.Вывести(ОбластьМакета);
осталось совсем чуть чуть и не могу додуматься как поступить в данной ситуации
Социальные закладки