Здравствуйте, гость ( Вход | Зарегистрироваться )
Процедура измдолж() П = СоздатьОбъект("Периодический"); Спр = СоздатьОбъект("Справочник.Сотрудники"); Спр.ВыбратьЭлементы(); Спр.НайтиЭлемент(Ответственный); П.ИспользоватьОбъект("Должность", Спр.ТекущийЭлемент()); Должность = П.ЗначениеНаДату(ТекущаяДата());КонецПроцедуры