1c 7.7 Получения последней даты занесения периодического реквизита
Задача: необходимо получить дату, когда было последний раз изменено значение периодического реквизита справочника.
Решение: используем следующую функцию:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
Функция ПолучитьПоследнююДатуВводаПериодическогоРеквизита(ИмяРеквизита,спрЭлементСправочника) ДатаПерЗначения = ПолучитьПустоеЗначение("Дата"); Пер = СоздатьОбъект("Периодический"); Пер.ИспользоватьОбъект(ИмяРеквизита,спрЭлементСправочника); Пер.ОбратныйПорядок(1); Если Пер.ВыбратьЗначения() = 1 Тогда Если Пер.ПолучитьЗначение() = 1 Тогда ДатаПерЗначения = Пер.ДатаЗнач; КонецЕсли; КонецЕсли; Пер = 0; //сообщить(ДатаПерЗначения); Возврат ДатаПерЗначения; КонецФункции |