CHECK_SBERFIMA SAP Function module

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

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

Pattern for FM CHECK_SBERFIMA - CHECK SBERFIMA

CALL FUNCTION 'CHECK_SBERFIMA' "
  EXPORTING
    i_rantyp =                  " tzb0a-rantyp
*   i_sbewart =                 " tzb0a-sbewart
    i_sberfima =                " tzb0a-sberfima
*   i_display =                 " ddrefstruc-bool
*   i_modus = 'C'               "
*   i_dynpnr =                  " sy-dynnr
*   i_dynpprog =                " sy-repid
*   i_dynprofield =             " help_info-dynprofld
  IMPORTING
    e_sbewart =                 " tzb0a-sbewart
  EXCEPTIONS
    SBEWART_NOT_ALLOWED = 1     "
    INVALID_MODUS = 2           "
    .  "  CHECK_SBERFIMA

ABAP code example for Function Module CHECK_SBERFIMA

The ABAP code below is a full code listing to execute function module CHECK_SBERFIMA 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_e_sbewart  
 
 TYPE TZB0A-SBEWART
.

 

SELECT single RANTYP 
  FROM TZB0A 
  INTO @DATA(ld_i_rantyp).

 

SELECT single SBEWART 
  FROM TZB0A 
  INTO @DATA(ld_i_sbewart).

 

SELECT single SBERFIMA 
  FROM TZB0A 
  INTO @DATA(ld_i_sberfima).



DATA(ld_i_display) = some text here

DATA(ld_i_modus) = 'some text here'.

DATA(ld_i_dynpnr) = 'some text here'.

DATA(ld_i_dynpprog) = 'some text here'.


DATA(ld_i_dynprofield) = some text here
.

CALL FUNCTION 'CHECK_SBERFIMA'
  EXPORTING
    i_rantyp =                   ld_i_rantyp
*   i_sbewart =                  ld_i_sbewart
    i_sberfima =                 ld_i_sberfima
*   i_display =                  ld_i_display
*   i_modus =                    ld_i_modus
*   i_dynpnr =                   ld_i_dynpnr
*   i_dynpprog =                 ld_i_dynpprog
*   i_dynprofield =              ld_i_dynprofield
  IMPORTING
    e_sbewart =                  ld_e_sbewart
  EXCEPTIONS
    SBEWART_NOT_ALLOWED =        1
    INVALID_MODUS =              2
    .  "  CHECK_SBERFIMA

IF SY-SUBRC EQ 0.
  "All OK
ELSEIF SY-SUBRC EQ 1. "Exception
  "Add code for exception here
ELSEIF SY-SUBRC EQ 2. "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_e_sbewart
 
 TYPE TZB0A-SBEWART ,
ld_i_rantyp
 
 TYPE TZB0A-RANTYP ,
ld_i_sbewart
 
 TYPE TZB0A-SBEWART ,
ld_i_sberfima
 
 TYPE TZB0A-SBERFIMA ,
ld_i_display
 
 TYPE DDREFSTRUC-BOOL ,
ld_i_modus
 
 TYPE STRING ,
ld_i_dynpnr
 
 TYPE SY-DYNNR ,
ld_i_dynpprog
 
 TYPE SY-REPID ,
ld_i_dynprofield
 
 TYPE HELP_INFO-DYNPROFLD .



SELECT single RANTYP 
  FROM TZB0A 
  INTO ld_i_rantyp.


SELECT single SBEWART 
  FROM TZB0A 
  INTO ld_i_sbewart.


SELECT single SBERFIMA 
  FROM TZB0A 
  INTO ld_i_sberfima.


ld_i_display = some text here
ld_i_modus = 'some text here'.
ld_i_dynpnr = 'some text here'.
ld_i_dynpprog = 'some text here'.

ld_i_dynprofield = some text here