1С 7.x : Перебор всех видов расчета и видов расчета, входящих в группу

 //   Перебор всех видов расчета

Для Ном=1 По Метаданные.ВидРасчета() Цикл

 кфгВР = Метаданные.ВидРасчета(Ном);

 ВР = ВидРасчета.ПолучитьАтрибут(кфгВР.Идентификатор);

КонецЦикла;



//   Перебор видов расчета, входящих в группу

Для Ном=1 По ГруппаРасчетов.ВсеНачисления.Количество() Цикл

 ВР = ГруппаРасчетов.ВсеНачисления.ПолучитьРасчет(Ном);

 Сообщить(ВР.Код);

КонецЦикла;