1С Режим Конфигуратор



Дополнение - часть 7


  РассчитатьРегистрыНа(ВыбДата);

// указываем на какой момент времени надо получить данные из регистров

  РегОст.ВыбратьИтоги();

// открываем выборку итогов из регистра (на указанный момент времени)

  Пока РегОст.ПолучитьИтог()=1 Цикл

// получаем очередной итог

    ТСклад=РегОст.Склад;

    Если ТСклад=ВыбСклад Тогда

// если текущий итог по выбранному складу

      ТабЗн.НоваяСтрока();

// добавляем в динамическую таблицу новую строку

      ТабЗн.Товар=РегОст.Товар;

      ТабЗн.Сорт=РегОст.Сорт;

      ТабЗн.Ост=РегОст.Количество;

// заполняем поля д. таблицы

    КонецЕсли;

  КонецЦикла;

  РегОст="";

// убираем из памяти копию регистра. Она нам больше не нужна

  СтрокаН=0;

  ТабЗн.ВыбратьСтроку(СтрокаН,"Просмотр содержимого таблицы");

// Это мы делаем, чтобы просмотреть содержимое динамической таблицы

// у нас будут строки с одинаковым товаром и сортом, они возникли из-за

// наличия измерения "Партия" нам надо их объединить

  ТабЗн.Свернуть("1,2","3");

// методом Свернуть() мы объединяем строки у которых содержимое

// в колонках 1 и 2 одинаковое, а колонку 3 мы суммируем

  СтрокаН=0;

  ТабЗн.ВыбратьСтроку(СтрокаН,"Просмотр содержимого таблицы");

// смотрим что получилось. Строки у нас идут вразнобой

  ТабЗн.Сортировать("1+,2+");

// отсортируем их. сперва сортируем по убыванию колонку 1,

// а внутри нее, тоже по убыванию, колонку "Сорт"

  СтрокаН=0;

  ТабЗн.ВыбратьСтроку(СтрокаН,"Просмотр содержимого таблицы");

// смотрим на результат

  Таб=СоздатьОбъект("Таблица");

  Таб.ИсходнаяТаблица("Таблица");

  Таб.ВывестиСекцию("Шапка");

  ТТовар="@#$%&";

// такого товара у нас, надеюсь, не будет

  ТабЗн.ВыбратьСтроки();

// открываем выборку строк из д. таблицы




Содержание  Назад  Вперед