ABAP-获取某月最后一天函数

复制代码
 1 "定义变量
 2 DATA:lv_begin TYPE vtbbewe-dvalut,
 3      lv_end   TYPE vtbbewe-dvalut.
 4 
 5 "获取月份
 6 SELECT SINGLE mnr
 7   INTO @DATA(lv_mnr)
 8   FROM t247
 9   WHERE spras = @sy-langu
10   AND mnr IN @s_monat.
11 
12 "拼接年月日
13 CONCATENATE s_gjahr-low lv_mnr '01' INTO lv_begin.
14 
15 "获取最后一天
16 CALL FUNCTION 'LAST_DAY_OF_MONTHS'
17   EXPORTING
18     day_in            = lv_begin
19   IMPORTING
20     last_day_of_month = lv_end
21   EXCEPTIONS
22     day_in_no_date    = 1
23     OTHERS            = 2.
复制代码
posted @   TigerMan  阅读(1361)  评论(0编辑  收藏  举报
相关博文:
阅读排行:
· 在鹅厂做java开发是什么体验
· 百万级群聊的设计实践
· WPF到Web的无缝过渡:英雄联盟客户端的OpenSilver迁移实战
· 永远不要相信用户的输入:从 SQL 注入攻防看输入验证的重要性
· 浏览器原生「磁吸」效果!Anchor Positioning 锚点定位神器解析
点击右上角即可分享
微信分享提示