Модель прогноза

Процедура ПрогнозНажатие(Элемент)
Перем МодельПрогноза;
 
Анализ = Новый АнализДанных;
 
Анализ.ТипАнализа= Тип ("АнализДанныхПоискАссоциаций");
 
ЗАпрос = Новый Запрос;
ЗАпрос.Текст=
"ВЫБРАТЬ
| Продажи.Регистратор,
| Продажи.Номенклатура
|ИЗ
| РегистрНакопления.Продажи КАК Продажи";
 
 
Анализ.ИсточникДанных=ЗАпрос.Выполнить();
 
РезультатАнализа = Анализ.Выполнить();
 
МодельПрогноза=РезультатАнализа.СоздатьМодельПрогноза();
 
//_______________________________________________________________________________________________________________ 
ТаблицаЗначений= Новый ТаблицаЗначений;
 
МодельПрогноза.ИсточникДанных=ПереченьНоменклатуры.Выгрузить();
ТаблицаЗначенийПоследовательности= МодельПрогноза.Выполнить();
 
Если ТаблицаЗначенийПоследовательности.Количество()>0 Тогда 
 РезультатПрогноза.Очистить(); 
     Для Каждого Строка Из ТаблицаЗначенийПоследовательности Цикл
     НоваяСтрока = РезультатПрогноза.Добавить();// Здесь ругнулось
      НоваяСтрока.Следствие = Строка.Следствие;
     НоваяСтрока.Достоверность= Строка.Достоверность;
     КонецЦикла; 
КонецЕсли;
 
 Если РезультатПрогноза.Количество()=0 Тогда 
 Предупреждение("Предложений нет");
  Иначе 
 ЭлементыФормы.РезультатПрогноза.СоздатьКолонки();
  КонецЕсли;
 
 
КонецПроцедуры

Процедура ПрогнозНажатие(Элемент)
Перем МодельПрогноза;
Анализ = Новый АнализДанных;
Анализ.ТипАнализа= Тип ("АнализДанныхПоискАссоциаций");
 
// Регистратор  не повторяется, а вот номенклатура в разных регистраторах совпадает - это нам и интересно
ЗАпрос = Новый Запрос;
ЗАпрос.Текст=
"ВЫБРАТЬ
| Продажи.Регистратор,
| Продажи.Номенклатура
|ИЗ
| РегистрНакопления.Продажи КАК Продажи";
 
 
Анализ.ИсточникДанных=ЗАпрос.Выполнить();
РезультатАнализа = Анализ.Выполнить();
 // Вот здесь, я так понимаю, оно само отсортировует по столбцам объекта Прогноз
// Но здесь оно не знает еще для чего вычислять Достоверность
МодельПрогноза=РезультатАнализа.СоздатьМодельПрогноза();
 
//_______________________________________________________________________________________________________________ 
//ТаблицаЗначений= Новый ТаблицаЗначений; Это не нужно вообще
 
//Вот здесь, я так понимаю мы сообщаем для чего нам нужен прогноз. Т. е. мы в ИсточникДанных выгружаем всю
// ТабЧасть документа. 
МодельПрогноза.ИсточникДанных=ПереченьНоменклатуры.Выгрузить();
 
//Здесь оно уже смотрит чтобы значения из ТАбЧасти совпали со значениями из МоделиПрогноза 
// А в модели прогноза у нас Регистратор и Номенклатура. Регистратор оно не возьмет (это ссылка) - я думаю 
//оно само так устроено что Регистратор не возьмет.
ТаблицаЗначенийПоследовательности= МодельПрогноза.Выполнить();
 
 
//Ну здесь уже оно просто результирующую таблицу перебирает и расставляет в колонки. Тут не может быть ошибки.
Если ТаблицаЗначенийПоследовательности.Количество()>0 Тогда 
 РезультатПрогноза.Очистить(); 
     Для Каждого Строка Из ТаблицаЗначенийПоследовательности Цикл
     НоваяСтрока = РезультатПрогноза.Добавить();
      НоваяСтрока.Следствие = Строка.Следствие;
     НоваяСтрока.Достоверность= Строка.Достоверность;
     КонецЦикла; 
КонецЕсли;
 
 Если РезультатПрогноза.Количество()=0 Тогда 
 Предупреждение("Предложений нет");
  Иначе 
 ЭлементыФормы.РезультатПрогноза.СоздатьКолонки();
  КонецЕсли;
 
 
КонецПроцедуры