Доработка УПП 1.3 для выгрузки без ЭДО файлов всех сотрудников из документа "Сведения о застрахованных лицах, ФСС" для СБИС

22.02.22

ФСС потребовал предоставить полные списки работников при переходе на безбумажные больничные. Если сотрудников в УПП довольно много, становится проблематично каждого сотрудника выгружать в ФСС вручную. Можно даже сказать - довольно кропотливо. Вариант работы с ЭДО не требует жмакать кнопку для каждого сотрудника, но это платно (для второй и последующих организаций). Оказывается к ЭДО можно пока не подключаться. Предлагаю вариант автоматической выгрузки.

На форму документа "Сведения о застрахованных лицах, ФСС" помещаем кнопку "Записать все по документу на диск" (она выделена красным на предыдущем скриншоте). Делаем обработчик нажатия следующим образом:

Код для вставки в конце модуля формы документа СведенияОЗастрахованныхЛицахФСС

	Иначе
		РаботаСДиалогами.ВывестиПредупреждение("Нет прав на документооборот с контролирующими органами (ФСС, ФНС, ПФР).");
	КонецЕсли;
	
КонецПроцедуры

//Космачев+ 21,02,2022 в конце модуля формы документа СведенияОЗастрахованныхЛицахФСС, номер строки 878
Процедура ОсновныеДействияФормыЗаписатьВсеПоДокументуНаДиск(Кнопка)
	
	//ПроцедурыПерсонифицированногоУчета.ЗаписатьФайлДокументаНаДискету(ЭтотОбъект, глЗначениеПеременной("глТекущийПользователь"), ОбменСведениямиОПособияхСФСС.ИмяФайла(ЭтотОбъект) + ".xml", КодировкаТекста.ANSI,,"Файл реестра записан под именем: ");
	ПервыйФайл = Истина;
	Для Каждого Стр Из РаботникиОрганизации Цикл
		ТекущаяСтрока = Стр;
		Если ТекущаяСтрока <> Неопределено Тогда
			ТекстФайла = ПолучитьТекстФайла(ТекущаяСтрока);
			Если ТекстФайла <> Неопределено Тогда
				ИмяФайла = "Сведения о застрахованном лице_" + ТекущаяСтрока.Сотрудник + "_" + Формат(Дата,"ДФ=yyyy_MM_dd") + "_" + Прав("000" + ОбщегоНазначенияЗК.ПолучитьНомерНаПечать(ЭтотОбъект), 4) + ".xml";
				ПроцедурыПерсонифицированногоУчета.ЗаписатьФайлДокументаНаДискету(ЭтотОбъект, глЗначениеПеременной("глТекущийПользователь"), ИмяФайла, КодировкаТекста.UTF8,ПервыйФайл,"Файл со сведениями о застрахованном лице записан под именем: ",, ТекстФайла);
				ПервыйФайл = Ложь;
			КонецЕсли;
		КонецЕсли;
	КонецЦикла;
	
КонецПроцедуры
//Космачев- 21,02,2022


/////////////////////////////////////////////////////

мТаблицаДанныхИзРегистраСведений = Новый ТаблицаЗначений;

Также потребуется изменить общий модуль "ПроцедурыПерсонифицированногоУчета"

Код для вставки под следующим спойлером.

Код для вставки в общий модуль "ПроцедурыПерсонифицированногоУчета"

//Записывает файл сведений документа в каталог, указанный пользователем
Процедура ЗаписатьФайлДокументаНаДискету(ДокументОбъект, ТекущийПользователь, ИмяФайла, Знач КодировкаФайла = Неопределено, ВыбиратьКаталог = Истина, ТекстОповещения = "", ДобавлятьBOM = Истина, ТекстФайла = "") Экспорт
	
	//Космачев+ 21,02,2022
	ТекКаталог = "";
	//Космачев- 21,02,2022

	Вопрос = "Перед формированием файла необходимо записать документ. Записать?";
	Если НЕ РегламентированнаяОтчетность.ТребованиеЗаписиДокументаУдовлетворено(ДокументОбъект,Вопрос) Тогда
		Возврат;
	КонецЕсли;
	
	ЕстьОшибки = Ложь;
	Если ТекстФайла = "" Тогда
		ТекстФайла = РегламентированнаяОтчетность.ПолучитьТекстФайла(ДокументОбъект,ЕстьОшибки);
	КонецЕсли;
	Если ЕстьОшибки Тогда
		Возврат;
	КонецЕсли;
	
	Если КодировкаФайла = Неопределено Тогда
		КодировкаФайла = "windows-1251";
	КонецЕсли;
	
	Если ТипЗнч(КодировкаФайла) = Тип("КодировкаТекста") Тогда
		ТипКодировки = Строка(КодировкаФайла);
	Иначе
		ТипКодировки = КодировкаФайла;
	КонецЕсли;
	
	Если Не ДобавлятьBOM И ТипКодировки = "UTF8" Тогда
		Если Не ЕстьПоддержкаУправленияBOM() Тогда
			ДобавлятьBOM = Истина;
			СокращенноеИмяДокумента = Сред(ИмяФайла, Найти(ИмяФайла, "СЗВ-"));
			СокращенноеИмяДокумента = Лев(СокращенноеИмяДокумента, Найти(СокращенноеИмяДокумента, "_")-1);
			Предупреждение("Для записи файла """ + СокращенноеИмяДокумента + """ в соответствии с правилами ПФ РФ требуется использование технологической платформы ""1С:Предприятие 8"" версии 8.3.9.1818 или более поздней.
			|Сохраненный сейчас файл может быть отклонен ПФ РФ.", 20, "Внимание");
		КонецЕсли;
	Иначе
		ДобавлятьBOM = Истина;
	КонецЕсли;
	
	Если ВыбиратьКаталог  Тогда
		Длг = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога);
		Длг.Каталог = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(ТекущийПользователь,"ОсновнойКаталогФайлов");
		Длг.Заголовок = "Укажите каталог";
		
		Если Длг.Выбрать() Тогда
			ИмяФайла = Длг.Каталог+"\" + ИмяФайла;
			//Космачев+ 21,02,2022
			ТекКаталог = Длг.Каталог+"\";
			СохранитьЗначение("ТекКаталог_"+СокрЛП(ТекущийПользователь),ТекКаталог);
			//Космачев- 21,02,2022
			
			Если ДобавлятьBOM Тогда
				ТекстовыйДокумент = Новый ТекстовыйДокумент;
				ТекстовыйДокумент.УстановитьТекст(ТекстФайла); 
				ТекстовыйДокумент.Записать(ИмяФайла, КодировкаФайла);
			Иначе
				Запись = Новый ЗаписьXML;
				Запись.ОткрытьФайл(ИмяФайла, ТипКодировки, Ложь);
				Запись.ЗаписатьБезОбработки(ТекстФайла);
				Запись.Закрыть();
			КонецЕсли;
			Если Не ЗначениеЗаполнено(ТекстОповещения) Тогда
				ТекстОповещения = "Файл записан под именем: "
			КонецЕсли;
			Предупреждение(ТекстОповещения + ИмяФайла);
		КонецЕсли;
	Иначе
		Если ДобавлятьBOM Тогда
			ТекстовыйДокумент = Новый ТекстовыйДокумент;
			//Космачев+ 21,02,2022
			ТекКаталог = ВосстановитьЗначение("ТекКаталог_"+СокрЛП(ТекущийПользователь));
			ИмяФайла = ТекКаталог+ИмяФайла; 
			//Космачев- 21,02,2022
			ТекстовыйДокумент.УстановитьТекст(ТекстФайла); 
			ТекстовыйДокумент.Записать(ИмяФайла,КодировкаФайла);
		Иначе
			Запись = Новый ЗаписьXML;
			//Космачев+ 21,02,2022
			ТекКаталог = ВосстановитьЗначение("ТекКаталог_"+СокрЛП(ТекущийПользователь));
			ИмяФайла = ТекКаталог+ИмяФайла; 
			//Космачев- 21,02,2022
			Запись.ОткрытьФайл(ИмяФайла, ТипКодировки, Ложь);
			Запись.ЗаписатьБезОбработки(ТекстФайла);
			Запись.Закрыть();
		КонецЕсли;
	КонецЕсли;
	
КонецПроцедуры

Теперь можно полученные файлы загружать в СБИС, ФСС их благополучно принимает.

Протестировано в Управление производственным предприятием, редакция 1.3

на релизах 1.3.173.3 и 1.3.174.1.

В типовой конфигурации выгрузка как без шифрования, так и с шифрованием возможна только по одному сотруднику в один файл. Далее привожу список мест в конфигурации, в которые вносились изменения.

Основная конфигурация ОбщийМодуль. ПроцедурыПерсонифицированногоУчета.Модуль(693, 10)	//Космачев+ 21,02,2022
Основная конфигурация ОбщийМодуль. ПроцедурыПерсонифицированногоУчета.Модуль(696, 10)	//Космачев- 21,02,2022
Основная конфигурация ОбщийМодуль. ПроцедурыПерсонифицированногоУчета.Модуль(716, 10)	//Космачев+ 21,02,2022
Основная конфигурация ОбщийМодуль. ПроцедурыПерсонифицированногоУчета.Модуль(719, 10)	//Космачев- 21,02,2022
Основная конфигурация ОбщийМодуль. ПроцедурыПерсонифицированногоУчета.Модуль(724, 10)	//Космачев+ 21,02,2022
Основная конфигурация ОбщийМодуль. ПроцедурыПерсонифицированногоУчета.Модуль(727, 10)	//Космачев- 21,02,2022
Основная конфигурация Документ. СведенияОЗастрахованныхЛицахФСС.Форма. ФормаДокумента.Форма.Модуль(878, 13)	//Космачев+ 21,02,2022
Основная конфигурация Документ. СведенияОЗастрахованныхЛицахФСС.Форма. ФормаДокумента.Форма.Модуль(896, 13)	//Космачев- 21,02,2022

+8 –

См. также

SALE! 20%

ED для свежих конфигураций

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

Правила в универсальном формате обмена для ERP 2.5, КА 2.5, УТ 11.5, БП 3.0, Розница, УНФ, для последних версий конфигураций. Ссылки на другие конфигурации в описании публикации. Правила совместимы со всеми другими версиями конфигураций новыми и старыми, поддерживающими обмен и синхронизацию в формате EnterpriseData. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

~~26280~~ 22338 руб.

12.06.2017 141522 798 297

419

SALE! 10%

Перенос данных из УПП 1.3 в БП 3.0. Переносятся документы (обороты за период), справочная информация и остатки

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УПП 1.3 (1.3.234.x) и БП 3.0 (3.0.161.x). Правила подходят для версии ПРОФ и КОРП.

~~35000~~ 31500 руб.

15.12.2021 24021 169 51

127

Обновление для КА 1.1, ЗУП 2.5, БУХ 2.0: НДС, ЕФС-1, Расчет страховых взносов, Мобилизация, Статистика, Электронные трудовые книжки, 2-НДФЛ, Регламентированная отчетность, Кадровый учет, Прослеживаемость импортных товаров

Зарплата Регламентированный учет и отчетность Кадровый учет Обновление 1С Бухгалтер Платформа 1С v8.3 Сложные периодические расчеты 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Зарплата и Управление Персоналом 2.5 Бухгалтерский учет Налоговый учет Управленческий учет Акцизы ЕНВД ЕСН Земельный налог ИП, ПБОЮЛ, КФХ Налог на имущество Налог на прибыль НДС НДФЛ ФОМС, ЕФС Транспортный налог УСН ПСН (патентная система налогообложения) Платные (руб)

Обновления для конфигураций: КА 1.1; ЗУП 2.5; БУХ 2.0; КА 1.1 Комплексная автоматизация торговли алкогольной продукцией; КА 1.1 Комплексный учет сельскохозяйственного предприятия

27900 руб.

01.04.2020 147145 649 360

235

SALE! 10%

Перенос данных из УТ 10.3 в УТ 11.5. Переносятся документы (обороты за период), справочная информация и остатки

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 Оперативный учет 1С:Управление торговлей 10 Россия Управленческий учет Платные (руб)

Перенос данных из 1С:Управление торговлей 10.3 в 1С:Управление торговлей 11.5 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УТ 10.3 (10.3.88.x) и УТ 11.5 (11.5.19.x).

~~35000~~ 31500 руб.

23.07.2020 51267 228 69

185

SALE! 10%

Перенос данных из ERP 2 / КА 2 в ЗУП 3. Переносятся остатки, документы и справочники

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из ERP в ЗУП 3 | из КА 2 в ЗУП | Готовые правила конвертации данных (КД 2) для переноса остатков, документов с движениями и справочной информации 3 | Есть перенос начальной задолженности по зарплате и начальной штатной расстановки на выбранную дату | Обороты за прошлые годы (данные для расчета среднего) переносятся свернуто в документ "Перенос данных" | Есть фильтр по организациям | Документы за текущий период переносятся сразу с движениями, поэтому не потребуется делать перерасчеты | Перенос можно проверить перед покупкой, обращайтесь!

~~53111~~ 47800 руб.

03.12.2020 36591 94 66

SALE! 10%

Перенос данных из УПП 1.3 в ЗУП 3.1 или из КА 1.1 в ЗУП 3.1. Переносятся начальные остатки, обороты и справочная информация

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист Платформа 1С v8.3 Сложные периодические расчеты 1С:Комплексная автоматизация 1.х 1С:Управление производственным предприятием 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Платные (руб)

Правила переноса кадровых и расчетных данных и справочной информации из "1С:УПП1.3" или "1С:КА 1.1" в "1С:ЗУП 3.1 | Разработан в формате КД 2 (правила конвертации данных) | При выгрузке есть фильтр по организациям | Обновляется при выходе новых релизов 1С | Развитие алгоритмов | Расчетные документы переносятся в документ "Перенос данных" | Создаются документы "Начальная штатная расстановка" и "Начальная задолженность по зарплате", переносятся кадровые документы

~~55778~~ 50200 руб.

29.10.2018 56208 59 105

SALE! 10%

Перенос данных из УПП 1.3 / КА 1.1 в БП 3. Переносятся документы, справочники и начальные остатки

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена | Можно выполнить переход с УПП на БП 3 или запускать выгрузку данных за выбранный период времени | Переносятся документы, начальные остатки и вся справочная информация | Есть фильтр по организации и множество других параметров выгрузки | Поддерживается несколько сценариев работы: как первичный полный перенос, так и перенос только новых документов | Перенос данных возможен в "1С: Бухгалтерия 3.0" версии ПРОФ, КОРП или базовую | Переход с "1С: УПП1.3" / "1С:КА 1.1" на "1С:БП3.0" с помощью правил конвертации будет максимально комфортным! | Можно бесплатно проверить перенос на вашем сервере!

~~48278~~ 43450 руб.

25.02.2015 171177 303 257

378

SALE! 15%

Обмен УПП 1.3, КА 1.1, УТ 10.3 с EnterpriseData (универсальный формат обмена) ED2

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 Платформа 1C v8.2 1С:Комплексная автоматизация 1.х 1С:Управление торговлей 10 1С:Управление производственным предприятием Россия Платные (руб)

Регулярный обмен, выгрузка, перенос из КА 1.1, УПП 1.3, УТ 10.3 для обмена с любыми конфигурациями, поддерживающими обмен в формате EnterpriseData (КД3) - БП 3.0, ERP, КА 2, УТ 11, Розница 2, УНФ 1.6 и другими. Правила для старых и доработанных конфигураций не требуют синхронного обновления и совместимы с новыми и будущими конфигурациями. Обмен по расписанию, через папку, FTP, почту.

~~15300~~ 13005 руб.

18.02.2016 186881 589 509

526

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. ksnik 593 23.02.22 09:01 Сейчас в теме

По тегу "ФОМС, ПФ, ФСС" нашел сейчас другие подобные обработки, однако преимущество моего варианта в том, что он будет работать при изменении формата ФСС и корректном обновлении типовой конфигурации. И скачивать ничего не надо.

2. ZXC_ZXC 24.02.22 16:36 Сейчас в теме

выгружает каждого сотрудника в отдельный файл? Если сотрудников 10000 потом по одному отправлять придеться. Контур сообщил, что задача до конца месяца сделать возможность загружать реестром

3. ksnik 593 24.02.22 19:56 Сейчас в теме

(2) обратите внимание, все размещенные здесь обработки и расширения выгружают одного сотрудника в один файл, а в Сбисе есть пакетная загрузка нескольких файлов одновременно. Причем неважно - с криптографией или без, но сотрудник один. Иного пока не предусматривает формат. Просто с криптографией можно сделать много отправок нажатием одной кнопки, что собственно мы тоже делаем у себя.

4. monkbest 114 03.03.22 15:17 Сейчас в теме

Коллега, подскажите, удалось добиться, чтобы заполнялся код адреса ФИАС?

5. ksnik 593 03.03.22 16:43 Сейчас в теме

(4) данная выгрузка не предназначени для дозаполнения полей документа. В государственные органы Фонда Социального Страхования не требуется предоставлять реквизит "Код по ФИАС", это не обязательное для заполнения поле.

6. monkbest 114 03.03.22 20:19 Сейчас в теме

(5) я это понял, просто думал у Вас есть опыт. Фиас не обязателен, но процедура формирующая текст xml в документе не пишет в файл адрес, а только код Фиас. Я сделал похожую доработку, в цикле вызвав эту процедуру для каждой строки. Загрузили в сбис с помощью "скрепки" и оказалось, что адрес пустой у всех сотрудников. Потому что в Фиас нули или прочерки

7. jimer 22.03.22 11:40 Сейчас в теме

(6) Прошу подсказать, удалось ли продвинуться в части заполнения адреса? Ситуация аналогичная, выгружаем в файл и загружаем в сбис

8. monkbest 114 22.03.22 14:43 Сейчас в теме

Да, мы взяли в сбис шаблон xls файла и спрограммировали печ форму внешнюю

9. jimer 23.03.22 11:33 Сейчас в теме

(8) Понял, спасибо

10. evn-zorin 33 27.04.22 08:18 Сейчас в теме

подскажите, есть ли вариант выгрузки файла из документа "Ответ на запрос ФСС"?

11. ksnik 593 27.04.22 08:18 Сейчас в теме

(10)

Ответ на запрос ФСС

пока нет необходимости

12. evn-zorin 33 27.04.22 08:20 Сейчас в теме

(11)налоговая требует уже, грозит штрафами

Оставьте свое сообщение

E-mail:

Автор:

Сергей Космачев (ksnik)

Рейтинг: 593

Для получения уведомлений о новых публикациях автора подключите телеграм бот: Инфостарт бот

Публикация:

№ 1610737

Создание 22.02.22 15:30

Обновление 22.02.22 15:30

Статистика:

Просмотры 4054

Загрузки 0

Рейтинг 8

Комментарии 12

Характеристики:

Код открыт Да

Рубрики Зарплата Файловый обмен (TXT, XML, DBF), FTP ЭДО и ОФД

Кому Программист

Тип файла Нет файла

Платформа Платформа 1С v8.3

Конфигурация 1С:Управление производственным предприятием

Операционная система Не имеет значения

Страна Россия

Отрасль Не имеет значения

Налоги ФОМС, ЕФС

Вид учета Бухгалтерский учет

Доступ к файлу Бесплатно (free)