Workitem XXXXX locked by User XXXXXXXX (Enqueue Error)

[Former Member]

Hi,

I have a problem in workflow. When I am execute the work item, error message is prompting Workitem XXXXX locked by User XXXXXXXX (Enqueue Error).. Is there a function module or is there any other way by which we can unlock the workitem programmatically.

Thanks & Regards

Rahul Ghosh

[Former Member]

Lock object E_WORKITEM

Release lock on object E_WORKITEM - DEQUEUE_E_WORKITEM

Request lock for object E_WORKITEM - ENQUEUE_E_WORKITEM

[Former Member]

Hi Guys,

The problem hasbeen solved through create custom function module.

FUNCTION YHRFM_WORKITEM_UNLOCK.

*"----

---

""Local Interface:

*" IMPORTING

*" REFERENCE(P_WI_ID) TYPE SWW_WIID OPTIONAL

*" REFERENCE(P_GNAME) TYPE EQEGRANAME OPTIONAL

*" REFERENCE(P_GUNAME) TYPE EQEUNAME OPTIONAL

*" EXPORTING

*" REFERENCE(P_NUMBER) TYPE SY-TABIX

*" REFERENCE(P_SUBRC) TYPE SY-SUBRC

*" TABLES

*" ENQ STRUCTURE SEQG3 OPTIONAL

*"----

---

DATA: W_GARG TYPE EQEGRAARG.

CLEAR: W_GARG, ENQ, ENQ[].

CALL FUNCTION 'ENQUEUE_READ'

EXPORTING

GNAME = P_GNAME

GUNAME = P_GUNAME

IMPORTING

NUMBER = P_NUMBER

SUBRC = P_SUBRC

TABLES

ENQ = ENQ

EXCEPTIONS

COMMUNICATION_FAILURE = 1

SYSTEM_FAILURE = 2

OTHERS = 3.

IF ENQ[] IS NOT INITIAL.

CONCATENATE SY-MANDT P_WI_ID INTO W_GARG.

DELETE ENQ WHERE GARG W_GARG.

CALL FUNCTION 'ENQUE_DELETE'

EXPORTING

CHECK_UPD_REQUESTS = '1'

IMPORTING

SUBRC = P_SUBRC

TABLES

ENQ = ENQ.

ENDIF.

ENDFUNCTION.

Thanks & Regards

Rahul Ghosh