DBA Data[Home] [Help]

PACKAGE BODY: APPS.HXT_HXT951A_XMLP_PKG

Source


1 PACKAGE BODY HXT_HXT951A_XMLP_PKG AS
2 /* $Header: HXT951AB.pls 120.1 2008/03/26 09:41:24 amakrish noship $ */
3   FUNCTION HIGH1FORMULA(TOT_HOURS IN NUMBER
4                        ,HIGH IN NUMBER) RETURN NUMBER IS
5     HIGH1 NUMBER(8,2);
6   BEGIN
7     IF NVL(TOT_HOURS
8        ,0) > NVL(HIGH
9        ,0) THEN
10       HIGH1 := NVL(TOT_HOURS
11                   ,0) - NVL(HIGH
12                   ,0);
13     ELSE
14       HIGH1 := 0;
15     END IF;
16     RETURN HIGH1;
17   END HIGH1FORMULA;
18 
19   FUNCTION LOW1FORMULA(TOT_HOURS IN NUMBER
20                       ,LOW IN NUMBER) RETURN NUMBER IS
21     LOW1 NUMBER(8,2);
22   BEGIN
23     IF NVL(TOT_HOURS
24        ,0) < NVL(LOW
25        ,0) THEN
26       LOW1 := NVL(LOW
27                  ,0) - NVL(TOT_HOURS
28                  ,0);
29     ELSE
30       LOW1 := 0;
31     END IF;
32     RETURN LOW1;
33   END LOW1FORMULA;
34 
35   FUNCTION AVERAGE1FORMULA(TOT_HOURS IN NUMBER
36                           ,AVERAGE IN NUMBER) RETURN NUMBER IS
37     AVERAGE1 NUMBER(8,2);
38   BEGIN
39     AVERAGE1 := NVL(TOT_HOURS
40                    ,0) - NVL(AVERAGE
41                    ,0);
42     RETURN AVERAGE1;
43   END AVERAGE1FORMULA;
44 
45   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
46   BEGIN
47     P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
48     IF START_DATE IS NULL THEN
49       START_DATE := HR_GENERAL.START_OF_TIME;
50     END IF;
51     IF END_DATE IS NULL THEN
52       END_DATE := HR_GENERAL.END_OF_TIME;
53     END IF;
54     START_DATE1:=to_char(START_DATE,'DD-MON-YYYY');
55     END_DATE1:=to_char(END_DATE,'DD-MON-YYYY');
56     RETURN (TRUE);
57   END BEFOREREPORT;
58 
59   FUNCTION BEFOREPFORM RETURN BOOLEAN IS
60   BEGIN
61     RETURN (TRUE);
62   END BEFOREPFORM;
63 
64   FUNCTION AFTERREPORT RETURN BOOLEAN IS
65   BEGIN
66     RETURN (TRUE);
67   END AFTERREPORT;
68 
69 END HXT_HXT951A_XMLP_PKG;