MDMA_VRBMT SAP Function module

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

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

Pattern for FM MDMA_VRBMT - MDMA VRBMT

CALL FUNCTION 'MDMA_VRBMT' "
  EXPORTING
*   p_mara_matnr =              " mara-matnr    Material Number
*   p_marc_werks =              " marc-werks
*   p_mdma_berid =              " mdma-berid
    mdma_vrbmt =                " mdma-vrbmt
    mdma_vrbdt =                " mdma-vrbdt
    p_marc_perkz =              " marc-perkz
    marc_periv =                " marc-periv
    p_mara_meins =              " mara-meins
*   p_kz_no_warn = SPACE        " rmmg08_012-msgtyp
  CHANGING
    ret_vrbmt =                 " mdma-vrbmt
    ret_vrbdb =                 " mdma-vrbdb
    ret_vrbdt =                 " mdma-vrbdt
    ret_vrbfk =                 " mdma-vrbfk
    mdma_vrbfk =                " mdma-vrbfk
    altperkz =                  " marc-perkz
    altperiv =                  " marc-periv
*   p_kz_wmess =                " t130f-kzref
    mdma_vrbdb =                " mdma-vrbdb    Reference MRP Area - Consumption
  EXCEPTIONS
    ERROR_VRBMT = 1             "
    ERROR_VRBMT_EMESS = 2       "
    .  "  MDMA_VRBMT

ABAP code example for Function Module MDMA_VRBMT

The ABAP code below is a full code listing to execute function module MDMA_VRBMT 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 VRBMT 
  FROM MDMA 
  INTO @DATA(ld_ret_vrbmt).

 

SELECT single VRBDB 
  FROM MDMA 
  INTO @DATA(ld_ret_vrbdb).

 

SELECT single VRBDT 
  FROM MDMA 
  INTO @DATA(ld_ret_vrbdt).

 

SELECT single VRBFK 
  FROM MDMA 
  INTO @DATA(ld_ret_vrbfk).

 

SELECT single VRBFK 
  FROM MDMA 
  INTO @DATA(ld_mdma_vrbfk).

 

SELECT single PERKZ 
  FROM MARC 
  INTO @DATA(ld_altperkz).

 

SELECT single PERIV 
  FROM MARC 
  INTO @DATA(ld_altperiv).

 

SELECT single KZREF 
  FROM T130F 
  INTO @DATA(ld_p_kz_wmess).

 

SELECT single VRBDB 
  FROM MDMA 
  INTO @DATA(ld_mdma_vrbdb).

 

SELECT single MATNR 
  FROM MARA 
  INTO @DATA(ld_p_mara_matnr).

 

SELECT single WERKS 
  FROM MARC 
  INTO @DATA(ld_p_marc_werks).

 

SELECT single BERID 
  FROM MDMA 
  INTO @DATA(ld_p_mdma_berid).

 

SELECT single VRBMT 
  FROM MDMA 
  INTO @DATA(ld_mdma_vrbmt).

 

SELECT single VRBDT 
  FROM MDMA 
  INTO @DATA(ld_mdma_vrbdt).

 

SELECT single PERKZ 
  FROM MARC 
  INTO @DATA(ld_p_marc_perkz).

 

SELECT single PERIV 
  FROM MARC 
  INTO @DATA(ld_marc_periv).

 

SELECT single MEINS 
  FROM MARA 
  INTO @DATA(ld_p_mara_meins).



DATA(ld_p_kz_no_warn) = some text here
.

CALL FUNCTION 'MDMA_VRBMT'
  EXPORTING
*   p_mara_matnr =               ld_p_mara_matnr
*   p_marc_werks =               ld_p_marc_werks
*   p_mdma_berid =               ld_p_mdma_berid
    mdma_vrbmt =                 ld_mdma_vrbmt
    mdma_vrbdt =                 ld_mdma_vrbdt
    p_marc_perkz =               ld_p_marc_perkz
    marc_periv =                 ld_marc_periv
    p_mara_meins =               ld_p_mara_meins
*   p_kz_no_warn =               ld_p_kz_no_warn
  CHANGING
    ret_vrbmt =                  ld_ret_vrbmt
    ret_vrbdb =                  ld_ret_vrbdb
    ret_vrbdt =                  ld_ret_vrbdt
    ret_vrbfk =                  ld_ret_vrbfk
    mdma_vrbfk =                 ld_mdma_vrbfk
    altperkz =                   ld_altperkz
    altperiv =                   ld_altperiv
*   p_kz_wmess =                 ld_p_kz_wmess
    mdma_vrbdb =                 ld_mdma_vrbdb
  EXCEPTIONS
    ERROR_VRBMT =                1
    ERROR_VRBMT_EMESS =          2
    .  "  MDMA_VRBMT

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_ret_vrbmt
 
 TYPE MDMA-VRBMT ,
ld_p_mara_matnr
 
 TYPE MARA-MATNR ,
ld_ret_vrbdb
 
 TYPE MDMA-VRBDB ,
ld_p_marc_werks
 
 TYPE MARC-WERKS ,
ld_ret_vrbdt
 
 TYPE MDMA-VRBDT ,
ld_p_mdma_berid
 
 TYPE MDMA-BERID ,
ld_ret_vrbfk
 
 TYPE MDMA-VRBFK ,
ld_mdma_vrbmt
 
 TYPE MDMA-VRBMT ,
ld_mdma_vrbfk
 
 TYPE MDMA-VRBFK ,
ld_mdma_vrbdt
 
 TYPE MDMA-VRBDT ,
ld_altperkz
 
 TYPE MARC-PERKZ ,
ld_p_marc_perkz
 
 TYPE MARC-PERKZ ,
ld_altperiv
 
 TYPE MARC-PERIV ,
ld_marc_periv
 
 TYPE MARC-PERIV ,
ld_p_kz_wmess
 
 TYPE T130F-KZREF ,
ld_p_mara_meins
 
 TYPE MARA-MEINS ,
ld_mdma_vrbdb
 
 TYPE MDMA-VRBDB ,
ld_p_kz_no_warn
 
 TYPE RMMG08_012-MSGTYP .



SELECT single VRBMT 
  FROM MDMA 
  INTO ld_ret_vrbmt.


SELECT single MATNR 
  FROM MARA 
  INTO ld_p_mara_matnr.


SELECT single VRBDB 
  FROM MDMA 
  INTO ld_ret_vrbdb.


SELECT single WERKS 
  FROM MARC 
  INTO ld_p_marc_werks.


SELECT single VRBDT 
  FROM MDMA 
  INTO ld_ret_vrbdt.


SELECT single BERID 
  FROM MDMA 
  INTO ld_p_mdma_berid.


SELECT single VRBFK 
  FROM MDMA 
  INTO ld_ret_vrbfk.


SELECT single VRBMT 
  FROM MDMA 
  INTO ld_mdma_vrbmt.


SELECT single VRBFK 
  FROM MDMA 
  INTO ld_mdma_vrbfk.


SELECT single VRBDT 
  FROM MDMA 
  INTO ld_mdma_vrbdt.


SELECT single PERKZ 
  FROM MARC 
  INTO ld_altperkz.


SELECT single PERKZ 
  FROM MARC 
  INTO ld_p_marc_perkz.


SELECT single PERIV 
  FROM MARC 
  INTO ld_altperiv.


SELECT single PERIV 
  FROM MARC 
  INTO ld_marc_periv.


SELECT single KZREF 
  FROM T130F 
  INTO ld_p_kz_wmess.


SELECT single MEINS 
  FROM MARA 
  INTO ld_p_mara_meins.


SELECT single VRBDB 
  FROM MDMA 
  INTO ld_mdma_vrbdb.


ld_p_kz_no_warn = some text here