RADMROHITS SAP ABAP Report - Time horizon to calculate periods back (ROC)

RADMROHITS is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for Time horizon to calculate periods backwards (ROC) Because material requirements for rotables are often sporadic, it is difficult to determine how many days you have to look into the past without knowing in which periods consumptions have occurred...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.

If you would like to execute this report or see the full code listing simply enter RADMROHITS into the relevant SAP transactions such as SE38 or SE80

ABAP code to call this SAP report using the submit statement

This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.

Text pool values

INCLUDES used within this REPORT RADMROHITS

No INCLUDES are used within this REPORT code!

TABLES used within REPORT and the associated SELECT statement:

No SAP DATABASE tables are accessed within this REPORT code!

Function Modules used within report and the associated call statement:

RS_SELOPT_NO_INTERVAL_CHECK
  call function 'RS_SELOPT_NO_INTERVAL_CHECK'
       EXPORTING
            program        = mgv_matnr_prog
       TABLES
            selop          = mgv_matnr_selopt_tab
       EXCEPTIONS
            NO_PROGRAMNAME = 1
            OTHERS         = 2.

MATNR_CONV_RANGES
      CALL FUNCTION 'MATNR_CONV_RANGES'
           EXPORTING
                selopt_name = mgv_matnr_selopt_tab-name
           TABLES
                range       = .

MATNR_GET_ORIG_RANGE
      CALL FUNCTION 'MATNR_GET_ORIG_RANGE'
           EXPORTING
                selopt_name     = mgv_name
           TABLES
                s_range         = 
           EXCEPTIONS
                range_not_found = 1.

REUSE_ALV_LIST_DISPLAY
  CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
       EXPORTING
            I_CALLBACK_PROGRAM = 'RADMROHITS'  "G_REPID
            IS_LAYOUT          = G_LAYOUT
            IT_FIELDCAT        = G_FIELDCAT_TAB[]
            I_DEFAULT          = 'X'
            I_SAVE             = 'U'
            IS_VARIANT         = L_VARIANT_INFO
       TABLES
            T_OUTTAB           = NO_hits_table.

REUSE_ALV_FIELDCATALOG_MERGE
  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
       EXPORTING
            I_PROGRAM_NAME         = G_REPID
            I_INTERNAL_TABNAME     = 'NO_HITS_TABLE'
            I_STRUCTURE_NAME       = 'S464'
            I_CLIENT_NEVER_DISPLAY = ' '
       CHANGING
            CT_FIELDCAT            = E01_LT_FIELDCAT
       EXCEPTIONS
            INCONSISTENT_INTERFACE = 1
            PROGRAM_ERROR          = 2
            OTHERS                 = 3.

POPUP_DISPLAY_TEXT
    CALL FUNCTION 'POPUP_DISPLAY_TEXT'
         EXPORTING
              LANGUAGE     = SY-LANGU
              POPUP_TITLE  = 'ATTENTION'
              START_COLUMN = 10
              START_ROW    = 3
              TEXT_OBJECT  = 'HELP_RISERNR9'
              HELP_MODAL   = 'X'
         IMPORTING
              CANCELLED    = CANCELLED.

PIC01_GET_MEMBER_ALL
    CALL FUNCTION 'PIC01_GET_MEMBER_ALL'
         EXPORTING
              I_MATNR           = iv_matnr
              I_WERKS           = iv_werks
*              I_LGORT           = iv_lgort
              I_READ_PICRL      = 'X'
         TABLES
              ET_PICPS          = ROC_LT_fff
              ET_PICPSRL        = ROC_LT_set
         EXCEPTIONS
              NOTFOUND_MATNR    = 1
              NOTFOUND_PIC      = 2
              MISSING_PARAMETER = 3
              OTHERS            = 4.

ADRT10_READ_WHGBE
  CALL FUNCTION 'ADRT10_READ_WHGBE'
       EXPORTING
            IV_LGORT           = S_LGORT
            IV_LGGRP           = con_rot_serv
            IV_WERKS           = WERK-low
       IMPORTING
            EV_WHGBE           = CW_LGORT-WHGBE
       TABLES
            T_IVGROUP          = LT_LGORT
       EXCEPTIONS
            WRONG_INPUT        = 1
            WHGROUP_NOT_FOUND  = 2
            LGORT_NOT_ASSIGNED = 3
            WRONG_GROUPTYPE    = 4
            OTHERS             = 5.

DURATION_DETERMINE
  CALL FUNCTION 'DURATION_DETERMINE'
       EXPORTING
*         UNIT                       =
            FACTORY_CALENDAR           = ss_prf-ROCFC
       IMPORTING
            DURATION                   = ZEIT
       CHANGING
            START_DATE                 = sy-datum
            START_TIME                 = SY-UZEIT
            END_DATE                   = last_reference
            END_TIME                   = SY-UZEIT.

ADRT10_GET_ROT_STOCK
  CALL FUNCTION 'ADRT10_GET_ROT_STOCK'
    EXPORTING
      IV_MATNR                       = material-low
      IV_WERKS                       = werk-low
      IV_WHGBE                       = CW_LGORT-WHGBE
      IV_LGGRP                       = con_rot_serv
      IV_LGORT                       = lgort-low
      IS_ADPMPRIOPRF                 = ss_prf
  TABLES
      t_mcha                         = lt_mcha.