Таблица залокирована

Обсуждение вопросов по разработке программ в среде продуктов копорации "Progress Software"
BeerD
Новичок
Сообщения: 8
Зарегистрирован: 10 авг 2011, 14:48

Таблица залокирована

Сообщение BeerD » 15 май 2013, 17:21

Как определить кем конкретно?

Abvp
Старожил
Сообщения: 16
Зарегистрирован: 02 фев 2007, 14:02
Откуда: Тольятти
Контактная информация:

Re: Таблица залокирована

Сообщение Abvp » 17 май 2013, 10:22

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

for each _lock no-lock
    while _lock._Lock-Table <> ?
    :
    find first _file no-lock
        where _file._file-num = _lock._lock-table
        no-error
    .
    display
        _lock._lock-name label 'User-name'
        _file._file-name format 'x(10)'
        _lock._lock-recid
        _lock._lock-type
        _lock._lock-flags format 'x(10)'
    .
end.