Expand event_at_lactation() functionality

Expand event_at_lactation() functionality

I'd like to be able to return the date of enrollment for a specific protocol. 
Check the attached image for an example.