date + 7 working days

Question

I need to write a function that will give me a new due date for an invoice. This needs to be 12 working days after the current due date Say the current due date is 01.Oct.2014. If I look at my calendar manually, I can see that the new date would be 17.Oct.2014 (need to exclude weekends).

However, I also have a table with Bank Holidays. This would have to be taken into consideration. So if I would have a Bank Holiday on 04.Oct.2014, the new due date should be 18.Oct.2014.

EDIT: My table with Bank Holidays would look something like this:

Year: Date: Description

2014 04.Oct.2014 Bank Holiday 1

Any help with this would be deeply appreciated, I'm stuck at this for almost a day now.

Thanks a lot in advance.

Kind regards

Gerben

Do you store the Holiday dates in a table? Post a test case of what you are trying to do. What are the tables involved? — Lalit Kumar B
Hi Lalit, the question has an example. My function had an IN parameter with the current due date. I need to add 12 working days, excluding the bank holidays. The table with Bank Holidays is called bank_holidays — Gerben
So add a CASE construct, such that if any of the dates in bank_holidays table is BETWEEN your current_due_date and current_due_date + 12, then add equal number of days for those bank holidays. — Lalit Kumar B

Bart van der Drift Bart van der Drift · Accepted Answer · 2014-09-18T12:09:14

Something like this should work:

DECLARE
  l_date DATE := SYSDATE;

  FUNCTION IS_WEEKEND(P_DATE IN DATE)
    RETURN BOOLEAN
  IS
    l_daynum VARCHAR2(1) := to_char (P_DATE, 'D');
  BEGIN
    RETURN l_daynum = '6' OR l_daynum = '7';
  END;

  FUNCTION IS_HOLIDAY(P_DATE IN DATE)
    RETURN BOOLEAN
  IS
    CURSOR c_exists IS
      SELECT 1 FROM bank_holidays WHERE date = TRUNC(P_DATE)
    ;
    l_count NUMBER;
  BEGIN
    OPEN c_exists;
    l_count := c_exists%ROWCOUNT;
    CLOSE c_exists;
    RETURN l_count > 0;
  END;

  PROCEDURE ADD_WORKING_DAYS(P_DATE IN OUT DATE, P_DAYS IN NUMBER)
  IS
    l_workdays_added NUMBER := 0;
  BEGIN
    WHILE TRUE
    LOOP
      P_DATE := P_DATE + 1;
      IF NOT IS_WEEKEND(P_DATE) AND NOT IS_HOLIDAY(P_DATE) THEN
        l_workdays_added := l_workdays_added + 1;
      END IF;
      IF l_workdays_added = P_DAYS THEN
        RETURN;
      END IF;
    END LOOP;
  END;

BEGIN
  ADD_WORKING_DAYS(l_date, 12);
END;

date + 7 working days

2 Answers