Сейчас мы создадим мини-систему кадрового учета сотрудников предприятия. Она позволит принимать и увольнять сотрудников, а также работать с кадровыми документами.
Объекты конфигурации Для создания мини-системы кадрового учета сотрудников, очевидно, потребуются следующие объекты:
- Справочник Сотрудники
- Справочник Должности
- Документ ПриемНаРаботу
- Документ Увольнение
- Журнал документов ПриказыКадровые
Атрибуты объектов
Определим атрибуты справочника Сотрудники:
- Код и Наименование уже определены.
Там будет храниться табельный номер и ФИО сотрудника. - Оклад (тип "число", периодический, неотрицательный)
- Должность (тип Должности, периодический)
- ДатаПриема (тип "дата")
- ДатаУвольнения (тип "дата")
Для справочника Должности нам достаточно двух предопределенных атрибутов Код и Наименование. Там будет храниться номер и название должности.
Документ ПриемНаРаботу должен содержать следующие реквизиты:
- НомерДок и ДатаДок уже определены.
- Сотрудник (тип Сотрудники)
- Оклад (тип "число", неотрицательный)
- Должность (тип Должности)
- ДатаПриема (тип "дата")
Документ ПриказОбУвольнении будет содержать следующие реквизиты:
- НомерДок и ДатаДок уже определены.
- Сотрудник (тип Сотрудники)
- ДатаУвольнения (тип "дата")
Документ "Прием на работу" Вот так будет выглядеть экранная форма документа:
При проведении документа Прием на работу данные из этого документа должны автоматически перейти в справочник сотрудники. Это делается с помощью модуля проведения документа. Все действия записываются на встроенном языке 1С.
Процедура ОбработкаПроведения()
СпрСотр = СоздатьОбъект("Справочник.Сотрудники");
СпрСотр.НайтиЭлемент(Сотрудник);
СпрСотр.ДатаПриема = ДатаПриема;
СпрСотр.Записать();
УстановитьРеквизитСправочника(Сотрудник,"Оклад", Оклад, ДатаПриема);
УстановитьРеквизитСправочника(Сотрудник,"Должность", Должность, ДатаПриема);
КонецПроцедуры
Документ "Увольнение" Вот так будет выглядеть экранная форма документа:
При проведении документа Увольнение требуется найти увольняемого сотрудника в справочнике и установить ему дату увольнения, взяв ее из этого документа. Это делается с помощью модуля проведения документа. Все действия записываются на встроенном языке 1С.
Процедура ОбработкаПроведения()
СпрСотр = СоздатьОбъект("Справочник.Сотрудники");
СпрСотр.НайтиЭлемент(Сотрудник);
СпрСотр.ДатаУвольнения = ДатаУвольнения;
СпрСотр.Записать();
КонецПроцедуры
