Список граждан для сверки с военкоматом (с детализацией по семейному положению и образованию) для ЗУП 3.1, Зик ГУ

14.08.22

Учетные задачи - Кадровый учет

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

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Скачано Купить файл
Список граждан для сверки с военкоматом (с детализацией по семейному положению и образованию) для ЗУП 3.1:
.cfe 15,94Kb ver:2
61 1 850 руб. Купить
Список граждан для сверки с военкоматом (с детализацией по семейному положению и образованию) для ЗУП 3.1 (с адресом прописки вместо адреса проживания):
.cfe 15,74Kb ver:2
71 1 850 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

Оформите подписку на компанию для решения рабочих задач

Оформить подписку и скачать решение со скидкой

ПОРЯДОК РАБОТЫ
 

а) Подключаем расширение;
б) чистим регистр сведений "Строковые сведения физических лиц", зайдя в него через Все функции (выделить все - удалить записи);
в) заполняем заново кнопкой "Обновить записи" расширения формы списка этого регистра (см скриншот).

Обновлено 14.08.2022 (обе версии расширения)

1. Добавлено форматирования места рождения
2. Проверено на ЗУП3 (3.1.18.521)

 


ТЕХНИЧЕСКАЯ СТОРОНА

Заполнение разобьем на две части - заполнение дат рождения членов семьи и заполнение данных об образовании.

1. Даты рождения членов семьи.

В отчет данные о семье берутся из Регистра сведений "Строковые сведения физических лиц".
Регистр этот записывается при изменении состава члена семьи в ФЛ/сотруднике. Ну или хотя бы просто перезаписи.
Вся соль - в модуле менеджера этого же самого регистра.
Минимальные действия, которые приводят к желаемому результату - изменение функции

&Вместо("ПредставлениеЧленаСемьи")
Функция Расш_ПредставлениеЧленаСемьи(ЧленСемьи)
    ПредставлениеЧленаСемьи = "%1: %2, %3";
    ПредставлениеЧленаСемьи = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(ПредставлениеЧленаСемьи, ЧленСемьи.СтепеньРодства, ЧленСемьи.ФИО,формат(ЧленСемьи.ДатаРождения,"ДФ=dd.MM.yyyy"));
    Возврат ПредставлениеЧленаСемьи;
КонецФункции

Сюда добавлен параметр %3 и его заполнение - ЧленСемьи.ФИО,формат(ЧленСемьи.ДатаРождения,"ДФ=dd.MM.yyyy")

Что ж, новые записи будут сразу падать, как нам этого хочется. Но что же делать со старыми?

У этого же модуля есть процедура в модуле менеджера -

РегистрыСведений.СтроковыеСведенияФизическихЛиц.ОбновитьСтроковыеСведенияФизическогоЛица(Ссылка);

Так что в расширении я сделал форму списка этого регистра, открываем регистр из "всех функций", выделяем все записи (ctrl+a), нажимаем delete на клавиатуре, затем нажимаем "Обновить записи" на форме.

Так мы заново заполним этот регистр.

2. Полные данные об образовании

С описанием обучения поступим по-другому.

В расширение забираем процедуру формирования отчета -

&Вместо("ВывестиМакетСписокДляСверкиСВоенкоматом")
Процедура Расш_ВывестиМакетСписокДляСверкиСВоенкоматом(ДокументРезультат, РезультатКомпоновки, ДатаОтчета)
...
КонецПроцедуры

и, после строки
 

ЗарплатаКадрыОтчеты.ЗаполнитьПараметрыОбластиМакета(СтрокаТаблицы, ТекСтрока, ДанныеПользовательскихПолейСсылки);

Делаем следующее -
 

ФЛСтроки = ТекСтрока.физическоелицо; // получаем фл
ДанныеОбОбразовании = ПолучитьДанныеОбОбразованииФЛ(ФЛСтроки); // обращаемся к нашей функции (которая собирает представление строк об образовании ФЛ)
СтрокаТаблицы.Параметры.ВидОбразования     = ДанныеОбОбразовании; // и перезаписываем ячейку

 

Вступайте в нашу телеграмм-группу Инфостарт

обработка военкомат воинский учет зуп Список граждан сверки

См. также

Кадровый учет 1С:Предприятие 8 1С:Зарплата и Управление Персоналом 2.5 1С:Зарплата и Управление Персоналом 3.x Россия Управленческий учет Платные (руб)

Подключаемый модуль для миграционного учета в конфигурациях 1С:ЗУП КОРП, по запросу можно адаптировать под 1С:УТ и ERP. Подсистема миграционного учета содержит в себе справочники, документы, отчеты, регистры, которые позволяют вести учет патентов, хранить историю тарифов и отслеживать оплаты.

200000 руб.

03.07.2025    1930    1    1    

3

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

Предлагаем расширить возможности конфигурации 1С:УНФ 3.0 в части ведения кадрового учета. С помощью данного расширения в конфигурацию будут добавлены новые документы: "Отпуск" и "Командировка". Документы облегчат работу кадровика и расчетчика, а также повысят эффективность работы за счет оптимизации и упрощения процесса ведения учета.

43200 руб.

31.10.2024    2441    2    0    

2

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

Обработка позволяет загрузить из структурированного файла данные по физическим лицам, сотрудникам. Предусмотрено создание документов "Прием на работу". Данные загружаются не только в справочники и документы, но и в регистры сведений. Обработка разработана для конфигураций "Зарплата и Управление Персоналом, редакция 3.1"/"Зарплата и кадры государственного учреждения, редакция 3.1" на платформе 8.3.

6000 руб.

15.07.2015    68760    111    52    

115

Зарплата Кадровый учет 1С:Зарплата и кадры государственного учреждения 3 1С:Зарплата и Управление Персоналом 3.x Россия Платные (руб)

Решение реализовано в виде внешней обработки. Позволяет перенести данные из Парус 10 под Postgres, MSSQL в 1С:ЗУП 3, ЗКГУ 3. Переносит все кадровые данные, зарплату за указанный период.

9600 руб.

30.08.2024    1785    2    1    

1

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

Обработка больше предназначена как основа для своей разработки, чем как универсальное решение. Но можно использовать и как готовое решение для небольшой организации. Переносит данные из файла Excel в ЗУП, по аналогии как данные переносятся из ЗУП 2.5.

7200 руб.

19.01.2023    7603    5    4    

6

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

Электронный обходной лист в 1С предназначен для безбумажной работы с обходными листами, по возможности их автоматического заполнения, с возможностями управления полномочиями по созданию и подписи документов, назначения заместителей, для отсутствующих сотрудников, при увольнении.

9600 руб.

11.01.2022    16508    4    6    

10

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

Сделайте взаимодействие сотрудников компании и бухгалтерии быстрым и удобным. С Личным кабинетом сотрудника в 1С:ЗУП 3.1 и КА 2.5 для Telegram больше не нужно лично посещать бухгалтерию и отдел кадров – все документы доступны в Telegram.

9600 руб.

21.03.2022    18136    9    22    

23

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

Готовое комплексное решение для автоматизации работы с отпусками в вашей 1С. Обработка объединяет функции планирования (графики), учета фактических данных и формирования всей необходимой документации, экономя ваше время и снижая риски ошибок.

5000 руб.

10.12.2021    4624    40    2    

3
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. invistik 1 19.02.19 17:53 Сейчас в теме
Доброе время суток, у меня вопрос, адрес проживания в отчете берется по прописке или место проживания, если мне нужно, что бы в отчет попадал место по прописке как это реализовать?
2. erutan 106 19.02.19 21:48 Сейчас в теме
(1) Здравствуйте!
Тупой и быстрый метод "В лоб" - как последний абзац, перезаполнить ячейку, вызвав свою функцию, которая по ссылке на физлицо вернет нужный нам адрес из запроса.

Возможно, более правильно будет изменить сам запрос, собирающий данные для печати.

Задачи такой не стояло, так что не окунался.
3. erutan 106 19.02.19 23:05 Сейчас в теме
(1) Да, по умолчанию берутся данные Проживания, а не прописки.
Под прописку можно сделать так


&Вместо("ВывестиМакетСписокДляСверкиСВоенкоматом")
Процедура Расш_ВывестиМакетСписокДляСверкиСВоенкоматом(ДокументРезультат, РезультатКомпоновки, ДатаОтчета)
.......
ЗарплатаКадрыОтчеты.ЗаполнитьПараметрыОбластиМакета(СтрокаТаблицы, ТекСтрока, ДанныеПользовательскихПолейСсылки);
			//доработанный блок ++
			ФЛСтроки = ТекСтрока.физическоелицо;
			//ДанныеОбОбразовании = ПолучитьДанныеОбОбразованииФЛ(ФЛСтроки);
			//СтрокаТаблицы.Параметры.ВидОбразования	 = ДанныеОбОбразовании;
			АдресПрописки = ПолучитьАдресПоФЛ(ФЛСтроки);
			если не АдресПрописки="" тогда
				СтрокаТаблицы.Параметры.АдресМестаПроживанияПредставление	 = АдресПрописки;
			конецесли;
			//доработанный блок --
			СтрокаТаблицы.Параметры.ДатаРождения = Формат(ТекСтрока.ДатаРождения, "ДЛФ=Д");

.....
КонецПроцедуры


функция ПолучитьАдресПоФЛ(фл)    
	адрес = "";
	 запрос = новый запрос;
	 запрос.Текст = "ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
	|Сотрудники.Ссылка КАК Ссылка
	|ИЗ
	|	Справочник.Сотрудники КАК Сотрудники
	|ГДЕ
	|Сотрудники.ФизическоеЛицо = &ФизическоеЛицо";
	 запрос.УстановитьПараметр("ФизическоеЛицо", фл);
	 выборка = запрос.Выполнить().Выбрать();
	 если выборка.Следующий() тогда
		 
    КадровыеДанныеСотрудников = КадровыйУчет.КадровыеДанныеСотрудников(Истина, 
  		выборка.Ссылка, "АдресПоПропискеПредставление", ТекущаяДата());
		 адрес = КадровыеДанныеСотрудников[0].АдресПоПропискеПредставление 
	 конецесли;
	 
	 возврат адрес
КонецФункции
Показать
user1036607; invistik; +2 Ответить
4. invistik 1 20.02.19 09:12 Сейчас в теме
(3)
(1) Да, по умолчанию берутся данные Проживания, а не прописки.
Под прописку можно сделать так


Спасибо, попробую добавить в форму, запрос...
или в модуль объекта...

Еще рас спасибо за помощь!!!
5. user1282364 17.10.19 11:37 Сейчас в теме
Добрый день. Стоит актуализировать расширение, так как процедура ПервоначальноеЗаполнение…. была убрана из регистра вместо нее теперь ОбновитьСтроковыеСведенияФизическогоЛица.
6. erutan 106 17.10.19 11:46 Сейчас в теме
(5) здравствуйте!
Спасибо за отзыв.

Однако на 3.1 (3.1.10.174) процедура на месте/
Вы уже перешли на ветку 3.1.11 ?
7. user1282364 22.10.19 14:37 Сейчас в теме
8. alex_dor 5 16.01.20 10:53 Сейчас в теме
на релизе 3.1 (3.1.12.113) в процедуре обновления данных в Регистре Сведений написать вот это и работать начнет


&НаСервере
Процедура ОбновитьЗаписиНаСервере()
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	ФизическиеЛица.Ссылка КАК Ссылка
		|ИЗ
		|	Справочник.ФизическиеЛица КАК ФизическиеЛица
		|ГДЕ
		|	НЕ ФизическиеЛица.ПометкаУдаления";
	
	РезультатЗапроса = Запрос.Выполнить();
	
	ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
	
	Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
			РегистрыСведений.СтроковыеСведенияФизическихЛиц.ОбновитьСтроковыеСведенияФизическогоЛица(ВыборкаДетальныеЗаписи.Ссылка);
	КонецЦикла;
Показать


КонецПроцедуры
TanitLi; erutan; +2 Ответить
9. user1233998 07.08.20 17:42 Сейчас в теме
На ЗиК ГУ тоже работает, огромное спасибо))))
10. erutan 106 11.08.20 12:20 Сейчас в теме
(9) спасибо за отзыв и за ценную информацию!
11. evkuznetcova 12.10.21 10:50 Сейчас в теме
На ЗУП 18.151 не работает
12. erutan 106 12.10.21 16:08 Сейчас в теме
(11) спасибо за комментарий. Посмотрю, как обновимся
13. erutan 106 09.01.22 17:56 Сейчас в теме
(11) Здравствуйте еще раз.
Перешли на ветку 3.1.18 в конце декабря, протестировал.

На версии 3.1 (3.1.18.336) все работает.

Могу лишь предположить, что у Вас не был снят флаг "Безопасный режим" или "Защита от опасных действий" в списке расширений (в конфигураторе).

В общем, должно работать
14. Lusik 21 08.02.22 17:21 Сейчас в теме
Спасибо большое!
На ЗУП 3.1.20.97 - работает как надо.
Только строчку с форматированием места рождения из типовой конфы добавила, а то "0" и ",,," лишние выводились.
15. erutan 106 08.02.22 21:53 Сейчас в теме
вы знаете, не подумал. Верно говорите.
16. rus_LAN 65 18.04.22 02:01 Сейчас в теме
Огромное спасибо! ЗКГУ релиз (3.1.18.396) работает нормально.
17. user1036607 07.03.23 15:03 Сейчас в теме
Приветствую! А драгоценной функцией ПолучитьДанныеОбОбразованииФЛ не поделитесь?))
Заранее премного благодарен!))
18. user1036607 09.03.23 13:45 Сейчас в теме
Жаль, буду погибать молодым))
19. erutan 106 09.03.23 17:22 Сейчас в теме
(18) Здравствуйте!
Занят был ..

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


функция ПолучитьДанныеОбОбразованииФЛ(ФЛ)
	ДанныеОбОбразовании="";
	запрос = новый запрос;
	запрос.Текст = "ВЫБРАТЬ
	|	ОбразованиеФЛ.Ссылка,
	|	ОбразованиеФЛ.Владелец КАК ФизическоеЛицо,
	|	ОбразованиеФЛ.УчебноеЗаведение,
	|	ОбразованиеФЛ.ВидОбразования,
	|	ОбразованиеФЛ.ВидДополнительногоОбучения,
	|	ОбразованиеФЛ.Специальность,
	|	ОбразованиеФЛ.Окончание,
	|	ОбразованиеФЛ.Квалификация
	|ИЗ
	|	Справочник.ОбразованиеФизическихЛиц КАК ОбразованиеФЛ
	|ГДЕ
	|ОбразованиеФЛ.Владелец = &Владелец";
	запрос.УстановитьПараметр("Владелец",ФЛ);
	
	тз = запрос.Выполнить().Выгрузить();
	Для Каждого ТекСтрока Из тз Цикл
		
		МассивСтрок = Новый Массив;
		МассивСтрок.Добавить(ТекСтрока);
		
		ДанныеОбОбразовании = ДанныеОбОбразовании + ?(ЗначениеЗаполнено(ДанныеОбОбразовании), Символы.ПС, "") 
		+ Справочники.ОбразованиеФизическихЛиц.ПредставлениеСведенийОбОбразовании(МассивСтрок);
		
	КонецЦикла;
	
	
	
	возврат ДанныеОбОбразовании
КонецФункции
Показать
20. user1036607 10.03.23 11:40 Сейчас в теме
(19)Ух, огромное Вам спасибо!
А то я тут какую-то корявость сделал))

функция ПолучитьДанныеОбОбразованииФЛ(фл)    
    образование = "";
     запрос = новый запрос;
     запрос.Текст = "ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
    |Сотрудники.Ссылка КАК Ссылка
    |ИЗ
    |    Справочник.Сотрудники КАК Сотрудники
    |ГДЕ
    |Сотрудники.ФизическоеЛицо = &ФизическоеЛицо";
     запрос.УстановитьПараметр("ФизическоеЛицо", фл);
     выборка = запрос.Выполнить().Выбрать();
     если выборка.Следующий() тогда
         
    КадровыеДанныеСотрудников = КадровыйУчет.КадровыеДанныеСотрудников(Истина, 
          выборка.Ссылка, "Образование1УчебноеЗаведение", ТекущаяДата());
	ОбрУчЗав = КадровыеДанныеСотрудников[0].Образование1УчебноеЗаведение;
	
	КадровыеДанныеСотрудников = КадровыйУчет.КадровыеДанныеСотрудников(Истина, 
          выборка.Ссылка, "Образование1ВидОбразования", ТекущаяДата());
	ОбрВид = КадровыеДанныеСотрудников[0].Образование1ВидОбразования;
		  
	КадровыеДанныеСотрудников = КадровыйУчет.КадровыеДанныеСотрудников(Истина, 
          выборка.Ссылка, "Образование1Окончание", ТекущаяДата());
	ОбрОконч = КадровыеДанныеСотрудников[0].Образование1Окончание;
		  
		  образование = строка(ОбрУчЗав) + ", " + строка(ОбрВид) + ", " + строка(Формат(ОбрОконч,"ДЛФ=DD"));
		 
		 
     конецесли;
     
     возврат образование
 КонецФункции
Показать
21. erutan 106 10.03.23 14:10 Сейчас в теме
(20) у вас через программный интерфейс, так что еще неизвестно, что лучше)
22. user698589_info 02.12.25 14:17 Сейчас в теме
Добрый день, подскажите пожалуйста, я правильно понимаю, что после Обновления записей , должен поменяться формат состава семьи и в нем должны отразиться даты рождения?
1. поставила расширение
2. удалила записи в строковых сведениях физ.лиц.
3. Нажала Обновить записи. (после этого записи не появились, если заново захожу , то записи есть, но никаких изменений в составе семьи не вижу. , и в отчет даты не печатаются)
Подскажите пожалуйста, что упускаю
23. erutan 106 04.12.25 17:40 Сейчас в теме
(22) Здравствуйте! Ранее так и работало, но какое-то время не проверял.
А у вас какой релиз ЗУП?
Для отправки сообщения требуется регистрация/авторизация