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 INDEX i_smesg 。1 。

   CALL  FUNCTION  ' FB_MESSAGES_DISPLAY_POPUP ' 
     EXPORTING 
       it_smesg         = i_smesg []
      例外
       no_messages      =1 
       popup_cancelled = 2 
       OTHERS           = 3 。
   IF SY-SUBRC <> 0 。
     RETURN。
   ENDIF 。
 ENDIF。