Сделал свой вариант, учитывает данные только работающих сотрудников в периоде, т.е. те данные которые указаны непосредственно у сотрудника в Зарплатном проекте:
&НаСервере
Функция СоздатьСчетаНаСервере(РежимСоздания = 0, Сотрудники = Неопределено)
СтруктураДанных = Новый Структура();
СтруктураДанных.Вставить("ДатаНачала",);
СтруктураДанных.Вставить("ДатаОкончания",);
СтруктураДанных.Вставить("РазмерОклада",);
ПараметрыПолучения = ПолучитьПараметры();
//ПараметрыПолучения.Организация = ЭтотОбъект.Организация;
//Если ЗначениеЗаполнено(Подразделение) Тогда
// ПараметрыПолучения.Подразделение = Подразделение;
//КонецЕсли;
//Если ВключаяУволенныхНаНачалоПериода Тогда
// ПараметрыПолучения.ВключаяУволенныхНаНачалоПериода = Истина;
//КонецЕсли;
ПараметрыПолучения.НачалоПериода = НачалоМесяца(ДАТА(2020,10,01));
ПараметрыПолучения.ОкончаниеПериода = КонецМесяца(ДАТА(2020,11,30));
ПараметрыПолучения.ПодработкиРаботниковПоТрудовымДоговорам = Ложь;
ПараметрыПолучения.РаботникиПоДоговорамГПХ = Ложь;
// ОТБОР ПО ВИДУ ЗАНЯТОСТИ РАБОТАЕТ ТОЛЬКО НАЧИНАЯ С РЕДАКЦИИ 3.1.7
//ЗарплатаКадрыОбщиеНаборыДанных.ДобавитьВКоллекциюОтбор(
// ПараметрыПолучения.Отборы, "ВидЗанятости", "=", Перечисления.ВидыЗанятости.Подработка);
//ЗарплатаКадрыОбщиеНаборыДанных.ДобавитьВКоллекциюОтбор(
// ПараметрыПолучения.Отборы, "ФизическоеЛицо", "=", Сотрудник.ФизическоеЛицо);
ПараметрыПолучения.КадровыеДанные = "ДатаПриема,ДатаУвольнения,ВладелецМестаВыплаты,ВидМестаВыплаты,МестоВыплаты,НомерЛицевогоСчета,ЗарплатныйПроект";
ТаблицаСотрудников = КадровыйУчет.СотрудникиОрганизации(Истина, ПараметрыПолучения);
//КадровыйУчетВнутренний.ЗапросВТКадровыеДанныеСотрудников()
//КадровыйУчетВнутренний.ЗапросВТПостоянныеКадровыеДанныеСотрудников()
Для каждого Строка Из ТаблицаСотрудников Цикл
Если Строка.ВидМестаВыплаты = Перечисления.ВидыМестВыплатыЗарплаты.ЗарплатныйПроект И НетНомера(Строка) Тогда
Спр = Справочники.БанковскиеСчетаКонтрагентов.СоздатьЭлемент();
//ЗаполнитьЗначенияСвойств(Спр, Строка);
Спр.Владелец = Строка.ФизическоеЛицо;
Спр.НомерСчета = Строка.НомерЛицевогоСчета;
Спр.Банк = Строка.ЗарплатныйПроект.Банк;
Спр.Наименование = "" + Спр.НомерСчета + " " + Спр.Банк;
Спр.ТекстНазначения = "Из зарплатного проекта";
Спр.ОбменДанными.Загрузка = Истина;
Попытка
Спр.Записать();
Сообщить("Создан банковский счет сотруднику " + Строка.Сотрудник + ", счет " + Строка.НомерЛицевогоСчета);
Исключение
Сообщить("НЕ создан банковский счет сотруднику " + Строка.Сотрудник + ", счет " + Строка.НомерЛицевогоСчета + "!" + ОписаниеОшибки(), СтатусСообщения.Важное);
КонецПопытки;
КонецЕсли;
КонецЦикла;
КонецФункции
&НаСервере
Функция НетНомера(Строка)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| БанковскиеСчетаКонтрагентов.Ссылка КАК Ссылка
|ИЗ
| Справочник.БанковскиеСчетаКонтрагентов КАК БанковскиеСчетаКонтрагентов
|ГДЕ
| БанковскиеСчетаКонтрагентов.НомерСчета ПОДОБНО &НомерСчета
| И БанковскиеСчетаКонтрагентов.Владелец = &Владелец
| И БанковскиеСчетаКонтрагентов.Банк = &Банк
| И НЕ БанковскиеСчетаКонтрагентов.ПометкаУдаления";
Запрос.УстановитьПараметр("Банк", Строка.ЗарплатныйПроект.Банк);
Запрос.УстановитьПараметр("НомерСчета", Строка.НомерЛицевогоСчета);
Запрос.УстановитьПараметр("Владелец", Строка.ФизическоеЛицо);
РезультатЗапроса = Запрос.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Если ВыборкаДетальныеЗаписи.Количество() = 0 Тогда
Возврат Истина;
Иначе
Возврат Ложь;
КонецЕсли;
КонецФункции
&НаСервере
Функция ПолучитьПараметры()
Возврат КадровыйУчет.ПараметрыПолученияСотрудниковОрганизацийПоСпискуФизическихЛиц();
КонецФункции
Показать
