Перебор Основных Реквизитов формы

 //Перебор Основных Реквизитов формы
	Для Каждого Рек из ЭтаФорма.Метаданные().Реквизиты Цикл
		Сообщить(рек.Имя+" - "+рек.Синоним+" - "+Строка(рек.Тип));
	КонецЦикла;
	// или так
	Для Каждого Рек из Метаданные().Реквизиты Цикл
		Сообщить(рек.Имя+" - "+рек.Синоним+" - "+Строка(рек.Тип));
	КонецЦикла;
	
	//Реквизиты формы - Надписи, Поля Ввода и т.д
	//можно и через ЭтаФорма.ЭлементыФормы
	Для Каждого Рек из ЭлементыФормы Цикл
		Сообщить(Строка(рек)+" - "+рек.имя);
    КонецЦикла;    

  //функция создаёт список реквизитов документа
Процедура гСписокРеквизитовДокумента(Список,Документ,ФлагПредставление=0) Экспорт
     //Шапка
     Для i=1 По Метаданные.Документ(Документ).РеквизитШапки() Цикл
          Ж=Метаданные.Документ(Документ).РеквизитШапки(i);
          Если ФлагПредставление=0 Тогда
               Представление=Ж.Идентификатор;
          Иначе
               Представление=Ж.Представление();
          КонецЕсли;
          Список.ДобавитьЗначение(Ж.Идентификатор,"Ш: "+Представление);
     КонецЦикла;
     //Табличная часть
     Для i=1 По Метаданные.Документ(Документ).РеквизитТабличнойЧасти() Цикл
          Ж=Метаданные.Документ(Документ).РеквизитТабличнойЧасти(i);
          Если ФлагПредставление=0 Тогда
               Представление=Ж.Идентификатор;
          Иначе
               Представление=Ж.Представление();
          КонецЕсли;
          Список.ДобавитьЗначение(Ж.Идентификатор,"Т: "+Представление);
     КонецЦикла;
     //Общие
     Для i=1 По Метаданные.ОбщийРеквизитДокумента() Цикл
          Ж=Метаданные.ОбщийРеквизитДокумента(i);
          Если ФлагПредставление=0 Тогда
               Представление=Ж.Идентификатор;
          Иначе
               Представление=Ж.Представление();
          КонецЕсли;
          Список.ДобавитьЗначение(Ж.Идентификатор,"О: "+Представление);
     КонецЦикла;
КонецПроцедуры