RANGES: S_BUDAT FOR AFRU-BUDAT. PARAMETERS: P_RPMAX(6) TYPE N DEFAULT SY-DATUM+0(6) CONCATENATE P_RPMAX '01' INTO G_FIRST. CALL FUNCTION 'DATE_GET_MONTH_LASTDAY' EXPORTING I_DATE = G_FIRST IMPORTING E_DATE = G_LAST. CLEAR S_BUDAT. S_BUDAT -SIGN = ' I ' . S_BUDAT -OPTION = ' BT ' . S_BUDAT-LOW = G_FIRST. S_BUDAT -HIGH = G_LAST. APPEND S_BUDAT.
Screen using a fixed month selected, the program was again alone assignment early date to the end of the month.