Функция GetOldFieldValueFromJournal

[den]

Добрый день.

Столкнулся неожиданно с проблемой использования функции GetOldFieldValueFromJournal.
Открываем доку и читаем

"Функция считывает из журнальной записи значение поля таблицы ДО изменения (если оно есть) и присваивает его заданной переменной или полю. Имеет смысл только для операции update. При остальных операциях функция аналогична GetNewFieldValueFromJournal."

Делаем тестовый пример

Код: Выделить всё

Interface jorn;

create view

var
   li1, li11: string;
   cur_nrec: comp;

from 
  X$JOURNAL jour 

where 
((
     1418 == TABLECODE
AND  cur_nrec == TABLENREC
)) 
;

HandleEvent

cmInit: 
{
   runinterface('getkator', cur_nrec);

   _loop jour
      if (operation=4) //если модификация
        {
           GetOldFieldValueFromJournal(katorg.name, 674, Jour.DataRec, Jour.Operation, li1);

           GetNewFieldValueFromJournal(katorg.name, 674, Jour.DataRec, Jour.Operation, li11);

           logstrtofile('c:\debug\jorn.txt', Jour.nrec + ' ' + 'ДО: ' + li1 + ' ПОСЛЕ: ' + li11);
        }

   abort;
}  

end;
end.

Можно попробовать запустить данный пример на исполнение, предварительно отмодифицировав название какой либо организации.

Тестировал у себя Гал 80, MSSQL

[vadim]

Денис,
1) Вы не описали результат. В чем интрига-то?
2) если некорректность и была в 8.0 (эта версия снята с поддержки), возможно она исправлена в 8.1. Пробовали проверять?

[den]

1. Результат отработки GetOldFieldValueFromJournal & GetNewFieldValueFromJournal оказывается один и тот же
2. Не пробовал, но у кого есть 81 можно ,скопируя мой код и компильнув его это проверить. Я тоже задумывался о том, что может в 8,1 это поправлено.

[vadim]

Что ж, будем ждать охотников (не забывая про это)

[cruger]

Была такая проблема. Исправлена в 5.3

[den]

Сэнкс 2 Фёдор