RFTP_CHECK_MEAL_CODE SAP ABAP Report - Identification of Invalid Meal Codes in Infotype 471 After IATA Change

RFTP_CHECK_MEAL_CODE is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for You can use this program to check whether the Flight Preferences infotype (IT 471) of an employee contains obsolete meal codes...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 RFTP_CHECK_MEAL_CODE 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 RFTP_CHECK_MEAL_CODE

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:

PTRV_GET_NAME_FOR_PERNR
    CALL FUNCTION 'PTRV_GET_NAME_FOR_PERNR'
      EXPORTING
        personnel_number = lt_p0471_ext-pernr
        screen_display   = ' '
      IMPORTING
        name             = lt_p0471_ext-name.

VIEW_ENQUEUE
    CALL FUNCTION 'VIEW_ENQUEUE'
      EXPORTING
        action       = 'E'
        enqueue_mode = 'S'
        view_name    = 'PA0471'.

VIEW_ENQUEUE
      CALL FUNCTION 'VIEW_ENQUEUE'
        EXPORTING
          action    = 'D'
          view_name = 'PA0471'.

DOCU_GET
  CALL FUNCTION 'DOCU_GET'
    EXPORTING
      id                = lv_docu_type
      langu             = sy-langu
      object            = lv_docu_name
    IMPORTING
      head              = ls_header
    TABLES
      line              = lt_itf
    EXCEPTIONS
      no_docu_on_screen = 1
      no_docu_self_def  = 2
      no_docu_temp      = 3
      ret_code          = 4
      OTHERS            = 5.

DOCU_GET
    CALL FUNCTION 'DOCU_GET'
      EXPORTING
        id                = lv_docu_type
        langu             = sy-langu
        object            = lv_docu_name
      IMPORTING
        head              = ls_header
      TABLES
        line              = lt_itf
      EXCEPTIONS
        no_docu_on_screen = 1
        no_docu_self_def  = 2
        no_docu_temp      = 3
        ret_code          = 4
        OTHERS            = 5.

DOCU_GET
  CALL FUNCTION 'DOCU_GET'
    EXPORTING
      id                = lv_docu_type
      langu             = sy-langu
      object            = lv_docu_name
    IMPORTING
      head              = ls_header
    TABLES
      line              = lt_itf
    EXCEPTIONS
      no_docu_on_screen = 1
      no_docu_self_def  = 2
      no_docu_temp      = 3
      ret_code          = 4
      OTHERS            = 5.

DDIF_DTEL_GET
  CALL FUNCTION 'DDIF_DTEL_GET'
    EXPORTING
      name          = dtel_name
      state         = 'A'
      langu         = sy-langu
    IMPORTING
      dd04v_wa      = dtel_header
    EXCEPTIONS
      illegal_input = 1
      OTHERS        = 2.

REUSE_ALV_FIELDCATALOG_MERGE
  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name         = 'RFTP_CHECK_MEAL_CODE'
      i_internal_tabname     = 'LT_ALV'
      i_inclname             = 'RFTP_CHECK_MEAL_CODE'
    CHANGING
      ct_fieldcat            = t_fieldcat
    EXCEPTIONS
      inconsistent_interface = 1
      program_error          = 2
      OTHERS                 = 3.

REUSE_ALV_EVENTS_GET
  CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type = 0
    IMPORTING
      et_events   = lt_events.

REUSE_ALV_GRID_DISPLAY
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program          = 'RFTP_CHECK_MEAL_CODE'
*      i_callback_html_top_of_page = 'HTML_TOP_OF_PAGE'
      i_grid_title                = lv_grid_title
      is_layout                   = wa_layout_alv
      it_fieldcat                 = t_fieldcat
*      it_events                   = lt_events
*      i_html_height_top           = '30'
    TABLES
      t_outtab                    = lt_p0471_ext
    EXCEPTIONS
      program_error               = 1
      OTHERS                      = 2.

HR_READ_INFOTYPE_AUTHC_DISABLE
  CALL FUNCTION 'HR_READ_INFOTYPE_AUTHC_DISABLE'.

HR_READ_INFOTYPE
  CALL FUNCTION 'HR_READ_INFOTYPE'
    EXPORTING
      pernr           = p_pernr
      infty           = '0105'
      begda           = sy-datum
      endda           = sy-datum
    TABLES
      infty_tab       = lt_p0105
    EXCEPTIONS
      infty_not_found = 1
      OTHERS          = 2.

BAPI_EMPLOYEE_GETDATA
*  CALL FUNCTION 'BAPI_EMPLOYEE_GETDATA'
*    EXPORTING
*      employee_id   = i_personnel_number
*    TABLES
*      communication = lt_person_comm.

DD_DOMVALUE_TEXT_GET
  CALL FUNCTION 'DD_DOMVALUE_TEXT_GET'
    EXPORTING
      domname  = p_domname
      value    = lv_value
      langu    = sy-langu
    IMPORTING
      dd07v_wa = ls_dd07v.