ENQUEUE_EJ_3RKKRS SAP Function module - Request lock for object EJ_3RKKRS

ENQUEUE_EJ_3RKKRS 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 ENQUEUE_EJ_3RKKRS into the relevant SAP transaction such as SE37 or SE80.

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

Pattern for FM ENQUEUE_EJ_3RKKRS - ENQUEUE EJ 3RKKRS

CALL FUNCTION 'ENQUEUE_EJ_3RKKRS' "Request lock for object EJ_3RKKRS
* EXPORTING
*   mode_j_3rkkrs = 'E'         " enqmode       Lock mode for table J_3RKKRS
*   mandt = SY-MANDT            " j_3rkkrs-mandt  01th enqueue argument
*   bukrs =                     " j_3rkkrs-bukrs  02th enqueue argument
*   belnr =                     " j_3rkkrs-belnr  03th enqueue argument
*   gjahr =                     " j_3rkkrs-gjahr  04th enqueue argument
*   buzeid =                    " j_3rkkrs-buzeid  05th enqueue argument
*   buzeik =                    " j_3rkkrs-buzeik  06th enqueue argument
*   addd =                      " j_3rkkrs-addd  07th enqueue argument
*   addk =                      " j_3rkkrs-addk  08th enqueue argument
*   npddi =                     " j_3rkkrs-npddi  09th enqueue argument
*   npdki =                     " j_3rkkrs-npdki  10th enqueue argument
*   x_bukrs = SPACE             "               Fill argument 02 with initial value?
*   x_belnr = SPACE             "               Fill argument 03 with initial value?
*   x_gjahr = SPACE             "               Fill argument 04 with initial value?
*   x_buzeid = SPACE            "               Fill argument 05 with initial value?
*   x_buzeik = SPACE            "               Fill argument 06 with initial value?
*   x_addd = SPACE              "               Fill argument 07 with initial value?
*   x_addk = SPACE              "               Fill argument 08 with initial value?
*   x_npddi = SPACE             "               Fill argument 09 with initial value?
*   x_npdki = SPACE             "               Fill argument 10 with initial value?
*   _scope = '2'                "
*   _wait = SPACE               "
*   _collect = ' '              " ddenqcoll     Initially only collect lock
  EXCEPTIONS
    FOREIGN_LOCK = 1            "               Object already locked
    SYSTEM_FAILURE = 2          "               Internal error from enqueue server
    .  "  ENQUEUE_EJ_3RKKRS

ABAP code example for Function Module ENQUEUE_EJ_3RKKRS

The ABAP code below is a full code listing to execute function module ENQUEUE_EJ_3RKKRS 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_3rkkrs) = 'Check type of data required'.
 

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

 

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

 

SELECT single BELNR 
  FROM J_3RKKRS 
  INTO @DATA(ld_belnr).

 

SELECT single GJAHR 
  FROM J_3RKKRS 
  INTO @DATA(ld_gjahr).

 

SELECT single BUZEID 
  FROM J_3RKKRS 
  INTO @DATA(ld_buzeid).

 

SELECT single BUZEIK 
  FROM J_3RKKRS 
  INTO @DATA(ld_buzeik).

 

SELECT single ADDD 
  FROM J_3RKKRS 
  INTO @DATA(ld_addd).

 

SELECT single ADDK 
  FROM J_3RKKRS 
  INTO @DATA(ld_addk).

 

SELECT single NPDDI 
  FROM J_3RKKRS 
  INTO @DATA(ld_npddi).

 

SELECT single NPDKI 
  FROM J_3RKKRS 
  INTO @DATA(ld_npdki).


DATA(ld_x_bukrs) = 'some text here'.

DATA(ld_x_belnr) = 'some text here'.

DATA(ld_x_gjahr) = 'some text here'.

DATA(ld_x_buzeid) = 'some text here'.

DATA(ld_x_buzeik) = 'some text here'.

DATA(ld_x_addd) = 'some text here'.

DATA(ld_x_addk) = 'some text here'.

DATA(ld_x_npddi) = 'some text here'.

DATA(ld_x_npdki) = 'some text here'.

DATA(ld__scope) = 'some text here'.

DATA(ld__wait) = 'some text here'.

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

CALL FUNCTION 'ENQUEUE_EJ_3RKKRS'
* EXPORTING
*   mode_j_3rkkrs =              ld_mode_j_3rkkrs
*   mandt =                      ld_mandt
*   bukrs =                      ld_bukrs
*   belnr =                      ld_belnr
*   gjahr =                      ld_gjahr
*   buzeid =                     ld_buzeid
*   buzeik =                     ld_buzeik
*   addd =                       ld_addd
*   addk =                       ld_addk
*   npddi =                      ld_npddi
*   npdki =                      ld_npdki
*   x_bukrs =                    ld_x_bukrs
*   x_belnr =                    ld_x_belnr
*   x_gjahr =                    ld_x_gjahr
*   x_buzeid =                   ld_x_buzeid
*   x_buzeik =                   ld_x_buzeik
*   x_addd =                     ld_x_addd
*   x_addk =                     ld_x_addk
*   x_npddi =                    ld_x_npddi
*   x_npdki =                    ld_x_npdki
*   _scope =                     ld__scope
*   _wait =                      ld__wait
*   _collect =                   ld__collect
  EXCEPTIONS
    FOREIGN_LOCK =               1
    SYSTEM_FAILURE =             2
    .  "  ENQUEUE_EJ_3RKKRS

IF SY-SUBRC EQ 0.
  "All OK
ELSEIF SY-SUBRC EQ 1. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 2. "Exception
  "Add code for exception here
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_3rkkrs
 
 TYPE ENQMODE ,
ld_mandt
 
 TYPE J_3RKKRS-MANDT ,
ld_bukrs
 
 TYPE J_3RKKRS-BUKRS ,
ld_belnr
 
 TYPE J_3RKKRS-BELNR ,
ld_gjahr
 
 TYPE J_3RKKRS-GJAHR ,
ld_buzeid
 
 TYPE J_3RKKRS-BUZEID ,
ld_buzeik
 
 TYPE J_3RKKRS-BUZEIK ,
ld_addd
 
 TYPE J_3RKKRS-ADDD ,
ld_addk
 
 TYPE J_3RKKRS-ADDK ,
ld_npddi
 
 TYPE J_3RKKRS-NPDDI ,
ld_npdki
 
 TYPE J_3RKKRS-NPDKI ,
ld_x_bukrs
 
 TYPE STRING ,
ld_x_belnr
 
 TYPE STRING ,
ld_x_gjahr
 
 TYPE STRING ,
ld_x_buzeid
 
 TYPE STRING ,
ld_x_buzeik
 
 TYPE STRING ,
ld_x_addd
 
 TYPE STRING ,
ld_x_addk
 
 TYPE STRING ,
ld_x_npddi
 
 TYPE STRING ,
ld_x_npdki
 
 TYPE STRING ,
ld__scope
 
 TYPE STRING ,
ld__wait
 
 TYPE STRING ,
ld__collect
 
 TYPE DDENQCOLL .


ld_mode_j_3rkkrs = 'Check type of data required'.

SELECT single MANDT 
  FROM J_3RKKRS 
  INTO ld_mandt.


SELECT single BUKRS 
  FROM J_3RKKRS 
  INTO ld_bukrs.


SELECT single BELNR 
  FROM J_3RKKRS 
  INTO ld_belnr.


SELECT single GJAHR 
  FROM J_3RKKRS 
  INTO ld_gjahr.


SELECT single BUZEID 
  FROM J_3RKKRS 
  INTO ld_buzeid.


SELECT single BUZEIK 
  FROM J_3RKKRS 
  INTO ld_buzeik.


SELECT single ADDD 
  FROM J_3RKKRS 
  INTO ld_addd.


SELECT single ADDK 
  FROM J_3RKKRS 
  INTO ld_addk.


SELECT single NPDDI 
  FROM J_3RKKRS 
  INTO ld_npddi.


SELECT single NPDKI 
  FROM J_3RKKRS 
  INTO ld_npdki.

ld_x_bukrs = 'some text here'.
ld_x_belnr = 'some text here'.
ld_x_gjahr = 'some text here'.
ld_x_buzeid = 'some text here'.
ld_x_buzeik = 'some text here'.
ld_x_addd = 'some text here'.
ld_x_addk = 'some text here'.
ld_x_npddi = 'some text here'.
ld_x_npdki = 'some text here'.
ld__scope = 'some text here'.
ld__wait = 'some text here'.
ld__collect = 'Check type of data required'.