*&---------------------------------------------------------------------*
*& Form get_last_date_of_month
*&---------------------------------------------------------------------*
* get last date of month
*----------------------------------------------------------------------*
* -->P_BEGDA is the date in month that you want to know last date
* <--P_ENDDA last date of month that system will return to you
*----------------------------------------------------------------------*
form get_last_date_of_month using p_begda
changing p_endda.
CALL FUNCTION ’LAST_DAY_OF_MONTHS’
EXPORTING
day_in = p_begda
IMPORTING
LAST_DAY_OF_MONTH = p_endda
EXCEPTIONS
DAY_IN_NO_DATE = 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.
endform. " get_last_date_of_month
