PACKAGE BODY: APPS.PER_PERWSDUP_XMLP_PKG

Source

1 PACKAGE BODY PER_PERWSDUP_XMLP_PKG AS
2 /* $Header: PERWSDUPB.pls 120.1 2007/12/06 11:34:30 amakrish noship $ */
3   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4   BEGIN
5     --HR_STANDARD.EVENT('BEFORE REPORT');
6     C_EFFECTIVE_DATE := FND_DATE.CANONICAL_TO_DATE(P_EFFECTIVE_DATE);
7     IF P_PERSON_ID IS NOT NULL THEN
8       BEGIN
9         SELECT
10           FULL_NAME
11         INTO
12           C_PERSON_NAME
13         FROM
14           PER_ALL_PEOPLE_F
15         WHERE BUSINESS_GROUP_ID = P_BUSINESS_GROUP_ID
16           AND PERSON_ID = P_PERSON_ID
17           AND C_EFFECTIVE_DATE between EFFECTIVE_START_DATE
18           AND EFFECTIVE_END_DATE;
19       EXCEPTION
20         WHEN OTHERS THEN
21           NULL;
22       END;
23     END IF;
24     BEGIN
25       SELECT
26         NAME
27       INTO
28         C_BUSINESS_GROUP_NAME
29       FROM
30         PER_BUSINESS_GROUPS
31       WHERE BUSINESS_GROUP_ID = P_BUSINESS_GROUP_ID;
32     EXCEPTION
33       WHEN OTHERS THEN
34         NULL;
35     END;
36     RETURN (TRUE);
37   END BEFOREREPORT;
38 
39   FUNCTION AFTERREPORT RETURN BOOLEAN IS
40   BEGIN
41     --HR_STANDARD.EVENT('AFTER REPORT');
42     RETURN (TRUE);
43   END AFTERREPORT;
44 
45   FUNCTION C_PERSON_NAME_P RETURN VARCHAR2 IS
46   BEGIN
47     RETURN C_PERSON_NAME;
48   END C_PERSON_NAME_P;
49 
50   FUNCTION C_EFFECTIVE_DATE_P RETURN DATE IS
51   BEGIN
52     RETURN C_EFFECTIVE_DATE;
53   END C_EFFECTIVE_DATE_P;
54 
55   FUNCTION C_BUSINESS_GROUP_NAME_P RETURN VARCHAR2 IS
56   BEGIN
57     RETURN C_BUSINESS_GROUP_NAME;
58   END C_BUSINESS_GROUP_NAME_P;
59 
60 END PER_PERWSDUP_XMLP_PKG;