abap函数之RSDC_SHOW_MESSAGES_POPUP
用法举例:
定义变量
DATA ZZI_TXT(20) TYPE C.”消息框抬头
DATA ZZMSG TYPE RS_T_MSG WITH HEADER LINE. “消息行(内表)
DATA ZZSYMSGV TYPE SYMSGV.
赋值
loop at itab[].
ZZI_TXT = ‘注意事项:’.
IF SY-SUBRC NE 0.
CONCATENATE ‘在会计年度’ S_HKRQ-LOW(4) ‘中’ INTO ZZSYMSGV.
ZZMSG-MSGTY = ‘E’.
ZZMSG-MSGID = ‘S000’.
ZZMSG-MSGNO = ‘000’.
ZZMSG-MSGV1 = ‘外部物料组’.
ZZMSG-MSGV2 = itab-EXTWG.
ZZMSG-MSGV3 = ZZSYMSGV.
ZZMSG-MSGV4 = ‘没有维护奖罚系数,请联系财务经理!’.
APPEND ZZMSG.
ENDIF.
endloop.
调用函数
IF ZZMSG[] IS NOT INITIAL.
CALL FUNCTION ‘RSDC_SHOW_MESSAGES_POPUP’
EXPORTING
I_T_MSG = ZZMSG[]
I_TXT = ZZI_TXT
I_WITH_S_ON_EMPTY = ” “leace blank for false, ‘x” for true.
I_ONE_MSG_DIRECT = ”
I_ONE_MSG_TYPE_S = ”
* IMPORTING
* E_S_EXIT_COMMAND =
.
注意事项:
下面的三个参数要传入”,否则弹不出窗口,信息会显示在消息栏上!
I_WITH_S_ON_EMPTY = ” “leace blank for false, ‘x” for true.
I_ONE_MSG_DIRECT = ”
I_ONE_MSG_TYPE_S = ”
本文作者: GavinDong
版权属于: GavinDong博客
文章链接: https://gavindong.com/386.html
如果使用过程中遇到问题,可 **点击此处** 交流沟通。
版权所有,转载时必须以链接形式注明作者和原始出处及本声明。
评论列表(4条)
MESSAGE ‘Warning Message’ TYPE ‘I’ DISPLAY LIKE ‘W’.
Try POPUP* in se37 and find the function modules which suits your requirement
FC_POPUP_ERR_WARN_MESSAGE这个函数有个缺点,不能很好的识别中文,如果使用中文、弹出的窗口宽度非常小、会掩藏掉汉字。
可以塞一部分英文进去!!
其他参考:
CALL FUNCTION ‘POPUP_TO_INFORM’
EXPORTING
titel = w_titel
txt1 = w_txt
txt2 = ‘ ‘
txt3 = ‘ ‘
txt4 = ‘ ‘.