DBA Data[Home] [Help]

PACKAGE BODY: APPS.OTA_EVAL_XMLP_PKG

Source


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