*&---------------------------- -----------------------------------------*
*& Report ZPPRTEST
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZPPRTEST.

DATA: lt_mdps TYPE TABLE OF mdps,
      lt_mdez TYPE TABLE OF mdez,
      lt_mdsu TYPE TABLE OF mdsu.

CALL FUNCTION 'MD_STOCK_REQUIREMENTS_LIST_API'
  EXPORTING
*   plscn                    = p_plscn
    matnr                    = 'T22631AG-01-SR24' "物料
    werks                    = '2000' "工厂
    berid                    = '2000' "MRP范围
*   ergbz                    =
*   afibz                    =
*   inper                    =
*   display_list_mdpsx       =
*   display_list_mdezx       =
*   display_list_mdsux       =
*   nobuf                    =
*   plauf                    =
*   i_vrfwe                  =
*   is_sfilt                 =
*   is_afilt                 =
*   iv_fill_mdsta            = 'X'
*      IMPORTING
*   e_mt61d                  =
*   e_mdkp                   =
*   e_cm61m                  =
*   e_mdsta                  =
*   e_ergbz                  =
  TABLES
    mdpsx                    = lt_mdps
    mdezx                    = lt_mdez
    mdsux                    = lt_mdsu
  EXCEPTIONS
    material_plant_not_found = 1
    plant_not_found          = 2
    OTHERS                   = 3.


cl_demo_output=>write( lt_mdps ).
cl_demo_output=>write( lt_mdez ).
cl_demo_output=>write( lt_mdsu ).
cl_demo_output=>display(  ).