Реклама на этом месте
Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
16 Дек 2017, 14:18
МультиВход
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
 
collapse

Автор Тема: Как вывести табличный документ в форму "Печать документов"  (Прочитано 2320 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн boldinov

  • *
  • Сообщений: 36
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2014-09-12
  • Сайт: 
  • Профессия: Программист 8.1
Вот так не работает
&НаСервере
Функция ОжидаемыеПоступлнеияСервер(Номенклатура)
Макет=Справочники.Номенклатура.ПолучитьМакет("ОжидаемыеПоступления");
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ЗаказПоставщику.Ссылка,
| ЗаказПоставщику.ЖелаемаяДатаПоступления,
| ЗаказПоставщикуТовары.КоличествоУпаковок,
| ЗаказПоставщикуТовары.Количество
|ИЗ
| Документ.ЗаказПоставщику.Товары КАК ЗаказПоставщикуТовары
| ЛЕВОЕ СОЕДИНЕНИЕ Документ.ЗаказПоставщику КАК ЗаказПоставщику
| ПО ЗаказПоставщикуТовары.Ссылка = ЗаказПоставщику.Ссылка
|ГДЕ
| ЗаказПоставщикуТовары.Номенклатура = &Номенклатура";

Запрос.УстановитьПараметр("Номенклатура", Номенклатура);

РезультатЗапроса = Запрос.Выполнить();

ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
ОбластьЗаголовок.Параметры.Номенклатура=Номенклатура;
ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");
ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");
ТабДок=Новый ТабличныйДокумент;
ТабДок.Очистить();
ТабДок.Вывести(ОбластьЗаголовок);
ТабДок.Вывести(ОбластьШапкаТаблицы);
ТабДок.НачатьАвтогруппировкуСтрок();

ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();

Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетальныеЗаписи);
ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетальныеЗаписи.Уровень());
КонецЦикла;

ТабДок.ЗакончитьАвтогруппировкуСтрок();
ТабДок.Вывести(ОбластьПодвалТаблицы);
ТабДок.Вывести(ОбластьПодвал);
ТабДок.ТолькоПросмотр=Истина;
ТабДок.АвтоМасштаб=Истина;
    Возврат ТабДок;
КонецФункции


&НаКлиенте
Процедура ОжидаемоеПоступление(Команда)
Если ЭтаФорма.Элементы.СписокРасширенныйПоискНоменклатура.ТекущиеДанные<>Неопределено  Тогда
Строка=ЭтаФорма.Элементы.СписокРасширенныйПоискНоменклатура.ТекущиеДанные;
Номенклатура=Получить(Строка.Наименование);
КонецЕсли;
ТабДок=ОжидаемыеПоступлнеияСервер(Номенклатура);
МассивОбъектов=Новый Массив;
МассивОбъектов.Добавить(ТабДок);
ПараметрыОткрытия = Новый Структура("ИмяМенеджераПечати,ИменаМакетов,ПараметрКоманды");
ПараметрыОткрытия.ИмяМенеджераПечати = "Справочник.Номенклатура";
ПараметрыОткрытия.ИменаМакетов = "ОжидаемоеПоступление";
ПараметрыОткрытия.ПараметрКоманды = МассивОбъектов;
ОткрытьФорму("ОбщаяФорма.ПечатьДокументов", ПараметрыОткрытия, ЭтаФорма.ВладелецФормы);
КонецПроцедуры


Теги:
 

Как программно открыть документ программно

Автор СерьезныйЧеловекРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 5
Просмотров: 19062
Последний ответ 10 Ноя 2010, 14:08
от Lexius
Добрый день Необходимо на основании типовой конфигурации бухгалтерии сделать обработку, которая будет переносить остатки со счета расчетов 62.01 с одной организации в документ ввода начальных

Автор ZSSРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 0
Просмотров: 224
Последний ответ 18 Авг 2017, 11:57
от ZSS
Убрать документ из обмена. Правила обмена.

Автор bestnameРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 1
Просмотров: 434
Последний ответ 10 Май 2017, 15:18
от bestname
1C:ERP 2.2 Документ Этап производства. Дата производства.

Автор Pavel_0573Раздел Пользователям "1С - Предприятие 8"

Ответов: 2
Просмотров: 543
Последний ответ 31 Май 2017, 16:59
от Pavel_0573
готовая компонента сканирования/загрузки / распознавания бумажных документов (счетов, налоговых накладных, приходных накладных) из бумажного документа в 1с

Автор Св ЧРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 1
Просмотров: 180
Последний ответ 14 Ноя 2017, 10:43
от oleg-x

* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
157 Сообщений
ilyay ilyay
66 Сообщений
alex0402
53 Сообщений
AIFrame
47 Сообщений
andron81_81
44 Сообщений
oleg-x
44 Сообщений
BuhRust
33 Сообщений
MuI_I_Ika MuI_I_Ika
32 Сообщений
Golickoff Golickoff
31 Сообщений
Dima Dddd Dima Dddd
24 Сообщений

* Кто онлайн

  • Точка Гостей: 255
  • Точка Скрытых: 0
  • Точка Пользователей: 5
  • Точка Сейчас на форуме:

* Облако тэгов

* Форум 1С с мобильного

* Инструменты

* Дополнительно

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal