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

Внешняя обработка

Автор RoDi, 15 июл 2016, 10:17

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

RoDi

Подскажите что не так с кодом вроде всё пропиписано правильно, но при выводе на печать не выводится область данные Если Склад = Справочники.Склады.ПустаяСсылка() Тогда
Сообщить("Вы не ввели никакго значения в поле склад!", СтатусСообщения.ОченьВажное);
КонецЕсли;

Если Подразделение = Справочники.Подразделения.ПустаяСсылка() Тогда
Сообщить("Вы не ввели никакго значения в поле подразделения!", СтатусСообщения.Обычное);
КонецЕсли;

Массив=Новый Массив;
//МояСтруктура=Новый Структура("группа");
Запрос = Новый Запрос;

Запрос.Текст ="ВЫБРАТЬ
              | РаспределениеНоменклатурыПоККТ.ГруппаНоменклатуры КАК группа
              |ИЗ
              | Справочник.РаспределениеНоменклатурыПоККТ КАК РаспределениеНоменклатурыПоККТ
              |ГДЕ
              | РаспределениеНоменклатурыПоККТ.Владелец = &Владелец";

Запрос.УстановитьПараметр("Владелец", Подразделение);




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

ВыборкаДетальныеЗаписи = Выборка.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Массив.Добавить(ВыборкаДетальныеЗаписи.группа);
КонецЦикла;

Для  Каждого Элемент из Массив Цикл
Сообщить(Элемент);
КонецЦикла;

// Список = Новый СписокЗначений;
//Пока Результат.Следующий() Цикл
//      Список.Добавить(Результат.Наименование);


//Вытащить группу товара в массив



ТабДок = новый ТабличныйДокумент;
Макет = ПолучитьМакет("Макет");
ОбластьШапки   = Макет.ПолучитьОбласть("Шапка");
ОбластьДанные  = Макет.ПолучитьОбласть("Данные");
ОбластьПодвал  = Макет.ПолучитьОбласть("Подвал");


ОбластьШапки.Параметры.Склад = Склад;
ОбластьШапки.Параметры.Ип = Подразделение;



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

Запрос = Новый Запрос;

Запрос.Текст = "ВЫБРАТЬ
               | ТоварыВРозницеОстатки.КоличествоОстаток,
               | ТоварыВРозницеОстатки.СуммаПродажнаяОстаток,
               | ТоварыВРозницеОстатки.Номенклатура.Артикул,
               | ТоварыВРозницеОстатки.Склад,
               | ТоварыВРозницеОстатки.Номенклатура.Наименование КАК НоменклатураНаименование
               |ИЗ
               | РегистрНакопления.ТоварыВРознице.Остатки КАК ТоварыВРозницеОстатки
               |ГДЕ
               | ТоварыВРозницеОстатки.Склад = &Склад
               | И ТоварыВРозницеОстатки.Номенклатура В ИЕРАРХИИ(&Владелец)
               |
               |УПОРЯДОЧИТЬ ПО
               | НоменклатураНаименование";
               
             



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

    Запрос.УстановитьПараметр("Владелец", Подразделение);



//&Массив

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

НомерПП = 1;
ИтогоСумма=0;
ИтогоКоличество =0;
Пока Выборка.Следующий() Цикл


ЗаполнитьЗначенияСвойств(ОбластьДанные.Параметры,Выборка);

ОбластьДанные.Параметры.НомерПП = НомерПП;
НомерПП = НомерПП + 1;




ИтогоСумма = ИтогоСумма + Выборка.СуммаПродажнаяОстаток;

ИтогоКоличество = ИтогоКоличество + Выборка.КоличествоОстаток;

Если Выборка.КоличествоОстаток = 0 Тогда
ОбластьДанные.Параметры.Цена = 0
Иначе
ОбластьДанные.Параметры.Цена= ОбластьДанные.Параметры.СуммаПродажнаяОстаток / ОбластьДанные.Параметры.КоличествоОстаток;
КонецЕсли;




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

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

ТабДок.Показать();

КонецПроцедуры

cska-fanat-kz

что понимается под "не выводит на печать"
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

RoDi

Внешняя печатная форма, то есть при нажатии на кнопку выполнить нажатие должна появляться внешняя печатная форма, где область данные не выводится почему-то
Добавлено: 15 июл 2016, 10:46



Добавлено: 15 июл 2016, 10:47



Добавлено: 15 июл 2016, 10:49


вот картинка того что получается https://yadi.sk/i/qnVwy2VetKMDQ

Klyacksa

Видимо, здесь проблема:
Номенклатура В ИЕРАРХИИ(&Владелец)
.........                 
Запрос.УстановитьПараметр("Владелец", Подразделение)


Владелец - должна быть Номенклатура или группа Номенклатуры, а не Подразделение.
xxx: Спасибо! Я бы загуглил, но ты интересней. Материшься. Злишься. Послать можешь...

Мысль - это оргазм мозга. Кто способен его испытать - получают истинное наслаждение, остальным приходится имитировать

RoDi

Да проблема действительно здесь, но когда ставлю вместо подразделения группу номенклатуры или просто номенклатура, программа ругается говорит переменная не определена

Klyacksa

По какой группе номенклатуры, собстно, вам надо выводить данные? Вот ее и укажите в параметрах
xxx: Спасибо! Я бы загуглил, но ты интересней. Материшься. Злишься. Послать можешь...

Мысль - это оргазм мозга. Кто способен его испытать - получают истинное наслаждение, остальным приходится имитировать

RoDi

а можно получить образец кода как это прописывается
Добавлено: 15 июл 2016, 12:13


как то так? Запрос.УстановитьПараметр("Группа", Массив.Получить(Номенклатура);
Добавлено: 15 июл 2016, 12:35


Нужно по группе которая есть в данном Подразделение

Klyacksa

Видимо, как-то так:
Номенклатура В ИЕРАРХИИ(&сзНоменклатура)
.........                 
Запрос.УстановитьПараметр("сзНоменклатура", Массив)

Только проверьте, в справочнике РаспределениеНоменклатурыПоККТ, какой тип у ГруппаНоменклатуры? Если СправочникСсылка.Номенклатура - то все хорошо, а если СправочникСсылка.ГруппыНоменклатуры, то второй запрос придется переписывать.
xxx: Спасибо! Я бы загуглил, но ты интересней. Материшься. Злишься. Послать можешь...

Мысль - это оргазм мозга. Кто способен его испытать - получают истинное наслаждение, остальным приходится имитировать

RoDi

Спасибо огромное))
всё работает))))

Теги:

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

Рейтинг@Mail.ru

Поиск