ТЗВидыРасчётов = Новый ТаблицаЗначений; ТЗВидыРасчётов.Колонки.Добавить("ВидРасчёта"); ЖРЗарплата = v7.CreateObject("ЖурналРасчетов.Зарплата"); ЖРЗарплата.ВыбратьЗаписи(НачДата,КонДата); Пока ЖРЗарплата.ПолучитьЗапись() = 1 Цикл СтрВидыРасчётов = ТЗВидыРасчётов.Добавить(); СтрВидыРасчётов.ВидРасчёта = ЖРЗарплата.ВидРасч.Наименование; КонецЦикла; ЖРДополнительный = v7.CreateObject("ЖурналРасчетов.Дополнительный"); ЖРДополнительный.ВыбратьЗаписи(НачДата,КонДата); Пока ЖРДополнительный.ПолучитьЗапись() = 1 Цикл СтрВидыРасчётов = ТЗВидыРасчётов.Добавить(); СтрВидыРасчётов.ВидРасчёта = ЖРДополнительный.ВидРасч.Наименование; КонецЦикла; ЖРНалогиСФОТ = v7.CreateObject("ЖурналРасчетов.НалогиСФОТ"); ЖРНалогиСФОТ.ВыбратьЗаписи(НачДата,КонДата); Пока ЖРНалогиСФОТ.ПолучитьЗапись() = 1 Цикл СтрВидыРасчётов = ТЗВидыРасчётов.Добавить(); СтрВидыРасчётов.ВидРасчёта = ЖРНалогиСФОТ.ВидРасч.Наименование; КонецЦикла; ЖРСтраховыеВзносы = v7.CreateObject("ЖурналРасчетов.СтраховыеВзносы"); ЖРСтраховыеВзносы.ВыбратьЗаписи(НачДата,КонДата); Пока ЖРСтраховыеВзносы.ПолучитьЗапись() = 1 Цикл СтрВидыРасчётов = ТЗВидыРасчётов.Добавить(); СтрВидыРасчётов.ВидРасчёта = ЖРСтраховыеВзносы.ВидРасч.Наименование; КонецЦикла;