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.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