|
Запутался с внешней формой | ☑ | ||
---|---|---|---|---|
0
franchisees
12.01.12
✎
20:36
|
Прошу консультации
ЭтотОбъект , поменял СсылкаНаОбъект при распечатывание выдает сообщение Не удалось сформировать внешнюю печатную форму! Поле объекта не обнаружено (Ссылка) Конфигурация Бухгалтерия 2.0 Сам код ----------------------------------------------------------------- Функция ПечатьОтчетаКомитенту() ДопКолонка = Константы.ДополнительнаяКолонкаПечатныхФормДокументов.Получить(); Если ДопКолонка = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Артикул Тогда ВыводитьКоды = Истина; Колонка = "Артикул"; ТекстКодАртикул = "Артикул"; ИначеЕсли ДопКолонка = Перечисления.ДополнительнаяКолонкаПечатныхФормДокументов.Код Тогда ВыводитьКоды = Истина; Колонка = "Код"; ТекстКодАртикул = "Код"; Иначе ВыводитьКоды = Ложь; Колонка = ""; ТекстКодАртикул = "Код"; КонецЕсли; Если ВыводитьКоды Тогда ОбластьШапки = "ШапкаСКодом"; ОбластьСтроки = "СтрокаСКодом"; Иначе ОбластьШапки = "ШапкаТаблицы"; ОбластьСтроки = "Строка"; КонецЕсли; Запрос = Новый Запрос; Запрос.УстановитьПараметр("ТекущийДокумент", СсылкаНаОбъект); Запрос.Текст = "ВЫБРАТЬ | ОтчетКомитентуОПродажах.Номер, | ОтчетКомитентуОПродажах.Дата, | ОтчетКомитентуОПродажах.ДоговорКонтрагента, | ОтчетКомитентуОПродажах.Контрагент, | ОтчетКомитентуОПродажах.Организация, | ОтчетКомитентуОПродажах.СуммаДокумента, | ОтчетКомитентуОПродажах.ВалютаДокумента, | ОтчетКомитентуОПродажах.СтавкаНДСВознаграждения, | ОтчетКомитентуОПродажах.СуммаВознаграждения, | ОтчетКомитентуОПродажах.Товары.( | НомерСтроки, | Номенклатура, | Номенклатура."+ ТекстКодАртикул + " КАК КодАртикул, | Номенклатура.НаименованиеПолное КАК Товар, | КоличествоМест, | Количество, | ЕдиницаИзмерения.Представление КАК ЕдиницаИзмерения, | Номенклатура.БазоваяЕдиницаИзмерения КАК ЕдиницаХранения, | ЦенаПоступления, | СуммаПоступления, | СуммаВознаграждения | ) |ИЗ | Документ.ОтчетКомитентуОПродажах КАК ОтчетКомитентуОПродажах |ГДЕ | ОтчетКомитентуОПродажах.Ссылка = &ТекущийДокумент"; Шапка = Запрос.Выполнить().Выбрать(); Шапка.Следующий(); ВыборкаСтрокТовары = Шапка.Товары.Выбрать(); ТабДокумент = Новый ТабличныйДокумент; ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ОтчетКомитентуОПродажах_ОтчетКомитентуОПродажах"; Макет = ПолучитьМакет("ОтчетКомитентуОПродажах"); // Выводим шапку накладной ОбластьМакета = Макет.ПолучитьОбласть("Заголовок"); ОбластьМакета.Параметры.ТекстЗаголовка = ОбщегоНазначения.СформироватьЗаголовокДокумента(Шапка, "Отчет комитенту"); ТабДокумент.Вывести(ОбластьМакета); СведенияОбОрганизации = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.Организация, Шапка.Дата); ПредставлениеОрганизации = ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОбОрганизации, "НаименованиеДляПечатныхФорм,"); СведенияОКонтрагенте = УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(Шапка.Контрагент, Шапка.Дата); ПредставлениеКонтрагента = ФормированиеПечатныхФорм.ОписаниеОрганизации(СведенияОКонтрагенте, "НаименованиеДляПечатныхФорм,"); ОбластьМакета = Макет.ПолучитьОбласть("Поставщик"); ОбластьМакета.Параметры.Заполнить(Шапка); ОбластьМакета.Параметры.ПредставлениеПоставщика = ПредставлениеКонтрагента; ОбластьМакета.Параметры.Поставщик = Шапка.Контрагент; ТабДокумент.Вывести(ОбластьМакета); ОбластьМакета = Макет.ПолучитьОбласть("Покупатель"); ОбластьМакета.Параметры.Заполнить(Шапка); ОбластьМакета.Параметры.ПредставлениеПолучателя = ПредставлениеОрганизации; ОбластьМакета.Параметры.Получатель = Шапка.Организация; ТабДокумент.Вывести(ОбластьМакета); ОбластьМакета = Макет.ПолучитьОбласть(ОбластьШапки); Если ВыводитьКоды Тогда ОбластьМакета.Параметры.ИмяКодАртикул = ТекстКодАртикул; КонецЕсли; ТабДокумент.Вывести(ОбластьМакета); ОбластьМакета = Макет.ПолучитьОбласть(ОбластьСтроки); Итого = 0; Пока ВыборкаСтрокТовары.Следующий() Цикл ОбластьМакета.Параметры.Заполнить(ВыборкаСтрокТовары); ТабДокумент.Вывести(ОбластьМакета); Итого = Итого + ВыборкаСтрокТовары.СуммаПоступления; КонецЦикла; ОбластьМакета = Макет.ПолучитьОбласть("Итого"); ОбластьМакета.Параметры.Всего = Итого; ТабДокумент.Вывести(ОбластьМакета); ОбластьМакета = Макет.ПолучитьОбласть("СуммаПрописью"); ОбластьМакета.Параметры.СуммаПрописью = ОбщегоНазначения.СформироватьСуммуПрописью(Итого, Шапка.ВалютаДокумента); ОбластьМакета.Параметры.СуммаВознаграждения = "Сумма комиссионного вознаграждения составила " + ОбщегоНазначения.СформироватьСуммуПрописью(Шапка.СуммаВознаграждения, Шапка.ВалютаДокумента); ОбластьМакета.Параметры.ИтоговаяСтрока = "Всего наименований " + ВыборкаСтрокТовары.Количество() + ", на сумму " + ОбщегоНазначения.ФорматСумм(Итого, Шапка.ВалютаДокумента); ТабДокумент.Вывести(ОбластьМакета); ОбластьМакета = Макет.ПолучитьОбласть("Подписи"); ОбластьМакета.Параметры.Заполнить(Шапка); ТабДокумент.Вывести(ОбластьМакета); Возврат ТабДокумент; КонецФункции // ПечатьОтчетаКомитенту() Функция Печать(КоличествоЭкземпляров = 1, НаПринтер = Ложь, НепосредственнаяПечать = Ложь) Экспорт ТабДокумент =ПечатьОтчетаКомитенту(); УниверсальныеМеханизмы.НапечататьДокумент(ТабДокумент, КоличествоЭкземпляров, НаПринтер, ОбщегоНазначения.СформироватьЗаголовокДокумента(ЭтотОбъект, ЭтотОбъект.Метаданные().Представление()), НепосредственнаяПечать); КонецФункции // Печать |
|||
1
franchisees
12.01.12
✎
20:37
|
Делаю внешний отчет по комитентам
|
|||
2
Гот
12.01.12
✎
20:38
|
Номер строки в скобочках
|
|||
3
franchisees
12.01.12
✎
20:58
|
Номер строки не выдает , сообщает Поле объекта не обнаружено (Ссылка)
|
|||
4
sanja26
12.01.12
✎
21:30
|
СсылкаНаОбъект.Ссылка
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |