ME21N增强提示警告消息
2015-06-11 09:33
363 查看
在ME21N增强中,可以使用message的方法提示错误的消息,但警告消息使用message则提示不了,需要使用系统宏mmpur_message 提示。
data:begin of lw_equp,
lifnr like equp-lifnr,
quote like equp-quote,
qumng like equp-qumng,
end of lw_equp.
data:lt_equp like lw_equp occurs 0.
loop at tekpo.
clear lt_equp.
select equp~lifnr equp~quote equp~qumng into table lt_equp "取配额
from equp
join equk on equk~qunum = equp~qunum
where equk~matnr = tekpo-matnr
and equk~werks = tekpo-werks
and equk~bdatu >= sy-datum
and equk~vdatu <= sy-datum
and equp~quote ne 0.
loop at lt_equp into lw_equp.
mmpur_message 'W' 'ZAJB01' '008' tekpo-ebelp tekpo-matnr lw_equp-lifnr lw_equp-quote.
endloop.
endloop.
data:begin of lw_equp,
lifnr like equp-lifnr,
quote like equp-quote,
qumng like equp-qumng,
end of lw_equp.
data:lt_equp like lw_equp occurs 0.
loop at tekpo.
clear lt_equp.
select equp~lifnr equp~quote equp~qumng into table lt_equp "取配额
from equp
join equk on equk~qunum = equp~qunum
where equk~matnr = tekpo-matnr
and equk~werks = tekpo-werks
and equk~bdatu >= sy-datum
and equk~vdatu <= sy-datum
and equp~quote ne 0.
loop at lt_equp into lw_equp.
mmpur_message 'W' 'ZAJB01' '008' tekpo-ebelp tekpo-matnr lw_equp-lifnr lw_equp-quote.
endloop.
endloop.
相关文章推荐
- 数据清洗小记:“时间段”数据获取小心错误的习惯
- Bigtable: A Distributed Storage Systemfor Structured Data
- Android中的选择器selector的写法解析及不起作用原因
- C字符数组赋值(转)
- 总结-概念
- 移动Web开发技巧汇总(转)
- 安装lnmp
- SQL临时表&表变量
- VM克隆CentOS后设置IP
- PL/SQL Developer 9.x 注册码
- 东莞大学生资讯网
- 数据库生成Json
- 黑马程序员——Java基础—继承
- Enigma脱壳、Enigma过注册各个版本总结
- C语言合并字符串函数用法(strcat)
- UrlPager免费分页控件2.0版发布!
- js循环添加标签并判断添加的次数
- JQuery创建DOM节点的方法
- 游戏想要卖得好,试试美女救英雄(人民邮电报专栏《乐游记》58)
- 泛函编程(30)-泛函IO:Free Monad-Monad生产线