弹窗显示错误信息(ZSDR045程序)
*$---------------------------------------------$*
* 弹窗显示
*$---------------------------------------------$*
DATA: lv_msg TYPE string.
DATA: lv_lines TYPE i.
DATA: lv_count TYPE i.
DATA: BEGIN OF lt_message OCCURS 0,
msgid LIKE sy-msgid,
msgty LIKE sy-msgty,
msgno LIKE sy-msgno,
msgv1 LIKE sy-msgv1,
msgv2 LIKE sy-msgv2,
msgv3 LIKE sy-msgv3,
msgv4 LIKE sy-msgv4,
lineno LIKE mesg-zeile,
END OF lt_message.
DATA: lv_msgty LIKE sy-msgty.
lv_msgty = 'E'.
CONCATENATE '新年快乐!!' '' INTO lv_msg.
lt_message-lineno = lv_count.
lt_message-msgid = 'ZSD0SD'.
lt_message-msgty = lv_msgty.
lt_message-msgno = '000'.
lt_message-msgv1 = lv_msg.
APPEND lt_message.
CLEAR lt_message.
CALL FUNCTION 'C14Z_MESSAGES_SHOW_AS_POPUP'
TABLES
i_message_tab = lt_message.
CLEAR lt_message.