DEQUEUE_EUSMD_HRYNODE SAP Function module - Release lock on object EUSMD_HRYNODE

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

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

Pattern for FM DEQUEUE_EUSMD_HRYNODE - DEQUEUE EUSMD HRYNODE

CALL FUNCTION 'DEQUEUE_EUSMD_HRYNODE' "Release lock on object EUSMD_HRYNODE
* EXPORTING
*   mode_usmd_enq_hrynode = 'E'  " enqmode      Lock mode for table USMD_ENQ_HRYNODE
*   mandt = SY-MANDT            " usmd_enq_hrynode-mandt  01th enqueue argument
*   usmd_model =                " usmd_enq_hrynode-usmd_model  02th enqueue argument
*   usmd_entity =               " usmd_enq_hrynode-usmd_entity  03th enqueue argument
*   usmd_edition =              " usmd_enq_hrynode-usmd_edition  04th enqueue argument
*   usmd_hryvers =              " usmd_enq_hrynode-usmd_hryvers  05th enqueue argument
*   hryname_key =               " usmd_enq_hrynode-hryname_key  06th enqueue argument
*   usmd_entity_node =          " usmd_enq_hrynode-usmd_entity_node  07th enqueue argument
*   keychar =                   " usmd_enq_hrynode-keychar  08th enqueue argument
*   x_usmd_model = SPACE        "               Fill argument 02 with initial value?
*   x_usmd_entity = SPACE       "               Fill argument 03 with initial value?
*   x_usmd_edition = SPACE      "               Fill argument 04 with initial value?
*   x_usmd_hryvers = SPACE      "               Fill argument 05 with initial value?
*   x_hryname_key = SPACE       "               Fill argument 06 with initial value?
*   x_usmd_entity_node = SPACE  "               Fill argument 07 with initial value?
*   x_keychar = SPACE           "               Fill argument 08 with initial value?
*   _scope = '3'                "
*   _synchron = SPACE           "               Synchonous unlock
*   _collect = ' '              " ddenqcoll     Initially only collect lock
    .  "  DEQUEUE_EUSMD_HRYNODE

ABAP code example for Function Module DEQUEUE_EUSMD_HRYNODE

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

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

 

SELECT single USMD_MODEL 
  FROM USMD_ENQ_HRYNODE 
  INTO @DATA(ld_usmd_model).

 

SELECT single USMD_ENTITY 
  FROM USMD_ENQ_HRYNODE 
  INTO @DATA(ld_usmd_entity).

 

SELECT single USMD_EDITION 
  FROM USMD_ENQ_HRYNODE 
  INTO @DATA(ld_usmd_edition).

 

SELECT single USMD_HRYVERS 
  FROM USMD_ENQ_HRYNODE 
  INTO @DATA(ld_usmd_hryvers).

 

SELECT single HRYNAME_KEY 
  FROM USMD_ENQ_HRYNODE 
  INTO @DATA(ld_hryname_key).

 

SELECT single USMD_ENTITY_NODE 
  FROM USMD_ENQ_HRYNODE 
  INTO @DATA(ld_usmd_entity_node).

 

SELECT single KEYCHAR 
  FROM USMD_ENQ_HRYNODE 
  INTO @DATA(ld_keychar).


DATA(ld_x_usmd_model) = 'some text here'.

DATA(ld_x_usmd_entity) = 'some text here'.

DATA(ld_x_usmd_edition) = 'some text here'.

DATA(ld_x_usmd_hryvers) = 'some text here'.

DATA(ld_x_hryname_key) = 'some text here'.

DATA(ld_x_usmd_entity_node) = 'some text here'.

DATA(ld_x_keychar) = '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_EUSMD_HRYNODE'
* EXPORTING
*   mode_usmd_enq_hrynode =      ld_mode_usmd_enq_hrynode
*   mandt =                      ld_mandt
*   usmd_model =                 ld_usmd_model
*   usmd_entity =                ld_usmd_entity
*   usmd_edition =               ld_usmd_edition
*   usmd_hryvers =               ld_usmd_hryvers
*   hryname_key =                ld_hryname_key
*   usmd_entity_node =           ld_usmd_entity_node
*   keychar =                    ld_keychar
*   x_usmd_model =               ld_x_usmd_model
*   x_usmd_entity =              ld_x_usmd_entity
*   x_usmd_edition =             ld_x_usmd_edition
*   x_usmd_hryvers =             ld_x_usmd_hryvers
*   x_hryname_key =              ld_x_hryname_key
*   x_usmd_entity_node =         ld_x_usmd_entity_node
*   x_keychar =                  ld_x_keychar
*   _scope =                     ld__scope
*   _synchron =                  ld__synchron
*   _collect =                   ld__collect
    .  "  DEQUEUE_EUSMD_HRYNODE

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_usmd_enq_hrynode
 
 TYPE ENQMODE ,
ld_mandt
 
 TYPE USMD_ENQ_HRYNODE-MANDT ,
ld_usmd_model
 
 TYPE USMD_ENQ_HRYNODE-USMD_MODEL ,
ld_usmd_entity
 
 TYPE USMD_ENQ_HRYNODE-USMD_ENTITY ,
ld_usmd_edition
 
 TYPE USMD_ENQ_HRYNODE-USMD_EDITION ,
ld_usmd_hryvers
 
 TYPE USMD_ENQ_HRYNODE-USMD_HRYVERS ,
ld_hryname_key
 
 TYPE USMD_ENQ_HRYNODE-HRYNAME_KEY ,
ld_usmd_entity_node
 
 TYPE USMD_ENQ_HRYNODE-USMD_ENTITY_NODE ,
ld_keychar
 
 TYPE USMD_ENQ_HRYNODE-KEYCHAR ,
ld_x_usmd_model
 
 TYPE STRING ,
ld_x_usmd_entity
 
 TYPE STRING ,
ld_x_usmd_edition
 
 TYPE STRING ,
ld_x_usmd_hryvers
 
 TYPE STRING ,
ld_x_hryname_key
 
 TYPE STRING ,
ld_x_usmd_entity_node
 
 TYPE STRING ,
ld_x_keychar
 
 TYPE STRING ,
ld__scope
 
 TYPE STRING ,
ld__synchron
 
 TYPE STRING ,
ld__collect
 
 TYPE DDENQCOLL .


ld_mode_usmd_enq_hrynode = 'Check type of data required'.

SELECT single MANDT 
  FROM USMD_ENQ_HRYNODE 
  INTO ld_mandt.


SELECT single USMD_MODEL 
  FROM USMD_ENQ_HRYNODE 
  INTO ld_usmd_model.


SELECT single USMD_ENTITY 
  FROM USMD_ENQ_HRYNODE 
  INTO ld_usmd_entity.


SELECT single USMD_EDITION 
  FROM USMD_ENQ_HRYNODE 
  INTO ld_usmd_edition.


SELECT single USMD_HRYVERS 
  FROM USMD_ENQ_HRYNODE 
  INTO ld_usmd_hryvers.


SELECT single HRYNAME_KEY 
  FROM USMD_ENQ_HRYNODE 
  INTO ld_hryname_key.


SELECT single USMD_ENTITY_NODE 
  FROM USMD_ENQ_HRYNODE 
  INTO ld_usmd_entity_node.


SELECT single KEYCHAR 
  FROM USMD_ENQ_HRYNODE 
  INTO ld_keychar.

ld_x_usmd_model = 'some text here'.
ld_x_usmd_entity = 'some text here'.
ld_x_usmd_edition = 'some text here'.
ld_x_usmd_hryvers = 'some text here'.
ld_x_hryname_key = 'some text here'.
ld_x_usmd_entity_node = 'some text here'.
ld_x_keychar = 'some text here'.
ld__scope = 'some text here'.
ld__synchron = 'some text here'.
ld__collect = 'Check type of data required'.