Something like:

(format-time-string
(car org-time-stamp-formats)
(time-add (current-time) (seconds-to-time (* days 60 60 24))))

Sylvain.