В помощь кадровикам, работающим на ЗиК 7.7

07.04.09

Задачи пользователя - Адаптация типовых решений

В помощь кадровикам, работающим на ЗиК 7.7 при оформлении документов прием на работу и кадровое перемещение

Всем известно, что работа со штатным расписанием в стандартных конфигурациях для кадровиков сплошное недоразумение - не видно, сколько должностей по ШР занято, без использования отчета Штатное расписание, можно легко запутаться при выборе подразделений (например: есть головное предприятие со своей структурой и филиалы, построенные по одному принципу с одинаковой структурой подразделений - 1Филиал: подразделения - Отдел продаж, маркетинг и 2Филиал: подразделения - Отдел продаж, маркетинг). Думаю, смысл понятен...

Данный код частично решает проблему:

Процедура ПриНачалеВыбораЗначения(Элемент,ФлагОбработки)
......
ИначеЕсли Элемент = "Должность" Тогда
СписокДолжностей=СоздатьОбъект("СписокЗначений");
Спр=СоздатьОбъект("Справочник.ШтатноеРасписание");
Сотруд = СоздатьОбъект("Справочник.Сотрудники");
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент()=1 Цикл
Если (Спр.Подразделение.ПолноеНаименование() = Подразделение.ПолноеНаименование()) Тогда
Если (Спр.СтавокВсего.Получить(Начало) > 0) Тогда
Сотруд.ВыбратьЭлементы();
Ставки = 0;
Пока Сотруд.ПолучитьЭлемент() = 1 Цикл
Если Сотруд.ЭтоГруппа() =1 Тогда
Продолжить;
КонецЕсли;
Если Сотруд.СостояниеФизлица.Получить(Начало) = Перечисление.СостояниеФизлица.СотрудникОсновной Тогда
Если Сотруд.Должность.Получить(Начало) = Спр.Должность Тогда
Ставки = Ставки+1;
КонецЕсли;
КонецЕсли;
КонецЦикла;
Если (Ставки >= Спр.СтавокВсего.Получить(Начало)) и (Спр.Должность <> ЗначениеПериодическогоРеквизитаНаНачало("Должность")) Тогда
Продолжить;
КонецЕсли;
СписокДолжностей.ДобавитьЗначение(Спр.Должность);
КонецЕсли;
КонецЕсли;
КонецЦикла;
Должн = "";
Если СписокДолжностей.РазмерСписка() = 0 Тогда
Предупреждение("В данном подразделении нет вакансий!",60);
СтатусВозврата(0);
Возврат;
КонецЕсли;
Если СписокДолжностей.ВыбратьЗначение(Должн,"Должности подразделения "+Подразделение.Наименование,,,2)=1 Тогда
СпрДолжн = СоздатьОбъект("Справочник.Должности");
СпрДолжн.НайтиПоКоду(Строка(Должн.Код));
Должность = СпрДолжн.ТекущийЭлемент();
КонецЕсли;
КонецЕсли;

КонецПроцедуры // ПриНачалеВыбораЗначения

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

 Замечаниям и предложениям по оптимизации буду только рад (как, впрочем, и плюсам)... :)

См. также

Печатные формы Адаптация типовых решений Программист Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Приятное улучшение обработки "Внешние печатные формы" для типовых конфигураций на базе 1С 7.7 для более комфортной работы с "любимой семерочкой".

1 стартмани

04.02.2022    3372    1    igor7777    0    

3

Адаптация типовых решений Программист Платформа 1С v7.7 Конфигурации 1cv7 Россия Бухгалтерский учет ФОМС, ЕФС Бесплатно (free)

В этой статье описано, какие небольшие изменения можно внести в модуль документа Начисление налогов с ФОТ, чтобы правильно рассчитывались страховые взносы с 1 апреля 2020 г.

09.04.2020    20763    Юджин58    39    

5

Адаптация типовых решений Программист Платформа 1С v7.7 1С:Комплексная 7.7 1С:Торговля и склад 7.7 Управленческий учет Бесплатно (free)

Описан способ работы с учетом расписания с приоритетными покупателями - торговыми сетями (основными покупателями) в торговой или комплексной учетной системе на 1С 7.7. Множественная заявка покупателя на несколько торговых точек.

14.10.2019    6372    ksnik    14    

3

Операции по ВЭД Адаптация типовых решений Программист Оперативный учет 7.7 1С:Торговля и склад 7.7 Россия Бухгалтерский учет НДС Бесплатно (free)

В данной статье хотел поделиться опытом, как в Торговле 7.7 ( релиз 994) сделать возможность выводить код ТНВЭД в печатную форму счета-фактуры. Сразу скажу, что нужно это только тем, кто осуществляет экспорт в страны таможенного союза. Остальные могут не волноваться.

15.11.2017    12069    AndKovalchuk    0    

1

Зарплата Адаптация типовых решений Программист Бухгалтерский учет 7.7 1С:Бухгалтерия 7.7 Россия Бухгалтерский учет Абонемент ($m)

Реализация Постановления Правительства РФ 1316 от 04.12.14 для типовой конфигурации "Бухгалтерский учет 7.7" рел. 7.70.590

1 стартмани

31.12.2014    24073    9    Sergey1CSpb    2    

0
Оставьте свое сообщение