Доработка УПП 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 –

См. также

Обновление для 1С:УТ 10.3, КА 1.1 и УПП 1.3 на новую ставку НДС 22%

НДС 22% Учетные задачи ККМ Файловый обмен (TXT, XML, DBF), FTP 1С 8.3 1С:Комплексная автоматизация 1.х 1С:Управление торговлей 10 1С:Управление производственным предприятием Бухгалтерский учет Налоговый учет НДС Платные (руб)

Готовое обновление для конфигурации 1С:Управление торговлей 10.3, 1С:Комплексная автоматизация 1.1 , 1С:Управление производственным предприятием 1.3 обеспечивающее полную поддержку новой ставки НДС 22%. Для 1С:УТ 10.3 реализована поддержка печати чеков ККМ, а также Правила обмена с 1С:БП 3.0. Решение встраивает необходимые изменения в перечисления и документы, включая торговые операции и печатные формы.

12200 руб.

16.12.2025 6805 79 0

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

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист 1С:Предприятие 8 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" с помощью правил конвертации будет максимально комфортным! | Можно бесплатно проверить перенос на вашем сервере!

50050 руб.

25.02.2015 180624 348 283

409

ED для ERP 2.5, КА 2.5, УТ 11.5 БП 3.0, Розница, УНФ. Новые

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист 1С:Предприятие 8 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. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

22650 руб.

12.06.2017 157338 939 306

475

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

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

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

38000 руб.

15.12.2021 32222 237 61

177

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

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

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

58000 руб.

29.10.2018 60967 76 128

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

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

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

38000 руб.

23.07.2020 65460 304 83

243

ED для УПП, КА 1.1, УТ 10.3

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

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

16531 руб.

18.02.2016 198563 661 543

560

Запрет доступа к данным по зарплате для 1C:БП 3.0 и КА 2.5

Зарплата Роли и права Системный администратор Бухгалтер 1С:Предприятие 8 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Комплексная автоматизация 2.х Молдова Россия Казахстан Бухгалтерский учет Платные (руб)

Расширение позволяет максимально полно ограничить доступ пользователей к данным по заработной плате, а именно закрывает доступ к документам начисления и выплаты заработной платы, не позволяет просматривать бухгалтерские отчеты по счету учета зарплаты а также убирает зарплатные проводки из журнала проводок. Расширение запрещает просматривать платежные документы на выплату зарплаты, так же не доступны регламентные отчеты в ПФР и ИФНС. Расширение предлагает готовые настроенные профили "Бухгалтер без зарплаты", "Только просмотр без зарплаты".

9675 руб.

27.05.2021 52164 439 127

312

Комментарии

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

Свернуть все

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

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

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

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

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

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

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

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

5. ksnik 628 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 34 27.04.22 08:18 Сейчас в теме

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

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

(10)

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

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

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

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

Для отправки сообщения требуется регистрация/авторизация

Автор:

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

Рейтинг: 628

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

Публикация:

№ 1610737

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

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

Статистика:

Просмотры 5265

Загрузки 0

Рейтинг 8

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

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

Код открыт Да

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

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

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

Платформа 1С:Предприятие 8

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

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

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

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

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

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

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