Нашел такой способ:
Запрос = Новый Запрос(
"ВЫБРАТЬ РАЗРЕШЕННЫЕ
| СвязиКонтрагентКонтакт.Контрагент КАК Контрагент,
| СвязиКонтрагентКонтакт.Контакт КАК ФИО,
| СвязиКонтрагентКонтакт.Должность КАК Должность
|ИЗ
| РегистрСведений.СвязиКонтрагентКонтакт.СрезПоследних(, Контрагент = &Контрагент) КАК СвязиКонтрагентКонтакт
|ГДЕ
| СвязиКонтрагентКонтакт.СвязьНедействительна = ЛОЖЬ"); Показать