Личная карточка Т-2 с выводом информации о повышении квалификации, профессиональной переподготовке, аттестации. ЗУП 2.5, ЗИК БУ 1.0

02.12.15

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

Вывод данных о дополнительном образовании в карточку Т-2 для конфигураций ЗУП 2.5, ЗИК БУ 1.0

Скачать файл

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

Наименование По подписке [?] Купить один файл
ВПФ_т2
.epf 4,28Kb ver:1.0.0.0
28
28 Скачать (1 SM) Купить за 1 850 руб.

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

Эта процедура находится в общем модуле "УнифицированнаяФормаТ2Переопределяемый":

Процедура СформироватьМакетДополнительно(ДополнительныеДанные, ТретьяСтраницаТ2, СтруктураПоискаФизЛицо, СтруктураПоискаСотрудник) Экспорт

На входе процедура имеет параметр ДополнительныеДанные, который можно инициализировать при программном формироании отчета. Параметр ТретьяСтраницаТ2 это область макета отчета "Т2_от_5_1_2004"Параметры СтруктурапоискаФизЛицо и СтруктураПоискаСотрудник содержат структуру со ссылкой на сотрудника и физика соответственно.

Выкладываю свой код по выводу данных о дополнительном образовании, думаю, разобраться будет несложно. Также замечу, что реквизиты с префиксом ИТ не типовые, так что бездумное копирование кода ни к чему хорошему не приведет.

 

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

Также бонусом выкладываю внешнюю печатную форму для формирования Т2 из карточки сотрудника. Печатная форма выводит типовой отчет с отбором по сотруднику.

Т2 повышение квалификации аттестации профессиональная переподготовка

См. также

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

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактическим удержаниям, НДФЛ, вычетам, страховым взносам из базы Парус 10 учреждений (далее Парус) в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (далее 1С) и начать с ней работать с любого месяца года.

84000 руб.

05.10.2022    11447    13    8    

15

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

Групповое формирование и печать Дополнительных соглашений для 1С: Зарплата и управление персоналом ПРОФ и КОРП + 8 печатных форм: Индексация заработной платы, Удаленная работа и предупреждение о COVID-19, Выход из удаленной работы, Кадровый перевод, Кадровый перевод списком, Назначение индивидуальной системы начислений, Переименование филиала, Приказ "Совмещение должностей", Приказ "Совмещение исполнения обязанностей" Что нового: 1.В печатных формах убран весь красный цвет текста 2. В печатных формах в шапках сделано заполнение названия организации, руководителя и основания действия руководителя 3. В печатных формах в подвале сделано заполнение реквизитов организации 4. Добавлена возможность печатать доп соглашения по документу "Изменение плановых начислений"

21600 руб.

24.03.2023    5330    3    0    

5

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

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

6000 руб.

15.07.2015    65413    99    49    

103

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

Печать из ЗУП уведомления о трудовой деятельности для безвизового иностранного гражданина. С 7 января 2024 года безвизовые иностранцы должны уведомлять по утвержденной форме территориальный орган МВД России о ведении трудовой деятельности. Расширение позволит выполнить распечатку уведомления напрямую из программы ЗУП 3.1

3600 руб.

22.02.2024    1106    1    0    

3

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

Поддержание базы ЗУП 3.1 в порядке требует знания, внимание и инструменты. Предлагаю свой набор инструментов, для применения которых не нужны сильные знания аналитика или разработчика. Работает всё умно и безопасно.

3 стартмани

17.04.2023    4582    58    Vinzor    6    

25
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. Kaval88 175 03.06.16 13:19 Сейчас в теме
ВО_ПовышениеКвалификации = Справочники.ВидыОбразованияФизЛиц.НайтиПоНаименованию("Повышение квалификции");

Это строка таит в себе подвох))
2. kotlovD 89 03.06.16 15:08 Сейчас в теме
(1) Kaval88, ахах забавно, не заметил :)
user1252779; +1 Ответить
Оставьте свое сообщение