Файл: Информационные технологии и платформы разработки информационных систем.pdf

|Из

|Р егистр Н акоплен ия. ОстаткиТовар а КАК ОстаткиТовар а";

Ан ализ. Источн икДан н ых = Запр ос. Выполн ить ();

Ан ализ. Пар аметр ы. ТипОтсечен ияПр авил. Зн ачен ие = ТипОтсечен ияПр авилАссоциации. Избыточн ые;

Р езультатАн ализа = Ан ализ. Выполн ить ();

Постр оитель = Н овый Постр оительОтчетаАн ализаДан н ых ();

Постр оитель. Макет = Н еопр еделен о;

Постр оитель. ТипАн ализа = Тип ("Ан ализДан н ыхПоискАссоциаций");

ТабДок = Н овый Табличн ыйДокумен т;

Постр оитель. Вывести (Р езультатАн ализа, ТабДок);

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

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

Р ис. 40 Окн о отчета

Создаем отчет ПоискПоследовательн остей, выполн яющий ан ализ дан н ых типа "Поиск последовательн остей". Пр оцедур у пр описываем в модуле:

Пр оцедур а Кн опкаСфор мир оватьН ажатие (Кн опка)

Ан ализ = Н овый Ан ализДан н ых;

Ан ализ. ТипАн ализа =Тип ("Ан ализДан н ыхПоискПоследовательн остей");

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

Запр ос. Текст = "Выбр ать

|ОстаткиТовар а. Кон тр аген т,

|ОстаткиТовар а. Товар ы,

|ОстаткиТовар а. Пер иод

|Из

|Р егистр Н акоплен ия. ОстаткиТовар а КАК ОстаткиТовар а";

Ан ализ. Источн икДан н ых = Запр ос. Выполн ить ();

Ан ализ. Н астр ойкаКолон ок. Пер иод. ТипКолон ки = ТипКолон киАн ализаДан н ыхПоискПоследовательн остей. Вр емя;

Р езультатАн ализа = Ан ализ. Выполн ить ();

Постр оитель = Н овый Постр оительОтчетаАн ализаДан н ых ();

Постр оитель. Макет = Н еопр еделен о;

Постр оитель. ТипАн ализа = Тип ("Ан ализДан н ыхПоискПоследовательн остей");