Можно ли этот код написать без запроса?

09.01.23

✎

11:39

&НаСервере
Процедура СоздатьТаблицуЗначенийНаСервере()

    ТЗ = Новый ТаблицаЗначений;
    ТЗ.Колонки.Добавить("Номенклатура");
    ТЗ.Колонки.Добавить("Сумма");
    ТЗ.Колонки.Добавить("РаспределеннаяСумма");

    ТаблицаЗначений.Очистить();


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

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


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

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

    Для каждого Строка из ТЗ Цикл
        НоваяСтрока= ТаблицаЗначений.Добавить();
        НоваяСтрока.Номенклатура = Строка.Номенклатура;
        НоваяСтрока.Сумма = Строка.Сумма
    КонецЦикла;
КонецПроцедуры

1 vicof

09.01.23

✎

11:41

Можно. Проще всего так.

&НаСервере
Процедура СоздатьТаблицуЗначенийНаСервере()

    ТЗ = Новый ТаблицаЗначений;
    ТЗ.Колонки.Добавить("Номенклатура");
    ТЗ.Колонки.Добавить("Сумма");
    ТЗ.Колонки.Добавить("РаспределеннаяСумма");

    ТаблицаЗначений.Очистить();

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

2 AlexTim03

09.01.23

✎

11:42

(0) Я разрешаю

3 ikea

09.01.23

✎

11:44

(0) Можно. Просто необходимо выгрузить табличную часть.

4 НафНаф

09.01.23

✎

11:47

(0) запрос как раз оставить, достаточно:

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

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


    Запрос.УстановитьПараметр("Ссылка", Выбрать);    //кто так называет переменные?

    ТаблицаЗначений=Запрос.Выполнить().Выгрузить();

5 gul_Sayan

09.01.23

✎

11:49

(0) а чем не устраивает метод ВыгрузитьКолонки у ТЧ - возвращает именно таблицу значений.

6 lodger

09.01.23

✎

11:55

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

7 DJ Anthon

09.01.23