SAP的 消息 弹出窗口（备忘）

DATA: i_smesg TYPE tsmesg WITH HEADER LINE.


   i_smesg-msgty = 'E'.
   i_smesg-arbgb = '00'.
   i_smesg-txtnr = '001'.
   i_smesg-msgv1 = 'test1'.
   i_smesg-msgv2 = '箱码未扫描装车'.
   i_smesg-msgv3 = ''.
   APPEND i_smesg.

 IF i_smesg[] IS NOT INITIAL.
   CLEAR i_smesg.
   i_smesg-msgty = 'E'.
   i_smesg-arbgb = '00'.
   i_smesg-txtnr = '001'.
   i_smesg-msgv1 = '下列箱码未扫描装车'.
   INSERT i_smesg INDEX 1.

   CALL FUNCTION 'FB_MESSAGES_DISPLAY_POPUP'
     EXPORTING
       it_smesg        = i_smesg[]
     EXCEPTIONS
       no_messages     = 1
       popup_cancelled = 2
       OTHERS          = 3.
   IF sy-subrc <> 0.
     RETURN.
   ENDIF.
 ENDIF.