Как вывести все расчеты, относящиеся к выбранному Документу

 док = СоздатьОбъект("Документ.Премия");

// Метод Выбрать вызывает диалог для выбора документа

// Если документ не выбран

если док.Выбрать("Выберите документ") = 0 тогда

Предупреждение("Документ не выбран.");

возврат;

конецЕсли;

жз = СоздатьОбъект("ЖурналРасчетов.Зарплата");

жз.ВыбратьЗаписиПоДокументу(док.ТекущийДокумент());

пока жз.ПолучитьЗапись() = 1 цикл

Сообщить("" + жз.Объект + СимволТабуляции + жз.ВидРасч + СимволТабуляции + жз.Результат);

КонецЦикла;