ЗУП 3.1.14.208 Заполнение ОКПДТР и ОКЗ должности
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(3), если посмотреть на первую картинку, то категории для этой должности просто неоткуда взяться - в представленном справочнике нет такого реквизита.
У меня пусто!?
Предлагаю ТИИ, почистить кэш.
Либо надо признать, что в 1С справочник неполный, т.к. в описаниях ОКПДТР категория присутствует и для рабочих профессий.
У меня пусто!?
Предлагаю ТИИ, почистить кэш.
Либо надо признать, что в 1С справочник неполный, т.к. в описаниях ОКПДТР категория присутствует и для рабочих профессий.
(4) Вы правы в ОКПДТР нет категории для рабочих профессий. Поэтому при добавлении должности из классификатора в коде программы жестко прописано (пришлось таки посмотреть код):
а при редактировании в должности этих кодов этот нюанс не прописан, так что это косяк программы.
можно конечно это в расширении прописать, но проще кадровиков предупредить, что с рабочими профессиями такая ошибка.
Процедура ЗаполнитьДополнительныеСведенияКлассификатора(ДополнительныеСведения) Экспорт
ЗаполнитьКатегорию = Истина;
Для Каждого ДополнительноеСведение Из ДополнительныеСведения Цикл
Если ДополнительноеСведение.Ключ = "Категория" Тогда
ЗаполнитьКатегорию = Ложь;
ОКПДТРКатегория = ДополнительноеСведение.Значение;
ИначеЕсли ДополнительноеСведение.Ключ = "Код" Тогда
Значение = СокрЛП(ДополнительноеСведение.Значение);
Если Не ПустаяСтрока(Значение) Тогда
ОКПДТРКЧ = Прав(Значение, 1);
ОКПДТРКод = Лев(Значение, СтрДлина(Значение) - 1);
КонецЕсли;
КонецЕсли;
КонецЦикла;
Если ЗаполнитьКатегорию Тогда
ОКПДТРКатегория = "4";
КонецЕсли;
КонецПроцедуры
Показатьа при редактировании в должности этих кодов этот нюанс не прописан, так что это косяк программы.
&НаКлиенте
Процедура ВыбратьИЗакрыть(ИмяКлассификатора)
Результат = Новый Структура;
Результат.Вставить("ОКПДТРКод", Лев(Элементы.Найти(ИмяКлассификатора).ТекущиеДанные.Code, 5));
Результат.Вставить("ОКПДТРКЧ", Прав(Элементы.Найти(ИмяКлассификатора).ТекущиеДанные.Code, 1));
Результат.Вставить("ОКПДТРКатегория", Элементы.Найти(ИмяКлассификатора).ТекущиеДанные.Категория);
Результат.Вставить("ОКЗКод", Элементы.Найти(ИмяКлассификатора).ТекущиеДанные.OKZ);
Закрыть(Результат);
КонецПроцедуры
Показатьможно конечно это в расширении прописать, но проще кадровиков предупредить, что с рабочими профессиями такая ошибка.
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот