Процедура выполняется при интерактивной записи значения в окне истории значений
Синтаксис
Процедура ПриЗаписиИстории() имеет следующий синтаксис:
Процедура ПриЗаписиИстории([ТипОбъекта], [Объект], [ЗначениеЗаписи], [ДатаЗаписи])
...
КонецПроцедуры
А также альтернативный англоязычный синтаксис:
Procedure OnWriteHistory([ObjectType], [Object], [RecordValue], [RecordDate])
...
EndProcedure
Параметры
Описание параметров процедуры ПриЗаписиИстории()
| Имя параметра | Тип | Описание |
|---|---|---|
| ТипОбъекта | Строка | Параметр содержит полное имя константы (для периодических констант) или полное имя реквизита справочника (для периодических реквизитов справочников) как они заданы в конфигураторе. Полное имя константы выглядит как Константа.Имя. Полное имя реквизита справочника выглядит как Справочник.ИмяСправочника.ИмяРеквизита |
| Объект | Произвольный | Параметр содержит значение элемента справочника, периодический реквизит которого изменяется (параметр актуален только для периодических реквизитов справочников) |
| ЗначениеЗаписи | Произвольный | Параметр содержит значение периодической записи |
| ДатаЗаписи | Дата | Параметр содержит дату периодической записи (дату, на которую сохраняется значение) |
| * — обязательный параметр | ||
Описание
Процедура ПриЗаписиИстории() выполняется при записи значения периодической константы или периодического реквизита справочника в окне истории.
По-умолчанию, всем пользователям системы доступна корректировка периодических значений в окне истории. Если требуется запретить интерактивное редактирование периодических значений в окне истории, достаточно установить в теле процедуры статус возврата равным нулю и значение не будет изменено.
Пример использования
Пример кода с использованием процедуры ПриОткрытииИстории()
Процедура ПриЗаписиИстории(ТипОбъекта, Объект, ЗначениеЗаписи, ДатаЗаписи) Если (ТипОбъекта = "Константа.Версия") И (ДатаЗаписи < ТекущаяДата()) И (НазваниеНабораПрав() <> "Администратор") Тогда СтатусВозврата(0); Сообщить("Не хватает полномочий для изменения предыдущих значений константы!"); КонецЕсли; КонецПроцедуры