Added THE_PERIOD_TODAY procedure for denial tool

Added the procedure THE_PERIOD_TODAY because the denial tool in BANP is
calling it.