В начало

Процедура ОписИнд

 

Процедура ОписИнд ()

   Перем Назв;

   Перем Выр;

   Перем Уник;

   Перем Убыв;

   Перем Филт;

   СпЗнач = СоздатьОбъект ("СписокЗначений");

   СпЗначдалитьВсе ();

   Для КП = 1 По ДБФоличествоИндексов () Цикл

      ДБФписаниеИндекса (КП.Назв, Выр, Уник, Убыв, Филт);

      СпЗначобавитьЗначение ("" + КП + "; " + Назв + "; " + Выр + "; " + Уник +

                              "; " + Убыв + "; " + Филт);

   КонецЦикла;

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