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.