src/kernel/prevalue.p Возвращает предыдущее значение поля

src/kernel/prevalue.p
Возвращает предыдущее значение последнего изменяемого поля в переменной RETURN-VALUE. Данная функция предназначена для реализации логики, отмены некорректных действий пользователя, чтобы вернуть предыдущее значение, либо логики связанной с расчетами  текущее-предыдущее.
( Без параметров )                     

Пример использования.

  if fld = "1:4" then do:
       id-inv = return-value.
      find first inventory where inventory.id-inventory = id-inv no-lock no-error.
      if available inventory and inventory.rid-document <> rid-doc then do:
         run src/message_alert.p ( "Актив с таким инвентарным номером уже существует" ).
         run src/kernel/prevalue.p.
         run src/kernel/set_ffv.p ("1:4", rid-doc, return-value).
      end.
   end.