如何借用SAP标准日志处理显示工具

 

我将以前项目做得代码截取一部分出来供大家参考；

懒得整理了，大家看的时候自己在处理一下；

SE38：SBAL*
类：CL_ISU_ERROR_LOG

 data ERROR_LOG type ref to CL_ISU_ERROR_LOG.
  data MSGV1 type SYMSGV.
  data ORGANIZE type ZPMORGANIZE.
  create object ERROR_LOG.
  clear LS_CHECK.
  if MASTERDATA-AUART = 'PM04'.
    call method ERROR_LOG->ADD_MESSAGE
      exporting
        X_MSGID = '38'
        X_MSGTY = 'E'
        X_MSGNO = '000'
        X_MSGV1 = '检修类型维护错误！'.
    LS_CHECK  = 'X'.
  endif.

*-->检查订单类型
  if MASTERDATA-AUART <> SPACE.
    select single AUART into MASTERDATA-AUART from T003O where AUART = MASTERDATA-AUART and AUTYP = '30'.
    if SY-SUBRC <> 0.
      call method ERROR_LOG->ADD_MESSAGE
        exporting
          X_MSGID = '38'
          X_MSGTY = 'E'
          X_MSGNO = '000'
          X_MSGV1 = '订单类型维护错误！'.
      LS_CHECK  = 'X'.
    endif.
  endif.

*检查KKS码
  select single TPLNR into MASTERDATA-TPLNR from ILOA where TPLNR = MASTERDATA-TPLNR
                           and SWERK = MASTERDATA-WERKS.
  if SY-SUBRC <> 0.
    call method ERROR_LOG->ADD_MESSAGE
      exporting
        X_MSGID = '38'
        X_MSGTY = 'E'