ЭлементСправочника = Справочники.Контрагенты.НайтиПоКоду("Ю0006"); 
Для Каждого ТекущаяСтрока Из ЭлементСправочника.ВидыДеятельности Цикл 
  Сообщить(ТекущаяСтрока.ВидДеятельности); 
КонецЦикла;