DBA Data[Home] [Help]

PACKAGE BODY: APPS.PQH_PQHUSNNT_XMLP_PKG

Source


1 PACKAGE BODY PQH_PQHUSNNT_XMLP_PKG AS
2 /* $Header: PQHUSNNTB.pls 120.1 2007/12/07 06:56:20 vjaganat noship $ */
3   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4     L_LNAME VARCHAR2(150);
5     L_TITLE VARCHAR2(240);
6     L_EMPID VARCHAR2(30);
7     L_BODY_TEXT2 VARCHAR2(20);
8     L_BODY_TEXT3 VARCHAR2(20);
9     L_BODY_TEXT4 VARCHAR2(20);
10     L_BODY_TEXT5 VARCHAR2(20);
11     L_BODY_TEXT6 VARCHAR2(20);
12     L_BODY_TEXT7 VARCHAR2(20);
13     L_BODY_TEXT8 VARCHAR2(20);
14     L_HIREDATE DATE;
15     L_MANAGER_ID NUMBER;
16   BEGIN
17     P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
18     CP_BUSINESS_GROUP_NAME := GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID);
19     CP_LOGGED_USER_NAME := FND_PROFILE.VALUE('USERNAME');
20     L_MANAGER_ID := PQH_TENURE_DETAIL.GETPERSONSUPERVISOR(P_PERSON_ID);
21     CP_ACADEMIC_MANAGER_ADDRESS := PQH_TENURE_DETAIL.GETPERSONADDRESS(L_MANAGER_ID
22                                                                      ,P_BUSINESS_GROUP_ID);
23     CP_FACULTY_MEMBER_ADDRESS := PQH_TENURE_DETAIL.GETPERSONADDRESS(P_PERSON_ID
24                                                                    ,P_BUSINESS_GROUP_ID);
25     PQH_TENURE_DETAIL.GETPERSONINFO(P_PERSON_ID
26                                    ,L_EMPID
27                                    ,CP_FACULTY_MEMBER_NAME
28                                    ,CP_FACULTY_MEMBER_LNAME
29                                    ,CP_FACULTY_MEMBER_TITLE
30                                    ,CP_FACULTY_MEMBER_EMAIL
31                                    ,CP_CONTRACT_START_DATE);
32     PQH_TENURE_DETAIL.GETPERSONINFO(L_MANAGER_ID
33                                    ,L_EMPID
34                                    ,CP_ACADEMIC_MANAGER_NAME
35                                    ,L_LNAME
36                                    ,L_TITLE
37                                    ,CP_ACADEMIC_MANAGER_EMAIL
38                                    ,L_HIREDATE);
39     PQH_TENURE_DETAIL.GETREPORTBODYTEXT('NT'
40                                        ,CP_REGARDS
41                                        ,CP_BODY_TEXT
42                                        ,L_BODY_TEXT2
43                                        ,L_BODY_TEXT3
44                                        ,L_BODY_TEXT4
45                                        ,L_BODY_TEXT5
46                                        ,L_BODY_TEXT6
47                                        ,L_BODY_TEXT7
48                                        ,L_BODY_TEXT8);
49     CP_BODY_TEXT := REPLACE(CP_BODY_TEXT
50                            ,'COLLEGE_UNIVERSITY_NAME'
51                            ,CP_BUSINESS_GROUP_NAME);
52     CP_BODY_TEXT := REPLACE(CP_BODY_TEXT
53                            ,'EFFECTIVE_DATE'
54                            ,FND_DATE.DATE_TO_DISPLAYDATE(CP_CONTRACT_START_DATE));
55     CP_BODY_TEXT := REPLACE(CP_BODY_TEXT
56                             ,fnd_global.local_chr(38)
57                             ,'');
58     RETURN (TRUE);
59   END BEFOREREPORT;
60 
61   FUNCTION AFTERREPORT RETURN BOOLEAN IS
62   BEGIN
63   --  HR_STANDARD.EVENT('AFTER REPORT');
64     RETURN (TRUE);
65   END AFTERREPORT;
66 
67   FUNCTION CP_BUSINESS_GROUP_NAME_P RETURN VARCHAR2 IS
68   BEGIN
69     RETURN CP_BUSINESS_GROUP_NAME;
70   END CP_BUSINESS_GROUP_NAME_P;
71 
72   FUNCTION CP_BODY_TEXT_P RETURN VARCHAR2 IS
73   BEGIN
74     RETURN CP_BODY_TEXT;
75   END CP_BODY_TEXT_P;
76 
77   FUNCTION CP_FACULTY_MEMBER_NAME_P RETURN VARCHAR2 IS
78   BEGIN
79     RETURN CP_FACULTY_MEMBER_NAME;
80   END CP_FACULTY_MEMBER_NAME_P;
81 
82   FUNCTION CP_FACULTY_MEMBER_EMAIL_P RETURN VARCHAR2 IS
83   BEGIN
84     RETURN CP_FACULTY_MEMBER_EMAIL;
85   END CP_FACULTY_MEMBER_EMAIL_P;
86 
87   FUNCTION CP_FACULTY_MEMBER_ADDRESS_P RETURN VARCHAR2 IS
88   BEGIN
89     RETURN CP_FACULTY_MEMBER_ADDRESS;
90   END CP_FACULTY_MEMBER_ADDRESS_P;
91 
92   FUNCTION CP_FACULTY_MEMBER_TITLE_P RETURN VARCHAR2 IS
93   BEGIN
94     RETURN CP_FACULTY_MEMBER_TITLE;
95   END CP_FACULTY_MEMBER_TITLE_P;
96 
97   FUNCTION CP_ACADEMIC_MANAGER_NAME_P RETURN VARCHAR2 IS
98   BEGIN
99     RETURN CP_ACADEMIC_MANAGER_NAME;
100   END CP_ACADEMIC_MANAGER_NAME_P;
101 
102   FUNCTION CP_ACADEMIC_MANAGER_EMAIL_P RETURN VARCHAR2 IS
103   BEGIN
104     RETURN CP_ACADEMIC_MANAGER_EMAIL;
105   END CP_ACADEMIC_MANAGER_EMAIL_P;
106 
107   FUNCTION CP_ACADEMIC_MANAGER_ADDRESS_P RETURN VARCHAR2 IS
108   BEGIN
109     RETURN CP_ACADEMIC_MANAGER_ADDRESS;
110   END CP_ACADEMIC_MANAGER_ADDRESS_P;
111 
112   FUNCTION CP_LOGGED_USER_NAME_P RETURN VARCHAR2 IS
113   BEGIN
114     RETURN CP_LOGGED_USER_NAME;
115   END CP_LOGGED_USER_NAME_P;
116 
117   FUNCTION CP_CONTRACT_START_DATE_P RETURN VARCHAR2 IS
118   BEGIN
119     RETURN CP_CONTRACT_START_DATE;
120   END CP_CONTRACT_START_DATE_P;
121 
122   FUNCTION CP_FACULTY_MEMBER_LNAME_P RETURN VARCHAR2 IS
123   BEGIN
124     RETURN CP_FACULTY_MEMBER_LNAME;
125   END CP_FACULTY_MEMBER_LNAME_P;
126 
127   FUNCTION CP_REGARDS_P RETURN VARCHAR2 IS
128   BEGIN
129     RETURN CP_REGARDS;
130   END CP_REGARDS_P;
131 
132 
133   FUNCTION GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID IN NUMBER) RETURN VARCHAR2 IS
134     X0 VARCHAR2(2000);
135   BEGIN
136     X0 := HR_REPORTS.GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID);
137     RETURN X0;
138   END GET_BUSINESS_GROUP;
139 
140 END PQH_PQHUSNNT_XMLP_PKG;