1 PACKAGE BODY pqp_uk_ps_ff_functions as
2 /* $Header: pqukpsfn.pkb 120.1 2005/05/30 00:12:51 rvishwan noship $ */
3 FUNCTION date_diff(p_greater_date IN DATE ,
4 p_smaller_date IN DATE ) RETURN NUMBER IS
5 l_diff_days NUMBER;
6 BEGIN
7 IF (p_greater_date >= p_smaller_date) THEN
8 l_diff_days := p_greater_date - p_smaller_date + 1;
9 ELSE
10 l_diff_days := 9999999;
11 END IF;
12 RETURN l_diff_days;
13 END date_diff;
14 END pqp_uk_ps_ff_functions;