Date logic needed

Question

select-options : mbadat for eban-badat.
I wish to restrict my user on selection screen.
As soon as user enters the date range it should validate that date range should not be greater than one month.
& i wish to restric multiple selection.
Plz guide.

Answer 1

Data : v_days type PEA_SCRDD.
if mbadat is not INITIAL.
    CALL FUNCTION 'HR_HK_DIFF_BT_2_DATES'
      EXPORTING
        DATE1                         = mbadat-high
        DATE2                         = mbadat-low
       OUTPUT_FORMAT                 = '02'
    IMPORTING
      YEARS                         =
      MONTHS                        =
        DAYS                          = v_days
    EXCEPTIONS
      INVALID_DATES_SPECIFIED       = 1
      OTHERS                        = 2
    IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    IF v_days > 31.
      MESSAGE 'Date Range should be less than 1 Month' TYPE 'E'.
    ENDIF.
  endif.
i hav defined this way but its giving dump for v_days.