Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
16 апр 2024, 15:07

Из запроса в Excel

Автор Пустовалов Артем, 17 ноя 2015, 12:29

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

vitasw

Цитата: Пустовалов Артем от 17 ноя 2015, 14:00Ну у меня внешняя обработка.Вот  я подумал а можно ли в внешнюю обработку передать макет печатной формы? и его и записать)?

В общем случае можно. Зависит от того как и откуда вызывается/открывается обработка. Озвучте задание целиком.

Пустовалов Артем

Цитата: vitasw от 17 ноя 2015, 14:16
Цитата: Пустовалов Артем от 17 ноя 2015, 14:00Ну у меня внешняя обработка.Вот  я подумал а можно ли в внешнюю обработку передать макет печатной формы? и его и записать)?

В общем случае можно. Зависит от того как и откуда вызывается/открывается обработка. Озвучте задание целиком.

Есть Документ. Унего Печатная Форма. Нужно Создать Внешнюю обработку длля того что бы Переносить Данные из этого Документа в Ехел и Ворд)

vitasw

Какая конфигурация? Во всех типовых конфигурациях есть механизм внешних печатных форм.

Пустовалов Артем

Цитата: vitasw от 17 ноя 2015, 15:23
Какая конфигурация? Во всех типовых конфигурациях есть механизм внешних печатных форм.
УПП

vitasw

Ищите в сервисе пункт по дополнительным обработкам. В "помощи" читайте про требования к внешним обработкам печати. Копируете макет и функцию печати в модуль обработки и производите минимальные коррекции. все.

Пустовалов Артем

Цитата: vitasw от 17 ноя 2015, 15:40
Ищите в сервисе пункт по дополнительным обработкам. В "помощи" читайте про требования к внешним обработкам печати. Копируете макет и функцию печати в модуль обработки и производите минимальные коррекции. все.

Почти все работает. Вопрос Почему перескакивает Цикл Выборки. Запрос Проверил в Консоли Все нормально.Может что не так написал??

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

Результат = Запрос.Выполнить();
Выборка = Результат.Выбрать();
ТабДок = Новый ТабличныйДокумент;
ДокументОбъект = Документ.ПолучитьОбъект();


Макет = ПолучитьМакет("ЭкспедиторскаяРасписка");
// Заголовок
Область = Макет.ПолучитьОбласть("Заголовок");
ТабДок.Вывести(Область);
//Шапка
Область = Макет.ПолучитьОбласть("ШапкаТаблицы");
Область.Параметры.Дата = СокрЛП(ДокументОбъект.Дата);
Область.Параметры.Номер = СокрЛП(ДокументОбъект.Номер);
ТабДок.Вывести(Область);
//Область строк
Область = Макет.ПолучитьОбласть("ОбластьСтрок");
Пока Выборка.Следующий() Цикл

Область.Параметры.Грузоотправитель = Выборка.Грузоотправитель;
Область.Параметры.ФактическийАдресГз = Выборка.ФактическийАдресГз;
Область.Параметры.Клиент = Выборка.Клиент;
Область.Параметры.ФактическийАдресКл = Выборка.ФактическийАдресКл;
Область.Параметры.Экспедитор = Выборка.Экспедитор;
//Область.Параметры.ФактическийАдресЭкспедитора = //Выборка.ФактическийАдресЭкспедитора;
Область.Параметры.Страна = Выборка.Страна;
//Область.Параметры.ТоварныйКод = Выборка.ТоварныйКод;
//Область.Параметры.Маркировка = Выборка.Маркировка;
//Область.Параметры.ВидУпаковки = Выборка.ВидУпаковки;
Область.Параметры.КоличествоМест = Выборка.КоличествоМест;
Область.Параметры.Вес = Выборка.Вес;
Область.Параметры.Объем = Выборка.Объем;
//Область.Параметры.Стоимость = Выборка.Стоимость;
//Область.Параметры.РазмерУпаковки = Выборка.РазмерУпаковки;
//Область.Параметры.Условия   = Выборка.Условия;
//Область.Параметры.ОсобыеОтметки   = Выборка.ОсобыеОтметки  ;
Область.Параметры.ПодписьЭкспедитора = ДокументОбъект.Водитель;
КонецЦикла;

Табдок.Вывести(Область);

ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Ложь;
ТабДок.ТолькоПросмотр = Ложь;
ТабДок.ОтображатьЗаголовки = Ложь;[code]

vitasw

Цитата: Пустовалов Артем от 17 ноя 2015, 15:52Вопрос Почему перескакивает Цикл Выборки.

переведите

Kironten

Цитата: Пустовалов Артем от 17 ноя 2015, 15:52
Вопрос Почему перескакивает Цикл Выборки
Выборка пустая. Проверяйте результат и передаваемые параметры.

Пустовалов Артем

Цитата: vitasw от 17 ноя 2015, 16:10
Цитата: Пустовалов Артем от 17 ноя 2015, 15:52Вопрос Почему перескакивает Цикл Выборки.

переведите
В процессе Отладки стрелочка доходит до строки Пока Выборка.следующий Цикл И перескакивает на КонецЦикла Хотя в модуле документа работает. из запроса все данные попадают

Kironten

Так как строка выглядит?
Раньше вы писали:
Пока Выборка.Следующий() Цикл
теперь
Пока Выборка.следующий Цикл

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск