Query design Enhancement

来源：互联网发布：淘宝卖家如何设置打折编辑：程序博客网时间：2024/06/05 15:50

*------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-------------*