Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 

lock FM

Former Member

‎07-14-2007 1:43 PM

0 Kudos

Hi Guys,

I got an lock FM can anyone tell me how to use it i am updating the field S_VERSEQ by comparing fields VERSION & /BIC/S_PLANTYP

so pls let me know how to use it is the way i am using ir rite..??

CALL FUNCTION 'ENQUEUE_ED'

EXPORTING

MODE_/BIC/PS_DATVER = 'E'

  • /BIC/S_CBPDAT =

  • VERSION =

  • /BIC/S_PLANTYP =

  • /BIC/S_DATVER =

  • OBJVERS =

  • X_/BIC/S_CBPDAT = ' '

  • X_VERSION = ' '

  • X_/BIC/S_PLANTYP = ' '

  • X_/BIC/S_DATVER = ' '

  • X_OBJVERS = ' '

  • _SCOPE = '2'

  • _WAIT = ' '

  • _COLLECT = ' '

EXCEPTIONS

FOREIGN_LOCK = 1

SYSTEM_FAILURE = 2

OTHERS = 3

.

IF SY-SUBRC <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

CALL FUNCTION 'DEQUEUE_ED'

EXPORTING

MODE_/BIC/PS_DATVER = 'E'

  • /BIC/S_CBPDAT =

  • VERSION =

  • /BIC/S_PLANTYP =

  • /BIC/S_DATVER =

  • OBJVERS =

  • X_/BIC/S_CBPDAT = ' '

  • X_VERSION = ' '

  • X_/BIC/S_PLANTYP = ' '

  • X_/BIC/S_DATVER = ' '

  • X_OBJVERS = ' '

  • _SCOPE = '3'

  • _SYNCHRON = ' '

  • _COLLECT = ' '

.

its very urgent

points wil be rewarded

Ravi

1 REPLY 1

Former Member

‎07-14-2007 3:56 PM

0 Kudos

CALL FUNCTION 'ENQUEUE_ED'

EXPORTING

MODE_/BIC/PS_DATVER = 'E'

  • /BIC/S_CBPDAT =

  • VERSION =

  • /BIC/S_PLANTYP =

  • /BIC/S_DATVER =

  • OBJVERS =

  • X_/BIC/S_CBPDAT = ' '

  • X_VERSION = ' '

  • X_/BIC/S_PLANTYP = ' '

  • X_/BIC/S_DATVER = ' '

  • X_OBJVERS = ' '

  • _SCOPE = '2'

  • _WAIT = ' '

  • _COLLECT = ' '

EXCEPTIONS

FOREIGN_LOCK = 1

SYSTEM_FAILURE = 2

OTHERS = 3

.

IF SY-SUBRC <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

*<----

Update code.

MODIFY <YOUR TABLE > FROM <UPDATED WORK AREA>

*<----

CALL FUNCTION 'DEQUEUE_ED'

EXPORTING

MODE_/BIC/PS_DATVER = 'E'

  • /BIC/S_CBPDAT =

  • VERSION =

  • /BIC/S_PLANTYP =

  • /BIC/S_DATVER =

  • OBJVERS =

  • X_/BIC/S_CBPDAT = ' '

  • X_VERSION = ' '

  • X_/BIC/S_PLANTYP = ' '

  • X_/BIC/S_DATVER = ' '

  • X_OBJVERS = ' '

  • _SCOPE = '3'

  • _SYNCHRON = ' '

  • _COLLECT = ' '

.

To the ENQUEE & DEQUEE FM

pass the particular field values/record to the respective Export parameters

(usually the key field values is enough) to lock that entry and stoping others modifying that row.

Reagrds,

A.Singh