Уважаемые Знатоки!!
Подскажите плз, как программно управлять блокировками записей:
1. существует объект блокировки
2. при вызове некоторой программы устанавливается блокировка на запись согласно этому объекту блокировки
3. по завершению выполнения данной проги, блокировка автоматом снимается с записи
Требуется: создавать блокировку таким образом, чтобы она существовала до тех пор, пока ее принудительно не снимешь, т.е. не зависимо от того отработала прога или нет. При чем снимать блокировку требуется из другой программы.
Может быть кто-дь знает что нужно делать?
спасибо

А в SAP'е блокировками только программно и управляют.
Хочешь - ставишь блокировку. Не хочешь - не ставишь. Хочешь - проверяешь, есть ли чужие блокировки. Не хочешь - игнорируешь их. Все исключительно на совести программера :-).

Не сделано в SAP'е блокировок на низком уровне :-( . Не знаю, почему.

А для убивания любых чужих блокировок транзакция специальная есть. SM12 называется.

...хочешь - снимаешь блокировку. Не хочешь - не снимаешь. Автоматом там ничего не ставится и не снимается.

Технически это выглядит так.
Находишь любой ФМ, блокирующий записи, по маске *ENQUEUE*.
Потом находишь любой ФМ, снимающий блокировку, по маске *DEQUEUE*.
Изучаешь их работу - там все просто до дебилизма.

а кто-дь может мне пример привести установки и удаления блокировок минуя транзакцию sm12.
т.к. я ею проверяла наличие блокировок: когда прога работает - блокировка есть, прога отработала - и блокировка удалилась, что мне как раз не нужно
спасибо

как раз этот способ и не прокатил, именно так и делаю...

Блокировка удалилась только потому, что эта программа "убрала за собой" - внутри нее вызвался ФМ, удаляющий блокировку, которую эта же программа поставила раньше. И все.
Пример установки и удаления см. в любом ФМ, о которых я говорил выше.

Что значит - "не прокатил"?
Что именно не прокатило? Например, в этом ФМ:
===========================
FUNCTION ENQUEUE_ARRAY.
*"----------------------------------------------------------------------
*"Lokale Schnittstelle:
*" IMPORTING
*" DEQUEUE DEFAULT SPACE
*" GOBJ LIKE SEQG3-GOBJ DEFAULT 'ENQARRAY'
*" EXPORTING
*" COLLISION_GOBJ LIKE SEQG3-GOBJ
*" COLLISION_GUNAME LIKE SEQG3-GUNAME
*" TABLES
*" ENQ_ARRAY STRUCTURE SEQTA
*" EXCEPTIONS
*" ARGUMENT_ERROR
*" FOREIGN_LOCK
*" OWN_LOCK
*" SYSTEM_FAILURE
*" TABLE_OVERFLOW
*"----------------------------------------------------------------------

DATA: SEQTA_SEND LIKE SEQTA OCCURS 50,
OPCODE LIKE SEQAREA-OPCODE,
SCOPE LIKE SEQAREA-SCOPE,
RC LIKE SY-SUBRC.

CASE DEQUEUE.
WHEN ' '.
OPCODE = '1'.
SCOPE = '2'.
WHEN 'X'.
OPCODE = '2'.
SCOPE = '3'.
WHEN OTHERS.
MESSAGE A114 RAISING ARGUMENT_ERROR.
* Fehlerhafter Aufruf-Parameter
ENDCASE.
PERFORM ADD_MANDT TABLES ENQ_ARRAY SEQTA_SEND.
PERFORM FLUSH_LIST(SAPLSENA)
TABLES SEQTA_SEND
USING OPCODE SCOPE ' ' ' ' GOBJ ' '
CHANGING RC COLLISION_GUNAME COLLISION_GOBJ.
CASE RC.
WHEN 0.
WHEN 1.
MESSAGE A111 RAISING OWN_LOCK.
* Bereits bestehende eigene Sperre verhindert weitere eigene Sperren
WHEN 2.
MESSAGE A110 WITH COLLISION_GUNAME RAISING FOREIGN_LOCK.
* Objekt ist momentan gesperrt durch User &
WHEN 4.
MESSAGE A112 RAISING TABLE_OVERFLOW.
* Sperrtabelle ist momentan ќbergelaufen
WHEN OTHERS.
MESSAGE A113 RAISING SYSTEM_FAILURE.
* Systemfehler bei Sperroperation (Bitte in SM12 Diagnose ausfќhren)
ENDCASE.

ENDFUNCTION.

конечно спасибо, но именно таким образом и поступила... ФМ, который бы удалял блокировку я не вызываю... проверяла много раз...
... будем искать.... (((

спасибо, попробую топорно повторить...

Да вообще-то, можно и не повторять топорно - а просто использовать этот ФМ :-).
Аргументы только правильно заполнить. А именно, поля ENQ_ARRAY-GARG .

я именно это и сделала, и что вы думаете !?!?!?
эффект тот же!!! : пока ФМ, из которого я этот ФМ вызываю, активен - блокировка ЕСТЬ, выхожу из ФМ - блокировки НЕТ.
вы сами <я не знать русский языка>?

пробовали, такого не бывает это фантастика...

значит вы еще не все видели )))
всю эту лабуду я вызываю из RFC, которую, с свою очередь, запускаю из транзакции SE80. и у меня стандартно блокировка убивается когда эта RFC - не активна.
вот так...
и все-таки, какой-дь дельный совет будет?
все предложенное не катит...
спасибо

1) При создании объекта блокировки генерируется модули, которые собственно и создают блокировку 'ENQUEUE' -установить, 'DEQUEUE' -снять блокировку
2) При завершении программы блокировка снимается автоматом. Все дело в том, что инфа по блокированию хранится в памяти системы, нет таблицы куда бы она писалась.
3) Как вариант для "поставили в одной программе - сняли в другой" - написание собственных таблиц для учета блокирования. Только геморрой это.