SAP ENQUEUE_EUPC_CHAS Function Module for Request lock for object EUPC_CHAS









ENQUEUE_EUPC_CHAS is a standard enqueue eupc chas 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 EUPC_CHAS 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 eupc chas FM, simply by entering the name ENQUEUE_EUPC_CHAS into the relevant SAP transaction such as SE37 or SE38.

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



Function ENQUEUE_EUPC_CHAS 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_EUPC_CHAS'"Request lock for object EUPC_CHAS
EXPORTING
* MODE_UPC_YS_LOCK_CHAS = 'E' "Lock mode for table UPC_YS_LOCK_CHAS
* FIELD008 = "09th enqueue argument
* X_FIELD049 = ' ' "Fill argument 50 with initial value?
* _SCOPE = '2' "
* _WAIT = ' ' "
* _COLLECT = ' ' "Initially only collect lock
* FIELD009 = "10th enqueue argument
* FIELD010 = "11th enqueue argument
* FIELD011 = "12th enqueue argument
* FIELD012 = "13th enqueue argument
* FIELD013 = "14th enqueue argument
* FIELD014 = "15th enqueue argument
* FIELD015 = "16th enqueue argument
* FIELD016 = "17th enqueue argument
* FIELD017 = "18th enqueue argument
* MANDT = SY-MANDT "01th enqueue argument
* FIELD018 = "19th enqueue argument
* FIELD019 = "20th enqueue argument
* FIELD020 = "21th enqueue argument
* FIELD021 = "22th enqueue argument
* FIELD022 = "23th enqueue argument
* FIELD023 = "24th enqueue argument
* FIELD024 = "25th enqueue argument
* FIELD025 = "26th enqueue argument
* FIELD026 = "27th enqueue argument
* FIELD027 = "28th enqueue argument
* FIELD001 = "02th enqueue argument
* FIELD028 = "29th enqueue argument
* FIELD029 = "30th enqueue argument
* FIELD030 = "31th enqueue argument
* FIELD031 = "32th enqueue argument
* FIELD032 = "33th enqueue argument
* FIELD033 = "34th enqueue argument
* FIELD034 = "35th enqueue argument
* FIELD035 = "36th enqueue argument
* FIELD036 = "37th enqueue argument
* FIELD037 = "38th enqueue argument
* FIELD002 = "03th enqueue argument
* FIELD038 = "39th enqueue argument
* FIELD039 = "40th enqueue argument
* FIELD040 = "41th enqueue argument
* FIELD041 = "42th enqueue argument
* FIELD042 = "43th enqueue argument
* FIELD043 = "44th enqueue argument
* FIELD044 = "45th enqueue argument
* FIELD045 = "46th enqueue argument
* FIELD046 = "47th enqueue argument
* FIELD047 = "48th enqueue argument
* FIELD003 = "04th enqueue argument
* FIELD048 = "49th enqueue argument
* FIELD049 = "50th enqueue argument
* X_FIELD001 = ' ' "Fill argument 02 with initial value?
* X_FIELD002 = ' ' "Fill argument 03 with initial value?
* X_FIELD003 = ' ' "Fill argument 04 with initial value?
* X_FIELD004 = ' ' "Fill argument 05 with initial value?
* X_FIELD005 = ' ' "Fill argument 06 with initial value?
* X_FIELD006 = ' ' "Fill argument 07 with initial value?
* X_FIELD007 = ' ' "Fill argument 08 with initial value?
* X_FIELD008 = ' ' "Fill argument 09 with initial value?
* FIELD004 = "05th enqueue argument
* X_FIELD009 = ' ' "Fill argument 10 with initial value?
* X_FIELD010 = ' ' "Fill argument 11 with initial value?
* X_FIELD011 = ' ' "Fill argument 12 with initial value?
* X_FIELD012 = ' ' "Fill argument 13 with initial value?
* X_FIELD013 = ' ' "Fill argument 14 with initial value?
* X_FIELD014 = ' ' "Fill argument 15 with initial value?
* X_FIELD015 = ' ' "Fill argument 16 with initial value?
* X_FIELD016 = ' ' "Fill argument 17 with initial value?
* X_FIELD017 = ' ' "Fill argument 18 with initial value?
* X_FIELD018 = ' ' "Fill argument 19 with initial value?
* FIELD005 = "06th enqueue argument
* X_FIELD019 = ' ' "Fill argument 20 with initial value?
* X_FIELD020 = ' ' "Fill argument 21 with initial value?
* X_FIELD021 = ' ' "Fill argument 22 with initial value?
* X_FIELD022 = ' ' "Fill argument 23 with initial value?
* X_FIELD023 = ' ' "Fill argument 24 with initial value?
* X_FIELD024 = ' ' "Fill argument 25 with initial value?
* X_FIELD025 = ' ' "Fill argument 26 with initial value?
* X_FIELD026 = ' ' "Fill argument 27 with initial value?
* X_FIELD027 = ' ' "Fill argument 28 with initial value?
* X_FIELD028 = ' ' "Fill argument 29 with initial value?
* FIELD006 = "07th enqueue argument
* X_FIELD029 = ' ' "Fill argument 30 with initial value?
* X_FIELD030 = ' ' "Fill argument 31 with initial value?
* X_FIELD031 = ' ' "Fill argument 32 with initial value?
* X_FIELD032 = ' ' "Fill argument 33 with initial value?
* X_FIELD033 = ' ' "Fill argument 34 with initial value?
* X_FIELD034 = ' ' "Fill argument 35 with initial value?
* X_FIELD035 = ' ' "Fill argument 36 with initial value?
* X_FIELD036 = ' ' "Fill argument 37 with initial value?
* X_FIELD037 = ' ' "Fill argument 38 with initial value?
* X_FIELD038 = ' ' "Fill argument 39 with initial value?
* FIELD007 = "08th enqueue argument
* X_FIELD039 = ' ' "Fill argument 40 with initial value?
* X_FIELD040 = ' ' "Fill argument 41 with initial value?
* X_FIELD041 = ' ' "Fill argument 42 with initial value?
* X_FIELD042 = ' ' "Fill argument 43 with initial value?
* X_FIELD043 = ' ' "Fill argument 44 with initial value?
* X_FIELD044 = ' ' "Fill argument 45 with initial value?
* X_FIELD045 = ' ' "Fill argument 46 with initial value?
* X_FIELD046 = ' ' "Fill argument 47 with initial value?
* X_FIELD047 = ' ' "Fill argument 48 with initial value?
* X_FIELD048 = ' ' "Fill argument 49 with initial value?

EXCEPTIONS
FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2
.



IMPORTING Parameters details for ENQUEUE_EUPC_CHAS

MODE_UPC_YS_LOCK_CHAS - Lock mode for table UPC_YS_LOCK_CHAS

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

FIELD008 - 09th enqueue argument

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

X_FIELD049 - Fill argument 50 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)

FIELD009 - 10th enqueue argument

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

FIELD010 - 11th enqueue argument

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

FIELD011 - 12th enqueue argument

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

FIELD012 - 13th enqueue argument

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

FIELD013 - 14th enqueue argument

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

FIELD014 - 15th enqueue argument

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

FIELD015 - 16th enqueue argument

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

FIELD016 - 17th enqueue argument

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

FIELD017 - 18th enqueue argument

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

MANDT - 01th enqueue argument

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

FIELD018 - 19th enqueue argument

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

FIELD019 - 20th enqueue argument

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

FIELD020 - 21th enqueue argument

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

FIELD021 - 22th enqueue argument

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

FIELD022 - 23th enqueue argument

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

FIELD023 - 24th enqueue argument

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

FIELD024 - 25th enqueue argument

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

FIELD025 - 26th enqueue argument

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

FIELD026 - 27th enqueue argument

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

FIELD027 - 28th enqueue argument

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

FIELD001 - 02th enqueue argument

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

FIELD028 - 29th enqueue argument

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

FIELD029 - 30th enqueue argument

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

FIELD030 - 31th enqueue argument

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

FIELD031 - 32th enqueue argument

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

FIELD032 - 33th enqueue argument

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

FIELD033 - 34th enqueue argument

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

FIELD034 - 35th enqueue argument

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

FIELD035 - 36th enqueue argument

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

FIELD036 - 37th enqueue argument

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

FIELD037 - 38th enqueue argument

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

FIELD002 - 03th enqueue argument

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

FIELD038 - 39th enqueue argument

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

FIELD039 - 40th enqueue argument

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

FIELD040 - 41th enqueue argument

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

FIELD041 - 42th enqueue argument

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

FIELD042 - 43th enqueue argument

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

FIELD043 - 44th enqueue argument

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

FIELD044 - 45th enqueue argument

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

FIELD045 - 46th enqueue argument

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

FIELD046 - 47th enqueue argument

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

FIELD047 - 48th enqueue argument

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

FIELD003 - 04th enqueue argument

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

FIELD048 - 49th enqueue argument

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

FIELD049 - 50th enqueue argument

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

X_FIELD001 - Fill argument 02 with initial value?

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

X_FIELD002 - Fill argument 03 with initial value?

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

X_FIELD003 - Fill argument 04 with initial value?

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

X_FIELD004 - Fill argument 05 with initial value?

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

X_FIELD005 - Fill argument 06 with initial value?

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

X_FIELD006 - Fill argument 07 with initial value?

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

X_FIELD007 - Fill argument 08 with initial value?

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

X_FIELD008 - Fill argument 09 with initial value?

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

FIELD004 - 05th enqueue argument

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

X_FIELD009 - Fill argument 10 with initial value?

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

X_FIELD010 - Fill argument 11 with initial value?

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

X_FIELD011 - Fill argument 12 with initial value?

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

X_FIELD012 - Fill argument 13 with initial value?

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

X_FIELD013 - Fill argument 14 with initial value?

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

X_FIELD014 - Fill argument 15 with initial value?

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

X_FIELD015 - Fill argument 16 with initial value?

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

X_FIELD016 - Fill argument 17 with initial value?

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

X_FIELD017 - Fill argument 18 with initial value?

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

X_FIELD018 - Fill argument 19 with initial value?

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

FIELD005 - 06th enqueue argument

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

X_FIELD019 - Fill argument 20 with initial value?

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

X_FIELD020 - Fill argument 21 with initial value?

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

X_FIELD021 - Fill argument 22 with initial value?

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

X_FIELD022 - Fill argument 23 with initial value?

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

X_FIELD023 - Fill argument 24 with initial value?

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

X_FIELD024 - Fill argument 25 with initial value?

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

X_FIELD025 - Fill argument 26 with initial value?

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

X_FIELD026 - Fill argument 27 with initial value?

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

X_FIELD027 - Fill argument 28 with initial value?

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

X_FIELD028 - Fill argument 29 with initial value?

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

FIELD006 - 07th enqueue argument

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

X_FIELD029 - Fill argument 30 with initial value?

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

X_FIELD030 - Fill argument 31 with initial value?

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

X_FIELD031 - Fill argument 32 with initial value?

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

X_FIELD032 - Fill argument 33 with initial value?

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

X_FIELD033 - Fill argument 34 with initial value?

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

X_FIELD034 - Fill argument 35 with initial value?

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

X_FIELD035 - Fill argument 36 with initial value?

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

X_FIELD036 - Fill argument 37 with initial value?

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

X_FIELD037 - Fill argument 38 with initial value?

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

X_FIELD038 - Fill argument 39 with initial value?

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

FIELD007 - 08th enqueue argument

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

X_FIELD039 - Fill argument 40 with initial value?

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

X_FIELD040 - Fill argument 41 with initial value?

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

X_FIELD041 - Fill argument 42 with initial value?

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

X_FIELD042 - Fill argument 43 with initial value?

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

X_FIELD043 - Fill argument 44 with initial value?

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

X_FIELD044 - Fill argument 45 with initial value?

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

X_FIELD045 - Fill argument 46 with initial value?

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

X_FIELD046 - Fill argument 47 with initial value?

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

X_FIELD047 - Fill argument 48 with initial value?

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

X_FIELD048 - Fill argument 49 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_EUPC_CHAS 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_foreign_lock  TYPE STRING, "   
lv_mode_upc_ys_lock_chas  TYPE ENQMODE, "   'E'
lv_field008  TYPE UPC_YS_LOCK_CHAS-FIELD008, "   
lv_x_field049  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv__scope  TYPE UPC_YS_LOCK_CHAS, "   '2'
lv__wait  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv__collect  TYPE DDENQCOLL, "   ' '
lv_field009  TYPE UPC_YS_LOCK_CHAS-FIELD009, "   
lv_field010  TYPE UPC_YS_LOCK_CHAS-FIELD010, "   
lv_field011  TYPE UPC_YS_LOCK_CHAS-FIELD011, "   
lv_field012  TYPE UPC_YS_LOCK_CHAS-FIELD012, "   
lv_field013  TYPE UPC_YS_LOCK_CHAS-FIELD013, "   
lv_field014  TYPE UPC_YS_LOCK_CHAS-FIELD014, "   
lv_field015  TYPE UPC_YS_LOCK_CHAS-FIELD015, "   
lv_field016  TYPE UPC_YS_LOCK_CHAS-FIELD016, "   
lv_field017  TYPE UPC_YS_LOCK_CHAS-FIELD017, "   
lv_mandt  TYPE UPC_YS_LOCK_CHAS-MANDT, "   SY-MANDT
lv_system_failure  TYPE UPC_YS_LOCK_CHAS, "   
lv_field018  TYPE UPC_YS_LOCK_CHAS-FIELD018, "   
lv_field019  TYPE UPC_YS_LOCK_CHAS-FIELD019, "   
lv_field020  TYPE UPC_YS_LOCK_CHAS-FIELD020, "   
lv_field021  TYPE UPC_YS_LOCK_CHAS-FIELD021, "   
lv_field022  TYPE UPC_YS_LOCK_CHAS-FIELD022, "   
lv_field023  TYPE UPC_YS_LOCK_CHAS-FIELD023, "   
lv_field024  TYPE UPC_YS_LOCK_CHAS-FIELD024, "   
lv_field025  TYPE UPC_YS_LOCK_CHAS-FIELD025, "   
lv_field026  TYPE UPC_YS_LOCK_CHAS-FIELD026, "   
lv_field027  TYPE UPC_YS_LOCK_CHAS-FIELD027, "   
lv_field001  TYPE UPC_YS_LOCK_CHAS-FIELD001, "   
lv_field028  TYPE UPC_YS_LOCK_CHAS-FIELD028, "   
lv_field029  TYPE UPC_YS_LOCK_CHAS-FIELD029, "   
lv_field030  TYPE UPC_YS_LOCK_CHAS-FIELD030, "   
lv_field031  TYPE UPC_YS_LOCK_CHAS-FIELD031, "   
lv_field032  TYPE UPC_YS_LOCK_CHAS-FIELD032, "   
lv_field033  TYPE UPC_YS_LOCK_CHAS-FIELD033, "   
lv_field034  TYPE UPC_YS_LOCK_CHAS-FIELD034, "   
lv_field035  TYPE UPC_YS_LOCK_CHAS-FIELD035, "   
lv_field036  TYPE UPC_YS_LOCK_CHAS-FIELD036, "   
lv_field037  TYPE UPC_YS_LOCK_CHAS-FIELD037, "   
lv_field002  TYPE UPC_YS_LOCK_CHAS-FIELD002, "   
lv_field038  TYPE UPC_YS_LOCK_CHAS-FIELD038, "   
lv_field039  TYPE UPC_YS_LOCK_CHAS-FIELD039, "   
lv_field040  TYPE UPC_YS_LOCK_CHAS-FIELD040, "   
lv_field041  TYPE UPC_YS_LOCK_CHAS-FIELD041, "   
lv_field042  TYPE UPC_YS_LOCK_CHAS-FIELD042, "   
lv_field043  TYPE UPC_YS_LOCK_CHAS-FIELD043, "   
lv_field044  TYPE UPC_YS_LOCK_CHAS-FIELD044, "   
lv_field045  TYPE UPC_YS_LOCK_CHAS-FIELD045, "   
lv_field046  TYPE UPC_YS_LOCK_CHAS-FIELD046, "   
lv_field047  TYPE UPC_YS_LOCK_CHAS-FIELD047, "   
lv_field003  TYPE UPC_YS_LOCK_CHAS-FIELD003, "   
lv_field048  TYPE UPC_YS_LOCK_CHAS-FIELD048, "   
lv_field049  TYPE UPC_YS_LOCK_CHAS-FIELD049, "   
lv_x_field001  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field002  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field003  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field004  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field005  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field006  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field007  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field008  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_field004  TYPE UPC_YS_LOCK_CHAS-FIELD004, "   
lv_x_field009  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field010  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field011  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field012  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field013  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field014  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field015  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field016  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field017  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field018  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_field005  TYPE UPC_YS_LOCK_CHAS-FIELD005, "   
lv_x_field019  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field020  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field021  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field022  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field023  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field024  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field025  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field026  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field027  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field028  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_field006  TYPE UPC_YS_LOCK_CHAS-FIELD006, "   
lv_x_field029  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field030  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field031  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field032  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field033  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field034  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field035  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field036  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field037  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field038  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_field007  TYPE UPC_YS_LOCK_CHAS-FIELD007, "   
lv_x_field039  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field040  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field041  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field042  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field043  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field044  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field045  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field046  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field047  TYPE UPC_YS_LOCK_CHAS, "   SPACE
lv_x_field048  TYPE UPC_YS_LOCK_CHAS. "   SPACE

  CALL FUNCTION 'ENQUEUE_EUPC_CHAS'  "Request lock for object EUPC_CHAS
    EXPORTING
         MODE_UPC_YS_LOCK_CHAS = lv_mode_upc_ys_lock_chas
         FIELD008 = lv_field008
         X_FIELD049 = lv_x_field049
         _SCOPE = lv__scope
         _WAIT = lv__wait
         _COLLECT = lv__collect
         FIELD009 = lv_field009
         FIELD010 = lv_field010
         FIELD011 = lv_field011
         FIELD012 = lv_field012
         FIELD013 = lv_field013
         FIELD014 = lv_field014
         FIELD015 = lv_field015
         FIELD016 = lv_field016
         FIELD017 = lv_field017
         MANDT = lv_mandt
         FIELD018 = lv_field018
         FIELD019 = lv_field019
         FIELD020 = lv_field020
         FIELD021 = lv_field021
         FIELD022 = lv_field022
         FIELD023 = lv_field023
         FIELD024 = lv_field024
         FIELD025 = lv_field025
         FIELD026 = lv_field026
         FIELD027 = lv_field027
         FIELD001 = lv_field001
         FIELD028 = lv_field028
         FIELD029 = lv_field029
         FIELD030 = lv_field030
         FIELD031 = lv_field031
         FIELD032 = lv_field032
         FIELD033 = lv_field033
         FIELD034 = lv_field034
         FIELD035 = lv_field035
         FIELD036 = lv_field036
         FIELD037 = lv_field037
         FIELD002 = lv_field002
         FIELD038 = lv_field038
         FIELD039 = lv_field039
         FIELD040 = lv_field040
         FIELD041 = lv_field041
         FIELD042 = lv_field042
         FIELD043 = lv_field043
         FIELD044 = lv_field044
         FIELD045 = lv_field045
         FIELD046 = lv_field046
         FIELD047 = lv_field047
         FIELD003 = lv_field003
         FIELD048 = lv_field048
         FIELD049 = lv_field049
         X_FIELD001 = lv_x_field001
         X_FIELD002 = lv_x_field002
         X_FIELD003 = lv_x_field003
         X_FIELD004 = lv_x_field004
         X_FIELD005 = lv_x_field005
         X_FIELD006 = lv_x_field006
         X_FIELD007 = lv_x_field007
         X_FIELD008 = lv_x_field008
         FIELD004 = lv_field004
         X_FIELD009 = lv_x_field009
         X_FIELD010 = lv_x_field010
         X_FIELD011 = lv_x_field011
         X_FIELD012 = lv_x_field012
         X_FIELD013 = lv_x_field013
         X_FIELD014 = lv_x_field014
         X_FIELD015 = lv_x_field015
         X_FIELD016 = lv_x_field016
         X_FIELD017 = lv_x_field017
         X_FIELD018 = lv_x_field018
         FIELD005 = lv_field005
         X_FIELD019 = lv_x_field019
         X_FIELD020 = lv_x_field020
         X_FIELD021 = lv_x_field021
         X_FIELD022 = lv_x_field022
         X_FIELD023 = lv_x_field023
         X_FIELD024 = lv_x_field024
         X_FIELD025 = lv_x_field025
         X_FIELD026 = lv_x_field026
         X_FIELD027 = lv_x_field027
         X_FIELD028 = lv_x_field028
         FIELD006 = lv_field006
         X_FIELD029 = lv_x_field029
         X_FIELD030 = lv_x_field030
         X_FIELD031 = lv_x_field031
         X_FIELD032 = lv_x_field032
         X_FIELD033 = lv_x_field033
         X_FIELD034 = lv_x_field034
         X_FIELD035 = lv_x_field035
         X_FIELD036 = lv_x_field036
         X_FIELD037 = lv_x_field037
         X_FIELD038 = lv_x_field038
         FIELD007 = lv_field007
         X_FIELD039 = lv_x_field039
         X_FIELD040 = lv_x_field040
         X_FIELD041 = lv_x_field041
         X_FIELD042 = lv_x_field042
         X_FIELD043 = lv_x_field043
         X_FIELD044 = lv_x_field044
         X_FIELD045 = lv_x_field045
         X_FIELD046 = lv_x_field046
         X_FIELD047 = lv_x_field047
         X_FIELD048 = lv_x_field048
    EXCEPTIONS
        FOREIGN_LOCK = 1
        SYSTEM_FAILURE = 2
. " ENQUEUE_EUPC_CHAS




ABAP code using 7.40 inline data declarations to call FM ENQUEUE_EUPC_CHAS

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_upc_ys_lock_chas) = 'E'.
 
"SELECT single FIELD008 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field008).
 
DATA(ld_x_field049) = ' '.
 
DATA(ld__scope) = '2'.
 
DATA(ld__wait) = ' '.
 
DATA(ld__collect) = ' '.
 
"SELECT single FIELD009 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field009).
 
"SELECT single FIELD010 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field010).
 
"SELECT single FIELD011 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field011).
 
"SELECT single FIELD012 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field012).
 
"SELECT single FIELD013 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field013).
 
"SELECT single FIELD014 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field014).
 
"SELECT single FIELD015 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field015).
 
"SELECT single FIELD016 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field016).
 
"SELECT single FIELD017 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field017).
 
"SELECT single MANDT FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_mandt).
DATA(ld_mandt) = SY-MANDT.
 
 
"SELECT single FIELD018 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field018).
 
"SELECT single FIELD019 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field019).
 
"SELECT single FIELD020 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field020).
 
"SELECT single FIELD021 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field021).
 
"SELECT single FIELD022 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field022).
 
"SELECT single FIELD023 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field023).
 
"SELECT single FIELD024 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field024).
 
"SELECT single FIELD025 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field025).
 
"SELECT single FIELD026 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field026).
 
"SELECT single FIELD027 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field027).
 
"SELECT single FIELD001 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field001).
 
"SELECT single FIELD028 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field028).
 
"SELECT single FIELD029 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field029).
 
"SELECT single FIELD030 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field030).
 
"SELECT single FIELD031 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field031).
 
"SELECT single FIELD032 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field032).
 
"SELECT single FIELD033 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field033).
 
"SELECT single FIELD034 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field034).
 
"SELECT single FIELD035 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field035).
 
"SELECT single FIELD036 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field036).
 
"SELECT single FIELD037 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field037).
 
"SELECT single FIELD002 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field002).
 
"SELECT single FIELD038 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field038).
 
"SELECT single FIELD039 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field039).
 
"SELECT single FIELD040 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field040).
 
"SELECT single FIELD041 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field041).
 
"SELECT single FIELD042 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field042).
 
"SELECT single FIELD043 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field043).
 
"SELECT single FIELD044 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field044).
 
"SELECT single FIELD045 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field045).
 
"SELECT single FIELD046 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field046).
 
"SELECT single FIELD047 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field047).
 
"SELECT single FIELD003 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field003).
 
"SELECT single FIELD048 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field048).
 
"SELECT single FIELD049 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field049).
 
DATA(ld_x_field001) = ' '.
 
DATA(ld_x_field002) = ' '.
 
DATA(ld_x_field003) = ' '.
 
DATA(ld_x_field004) = ' '.
 
DATA(ld_x_field005) = ' '.
 
DATA(ld_x_field006) = ' '.
 
DATA(ld_x_field007) = ' '.
 
DATA(ld_x_field008) = ' '.
 
"SELECT single FIELD004 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field004).
 
DATA(ld_x_field009) = ' '.
 
DATA(ld_x_field010) = ' '.
 
DATA(ld_x_field011) = ' '.
 
DATA(ld_x_field012) = ' '.
 
DATA(ld_x_field013) = ' '.
 
DATA(ld_x_field014) = ' '.
 
DATA(ld_x_field015) = ' '.
 
DATA(ld_x_field016) = ' '.
 
DATA(ld_x_field017) = ' '.
 
DATA(ld_x_field018) = ' '.
 
"SELECT single FIELD005 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field005).
 
DATA(ld_x_field019) = ' '.
 
DATA(ld_x_field020) = ' '.
 
DATA(ld_x_field021) = ' '.
 
DATA(ld_x_field022) = ' '.
 
DATA(ld_x_field023) = ' '.
 
DATA(ld_x_field024) = ' '.
 
DATA(ld_x_field025) = ' '.
 
DATA(ld_x_field026) = ' '.
 
DATA(ld_x_field027) = ' '.
 
DATA(ld_x_field028) = ' '.
 
"SELECT single FIELD006 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field006).
 
DATA(ld_x_field029) = ' '.
 
DATA(ld_x_field030) = ' '.
 
DATA(ld_x_field031) = ' '.
 
DATA(ld_x_field032) = ' '.
 
DATA(ld_x_field033) = ' '.
 
DATA(ld_x_field034) = ' '.
 
DATA(ld_x_field035) = ' '.
 
DATA(ld_x_field036) = ' '.
 
DATA(ld_x_field037) = ' '.
 
DATA(ld_x_field038) = ' '.
 
"SELECT single FIELD007 FROM UPC_YS_LOCK_CHAS INTO @DATA(ld_field007).
 
DATA(ld_x_field039) = ' '.
 
DATA(ld_x_field040) = ' '.
 
DATA(ld_x_field041) = ' '.
 
DATA(ld_x_field042) = ' '.
 
DATA(ld_x_field043) = ' '.
 
DATA(ld_x_field044) = ' '.
 
DATA(ld_x_field045) = ' '.
 
DATA(ld_x_field046) = ' '.
 
DATA(ld_x_field047) = ' '.
 
DATA(ld_x_field048) = ' '.
 


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!