DEQUEUE_EJ_7LSC SAP Function module - Release lock on object EJ_7LSC

DEQUEUE_EJ_7LSC is a standard SAP function module available within R/3 SAP systems depending on your version and release level. Below is the pattern details for this FM showing its interface including any import and export parameters, exceptions etc as well as any documentation contributions (Comments) specific to the object.

See here to view full function module documentation and code listing, simply by entering the name DEQUEUE_EJ_7LSC into the relevant SAP transaction such as SE37 or SE80.

Associated Function Group: DWBEN/SAPLJEN0007
Released Date: Not Released
Processing type: Normal fucntion module

Pattern for FM DEQUEUE_EJ_7LSC - DEQUEUE EJ 7LSC

CALL FUNCTION 'DEQUEUE_EJ_7LSC' "Release lock on object EJ_7LSC
* EXPORTING
*   mode_j_7lc191 = 'E'         " enqmode       Lock mode for table J_7LC191
*   mandt = SY-MANDT            " j_7lc191-mandt  01th enqueue argument
*   entna =                     " j_7lc191-entna  02th enqueue argument
*   bukrs =                     " j_7lc191-bukrs  03th enqueue argument
*   land1 =                     " j_7lc191-land1  04th enqueue argument
*   vkorg =                     " j_7lc191-vkorg  05th enqueue argument
*   vtweg =                     " j_7lc191-vtweg  06th enqueue argument
*   spart =                     " j_7lc191-spart  07th enqueue argument
*   kumrk =                     " j_7lc191-kumrk  08th enqueue argument
*   kunnr =                     " j_7lc191-kunnr  09th enqueue argument
*   x_entna = SPACE             "               Fill argument 02 with initial value?
*   x_bukrs = SPACE             "               Fill argument 03 with initial value?
*   x_land1 = SPACE             "               Fill argument 04 with initial value?
*   x_vkorg = SPACE             "               Fill argument 05 with initial value?
*   x_vtweg = SPACE             "               Fill argument 06 with initial value?
*   x_spart = SPACE             "               Fill argument 07 with initial value?
*   x_kumrk = SPACE             "               Fill argument 08 with initial value?
*   x_kunnr = SPACE             "               Fill argument 09 with initial value?
*   _scope = '3'                "
*   _synchron = SPACE           "               Synchonous unlock
*   _collect = ' '              " ddenqcoll     Initially only collect lock
    .  "  DEQUEUE_EJ_7LSC

ABAP code example for Function Module DEQUEUE_EJ_7LSC

The ABAP code below is a full code listing to execute function module DEQUEUE_EJ_7LSC including all data declarations. The code uses the latest in-line data DECLARATION SYNTAX but I have included an ABAP code snippet at the end to show how declarations would look using the original method of declaring data variables up front. This will allow you to compare and fully understand the new inline method. Please note some of the newer syntax such as the @DATA is not available until a later 4.70 service pack (SP8).

DATA(ld_mode_j_7lc191) = 'Check type of data required'.
 

SELECT single MANDT 
  FROM J_7LC191 
  INTO @DATA(ld_mandt).

 

SELECT single ENTNA 
  FROM J_7LC191 
  INTO @DATA(ld_entna).

 

SELECT single BUKRS 
  FROM J_7LC191 
  INTO @DATA(ld_bukrs).

 

SELECT single LAND1 
  FROM J_7LC191 
  INTO @DATA(ld_land1).

 

SELECT single VKORG 
  FROM J_7LC191 
  INTO @DATA(ld_vkorg).

 

SELECT single VTWEG 
  FROM J_7LC191 
  INTO @DATA(ld_vtweg).

 

SELECT single SPART 
  FROM J_7LC191 
  INTO @DATA(ld_spart).

 

SELECT single KUMRK 
  FROM J_7LC191 
  INTO @DATA(ld_kumrk).

 

SELECT single KUNNR 
  FROM J_7LC191 
  INTO @DATA(ld_kunnr).


DATA(ld_x_entna) = 'some text here'.

DATA(ld_x_bukrs) = 'some text here'.

DATA(ld_x_land1) = 'some text here'.

DATA(ld_x_vkorg) = 'some text here'.

DATA(ld_x_vtweg) = 'some text here'.

DATA(ld_x_spart) = 'some text here'.

DATA(ld_x_kumrk) = 'some text here'.

DATA(ld_x_kunnr) = 'some text here'.

DATA(ld__scope) = 'some text here'.

DATA(ld__synchron) = 'some text here'.

DATA(ld__collect) = 'Check type of data required'.
.

CALL FUNCTION 'DEQUEUE_EJ_7LSC'
* EXPORTING
*   mode_j_7lc191 =              ld_mode_j_7lc191
*   mandt =                      ld_mandt
*   entna =                      ld_entna
*   bukrs =                      ld_bukrs
*   land1 =                      ld_land1
*   vkorg =                      ld_vkorg
*   vtweg =                      ld_vtweg
*   spart =                      ld_spart
*   kumrk =                      ld_kumrk
*   kunnr =                      ld_kunnr
*   x_entna =                    ld_x_entna
*   x_bukrs =                    ld_x_bukrs
*   x_land1 =                    ld_x_land1
*   x_vkorg =                    ld_x_vkorg
*   x_vtweg =                    ld_x_vtweg
*   x_spart =                    ld_x_spart
*   x_kumrk =                    ld_x_kumrk
*   x_kunnr =                    ld_x_kunnr
*   _scope =                     ld__scope
*   _synchron =                  ld__synchron
*   _collect =                   ld__collect
    .  "  DEQUEUE_EJ_7LSC

IF SY-SUBRC EQ 0.
  "All OK
ENDIF.

ABAP code to compare 7.40 inline data declaration with original syntax

The below ABAP code uses the older none in-line data declarations. This allows you to see the coding differences/benefits of the later inline syntax. It may also be useful if you are using an older version of SAP as some of the newer syntax above, such as the @DATA is not available until 4.70 EHP 8.

DATA:

ld_mode_j_7lc191
 
 TYPE ENQMODE ,
ld_mandt
 
 TYPE J_7LC191-MANDT ,
ld_entna
 
 TYPE J_7LC191-ENTNA ,
ld_bukrs
 
 TYPE J_7LC191-BUKRS ,
ld_land1
 
 TYPE J_7LC191-LAND1 ,
ld_vkorg
 
 TYPE J_7LC191-VKORG ,
ld_vtweg
 
 TYPE J_7LC191-VTWEG ,
ld_spart
 
 TYPE J_7LC191-SPART ,
ld_kumrk
 
 TYPE J_7LC191-KUMRK ,
ld_kunnr
 
 TYPE J_7LC191-KUNNR ,
ld_x_entna
 
 TYPE STRING ,
ld_x_bukrs
 
 TYPE STRING ,
ld_x_land1
 
 TYPE STRING ,
ld_x_vkorg
 
 TYPE STRING ,
ld_x_vtweg
 
 TYPE STRING ,
ld_x_spart
 
 TYPE STRING ,
ld_x_kumrk
 
 TYPE STRING ,
ld_x_kunnr
 
 TYPE STRING ,
ld__scope
 
 TYPE STRING ,
ld__synchron
 
 TYPE STRING ,
ld__collect
 
 TYPE DDENQCOLL .


ld_mode_j_7lc191 = 'Check type of data required'.

SELECT single MANDT 
  FROM J_7LC191 
  INTO ld_mandt.


SELECT single ENTNA 
  FROM J_7LC191 
  INTO ld_entna.


SELECT single BUKRS 
  FROM J_7LC191 
  INTO ld_bukrs.


SELECT single LAND1 
  FROM J_7LC191 
  INTO ld_land1.


SELECT single VKORG 
  FROM J_7LC191 
  INTO ld_vkorg.


SELECT single VTWEG 
  FROM J_7LC191 
  INTO ld_vtweg.


SELECT single SPART 
  FROM J_7LC191 
  INTO ld_spart.


SELECT single KUMRK 
  FROM J_7LC191 
  INTO ld_kumrk.


SELECT single KUNNR 
  FROM J_7LC191 
  INTO ld_kunnr.

ld_x_entna = 'some text here'.
ld_x_bukrs = 'some text here'.
ld_x_land1 = 'some text here'.
ld_x_vkorg = 'some text here'.
ld_x_vtweg = 'some text here'.
ld_x_spart = 'some text here'.
ld_x_kumrk = 'some text here'.
ld_x_kunnr = 'some text here'.
ld__scope = 'some text here'.
ld__synchron = 'some text here'.
ld__collect = 'Check type of data required'.