输出警告灯

    CALL FUNCTION 'ICON_CREATE'
      EXPORTING
        name                  = 'ICON_GREEN_LIGHT'
        info                  = 'Status'
        text                  = l_msg
        add_stdinf            = 'X'
      IMPORTING
        RESULT                = lc_msg
      EXCEPTIONS
        icon_not_found        = 1
        outputfield_too_short = 2
        OTHERS                = 3.