SAP Reports / Programs | Pegging, Grouping, and Distribution | Aerospace & Defence Industry Solution | Pegging, Grouping, and Distribution(IS-AD-GPD) SAP IS

comments icon Comments

RDISALLF01 SAP ABAP INCLUDE - documentation and ABAP source code







RDISALLF01 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 RDISALLF01 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 RDISALLF01. "Basic submit
SUBMIT RDISALLF01 AND RETURN. "Return to original report after report execution complete
SUBMIT RDISALLF01 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


INCLUDES used within this REPORT RDISALLF01

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:

BAL_LOG_CREATE
  CALL FUNCTION 'BAL_LOG_CREATE'
    EXPORTING
      i_s_log      = g_s_log
    IMPORTING
      e_log_handle = g_log_handle.

BAL_DSP_LOG_DISPLAY
  CALL FUNCTION 'BAL_DSP_LOG_DISPLAY'
*      EXPORTING
*           I_S_LOG_FILTER         =
*           I_T_LOG_CONTEXT_FILTER =
*           I_S_MSG_FILTER         =
*           I_T_MSG_CONTEXT_FILTER =
*           I_T_LOG_HANDLE         =
*           I_T_MSG_HANDLE         =
*           I_S_DISPLAY_PROFILE    =
*           I_AMODAL               = ' '
       EXCEPTIONS
            OTHERS                 = 1.

DIS01_READ_PEGGING_PROFILE
    CALL FUNCTION 'DIS01_READ_PEGGING_PROFILE'
      EXPORTING
        i_pspnr   = ls_group_data-grpnr
      IMPORTING
        e_tpgprf  = ls_tpgprf
      EXCEPTIONS
        not_found = 1.

BAL_LOG_MSG_ADD
  CALL FUNCTION 'BAL_LOG_MSG_ADD'
    EXPORTING
      i_log_handle = g_log_handle
      i_s_msg      = l_s_msg.

STATUS_BUFFER_REFRESH
  CALL FUNCTION 'STATUS_BUFFER_REFRESH'.                    "807001

CJPN_FREE_BUFFER
    CALL FUNCTION 'CJPN_FREE_BUFFER'.

K_KOKRS_READ
    CALL FUNCTION 'K_KOKRS_READ'
      EXPORTING
        kokrs   = g_kokrs
      IMPORTING
        e_tka01 = ls_tka01.

CK_F_ORG_ELEMENTS_PLANT
    CALL FUNCTION 'CK_F_ORG_ELEMENTS_PLANT'
      EXPORTING
        werk                  = ls_group_data-werks
      IMPORTING
        organisationselemente = ls_ckiwerk.

K_KOKRS_READ
        CALL FUNCTION 'K_KOKRS_READ'
          EXPORTING
            kokrs   = g_kokrs
          IMPORTING
            e_tka01 = ls_tka01.

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 = l_timestmp.

CJPN_FILL_PRPS_BUFFER
        CALL FUNCTION 'CJPN_FILL_PRPS_BUFFER'
          TABLES
            t_prps_buf           = lt_prps
          EXCEPTIONS
            buffer_contains_data = 1.

K_AUFK_PRE_READ
        CALL FUNCTION 'K_AUFK_PRE_READ'
          EXPORTING
            i_aufnrtab = lt_aufsel.

K_AFPO_PRE_READ
        CALL FUNCTION 'K_AFPO_PRE_READ'
          EXPORTING
            i_aufnrtab = lt_aufsel.

DIS01_LOG_COST_OBJECTS
      CALL FUNCTION 'DIS01_LOG_COST_OBJECTS'
        EXPORTING
          i_group_data          = ls_group_data
          i_loghndl             = g_log_handle
          i_delta               = p_delta
          i_test                = p_test
          i_perio               = g_perio
          i_gjahr               = g_gjahr
          i_timestmp            = l_timestmp
          it_dis_values_total   = pt_rep_dis_values_totals
          it_dis_values_delta   = pt_rep_dis_values_delta
          it_peg_tass           = lt_peg_tass
        TABLES
          it_dis_wlst_del       = lt_dis_wlst_del
          it_dis_tobjs_cosp     = lt_dis_tobjs_cosp
          it_dis_tobjs_cosp_his = lt_dis_tobjs_his_cosp
          it_dis_tobjs_coss     = lt_dis_tobjs_coss
          it_dis_tobjs_coss_his = lt_dis_tobjs_his_coss
          it_dis_tobjs_fmsu     = lt_dis_tobjs_fmsu
          it_dis_tobjs_fmsu_his = lt_dis_tobjs_his_fmsu.

K_NUMBER_GET_CO_DOCUMENT
      CALL FUNCTION 'K_NUMBER_GET_CO_DOCUMENT'
        EXPORTING
          kokrs = g_kokrs
          vrgng = 'KGPD'
        IMPORTING
          belnr = l_belnr.

K_NUMBER_GET_CO_DOCUMENT
      CALL FUNCTION 'K_NUMBER_GET_CO_DOCUMENT'
        EXPORTING
          kokrs = g_kokrs
          vrgng = 'KGPD'
        IMPORTING
          belnr = l_belnr.

PEG02_CONVERT_INT_EXT_ID
        CALL FUNCTION 'PEG02_CONVERT_INT_EXT_ID'
          EXPORTING
            i_objnr = -repobj
          IMPORTING
            e_delnr = ld_delnr
            e_delps = ld_delps.

STATUS_PRE_READ
  CALL FUNCTION 'STATUS_PRE_READ'
    EXPORTING
      CLIENT               = SY-MANDT
      GET_CHANGE_DOCUMENTS = ' '
    TABLES
      JSTO_PRE_TAB         = LT_OBJNR.                      "807001

PEG02_CONVERT_INT_EXT_ID
















        CALL FUNCTION 'PEG02_CONVERT_INT_EXT_ID'
          EXPORTING
            i_objnr = ls_peg_tass-repobj
          IMPORTING
            e_delnr = l_delnr
            e_delps = l_delps
            e_delet = l_delet.

PEG02_CONVERT_EXT_INT_ID
      CALL FUNCTION 'PEG02_CONVERT_EXT_INT_ID'              "ins 482383
           EXPORTING                                        "ins 482383
              i_delkz = con_be                              "ins 482383
              i_delnr = -ebeln                     "ins 482383
              i_delps = temp_ebelp                          "ins 482383
           IMPORTING                                        "ins 482383
              e_objnr = ls_cospa-objnr.                     "ins 482383

PEG02_CONVERT_EXT_INT_ID
        CALL FUNCTION 'PEG02_CONVERT_EXT_INT_ID'            "ins 713325
             EXPORTING                                      "ins 713325
                i_delkz = con_be                            "ins 713325
                i_delnr = -refbn                   "ins 713325
                i_delps = temp_ebelp                        "ins 713325
                i_delet = temp_delet                        "ins 713325
             IMPORTING                                      "ins 713325
                e_objnr = ls_poobj-repobj.                  "ins 713325

K_COSPA_READ_MULTI
    CALL FUNCTION 'K_COSPA_READ_MULTI'
      EXPORTING
        modus   = 1
      TABLES
        t_cosel = lt_cosel2
        t_cospa = lt_cospa.

K_COSSA_READ_MULTI
    CALL FUNCTION 'K_COSSA_READ_MULTI'
      EXPORTING
        modus   = 1
      TABLES
        t_cosel = lt_cosel2
        t_cossa = lt_cossa.

HFPB_FIND_LEDGER
        CALL FUNCTION 'HFPB_FIND_LEDGER'
          EXPORTING
            kokrs   = ls_cofp-kokrs
            owaer   = ls_cofp-owaer
          IMPORTING
            lednr_k = l_lednr_k
            lednr_o = l_lednr_o.

PEG02_CONVERT_EXT_INT_ID
        CALL FUNCTION 'PEG02_CONVERT_EXT_INT_ID'            "ins 713325
             EXPORTING                                      "ins 713325
                i_delkz = con_be                            "ins 713325
                i_delnr = ls_cofp-ebeln                     "ins 713325
                i_delps = temp_ebelp                        "ins 713325
             IMPORTING                                      "ins 713325
                e_objnr = ls_fmsu-objnr.                    "ins 713325

PEG02_CONVERT_EXT_INT_ID
      CALL FUNCTION 'PEG02_CONVERT_EXT_INT_ID'              "ins 713325
           EXPORTING                                        "ins 713325
              i_delkz = con_be                              "ins 713325
              i_delnr = ls_cofp-ebeln                       "ins 713325
              i_delps = temp_ebelp                          "ins 713325
           IMPORTING                                        "ins 713325
              e_objnr = ls_fmsu-objnr.                      "ins 713325

K_NUMBER_GET_CO_DOCUMENT
    CALL FUNCTION 'K_NUMBER_GET_CO_DOCUMENT'
      EXPORTING
        kokrs = g_kokrs
        vrgng = con_vrgng_kgpd
      IMPORTING
        belnr = l_belnr.

FMCO_UPDATE
  CALL FUNCTION 'FMCO_UPDATE'
    TABLES
      t_cofp = lt_cofp_m
      t_cobk = lt_cobk_m.

K_NUMBER_GET_CO_DOCUMENT
  CALL FUNCTION 'K_NUMBER_GET_CO_DOCUMENT'
    EXPORTING
      kokrs = g_kokrs
      vrgng = con_vrgng_kgpd
    IMPORTING
      belnr = l_belnr.

FMCO_UPDATE
  CALL FUNCTION 'FMCO_UPDATE'
    TABLES
      t_cofp = pt_cofp
      t_cobk = pt_cobk.

HFPB_FIND_LEDGER
    CALL FUNCTION 'HFPB_FIND_LEDGER'
      EXPORTING
        kokrs   = p_kokrs
        owaer   = ls_coiob-owaer
      IMPORTING
        lednr_k = l_lednr_k
        lednr_o = l_lednr_o.

K_COBK_CURRENCY_FILL
  CALL FUNCTION 'K_COBK_CURRENCY_FILL'
    EXPORTING
      i_cobk                 = ls_cobk
    IMPORTING
      e_cobk                 = ls_cobk
    EXCEPTIONS
      kokrs_gjahr_not_found  = 1
      kokrs_not_found        = 2
      kokrs_wrong_customized = 3.

FIRST_DAY_IN_PERIOD_GET
    CALL FUNCTION 'FIRST_DAY_IN_PERIOD_GET'
      EXPORTING
        i_gjahr = p_gjahr
        i_periv = p_lmona
        i_poper = p_perio
      IMPORTING
        e_date  = ls_pdate-datab.

LAST_DAY_IN_PERIOD_GET
    CALL FUNCTION 'LAST_DAY_IN_PERIOD_GET'
      EXPORTING
        i_gjahr = p_gjahr
        i_periv = p_lmona
        i_poper = p_perio
      IMPORTING
        e_date  = ls_pdate-datbi.

K_OBJECTS_MASTER_READ
  CALL FUNCTION 'K_OBJECTS_MASTER_READ'
    TABLES
      coiob_tab = lt_coiob
      i_periods = lt_periods.

K_COEP_INSERT
    CALL FUNCTION 'K_COEP_INSERT' IN UPDATE TASK
      EXPORTING
        epskz    = ps_group_data-dilact
        vrgng    = p_vrgng
      TABLES
        cobk_tab = pt_cobk
        coep_tab = pt_coep.

DIS01_OPEN_ITEM_POST
    CALL FUNCTION 'DIS01_OPEN_ITEM_POST' IN UPDATE TASK
          EXPORTING
            i_epskz    = ' '  "ps_group_data-dilcomm
          TABLES
            t_coep     = pt_coep_comm
            t_cooi_ins = pt_cooi_ins
            t_cooi_del = pt_cooi_del
            t_cooi_upd = pt_cooi_upd
            t_coiob    = pt_coiob.

K_COEP_INSERT
      CALL FUNCTION 'K_COEP_INSERT'
        EXPORTING
          epskz    = ps_group_data-dilact
          vrgng    = p_vrgng
        TABLES
          cobk_tab = pt_cobk
          coep_tab = pt_coep.




DIS01_OPEN_ITEM_POST
      CALL FUNCTION 'DIS01_OPEN_ITEM_POST'
        EXPORTING
          i_epskz    = ' '  "ps_group_data-dilcomm
        TABLES
          t_coep     = pt_coep_comm
          t_cooi_ins = pt_cooi_ins
          t_cooi_del = pt_cooi_del
          t_cooi_upd = pt_cooi_upd
          t_coiob    = pt_coiob.

CJPN_GET_WBS_ELEMENT
    CALL FUNCTION 'CJPN_GET_WBS_ELEMENT'
      EXPORTING
        i_pspnr = p_grpnr
      IMPORTING
        e_prps  = s_prps.

CONVERT_TO_LOCAL_CURRENCY
    CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY'
      EXPORTING
        date             = g_budat
        foreign_amount   = p_cospa-wog
        foreign_currency = l_owaer
        local_currency   = g_waers
      IMPORTING
        local_amount     = l_kbtr
      EXCEPTIONS
        no_rate_found    = 1.

CONVERT_TO_FOREIGN_CURRENCY
      CALL FUNCTION 'CONVERT_TO_FOREIGN_CURRENCY'
        EXPORTING
          date             = g_budat
          foreign_currency = p_coiob-owaer
          local_amount     = l_kbtr
          local_currency   = g_waers
        IMPORTING
          foreign_amount   = ls_coep-wogbtr
        EXCEPTIONS
          no_rate_found    = 1.

CJPN_GET_WBS_ELEMENT
    CALL FUNCTION 'CJPN_GET_WBS_ELEMENT'
      EXPORTING
        i_pspnr = p_grpnr
      IMPORTING
        e_prps  = s_prps.

CONVERT_TO_LOCAL_CURRENCY
    CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY'
      EXPORTING
        date             = g_budat
        foreign_amount   = pt_cossa-wog
        foreign_currency = l_owaer
        local_currency   = g_waers
      IMPORTING
        local_amount     = l_kbtr
      EXCEPTIONS
        no_rate_found    = 1.

CONVERT_TO_FOREIGN_CURRENCY
      CALL FUNCTION 'CONVERT_TO_FOREIGN_CURRENCY'
        EXPORTING
          date             = g_budat
          foreign_currency = p_coiob-owaer
          local_amount     = l_kbtr
          local_currency   = g_waers
        IMPORTING
          foreign_amount   = ls_coep-wogbtr
        EXCEPTIONS
          no_rate_found    = 1.

HFPB_FIND_LEDGER
  CALL FUNCTION 'HFPB_FIND_LEDGER'
    EXPORTING
      kokrs   = g_kokrs
    IMPORTING
      lednr_k = l_lednr_k.

ENQUEUE_EPEGENQ
  CALL FUNCTION 'ENQUEUE_EPEGENQ'
    EXPORTING
      mode_mspr    = 'E'
      pspnr        = p_grpnr
      _wait        = 'X'
    EXCEPTIONS
      foreign_lock = 1.

STATUS_BUFFER_REFRESH
  CALL FUNCTION 'STATUS_BUFFER_REFRESH'.

STATUS_PRE_READ
  CALL FUNCTION 'STATUS_PRE_READ'
    TABLES
      jsto_pre_tab = lt_objnr.

STATUS_CHECK
  CALL FUNCTION 'STATUS_CHECK'
    EXPORTING
      objnr             = p_objnr
      status            = p_stat
    EXCEPTIONS
      object_not_found  = 01
      status_not_active = 02.

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.

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.

OBJECT_NUMBER_READ_PR
*      call function 'OBJECT_NUMBER_READ_PR'
*           exporting
*                pspnr = ls_peg_tass-ass_pspnr
*           importing
*                objnr = ls_objnr-objnr.

STATUS_BUFFER_REFRESH
  CALL FUNCTION 'STATUS_BUFFER_REFRESH'.

STATUS_PRE_READ
*  call function 'STATUS_PRE_READ'
*       tables
*            jsto_pre_tab = lt_objnr.

STATUS_CHECK
    CALL FUNCTION 'STATUS_CHECK'
      EXPORTING
        objnr             = l_objnr
        status            = lt_status
      EXCEPTIONS
        status_not_active = 1.

STATUS_CHANGE_FOR_ACTIVITY
    CALL FUNCTION 'STATUS_CHANGE_FOR_ACTIVITY'
      EXPORTING
        check_only           = 'X'
        objnr                = l_objnr
        vrgng                = 'KOAQ'
      EXCEPTIONS
        activity_not_allowed = 1
        status_not_allowed   = 2.

STATUS_CHANGE_FOR_ACTIVITY
      CALL FUNCTION 'STATUS_CHANGE_FOR_ACTIVITY'
        EXPORTING
          check_only           = 'X'
          objnr                = l_objnr
          vrgng                = 'KOAO'
        EXCEPTIONS
          activity_not_allowed = 1
          status_not_allowed   = 2.

CK_F_ORG_ELEMENTS_PLANT
    CALL FUNCTION 'CK_F_ORG_ELEMENTS_PLANT'
      EXPORTING
        werk                  = ls_mspr_h-werks
      IMPORTING
        organisationselemente = l_ckiwerk.

KPPB_MAT_ACCOUNT_ASSIGNMENT
      CALL FUNCTION 'KPPB_MAT_ACCOUNT_ASSIGNMENT'
        EXPORTING
          i_matnr       = ls_mspr_h-matnr
          i_werks       = ls_mspr_h-werks
          i_sobkz       = ls_mspr_h-sobkz
          i_charg       = ls_mspr_h-charg
          i_shkzg       = 'S'
        IMPORTING
          e_account     = ls_cospa_sum-kstar
        EXCEPTIONS
          error_occured = 1.

CONVERT_TO_LOCAL_CURRENCY
        CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY'
          EXPORTING
            date             = sy-datlo
            foreign_amount   = ls_cospa_sum-wtg
            foreign_currency = ls_cospa_sum-twaer
            local_currency   = g_waers
          IMPORTING
            local_amount     = ls_cospa_sum-wkg.

K_COSPA_READ_MULTI
*    CALL FUNCTION 'K_COSPA_READ_MULTI'
*         EXPORTING
*              modus   = 1
*         TABLES
*              t_cosel = lt_cosel
*              t_cospa = lt_cospa.

K_COSSA_READ_MULTI
*    CALL FUNCTION 'K_COSSA_READ_MULTI'
*         EXPORTING
*              modus   = 1
*         TABLES
*              t_cosel = lt_cosel
*              t_cossa = lt_cossa.

HFPB_FIND_LEDGER
*        CALL FUNCTION 'HFPB_FIND_LEDGER'
*             EXPORTING
*                  kokrs     = ls_cofp-kokrs
*                  owaer     = ls_cofp-owaer
*             IMPORTING
*                  lednr_k   = l_lednr_k
*                  lednr_o   = l_lednr_o
*             EXCEPTIONS
*                  no_ledger = 1
*                  OTHERS    = 2.

PEG02_CONVERT_INT_EXT_ID
  CALL FUNCTION 'PEG02_CONVERT_INT_EXT_ID'
    EXPORTING
      i_objnr = v_repobj
    IMPORTING
      e_delnr = ld_delnr
      e_delps = ld_delps.

KPFP_PSCM_CHECK_FOR_KOKRS
      CALL FUNCTION 'KPFP_PSCM_CHECK_FOR_KOKRS'
        EXPORTING
          i_kokrs    = g_kokrs
        EXCEPTIONS
          not_active = 1.

K_KOKRS_READ
    CALL FUNCTION 'K_KOKRS_READ'
      EXPORTING
        kokrs   = g_kokrs
      IMPORTING
        e_tka01 = s_tka01.

G_POSTING_DATE_OF_PERIOD_GET
    CALL FUNCTION 'G_POSTING_DATE_OF_PERIOD_GET'
      EXPORTING
        period    = v_from_perio
        variant   = s_tka01-lmona
        year      = v_from_gjahr
      IMPORTING
        from_date = c_from_date
      EXCEPTIONS
        OTHERS    = 0.

G_POSTING_DATE_OF_PERIOD_GET
    CALL FUNCTION 'G_POSTING_DATE_OF_PERIOD_GET'
      EXPORTING
        period  = v_to_perio
        variant = s_tka01-lmona
        year    = v_to_gjahr
      IMPORTING
        to_date = c_to_date
      EXCEPTIONS
        OTHERS  = 0.

STATUS_BUFFER_REFRESH
*  CALL FUNCTION 'STATUS_BUFFER_REFRESH'.        "807001

STATUS_CHECK_MULTI
  CALL FUNCTION 'STATUS_CHECK_MULTI'
    EXPORTING
      status  = c_status_rel
    TABLES
      OBJECTS = ct_objnr.

STATUS_CHECK_MULTI
  CALL FUNCTION 'STATUS_CHECK_MULTI'
    EXPORTING
      status  = c_status_teco
    TABLES
      OBJECTS = lt_objnr.

STATUS_CHECK_MULTI
  CALL FUNCTION 'STATUS_CHECK_MULTI'
    EXPORTING
      status  = c_status_prel
    TABLES
      OBJECTS = lt_objnr1.

FAGL_COFI_SWITCH_OFF
* CALL FUNCTION 'FAGL_COFI_SWITCH_OFF'.

RWIN_CHECK
  CALL FUNCTION 'RWIN_CHECK'
    EXPORTING
      event   = event_kopf
      gjahr   = g_gjahr
      process = process_kbeleg
    TABLES
      tkomp   = lt_tkomp.

RWIN_CHECK
  CALL FUNCTION 'RWIN_CHECK'
    EXPORTING
      event   = event_pruefen
      gjahr   = g_gjahr
      process = process_kbeleg
    TABLES
      tkomp   = lt_tkomp.

RWIN_CHECK
  CALL FUNCTION 'RWIN_CHECK'
    EXPORTING
      event   = event_fertig
      gjahr   = g_gjahr
      process = process_kbeleg
    TABLES
      tkomp   = lt_tkomp.

K_KAPSA_READ_SINGLES
  CALL FUNCTION 'K_KAPSA_READ_SINGLES'
    EXPORTING
      von_periode = g_perio
      bis_periode = g_perio
    TABLES
      ikapsa      = ikapsa
    EXCEPTIONS
      not_found   = 01.

CO_PERIOD_BLOCKING_CHECK
  call function 'CO_PERIOD_BLOCKING_CHECK'
    EXPORTING
      gjahr         = g_gjahr
      kokrs         = g_kokrs
      perab         = g_perio
      perbi         = g_perio
      versn         = '000'
      vrgng         = 'GPDS'
    EXCEPTIONS
      vrgng_blocked = 1
      others        = 2.

K_KAPSA_READ_SINGLES
  CALL FUNCTION 'K_KAPSA_READ_SINGLES'
    EXPORTING
      von_periode = g_perio
      bis_periode = g_perio
    TABLES
      ikapsa      = ikapsa
    EXCEPTIONS
      not_found   = 01.

CO_PERIOD_BLOCKING_CHECK
  call function 'CO_PERIOD_BLOCKING_CHECK'
    EXPORTING
      gjahr         = g_gjahr
      kokrs         = g_kokrs
      perab         = g_perio
      perbi         = g_perio
      versn         = '000'
      vrgng         = 'GPDP'
    EXCEPTIONS
      vrgng_blocked = 1
      others        = 2.

K_KOKRS_READ
  CALL FUNCTION 'K_KOKRS_READ'
    EXPORTING
      kokrs   = g_kokrs
    IMPORTING
      e_tka01 = ls_tka01.

K_DATE_TO_PERIOD_CONVERT
  CALL FUNCTION 'K_DATE_TO_PERIOD_CONVERT'
    EXPORTING
      i_date  = sy-datum
      i_kokrs = g_kokrs
    IMPORTING
      e_gjahr = lv_gjahr
      e_perio = lv_perio.

LAST_DAY_IN_PERIOD_GET
    CALL FUNCTION 'LAST_DAY_IN_PERIOD_GET'
      EXPORTING
        i_gjahr              = g_gjahr
*     I_MONMIT             = 00
        i_periv              = ls_tka01-lmona
        i_poper              = g_perio
      IMPORTING
        e_date               = g_budat.

KE_PROFIT_CENTER_CHECK
    CALL FUNCTION 'KE_PROFIT_CENTER_CHECK'
      EXPORTING
        DATUM                 = G_BUDAT
        PRCTR                 = LS_PCA-PRCTR
        TEST_KOKRS            = G_KOKRS
        READ_TEXT             = 'X'
      EXCEPTIONS
        NOT_FOUND             = 1
        NOT_DEFINED_FOR_DATE  = 2
        NO_KOKRS_FOR_BUKRS    = 3
        PARAMETER_MISMATCH    = 4
        PRCTR_LOCKED          = 5
        NOT_DEFINED_FOR_BUKRS = 6
        OTHERS                = 7.


Contribute (Add Comments)

Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.

The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name RDISALLF01 or its description.


   
 

RDISALLF01 - documentation and ABAP source code
RDISALL2TOP - Data definition
RDISALL2F08 - Post delta for objects and group credit
RDISALL2F07 - Calculate delta for object
RDISALL2F06 - Get cost distributed for objects
RDISALL2F05 - Calculate total distributed for objects based on group costs and curre