SAP ENQUEUE_E_CURRENCY Function Module for Request lock for object E_CURRENCY









ENQUEUE_E_CURRENCY is a standard enqueue e currency SAP function module available within SAP R/3 or S/4 Hana systems, depending on your version and release level. It is used for Request lock for object E_CURRENCY processing and below is the pattern details for this FM, showing its interface including any import and export parameters, exceptions etc. there is also a full "cut and paste" ABAP pattern code example, along with implementation ABAP coding, documentation and contribution comments specific to this or related objects.


See here to view full function module documentation and code listing for enqueue e currency FM, simply by entering the name ENQUEUE_E_CURRENCY into the relevant SAP transaction such as SE37 or SE38.

Function Group: /1BCDWBEN/BEN0001
Program Name: /1BCDWBEN/SAPLBEN0001
Main Program:
Appliation area:
Release date: N/A
Mode(Normal, Remote etc): Normal Function Module
Update:



Function ENQUEUE_E_CURRENCY pattern details

In-order to call this FM within your sap programs, simply using the below ABAP pattern details to trigger the function call...or see the full ABAP code listing at the end of this article. You can simply cut and paste this code into your ABAP progrom as it is, including variable declarations.
CALL FUNCTION 'ENQUEUE_E_CURRENCY'"Request lock for object E_CURRENCY
EXPORTING
* MODE_TCURF = 'E' "Lock mode for table TCURF
* X_GDATU = ' ' "Fill argument 05 with initial value?
* _SCOPE = '2' "
* _WAIT = ' ' "
* _COLLECT = ' ' "Initially only collect lock
* MANDT = SY-MANDT "01th enqueue argument
* KURST = "02th enqueue argument
* FCURR = "03th enqueue argument
* TCURR1 = "04th enqueue argument
* GDATU = "05th enqueue argument
* X_KURST = ' ' "Fill argument 02 with initial value?
* X_FCURR = ' ' "Fill argument 03 with initial value?
* X_TCURR1 = ' ' "Fill argument 04 with initial value?

EXCEPTIONS
FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2
.



IMPORTING Parameters details for ENQUEUE_E_CURRENCY

MODE_TCURF - Lock mode for table TCURF

Data type: ENQMODE
Default: 'E'
Optional: Yes
Call by Reference: No ( called with pass by value option)

X_GDATU - Fill argument 05 with initial value?

Data type:
Default: SPACE
Optional: Yes
Call by Reference: No ( called with pass by value option)

_SCOPE -

Data type:
Default: '2'
Optional: Yes
Call by Reference: No ( called with pass by value option)

_WAIT -

Data type:
Default: SPACE
Optional: Yes
Call by Reference: No ( called with pass by value option)

_COLLECT - Initially only collect lock

Data type: DDENQCOLL
Default: ' '
Optional: Yes
Call by Reference: No ( called with pass by value option)

MANDT - 01th enqueue argument

Data type: TCURF-MANDT
Default: SY-MANDT
Optional: Yes
Call by Reference: No ( called with pass by value option)

KURST - 02th enqueue argument

Data type: TCURF-KURST
Optional: Yes
Call by Reference: No ( called with pass by value option)

FCURR - 03th enqueue argument

Data type: TCURF-FCURR
Optional: Yes
Call by Reference: No ( called with pass by value option)

TCURR1 - 04th enqueue argument

Data type: TCURF-TCURR
Optional: Yes
Call by Reference: No ( called with pass by value option)

GDATU - 05th enqueue argument

Data type: TCURF-GDATU
Optional: Yes
Call by Reference: No ( called with pass by value option)

X_KURST - Fill argument 02 with initial value?

Data type:
Default: SPACE
Optional: Yes
Call by Reference: No ( called with pass by value option)

X_FCURR - Fill argument 03 with initial value?

Data type:
Default: SPACE
Optional: Yes
Call by Reference: No ( called with pass by value option)

X_TCURR1 - Fill argument 04 with initial value?

Data type:
Default: SPACE
Optional: Yes
Call by Reference: No ( called with pass by value option)

EXCEPTIONS details

FOREIGN_LOCK - Object already locked

Data type:
Optional: No
Call by Reference: No ( called with pass by value option)

SYSTEM_FAILURE - Internal error from enqueue server

Data type:
Optional: No
Call by Reference: No ( called with pass by value option)

Copy and paste ABAP code example for ENQUEUE_E_CURRENCY Function Module

The ABAP code below is a full code listing to execute function module POPUP_TO_CONFIRM including all data declarations. The code uses the original data declarations rather than 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 newer method of declaring data variables on the fly. 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), which i why i have stuck to the origianl for this example.

DATA:
lv_mode_tcurf  TYPE ENQMODE, "   'E'
lv_foreign_lock  TYPE ENQMODE, "   
lv_x_gdatu  TYPE ENQMODE, "   SPACE
lv__scope  TYPE ENQMODE, "   '2'
lv__wait  TYPE ENQMODE, "   SPACE
lv__collect  TYPE DDENQCOLL, "   ' '
lv_mandt  TYPE TCURF-MANDT, "   SY-MANDT
lv_system_failure  TYPE TCURF, "   
lv_kurst  TYPE TCURF-KURST, "   
lv_fcurr  TYPE TCURF-FCURR, "   
lv_tcurr1  TYPE TCURF-TCURR, "   
lv_gdatu  TYPE TCURF-GDATU, "   
lv_x_kurst  TYPE TCURF, "   SPACE
lv_x_fcurr  TYPE TCURF, "   SPACE
lv_x_tcurr1  TYPE TCURF. "   SPACE

  CALL FUNCTION 'ENQUEUE_E_CURRENCY'  "Request lock for object E_CURRENCY
    EXPORTING
         MODE_TCURF = lv_mode_tcurf
         X_GDATU = lv_x_gdatu
         _SCOPE = lv__scope
         _WAIT = lv__wait
         _COLLECT = lv__collect
         MANDT = lv_mandt
         KURST = lv_kurst
         FCURR = lv_fcurr
         TCURR1 = lv_tcurr1
         GDATU = lv_gdatu
         X_KURST = lv_x_kurst
         X_FCURR = lv_x_fcurr
         X_TCURR1 = lv_x_tcurr1
    EXCEPTIONS
        FOREIGN_LOCK = 1
        SYSTEM_FAILURE = 2
. " ENQUEUE_E_CURRENCY




ABAP code using 7.40 inline data declarations to call FM ENQUEUE_E_CURRENCY

The below ABAP code uses the newer in-line data declarations. This allows you to see the coding differences/benefits of the later inline syntax. Please note some of the newer syntax below, such as the @DATA is not available until 4.70 EHP 8.

DATA(ld_mode_tcurf) = 'E'.
 
 
DATA(ld_x_gdatu) = ' '.
 
DATA(ld__scope) = '2'.
 
DATA(ld__wait) = ' '.
 
DATA(ld__collect) = ' '.
 
"SELECT single MANDT FROM TCURF INTO @DATA(ld_mandt).
DATA(ld_mandt) = SY-MANDT.
 
 
"SELECT single KURST FROM TCURF INTO @DATA(ld_kurst).
 
"SELECT single FCURR FROM TCURF INTO @DATA(ld_fcurr).
 
"SELECT single TCURR FROM TCURF INTO @DATA(ld_tcurr1).
 
"SELECT single GDATU FROM TCURF INTO @DATA(ld_gdatu).
 
DATA(ld_x_kurst) = ' '.
 
DATA(ld_x_fcurr) = ' '.
 
DATA(ld_x_tcurr1) = ' '.
 


Search for further information about these or an SAP related objects



Comments on this SAP object

What made you want to lookup this SAP object? Please tell us what you were looking for and anything you would like to be included on this page!