ABAP弹出消息框,如下所示(事务代码:CO15):
DATA lt_errormsg TYPE tsmesg. DATA ls_errormsg LIKE LINE OF lt_errormsg. DATA iv_aufnr TYPE aufk-aufnr. iv_aufnr = coruf-aufnr. CLEAR:lt_errormsg[], ls_errormsg. ls_errormsg-zeile = iv_aufnr. ls_errormsg-msgty = 'E'. ls_errormsg-arbgb = 'ZPP001'. ls_errormsg-txtnr = '000'. ls_errormsg-msgv1 = iv_aufnr. *ls_errormsg-msgv2 = iv_sum_aufm. *ls_errormsg-msgv3 = iv_sum_resb. APPEND ls_errormsg TO lt_errormsg. IF lt_errormsg[] IS NOT INITIAL. CALL FUNCTION 'FB_MESSAGES_DISPLAY_POPUP' EXPORTING IT_SMESG = lt_errormsg[] EXCEPTIONS NO_MESSAGES = 1 POPUP_CANCELLED = 2 OTHERS = 3. MESSAGE e000(zpp001) WITH iv_aufnr. ENDIF.