1 PACKAGE BODY ota_eval_xmlp_pkg AS
2 /* $Header: otaevalxmlp.pkb 120.2 2008/01/08 10:14:06 aabalakr noship $ */
3
4 FUNCTION C_ACTIVITY_VERSION_NAME_p RETURN varchar2 IS
5 cursor c_activity_version is
6 select version_name
7 from ota_activity_versions_tl
8 where activity_version_id = P_ACTIVITY_ID
9 and language = userenv('LANG');
10 BEGIN
11 if P_ACTIVITY_ID is not null then
12 open c_activity_version;
13 fetch c_activity_version into c_activity_version_name;
14 close c_activity_version;
15 end if;
16 return c_activity_version_name;
17 END C_ACTIVITY_VERSION_NAME_p;
18
19 FUNCTION C_EVENT_TITLE_p RETURN varchar2 IS
20 cursor c_event is
21 select title
22 from ota_events_tl
23 where event_id = P_EVENT_ID
24 and language = userenv('LANG') ;
25 BEGIN
26 open c_event;
27 fetch c_event into c_event_title;
28 close c_event;
29 return c_event_title;
30 END C_EVENT_TITLE_p;
31
32 FUNCTION C_ANSWER_TYPE_p RETURN varchar2 IS
33 cursor c_lookup_code is
34 select es.meaning
35 from hr_lookups es
36 WHERE es.lookup_type='OTA_EVAL_REPORT_TYPE'
37 AND sysdate BETWEEN NVL(es.start_date_active,sysdate) AND NVL (es.end_date_active, sysdate)
38 AND es.enabled_flag ='Y'
39 AND es.lookup_code = P_ANSWER_TYPE ;
40
41 BEGIN
42 open c_lookup_code;
43 fetch c_lookup_code into C_ANSWER_TYPE;
44 close c_lookup_code;
45 return C_ANSWER_TYPE;
46 END C_ANSWER_TYPE_p;
47
48 Function C_FROM_DATE_p return varchar2 is
49 Begin
50 select fnd_date.date_to_displaydate(to_date(substr((P_FROM_DATE),1,10),'yyyy/mm/dd'))
51 into C_FROM_DATE
52 from dual;
53 return C_FROM_DATE;
54 END;
55
56 Function C_TO_DATE_p return varchar2 is
57 Begin
58 select fnd_date.date_to_displaydate(to_date(substr((P_TO_DATE),1,10),'yyyy/mm/dd'))
59 into C_TO_DATE
60 from dual;
61 return C_TO_DATE;
62 END;
63
64
65 END ota_eval_xmlp_pkg;
66