В начало

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

 

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

   Перем Назв;

   Перем Тип;

   Перем Длин;

   Перем Точн;

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

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

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

      ДБФ.ОписаниеПоля (КП, Назв, Тип, Длин, Точн);

      СпЗнач.ДобавитьЗначение ("" + КП + "; " + Назв + "; " + Тип + "; " + Длин + "; "+Точн);

   КонецЦикла;

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