Adjust ( $Date, 0, 0, 15 );  # or
Adjust ( $Date, 0, -1, 0 );  # or
Adjust ( $Date, -3, 0, -1 );