Hi Marvin,
If you date information is entered correctly the following code should work for you:
gen monthonly = month(date)
If that doesn't work for you it's probably the date variable that not set up correctly, based on the information provided in your question I expect this will be a problem (hopefully I'm wrong). Try setting up a new date field.
gen eventdate = date(DateToday, "DMY")
Take care, Mike