RPEGALLF01 SAP ABAP INCLUDE - Include RPEGALLF01

RPEGALLF01 is a standard ABAP INCLUDE available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.

If you would like to execute this report or see the full code listing simply enter RPEGALLF01 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.

SUBMIT RPEGALLF01. "Basic submit
SUBMIT RPEGALLF01 AND RETURN. "Return to original report after report execution complete
SUBMIT RPEGALLF01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement

Text pool values

INCLUDES used within this REPORT RPEGALLF01

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:

POPUP_TO_CONFIRM_WITH_MESSAGE
    CALL FUNCTION 'POPUP_TO_CONFIRM_WITH_MESSAGE'
      EXPORTING
        diagnosetext1 = text-048
        textline1     = 'Continue Processing?'(053)
        titel         = 'Warning'(054)
      IMPORTING
        answer        = l_answer.

KPEP_MONI_INIT_RECORD
  CALL FUNCTION 'KPEP_MONI_INIT_RECORD'
    EXPORTING
      ls_detail         = ls_detail
      ls_witem          = ls_witem
      ld_worklist_flag  = ls_wlist_flag
      ld_delayed_update = ls_delayed_update
    IMPORTING
      ls_key            = gd-key
      will_be_saved     = gd-moni_save
    TABLES
      lt_selkrit        = lt_selcrit
      lt_param          = lt_param.

DATE_CONVERT_TO_FACTORYDATE
    CALL FUNCTION 'DATE_CONVERT_TO_FACTORYDATE'
      EXPORTING
        date                 = p_date
        factory_calendar_id  = p_fabkl
        correct_option       = '+'
      IMPORTING
        factorydate          = p_mdcal-fkday
        date                 = p_mdcal-gkday
        workingday_indicator = p_mdcal-worki
      EXCEPTIONS
        OTHERS               = 1.

FACTORYDATE_CONVERT_TO_DATE
    CALL FUNCTION 'FACTORYDATE_CONVERT_TO_DATE'
      EXPORTING
        factorydate         = p_af61x-fkday
        factory_calendar_id = p_fabkl
      IMPORTING
        date                = p_mdcal-gkday
      EXCEPTIONS
        OTHERS              = 1.

DATE_CONVERT_TO_FACTORYDATE
    CALL FUNCTION 'DATE_CONVERT_TO_FACTORYDATE'
      EXPORTING
        date                 = p_date
        factory_calendar_id  = p_fabkl
        correct_option       = '+'
      IMPORTING
        factorydate          = p_mdcal-fkday
        date                 = p_mdcal-gkday
        workingday_indicator = p_mdcal-worki
      EXCEPTIONS
        OTHERS               = 1.

FACTORYDATE_CONVERT_TO_DATE
    CALL FUNCTION 'FACTORYDATE_CONVERT_TO_DATE'
      EXPORTING
        factorydate         = p_af61x-fkday
        factory_calendar_id = p_fabkl
      IMPORTING
        date                = p_mdcal-gkday
      EXCEPTIONS
        OTHERS              = 1.

BAL_LOG_HDR_READ
  CALL FUNCTION 'BAL_LOG_HDR_READ'
    EXPORTING
      i_log_handle = g_log_handle
      i_langu      = sy-langu
    IMPORTING
      e_s_log      = ls_log
      e_statistics = ls_statistics.

BAL_DB_SAVE
    CALL FUNCTION 'BAL_DB_SAVE'
      EXPORTING
        i_t_log_handle   = lt_log_handle
        i_in_update_task = 'X'
      IMPORTING
        e_new_lognumbers = lt_lognumbers.

KPEP_MONI_CLOSE_RECORD
  CALL FUNCTION 'KPEP_MONI_CLOSE_RECORD'
    EXPORTING
      ls_key        = gd-key
      ls_message    = ls_message
      ld_objects    = gd-selected
      ls_ext        = ls_extract_data
      ls_scma_event = ls_scma_event
    CHANGING
      ld_aplstat    = ld_aplstat.

PEG02_ADJUST_FRACT_QTY_NEW
  CALL FUNCTION 'PEG02_ADJUST_FRACT_QTY_NEW'
    EXPORTING
      i_type     = 'R'
      i_instk    = '23'
      i_sort     = 'X'
      i_hist_tolerance = l_hist_tolerance
      i_round_lastrec  = l_round_lastrec
      i_rounding_flag = l_rounding_flag          " 1094859
    TABLES
      t_real_ass  = pt_real_peg_ass
      t_hist_tass = pt_hist_tass
    CHANGING
      p_delta    = l_delta.

PEG02_ADJUST_FRACT_QTY_NEW
  CALL FUNCTION 'PEG02_ADJUST_FRACT_QTY_NEW'
    EXPORTING
      i_type     = 'R'
      i_instk    = '1'
      i_sort     = 'X'
      i_rounding_flag = l_rounding_flag          " 1094859
    TABLES
      t_real_ass  = pt_real_peg_ass
      t_real_wlst = pt_real_wlst
    CHANGING
      p_delta    = l_delta.

PEG02_ADJUST_FRACT_QTY_NEW
  CALL FUNCTION 'PEG02_ADJUST_FRACT_QTY_NEW'
    EXPORTING
      i_type     = 'R'
      i_instk    = ' '
      i_sort     = 'X'
      i_rounding_flag = l_rounding_flag          " 1094859
    TABLES
      t_real_ass = pt_real_peg_ass
    CHANGING
      p_delta    = l_delta.

PEG02_ADJUST_FRACT_QTY_NEW
  CALL FUNCTION 'PEG02_ADJUST_FRACT_QTY_NEW'
    EXPORTING
      i_type     = 'R'
      i_instk    = '4'
      i_sort     = 'X'
      i_rounding_flag = l_rounding_flag          " 1094859
    TABLES
      t_real_ass = pt_real_peg_ass
    CHANGING
      p_delta    = l_delta.

PEG02_ADJUST_FRACT_QTY_NEW
  CALL FUNCTION 'PEG02_ADJUST_FRACT_QTY_NEW'
    EXPORTING
      i_type     = 'E'
      i_instk    = ' '
      i_sort     = 'X'
      i_rounding_flag = l_rounding_flag          " 1094859
    TABLES
      t_real_ass = pt_real_peg_ass
      t_real_wlst = pt_real_wlst
    CHANGING
      p_delta    = l_delta.

PEG02_ADJUST_FRACT_QTY_NEW
  CALL FUNCTION 'PEG02_ADJUST_FRACT_QTY_NEW'
    EXPORTING
      i_type     = 'S'
      i_instk    = ' '
      i_sort     = 'X'
      i_rounding_flag = l_rounding_flag          " 1094859
    TABLES
      t_real_ass = pt_real_peg_ass
      t_real_wlst = pt_real_wlst
    CHANGING
      p_delta    = l_delta.

PEG02_ADJUST_FRACT_QTY_NEW
  CALL FUNCTION 'PEG02_ADJUST_FRACT_QTY_NEW'
    EXPORTING
      i_type     = 'L'
      i_instk    = ' '
      i_sort     = 'X'
      i_rounding_flag = l_rounding_flag          " 1094859
    TABLES
      t_real_ass = pt_real_peg_ass
      t_real_wlst = pt_real_wlst
    CHANGING
      p_delta    = l_delta.

RKE_TIMESTAMP_CONVERT_INPUT
    CALL FUNCTION 'RKE_TIMESTAMP_CONVERT_INPUT'
      EXPORTING
        i_date     = sy-datlo
        i_dayst    = sy-dayst
        i_time     = sy-uzeit
        i_tzone    = sy-tzone
      IMPORTING
        e_timestmp = st_timestamp.

ENQUEUE_EGPD_TARCH_WBS
      CALL FUNCTION 'ENQUEUE_EGPD_TARCH_WBS'
        EXPORTING  pspnr              = -grpnr
                   mode_gpd_tarch_wbs = 'S'        "1618310
                   _collect           = 'X'.

FLUSH_ENQUEUE














    CALL FUNCTION 'FLUSH_ENQUEUE'
      EXCEPTIONS foreign_lock   = 1
                 system_failure = 2
                 others         = 3.

DEQUEUE_EGPD_TARCH_WBS
      CALL FUNCTION 'DEQUEUE_EGPD_TARCH_WBS'
        EXPORTING pspnr              = -grpnr
                  mode_gpd_tarch_wbs = 'S'        "1618310
                  _collect           = 'X'.

FLUSH_ENQUEUE
    CALL FUNCTION 'FLUSH_ENQUEUE'
      EXCEPTIONS OTHERS = 1.