RPCP45GR SAP ABAP INCLUDE - Include RPCP45RT

RPCP45GR 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 RPCP45GR 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 RPCP45GR

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:

HR_READ_INFOTYPE_AUTHC_DISABLE
  CALL FUNCTION 'HR_READ_INFOTYPE_AUTHC_DISABLE'.

HR_READ_INFOTYPE
  CALL FUNCTION 'HR_READ_INFOTYPE'
    EXPORTING
      pernr     = pernr-pernr
      infty     = '0003'
    TABLES
      infty_tab = p_p0003.

HR_GBMPT_P45_CHECK
  CALL FUNCTION 'HR_GBMPT_P45_CHECK'
    EXPORTING
      p_error = errors[]
    CHANGING
      p_fpper = pper.

RP_GET_FIRE_DATE
    CALL FUNCTION 'RP_GET_FIRE_DATE'
      EXPORTING
        PERSNR   = pernr-pernr
      IMPORTING
        FIREDATE = l_firdt.

RP_GET_HIRE_DATE
    CALL FUNCTION 'RP_GET_HIRE_DATE' " get hire date incase not a leaver in current tax year
      EXPORTING
        PERSNR = pernr-pernr
        check_infotypes = p0000
      IMPORTING
        HIREDATE = l_hirdt.

HR_READ_INFOTYPE_AUTHC_DISABLE
      CALL FUNCTION 'HR_READ_INFOTYPE_AUTHC_DISABLE'.

HR_READ_INFOTYPE
      CALL FUNCTION 'HR_READ_INFOTYPE'
        EXPORTING
          pernr     = pernr-pernr
          infty     = '0003'
        TABLES
          infty_tab = p_p0003.

HR_READ_INFOTYPE
  CALL FUNCTION 'HR_READ_INFOTYPE'
    EXPORTING
      pernr     = pernr-pernr
      infty     = '0121'
    TABLES
      infty_tab = p_p0121.

RP_GET_FIRE_DATE
    CALL FUNCTION 'RP_GET_FIRE_DATE'
      EXPORTING
        PERSNR   = pernr-pernr
      IMPORTING
        FIREDATE = l_firdt.

HR_GB_PERID_CHECK
    CALL FUNCTION 'HR_GB_PERID_CHECK'
      EXPORTING
        FLT_VAL                          = '08'
        IN_PERID                         = p0002-perid
        PERNR                            = p0002-pernr
        BEGDA                            = endda
        ENDDA                            = endda
*   IMPORTING
*     PERID                            =
      CHANGING
        GBDAT                            = p0002-gbdat
        GESCH                            = p0002-gesch
     EXCEPTIONS
       POSITIONS1_2                     = 1
       POSITIONS3_8                     = 2
       POSITION9_FOR_TEMPORARY_NI       = 3
       POSITION9                        = 4
       GENDER_UNKNOWN                   = 5
       DIFFERENT_GENDER                 = 6
       DIFFERENT_BIRTHDAY               = 7
       DEFAULT_GENDER                   = 8
       TN_NOT_ALLOWED                   = 9
       POSITIONS1_2_PREFIX              = 10
       GENDER_DOB_MISSING               = 11
       PREFIX_NOT_IN_TABLE              = 12
       PREFIX_NOT_IN_VALIDITY_PERIOD    = 13
       OTHERS                           = 14.

HR_READ_INFOTYPE_AUTHC_DISABLE
  CALL FUNCTION 'HR_READ_INFOTYPE_AUTHC_DISABLE'.

HR_READ_INFOTYPE
  CALL FUNCTION 'HR_READ_INFOTYPE'
    EXPORTING
      pernr     = pernr-pernr
      infty     = '0003'
    TABLES
      infty_tab = p_p0003.

HR_GBMPT_P45_HANDLING
    CALL FUNCTION 'HR_GBMPT_P45_HANDLING'
      EXPORTING
        p_pernr     = pernr-pernr
        p_molga     = molga
        p_fire      = timeframes-fire
        p_begda     = begda
        p_rgdir     = c_rgdir[]
        p_p0001     = p0001[]
      CHANGING
        p_endda     = l_endda
        p_error     = errors[]
      EXCEPTIONS
        error_found = 1
        OTHERS      = 2.

CD_READ_LAST
  call function 'CD_READ_LAST'
    EXPORTING
      begin_date      = begda
*
* MPT changes:START
*
*      end_date        = endda
      end_date        = l_endda
*
* MPT changes:END
*
    IMPORTING
      out_seqnr       = seqnr
    TABLES
      rgdir           = c_rgdir
    EXCEPTIONS
      no_record_found = 1
      others          = 2.

HR_READ_INFOTYPE
      call function 'HR_READ_INFOTYPE'
          exporting
            pernr     = ln_pernr-pernr
            infty     = '0000'
*        begda     = lowdate
*        endda     = highdate
          tables
            infty_tab = lt_p0000
          exceptions
            others    = 1.

HR_READ_INFOTYPE
      call function 'HR_READ_INFOTYPE'
          exporting
            pernr     = ln_pernr-pernr
            infty     = '0001'
*        begda     = lowdate
*        endda     = highdate
          tables
            infty_tab = lt_p0001
          exceptions
            others    = 1.

RP_HIRE_FIRE
      call function 'RP_HIRE_FIRE'
        EXPORTING
          beg       = PNPBEGDA
          end       = PNPENDDA
        IMPORTING
          hire_date = hire
          fire_date = fire
        TABLES
          pp0000    = lt_p0000      "input
          pp0001    = lt_p0001      "input
          pphifi    = phifi_x.