PACKAGE BODY: APPS.PER_PERBGSYN_XMLP_PKG

Source

1 PACKAGE BODY PER_PERBGSYN_XMLP_PKG AS
2 /* $Header: PERBGSYNB.pls 120.1 2007/12/06 11:24:54 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           PARTY_ID
12         INTO
13           C_PERSON_NAME
14           ,C_PARTY_ID
15         FROM
16           PER_ALL_PEOPLE_F
17         WHERE BUSINESS_GROUP_ID = P_BUSINESS_GROUP_ID
18           AND PERSON_ID = P_PERSON_ID
19           AND C_EFFECTIVE_DATE between EFFECTIVE_START_DATE
20           AND EFFECTIVE_END_DATE;
21       EXCEPTION
22         WHEN OTHERS THEN
23           NULL;
24       END;
25     END IF;
26     BEGIN
27       SELECT
28         NAME
29       INTO
30         C_BUSINESS_GROUP_NAME
31       FROM
32         PER_BUSINESS_GROUPS
33       WHERE BUSINESS_GROUP_ID = P_BUSINESS_GROUP_ID;
34     EXCEPTION
35       WHEN OTHERS THEN
36         NULL;
37     END;
38     RETURN (TRUE);
39   END BEFOREREPORT;
40 
41   FUNCTION AFTERREPORT RETURN BOOLEAN IS
42   BEGIN
43 /*  HR_STANDARD.EVENT('AFTER REPORT');*/
44     RETURN (TRUE);
45   END AFTERREPORT;
46 
47   FUNCTION C_PERSON_NAME_P RETURN VARCHAR2 IS
48   BEGIN
49     RETURN C_PERSON_NAME;
50   END C_PERSON_NAME_P;
51 
52   FUNCTION C_EFFECTIVE_DATE_P RETURN DATE IS
53   BEGIN
54     RETURN C_EFFECTIVE_DATE;
55   END C_EFFECTIVE_DATE_P;
56 
57   FUNCTION C_BUSINESS_GROUP_NAME_P RETURN VARCHAR2 IS
58   BEGIN
59     RETURN C_BUSINESS_GROUP_NAME;
60   END C_BUSINESS_GROUP_NAME_P;
61 
62   FUNCTION C_PARTY_ID_P RETURN NUMBER IS
63   BEGIN
64     RETURN C_PARTY_ID;
65   END C_PARTY_ID_P;
66 
67 END PER_PERBGSYN_XMLP_PKG;