topic Re: Check Enqueue in Application Development and Automation Discussions

Check Enqueue

Former Member — Mon, 16 May 2011 11:29:36 GMT

Hi guys,

I want to check if

CALL FUNCTION 'ENQUEUE_

was executed

meaning check that the block was already done , i know about the exception foreign_lock = 1 but for get that i need to execute iteh function and i dont want that, is there any other function or a table i could read which inform me about a block object status ??

thank you guys.

Edited by: José M. Sánchez on May 16, 2011 7:00 AM

Re: Check Enqueue

Former Member — Mon, 16 May 2011 11:47:49 GMT

no, there is no other way, you need to try to lock it then you know if its locked already.

Re: Check Enqueue

ThomasZloch — Mon, 16 May 2011 11:54:06 GMT

...and if it was not locked before, then it is now locked by your ENQUEUE call, so you can immediately unlock it again via the corresponding DEQUEUE call to achieve your "check" functionality.

Thomas

Re: Check Enqueue

Former Member — Mon, 16 May 2011 12:38:18 GMT

Hi Thomas ,

thank you for answered me, yes I have thought about that solution, is just i believed that maybe someone else could maybe know some other solution .

tnxs.

Edited by: José M. Sánchez on May 16, 2011 8:08 AM

Re: Check Enqueue

Maciej_DomagaBa — Fri, 20 May 2011 14:18:52 GMT

See function module ENQUEUE_READ.

regards

Re: Check Enqueue

raphaelbertani — Mon, 15 Jan 2024 13:41:53 GMT

*&---------------------------------------------------------------------*
*& Report YRB_ENQUEUE_CHECK
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT yrb_enqueue_check.


DATA: g_belnr TYPE RBKP-BELNR .
DATA: g_gjahr TYPE RBKP-GJAHR 

g_belnr = '5106289422'.
g_gjahr = '2024'.


CALL FUNCTION 'ENQUEUE_E_RBKP'
EXPORTING
belnr = g_belnr
gjahr = g_gjahr
_wait = 'X'
EXCEPTIONS
foreign_lock = 1
system_failure = 2.


IF sy-subrc = 0.
ENDIF.


DATA: lv_garg TYPE eqegraarg,
lt_enq TYPE STANDARD TABLE OF seqg3,
ls_enq TYPE seqg3.
CONCATENATE sy-mandt g_belnr g_gjahr '*' INTO lv_garg.
" Get Lock Records
CALL FUNCTION 'ENQUEUE_READ'
EXPORTING
gname = 'RBKP'
garg = lv_garg
guname = '*'
TABLES
enq = lt_enq.
BREAK-POINT.<br>

Lock and lock check example