DATA:
diffdays TYPE i,
datestring LIKE sy-datum,
BEGIN OF daterec,
year(4) TYPE c,
month(2) TYPE c,
day(2) TYPE c,
END OF daterec.
daterec = sy-datum.
daterec-day = ‘01′. “ first day of month
datestring = daterec.
datestring = datestring - 1. “ last day of previous month
diffdays = sy-datum - datestring. “ difference days
Write diffdays .