Создание печатных форм
Показывать по
10
20
40
сообщений
- 1
- 2
21.09.2011
10:59
#1
поставили задачу создать внешнюю печатную форму для документа списание товаров.
Создала макет, написала запрос, а он ни как не получется(((((((. Помогите пожалуйста........................
Создала макет, написала запрос, а он ни как не получется(((((((. Помогите пожалуйста........................
21.09.2011
11:18
#4
"вот более подробно:
это внешняя печатная форма:
Функция Печать() Экспорт
Перем Запрос, ВыборкаШапки, ВыборкаТоваров; // Определяем переменные, используемые
Перем ТабДокумент, Макет, ОбластьМакета; // в нашей обработке
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ТекущийДокумент", СсылкаНаОбъект);
Запрос.Текст = "ВЫБРАТЬ
| СписаниеТоваров.Номер КАК Номер,
| СписаниеТоваров.Дата КАК Дата,
| СписаниеТоваров.Организация КАК Организация,
| СписаниеТоваров.Склад,
| СписаниеТоваров.СуммаДокумента КАК СуммаДокумента,
| СписаниеТоваров.Ответственный
|ИЗ
| Документ.СписаниеТоваров КАК СписаниеТоваров
|ГДЕ
| СписаниеТоваров.Ссылка = &ТекущийДокумент";
ВыборкаШапки = Запрос.Выполнить().Выбрать(); // Собираем данные пол шапке документа
ВыборкаШапки.Следующий();
Запрос.Текст = "ВЫБРАТЬ
| СписаниеТоваров.Товары.(
| Номенклатура.СтавкаНДС,
| Сумма,
| Цена,
| Количество,
| Номенклатура,
| НомерСтроки
| )
|ИЗ
| Документ.СписаниеТоваров КАК СписаниеТоваров";
ВыборкаТоваров = Запрос.Выполнить().Выбрать(); // Собираем данные по товарам документа
ТабДокумент = Новый ТабличныйДокумент;
Макет = ПолучитьМакет("Макет"); // Получаем оригинальный макет который
// храниться в нашей обработке
// Выводим заголовок документа
ОбластьМакета = Макет.ПолучитьОбласть("Заголовок");
ОбластьМакета.Параметры.ТекстЗаголовка =
ОбщегоНазначения.СформироватьЗаголовокДокумента(ВыборкаШапки, "Расходная накладная");
ТабДокумент.Вывести(ОбластьМакета);
// Выводим секцию с Ревизитами Организации
ОбластьМакета = Макет.ПолучитьОбласть("РевизитыОрганизации");
ПредставлениеПоставщика =
ФормированиеПечатныхФорм.ОписаниеОрганизации(УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(
ВыборкаШапки.Организация, ВыборкаШапки.Дата),
"ПолноеНаименование,");
//ОбластьМакета.Параметры.ПредставлениеПоставщика = ПредставлениеПоставщика;
//ОбластьМакета.Параметры.Поставщик = ВыборкаШапки.Поставщик;
//ТабДокумент.Вывести(ОбластьМакета);
// Выводим секцию с покупателем
//ОбластьМакета = Макет.ПолучитьОбласть("Покупатель");
//ПредставлениеПолучателя =
// ФормированиеПечатныхФорм.ОписаниеОрганизации(УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(
// ВыборкаШапки.Получатель, ВыборкаШапки.Дата),
// "ПолноеНаименование,");
//ОбластьМакета.Параметры.ПредставлениеПолучателя = ПредставлениеПолучателя;
//ОбластьМакета.Параметры.Получатель = ВыборкаШапки.Получатель;
//ТабДокумент.Вывести(ОбластьМакета);
// Выводим шапку таблицы
ОбластьМакета = Макет.ПолучитьОбласть("ШапкаТаблицы");
ТабДокумент.Вывести(ОбластьМакета);
// Выводим строки таблицы
ОбластьМакета = Макет.ПолучитьОбласть("Строка");
Пока ВыборкаТоваров.Следующий() Цикл
ОбластьМакета.Параметры.НомерСтроки = ВыборкаТоваров.НомерСтроки;
ОбластьМакета.Параметры.Код = ВыборкаТоваров.Код;
ОбластьМакета.Параметры.Номенклатура = ВыборкаТоваров.Номеклатура;
ОбластьМакета.Параметры.Количество = ВыборкаТоваров.Количество;
ОбластьМакета.Параметры.Цена = ВыборкаТоваров.Цена;
ОбластьМакета.Параметры.Сумма = ВыборкаТоваров.Сумма;
ТабДокумент.Вывести(ОбластьМакета);
КонецЦикла;
// Выводим секцию с итоговой суммой
ОбластьМакета = Макет.ПолучитьОбласть("Итого");
ОбластьМакета.Параметры.Всего = ОбщегоНазначения.ФорматСумм(ВыборкаШапки.СуммаДокумента,
ВыборкаШапки.Валюта);
ТабДокумент.Вывести(ОбластьМакета);
// Выводим секцию для подписей сторон
ОбластьМакета = Макет.ПолучитьОбласть("Подвал");
ТабДокумент.Вывести(ОбластьМакета);
Возврат ТабДокумент;
КонецФункции // Печать()
а ЭТО ОШИБКА!!!!!!!!!!!!!!!!!!!
Не удалось сформировать внешнюю печатную форму!
Поле объекта не обнаружено (НомерСтроки)"
это внешняя печатная форма:
Функция Печать() Экспорт
Перем Запрос, ВыборкаШапки, ВыборкаТоваров; // Определяем переменные, используемые
Перем ТабДокумент, Макет, ОбластьМакета; // в нашей обработке
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ТекущийДокумент", СсылкаНаОбъект);
Запрос.Текст = "ВЫБРАТЬ
| СписаниеТоваров.Номер КАК Номер,
| СписаниеТоваров.Дата КАК Дата,
| СписаниеТоваров.Организация КАК Организация,
| СписаниеТоваров.Склад,
| СписаниеТоваров.СуммаДокумента КАК СуммаДокумента,
| СписаниеТоваров.Ответственный
|ИЗ
| Документ.СписаниеТоваров КАК СписаниеТоваров
|ГДЕ
| СписаниеТоваров.Ссылка = &ТекущийДокумент";
ВыборкаШапки = Запрос.Выполнить().Выбрать(); // Собираем данные пол шапке документа
ВыборкаШапки.Следующий();
Запрос.Текст = "ВЫБРАТЬ
| СписаниеТоваров.Товары.(
| Номенклатура.СтавкаНДС,
| Сумма,
| Цена,
| Количество,
| Номенклатура,
| НомерСтроки
| )
|ИЗ
| Документ.СписаниеТоваров КАК СписаниеТоваров";
ВыборкаТоваров = Запрос.Выполнить().Выбрать(); // Собираем данные по товарам документа
ТабДокумент = Новый ТабличныйДокумент;
Макет = ПолучитьМакет("Макет"); // Получаем оригинальный макет который
// храниться в нашей обработке
// Выводим заголовок документа
ОбластьМакета = Макет.ПолучитьОбласть("Заголовок");
ОбластьМакета.Параметры.ТекстЗаголовка =
ОбщегоНазначения.СформироватьЗаголовокДокумента(ВыборкаШапки, "Расходная накладная");
ТабДокумент.Вывести(ОбластьМакета);
// Выводим секцию с Ревизитами Организации
ОбластьМакета = Макет.ПолучитьОбласть("РевизитыОрганизации");
ПредставлениеПоставщика =
ФормированиеПечатныхФорм.ОписаниеОрганизации(УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(
ВыборкаШапки.Организация, ВыборкаШапки.Дата),
"ПолноеНаименование,");
//ОбластьМакета.Параметры.ПредставлениеПоставщика = ПредставлениеПоставщика;
//ОбластьМакета.Параметры.Поставщик = ВыборкаШапки.Поставщик;
//ТабДокумент.Вывести(ОбластьМакета);
// Выводим секцию с покупателем
//ОбластьМакета = Макет.ПолучитьОбласть("Покупатель");
//ПредставлениеПолучателя =
// ФормированиеПечатныхФорм.ОписаниеОрганизации(УправлениеКонтактнойИнформацией.СведенияОЮрФизЛице(
// ВыборкаШапки.Получатель, ВыборкаШапки.Дата),
// "ПолноеНаименование,");
//ОбластьМакета.Параметры.ПредставлениеПолучателя = ПредставлениеПолучателя;
//ОбластьМакета.Параметры.Получатель = ВыборкаШапки.Получатель;
//ТабДокумент.Вывести(ОбластьМакета);
// Выводим шапку таблицы
ОбластьМакета = Макет.ПолучитьОбласть("ШапкаТаблицы");
ТабДокумент.Вывести(ОбластьМакета);
// Выводим строки таблицы
ОбластьМакета = Макет.ПолучитьОбласть("Строка");
Пока ВыборкаТоваров.Следующий() Цикл
ОбластьМакета.Параметры.НомерСтроки = ВыборкаТоваров.НомерСтроки;
ОбластьМакета.Параметры.Код = ВыборкаТоваров.Код;
ОбластьМакета.Параметры.Номенклатура = ВыборкаТоваров.Номеклатура;
ОбластьМакета.Параметры.Количество = ВыборкаТоваров.Количество;
ОбластьМакета.Параметры.Цена = ВыборкаТоваров.Цена;
ОбластьМакета.Параметры.Сумма = ВыборкаТоваров.Сумма;
ТабДокумент.Вывести(ОбластьМакета);
КонецЦикла;
// Выводим секцию с итоговой суммой
ОбластьМакета = Макет.ПолучитьОбласть("Итого");
ОбластьМакета.Параметры.Всего = ОбщегоНазначения.ФорматСумм(ВыборкаШапки.СуммаДокумента,
ВыборкаШапки.Валюта);
ТабДокумент.Вывести(ОбластьМакета);
// Выводим секцию для подписей сторон
ОбластьМакета = Макет.ПолучитьОбласть("Подвал");
ТабДокумент.Вывести(ОбластьМакета);
Возврат ТабДокумент;
КонецФункции // Печать()
а ЭТО ОШИБКА!!!!!!!!!!!!!!!!!!!
Не удалось сформировать внешнюю печатную форму!
Поле объекта не обнаружено (НомерСтроки)"
- 1
- 2
Читают тему
(гостей: 1)