LOAN_USERFIELDS_MAINTAIN SAP Function module

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

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

Pattern for FM LOAN_USERFIELDS_MAINTAIN - LOAN USERFIELDS MAINTAIN

CALL FUNCTION 'LOAN_USERFIELDS_MAINTAIN' "
  EXPORTING
*   cua_title = SPACE           "
*   display_only = SPACE        "
*   load_flag = SPACE           "
    snumobj =                   " vzsort-snumobj
    sobjekt =                   " vzsort-sobjekt
    srgrp =                     " tpz12-appl
*   usrdata_mem =               " vzsort
  IMPORTING
    cng_flag =                  "
    usrdata_new =               " vzsort
    usrdata_old =               " vzsort
  EXCEPTIONS
    NO_USERFIEDS_DEFINED = 1    "
    .  "  LOAN_USERFIELDS_MAINTAIN

ABAP code example for Function Module LOAN_USERFIELDS_MAINTAIN

The ABAP code below is a full code listing to execute function module LOAN_USERFIELDS_MAINTAIN 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_cng_flag  
 
 TYPE STRING
,
ld_usrdata_new  
 
 TYPE VZSORT
,
ld_usrdata_old  
 
 TYPE VZSORT
.


DATA(ld_cua_title) = 'some text here'.

DATA(ld_display_only) = 'some text here'.

DATA(ld_load_flag) = 'some text here'.
 

SELECT single SNUMOBJ 
  FROM VZSORT 
  INTO @DATA(ld_snumobj).

 

SELECT single SOBJEKT 
  FROM VZSORT 
  INTO @DATA(ld_sobjekt).

 

SELECT single APPL 
  FROM TPZ12 
  INTO @DATA(ld_srgrp).


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

CALL FUNCTION 'LOAN_USERFIELDS_MAINTAIN'
  EXPORTING
*   cua_title =                  ld_cua_title
*   display_only =               ld_display_only
*   load_flag =                  ld_load_flag
    snumobj =                    ld_snumobj
    sobjekt =                    ld_sobjekt
    srgrp =                      ld_srgrp
*   usrdata_mem =                ld_usrdata_mem
  IMPORTING
    cng_flag =                   ld_cng_flag
    usrdata_new =                ld_usrdata_new
    usrdata_old =                ld_usrdata_old
  EXCEPTIONS
    NO_USERFIEDS_DEFINED =       1
    .  "  LOAN_USERFIELDS_MAINTAIN

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_cng_flag
 
 TYPE STRING ,
ld_cua_title
 
 TYPE STRING ,
ld_usrdata_new
 
 TYPE VZSORT ,
ld_display_only
 
 TYPE STRING ,
ld_usrdata_old
 
 TYPE VZSORT ,
ld_load_flag
 
 TYPE STRING ,
ld_snumobj
 
 TYPE VZSORT-SNUMOBJ ,
ld_sobjekt
 
 TYPE VZSORT-SOBJEKT ,
ld_srgrp
 
 TYPE TPZ12-APPL ,
ld_usrdata_mem
 
 TYPE VZSORT .


ld_cua_title = 'some text here'.
ld_display_only = 'some text here'.
ld_load_flag = 'some text here'.

SELECT single SNUMOBJ 
  FROM VZSORT 
  INTO ld_snumobj.


SELECT single SOBJEKT 
  FROM VZSORT 
  INTO ld_sobjekt.


SELECT single APPL 
  FROM TPZ12 
  INTO ld_srgrp.

ld_usrdata_mem = 'Check type of data required'.