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;