EXIT_SAPMKAL1_001 SAP Function module - Customer Exit for Authorization Check (Cycle Maintenance)

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

Associated Function Group: XK01
Released Date: Not Released
Processing type: Normal fucntion module

Pattern for FM EXIT_SAPMKAL1_001 - EXIT SAPMKAL1 001

CALL FUNCTION 'EXIT_SAPMKAL1_001' "Customer Exit for Authorization Check (Cycle Maintenance)
* EXPORTING
*   actvt =                     " tact-actvt
*   vrgng =                     " t022-activity
*   cycle =                     " rkal1-kscyc
*   kokrs =                     " rkal1-kokrs
*   lednr =                     " rkal1-rldnr
*   erkrs =                     " rkal1-erkrs
*   sdate =                     " sy-datum      Date and Time, Current (Application Server) Date
  EXCEPTIONS
    NO_AUTHORITY = 1            "
    .  "  EXIT_SAPMKAL1_001

ABAP code example for Function Module EXIT_SAPMKAL1_001

The ABAP code below is a full code listing to execute function module EXIT_SAPMKAL1_001 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).

 

SELECT single ACTVT 
  FROM TACT 
  INTO @DATA(ld_actvt).

 

SELECT single ACTIVITY 
  FROM T022 
  INTO @DATA(ld_vrgng).



DATA(ld_cycle) = some text here


DATA(ld_kokrs) = some text here


DATA(ld_lednr) = some text here


DATA(ld_erkrs) = some text here

DATA(ld_sdate) = '20191121'.
.

CALL FUNCTION 'EXIT_SAPMKAL1_001'
* EXPORTING
*   actvt =                      ld_actvt
*   vrgng =                      ld_vrgng
*   cycle =                      ld_cycle
*   kokrs =                      ld_kokrs
*   lednr =                      ld_lednr
*   erkrs =                      ld_erkrs
*   sdate =                      ld_sdate
  EXCEPTIONS
    NO_AUTHORITY =               1
    .  "  EXIT_SAPMKAL1_001

IF SY-SUBRC EQ 0.
  "All OK
ELSEIF SY-SUBRC EQ 1. "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_actvt
 
 TYPE TACT-ACTVT ,
ld_vrgng
 
 TYPE T022-ACTIVITY ,
ld_cycle
 
 TYPE RKAL1-KSCYC ,
ld_kokrs
 
 TYPE RKAL1-KOKRS ,
ld_lednr
 
 TYPE RKAL1-RLDNR ,
ld_erkrs
 
 TYPE RKAL1-ERKRS ,
ld_sdate
 
 TYPE SY-DATUM .



SELECT single ACTVT 
  FROM TACT 
  INTO ld_actvt.


SELECT single ACTIVITY 
  FROM T022 
  INTO ld_vrgng.


ld_cycle = some text here

ld_kokrs = some text here

ld_lednr = some text here

ld_erkrs = some text here
ld_sdate = '20191121'.