Query design Enhancement

最新推荐文章于 2024-05-14 14:56:49 发布

supergukai

最新推荐文章于 2024-05-14 14:56:49 发布

阅读量289

点赞数 1

文章标签： query date function

本文链接：https://blog.csdn.net/supergukai/article/details/4384698

版权

*------to get the day of this week-----------------* WHEN 'ZSD_V031CE'. IF i_step = 1. l_date = sy-datum. call function 'DATE_GET_WEEK' EXPORTING date = l_date IMPORTING week = l_week. call function 'WEEK_GET_FIRST_DAY' EXPORTING week = l_week IMPORTING Date = l_date. L_S_RANGE-LOW = l_date. L_S_RANGE-SIGN = 'I'. L_S_RANGE-OPT = 'EQ'. append L_S_RANGE to E_T_RANGE. ENDIF. *------to get the day of next week-----------------* WHEN 'ZSD_V032CE'. IF i_step = 1. l_date = sy-datum - 7. call function 'DATE_GET_WEEK' EXPORTING date = l_date IMPORTING week = l_week. call function 'WEEK_GET_FIRST_DAY' EXPORTING week = l_week IMPORTING Date = l_date. L_S_RANGE-LOW = l_date. L_S_RANGE-SIGN = 'I'. L_S_RANGE-OPT = 'EQ'. append L_S_RANGE to E_T_RANGE. ENDIF. When 'ZSD_TD01N'. IF i_step = 2. LOOP AT i_t_var_range INTO l_var_range WHERE vnam = 'ZSD_V031CE'. CLEAR l_s_range. l_s_range-low = l_var_range-low. l_s_range-sign = 'I'. l_s_range-opt = 'EQ'. APPEND l_s_range TO e_t_range. EXIT. ENDLOOP. ENDIF. When 'ZSD_TD02N'. IF i_step = 2. LOOP AT i_t_var_range INTO l_var_range WHERE vnam = 'ZSD_V032CE'. CLEAR l_s_range. l_s_range-low = l_var_range-low. l_s_range-sign = 'I'. l_s_range-opt = 'EQ'. APPEND l_s_range TO e_t_range. EXIT. ENDLOOP. ENDIF. *------------End By Kai.GU 2008-09-04-------------*