RPLSOLJ2 SAP ABAP Report - List of employees exempt from employment insurance

RPLSOLJ2 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for As to Japanese law, an employee at the age of 64 is exempted from Unemployment Insurance...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 RPLSOLJ2 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 RPLSOLJ2

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:

COMPUTE_YEARS_BETWEEN_DATES
  call function 'COMPUTE_YEARS_BETWEEN_DATES'
    exporting
      first_date                  = is_display_list-birthday
      second_date                 = is_basis_date
      modify_interval             = ' '
    importing
      years_between_dates         = ev_age_of_employee
    exceptions
      sequence_of_dates_not_valid = 1.

RP_CONVERT_JAPAN_DATE_OUT
  call function 'RP_CONVERT_JAPAN_DATE_OUT'
    exporting
      seireki    = ic_date
    importing
      ryaku      = ls_wareki-gengou                            "N850853
      nengo      = ls_wareki-gengou_text                       "N850853
      nen        = ls_wareki-year                              "N850853
      nen_text   = ls_wareki-year_text                         "N850853
      tsuki      = ls_wareki-month                             "N850853
      tsuki_text = ls_wareki-month_text                        "N850853
      hi         = ls_wareki-date                              "N850853
      hi_text    = ls_wareki-date_text                         "N850853
    exceptions
      others     = 1.

BDC_OPEN_GROUP
  call function 'BDC_OPEN_GROUP'
    exporting
      client              = sy-mandt
      group               = sy-uname
      keep                = 'X'
      user                = sy-uname
    exceptions
      client_invalid      = 1
      destination_invalid = 2
      group_invalid       = 3
      group_is_locked     = 4
      holddate_invalid    = 5
      internal_error      = 6
      queue_error         = 7
      running             = 8
      system_lock_error   = 9
      user_invalid        = 10
      others              = 11.

BDC_CLOSE_GROUP
  call function 'BDC_CLOSE_GROUP'
    exceptions
      not_open    = 1
      queue_error = 2
      others      = 3.

BDC_INSERT
  call function 'BDC_INSERT'
    exporting
      tcode            = 'PA30'
    tables
      dynprotab        = bdcdata
    exceptions
      internal_error   = 1
      not_open         = 2
      queue_error      = 3
      tcode_invalid    = 4
      printing_invalid = 5
      posting_invalid  = 6
      others           = 7.

HRCA_COMPANYCODE_GETDETAIL
    call function 'HRCA_COMPANYCODE_GETDETAIL'
      exporting
        companycode = ls_company_code-company_code
      importing
        comp_name   = ls_company_code-company_text
      exceptions
        not_found   = 1
        others      = 2.

RP_EDIT_NAME
  call function 'RP_EDIT_NAME'
    exporting
      langu     = sy-langu
      molga     = ic_molga
      format    = ic_format
      pp0002    = p0002
    importing
      edit_name = ev_edit_name
      retcode   = lv_subrc.

RP_SET_NAME_FORMAT
  call function 'RP_SET_NAME_FORMAT'
    exporting
      repid  = ic_repid
    importing
      format = ev_format.

REUSE_ALV_GRID_DISPLAY
  call function 'REUSE_ALV_GRID_DISPLAY'
    exporting
      i_callback_program       = gv_repid
      i_callback_pf_status_set = lc_pf_status
      i_callback_user_command  = lc_user_command
      is_layout                = is_alv_layout
      it_fieldcat              = it_alv_field_catalog
      i_save                   = gc_alv_save
      is_variant               = gs_alv_variant
    tables
      t_outtab                 = it_display_list
    exceptions
      program_error            = 1
      others                   = 2.

HR_DISPLAY_ERROR_LIST
      call function 'HR_DISPLAY_ERROR_LIST'
        tables
          error = gt_error_list.

REUSE_ALV_VARIANT_DEFAULT_GET
  call function 'REUSE_ALV_VARIANT_DEFAULT_GET'
    exporting
      i_save     = gc_alv_save
    changing
      cs_variant = gs_alv_variant_f4
    exceptions
      not_found  = 2.

REUSE_ALV_VARIANT_F4
  call function 'REUSE_ALV_VARIANT_F4'
    exporting
      is_variant = gs_alv_variant
      i_save     = gc_alv_save
    importing
      es_variant = gs_alv_variant_f4
    exceptions
      not_found  = 1.

REUSE_ALV_VARIANT_EXISTENCE
    call function 'REUSE_ALV_VARIANT_EXISTENCE'
      exporting
        i_save     = gc_alv_save
      changing
        cs_variant = gs_alv_variant_f4.

SAPGUI_PROGRESS_INDICATOR
  call function 'SAPGUI_PROGRESS_INDICATOR'
    exporting
      percentage = ic_percentage
      text       = lv_sapgui_text.