IREAD_NOTIFICATIONS SAP ABAP Report - Send Notification

IREAD_NOTIFICATIONS is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for In 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 IREAD_NOTIFICATIONS into the relevant SAP transactions such as SE38 or SE80

Transaction Code(s):

Below is a list of transaction codes which are relevant to this SAP report

INOT - Create SM/PM Notification IDoc

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 IREAD_NOTIFICATIONS

INCLUDE IREAD_NOTIF_TOP.

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:

I_SMPM_START_IDOC_CHECK
  CALL FUNCTION 'I_SMPM_START_IDOC_CHECK'
    EXPORTING
      transac_code = sy-tcode    "transaction code
    IMPORTING
      msgno        = msgno       "error message number
    EXCEPTIONS
      OTHERS       = 1.

I_SMPM_START_IDOC_PROCESS
  CALL FUNCTION 'I_SMPM_START_IDOC_PROCESS'
    EXPORTING
      recv_sys     = recv_sys
      message_type = message_type
    IMPORTING
      msgno        = msgno
      msgv1        = msgv1
    EXCEPTIONS
      OTHERS       = 1.

I_STATUS_SELECT
  CALL FUNCTION 'I_STATUS_SELECT'
    EXPORTING
      objnr               = diqmel-objnr
      sent_user_status    = p_ustat
    IMPORTING
      selected            = status_select
      current_user_status = current_status
      next_user_status    = next_status
      user_status_profile = ustat_profile
    TABLES
      syst_status_incl    = s_incnss
      syst_status_excl    = s_excnss
      user_status_incl    = s_incnus
      user_status_excl    = s_excnus.

I_SMPM_DEPTRESP_GET
  CALL FUNCTION 'I_SMPM_DEPTRESP_GET'
    EXPORTING
      objnr          = diqmel-objnr
    IMPORTING
      dept_resp      = dept_resp
      dept_descr     = dept_resp_descr
      selected       = dept_resp_ok
    TABLES
      deptresp_range = s_d_resp.

ENQUEUE_EIQMEL
  CALL FUNCTION 'ENQUEUE_EIQMEL'
       EXPORTING
*           MODE_QMEL      = 'E'
*           MANDT          = SY-MANDT
            qmnum          = diqmel-qmnum
*           X_QMNUM        = ' '
*           _SCOPE         = '2'
*           _WAIT          = ' '
*           _COLLECT       = ' '
       EXCEPTIONS
            foreign_lock   = 1
            system_failure = 2
            OTHERS         = 3.

I_CHANGE_STATUS
  CALL FUNCTION 'I_CHANGE_STATUS' IN UPDATE TASK
    EXPORTING
      objnr          = diqmel-objnr
      estat_inactive = current_status
      estat_active   = next_status
      stsma          = ustat_profile
    EXCEPTIONS
      cannot_update  = 1
      OTHERS         = 2.

I_SMPM_EQUIPMENT_GET
  CALL FUNCTION 'I_SMPM_EQUIPMENT_GET'
    EXPORTING
      equnr   = diqmel-equnr
      langu   = diqmel-kzmla
    CHANGING
      techobj = f_techobj.

I_SMPM_FUNCLOC_GET
  CALL FUNCTION 'I_SMPM_FUNCLOC_GET'
    EXPORTING
      tplnr   = diqmel-tplnr
      langu   = diqmel-kzmla
    CHANGING
      techobj = f_techobj.

GET_ASSEMBLY_TEXT
    CALL FUNCTION 'GET_ASSEMBLY_TEXT'
         EXPORTING
              baugruppe      = f_techobj-bautl           "#EC DOM_EQUAL
*             werks          =
         IMPORTING
              baugruppentext = f_techobj-bautx.          "#EC DOM_EQUAL

IDOC_OUTPUT_INOTIF
  CALL FUNCTION 'IDOC_OUTPUT_INOTIF'
    EXPORTING
      target_sys       = recv_sys
      notif_header     = diqmel
      dept_resp        = dept_resp
      dept_resp_descr  = dept_resp_descr
      techobj          = f_techobj
    TABLES
      partners         = t_partners
      items            = t_items
      item_tasks       = t_item_tasks
      tasks            = t_tasks
    EXCEPTIONS
      idoc_not_created = 1
      OTHERS           = 2.

DEQUEUE_ALL
  CALL FUNCTION 'DEQUEUE_ALL'.

DEQUEUE_EIQMEL
  CALL FUNCTION 'DEQUEUE_EIQMEL'
     EXPORTING
*         MODE_QMEL = 'E'
*         MANDT     = SY-MANDT
          qmnum     = qmnum.

REUSE_ALV_GRID_DISPLAY
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program = gv_repid
      is_layout          = ls_layo
      it_fieldcat        = lt_fcat
      it_sort            = lt_sort
      it_events          = lt_evts
    TABLES
      t_outtab           = it_errors
    EXCEPTIONS
      program_error      = 1
      OTHERS             = 2.

REUSE_ALV_EVENTS_GET
  CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type     = 4
    IMPORTING
      et_events       = ct_events
    EXCEPTIONS
      list_type_wrong = 1
      OTHERS          = 2.