Каталог решений - Выгрузка сведений о застрахованных лицах в файл для ФСС

Для возможности выгрузки сведений ФСС в файл создаем новое расширение, добавляем в него форму ‘ОтправкаДокументов’ из обработки ‘ОбщиеФормыСЭДОФСС’, как ниже на рисунке:

Открываем форму в расширении, добавляем новую команду для выгрузки в файл, не забываем добавить ее на форму. Как на рисунку ниже:

В модуле формы прописываем код:

&НаКлиенте
Процедура Расш_ВыгрузитьВФайлПосле(Команда)
	Контекст = КонтекстОтправки();
	СформироватьФайлы(Контекст);
КонецПроцедуры

&НаКлиенте
Процедура СформироватьФайлы(Контекст)
	Контекст.Индекс = Контекст.Индекс + 1;
	Если Контекст.Индекс > Контекст.ВГраница Тогда
		Закрыть();
		Возврат;
	КонецЕсли;
	СтрокаСписка = Список[Контекст.Индекс];
	СтрокаСписка.ДатаОтправки = ОбщегоНазначенияКлиент.ДатаСеанса();
	
	
	Режим = РежимДиалогаВыбораФайла.ВыборКаталога; 
	ДиалогОткрытия = Новый ДиалогВыбораФайла(Режим); 
	ДиалогОткрытия.Каталог = ""; 
	ДиалогОткрытия.МножественныйВыбор = Ложь; 
	ДиалогОткрытия.Заголовок = "Выберите каталог для сохранения файлов"; 
	
	Если ДиалогОткрытия.Выбрать() Тогда 
		ПутьККаталогу = ДиалогОткрытия.Каталог; 
		ПутьКФайлу  = ПутьККаталогу + "\" + СтрЗаменить(СтрокаСписка.ФизическоеЛицо," ","") + "_" + Строка(Формат(СтрокаСписка.ДатаОтправки, "ДФ=ddMMyyyy" )) + ".xml";
		Текст = Новый ТекстовыйДокумент;
		Текст.ДобавитьСтроку(СтрокаСписка.ТекстXML);
		Текст.Записать(ПутьКФайлу);
		Сообщить("Данные успешно выгружены.");
	Иначе
		Сообщить("Не выбран каталог для выгрузки.");
	КонецЕсли;	
	ЭтаФорма.Закрыть();
КонецПроцедуры

Сохраняем, запускаем и пробуем, все должно работать.

Кому лень самому делать расширение, можете скачать готовое.

Все делалось и проверялось на 1С:Предприятие 8.3 (8.3.18.1208).

Конфигурация: Зарплата и управление персоналом, редакция 3.1 (3.1.21.75).