Функция ВыгрузитьПоПравилу

1. danjer74 4 03.12.20 22:02 Сейчас в теме
Доброго времени суток! Не могу понять, что за фигня. Сделал ПВД вот с таким текстом:

КонДата = Параметры.КонДата;
Запрос=СоздатьОбъект("Запрос");
    ТекстЗапроса="
    |Период с КонДата;
    |Товар=Регистр.Товары.Товар;
    |ТоварРодитель=Регистр.Товары.Товар.Родитель;
    |Склад=Регистр.Товары.МестоХранения;
    |ДокументПартии=Регистр.Товары.ДокументПартии;
    |ФирмаИзготовитель = Регистр.Товары.Товар.ФирмаИзготовитель;
    |СтатусПартии=Регистр.Товары.СтатусПартии;
    |ПоставщикПартии=Регистр.Товары.ПоставщикПартии;
    |Количество=Регистр.Товары.Количество;
    |Стоимость=Регистр.Товары.Стоимость;
    |ПродСтоимость=Регистр.Товары.ПродСтоимость;
    //|Условие (СтатусПартии=Перечисление.СтатусыПартии.Принятый);
    |Группировка Товар;
    |Функция КоличествоКонОст= КонОст(Количество);
    |Функция СтоимостьКонОст= КонОст(Стоимость);
    |Функция ПродСтоимостьКонОст= КонОст(ПродСтоимость);";
    
    Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
    Отказ = 1;
    Возврат Отказ;
    КонецЕсли;

    ТЗ = СоздатьОбъект("ТаблицаЗначений");
    
    Запрос.Выгрузить(ТЗ);
    
    ТЗ.ВыбратьСтроки();
    Пока ТЗ.ПолучитьСтроку() = 1 Цикл
        
        ВыгрузитьПоПравилу(Тз.Товар,,,,"Номенклатура");
        
    Конеццикла;
    Отказ = 1;
Показать


ПКО Номенклатура сделал при помощи конструктора, там все вроде норм. Почему у меня в цикле крутится выгрузка?
По теме из базы знаний
Найденные решения
3. Vitaly1C8 04.12.20 14:03 Сейчас в теме
(1) В ПВД: ПередВыгрузкой
Если Объект.Родитель.Наименование <> "Коммерц" Тогда
    Отказ = истина;
Иначе
    ВыгрузитьПоПравилу(Объект,,,,"Партнеры");    
КонецЕсли;


Отказ = истина;
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. danjer74 4 03.12.20 23:15 Сейчас в теме
Переделал так, перенес в событие перед обработкой, оно прокрутилось, но продолжает дальше выгружать номенклатуру и производителей. Мне нужна только эта выборка.

КонДата = Параметры.КонДата;
Запрос=СоздатьОбъект("Запрос");
    ТекстЗапроса="
    |Период с КонДата;
    |Товар=Регистр.Товары.Товар;
    |Количество=Регистр.Товары.Количество;
    |Группировка Товар;
    |Функция КоличествоКонОст= КонОст(Количество);";
    
    Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
    Отказ = 1;
    Возврат Отказ;
    КонецЕсли;
    Пока Запрос.Группировка(1) = 1 Цикл
        ВыгрузитьПоПравилу(Запрос.Товар,,,,"Номенклатура");
        Сообщить(Запрос.Товар);
    Конеццикла;
Показать
3. Vitaly1C8 04.12.20 14:03 Сейчас в теме
(1) В ПВД: ПередВыгрузкой
Если Объект.Родитель.Наименование <> "Коммерц" Тогда
    Отказ = истина;
Иначе
    ВыгрузитьПоПравилу(Объект,,,,"Партнеры");    
КонецЕсли;


Отказ = истина;
4. danjer74 4 06.12.20 20:07 Сейчас в теме
(3)В итоге догадался сделать именно так.
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот