[Home] [Help]
PACKAGE BODY: APPS.HXT_HXT956C_XMLP_PKG
Source
1 PACKAGE BODY HXT_HXT956C_XMLP_PKG AS
2 /* $Header: HXT956CB.pls 120.0 2007/12/03 11:07:08 amakrish noship $ */
3
4 function earn_typeformula(arg_ELEMENT_TYPE_ID in number, arg_EFFECTIVE_START_DATE in date, arg_EFFECTIVE_END_DATE in date) return varchar2 is
5 EARN_TYPE VARCHAR2(80);
6 BEGIN
7 earn_type := ' ';
8 DECLARE
9 CURSOR C IS
10 SELECT ELTT.ELEMENT_NAME
11 FROM PAY_ELEMENT_TYPES_F ELT
12 ,PAY_ELEMENT_TYPES_F_TL ELTT
13 ,HXT_PAY_ELEMENT_TYPES_F_DDF_V ELTV
14 WHERE ELT.ELEMENT_TYPE_ID = arg_ELEMENT_TYPE_ID
15 AND elt.effective_start_date <= arg_EFFECTIVE_START_DATE
16 and elt.effective_end_date >= arg_EFFECTIVE_END_DATE
17 AND HXT_EARNING_CATEGORY = 'SDF'
18 AND ELT.element_type_id = eltt.element_type_id
19 AND ELTV.element_type_id = elt.element_type_id
20 and eltt.language = userenv('LANG');
21 BEGIN
22 earn_type := ' ';
23 IF arg_ELEMENT_TYPE_ID IS NULL THEN
24 EARN_TYPE := ' ';
25 ELSE
26 OPEN C;
27 FETCH C
28 INTO EARN_TYPE;
29 IF C%NOTFOUND THEN
30 RAISE NO_DATA_FOUND;
31 END IF;
32 CLOSE C;
33 END IF;
34 EXCEPTION
35 WHEN NO_DATA_FOUND
36 THEN EARN_TYPE := ' ';
37 when others
38 then /*srw.message(01,'Error -Earn Type '||earn_type);*/null;
39
40 END;
41
42 RETURN EARN_TYPE;
43 end;
44
45 function BeforePForm return boolean is
46 begin
47
48 return (TRUE);
49 end;
50
51 function AfterPForm return boolean is
52 begin
53
54 return (TRUE);
55 end;
56
57 function BeforeReport return boolean is
58 begin
59 /*SRW.USER_EXIT('FND SRWINIT');*/null;
60
61 return (TRUE);
62 end;
63
64 function BetweenPage return boolean is
65 begin
66
67 return (TRUE);
68 end;
69
70 function AfterReport return boolean is
71 begin
72 /*SRW.USER_EXIT('FND SRWEXIT');*/null;
73
74 return (TRUE);
75 end;
76
77 --Functions to refer Oracle report placeholders--
78
79 END HXT_HXT956C_XMLP_PKG ;