[Home] [Help]
PACKAGE BODY: APPS.PA_PAXRWLCO_XMLP_PKG
Source
1 PACKAGE BODY PA_PAXRWLCO_XMLP_PKG AS
2 /* $Header: PAXRWLCOB.pls 120.0 2008/01/02 11:58:44 krreddy noship $ */
3
4 FUNCTION get_company_name RETURN BOOLEAN IS
5 l_name gl_sets_of_books.name%TYPE;
6 BEGIN
7 SELECT gl.name
8 INTO l_name
9 FROM gl_sets_of_books gl,pa_implementations pi
10 WHERE gl.set_of_books_id = pi.set_of_books_id;
11
12 c_company_name_header := l_name;
13
14 RETURN (TRUE);
15
16 EXCEPTION
17
18 WHEN OTHERS THEN
19 RETURN (FALSE);
20
21 END;
22
23 function BeforeReport return boolean is
24 begin
25
26
27
28 declare
29
30 init_error exception;
31 Org_Name hr_organization_units.name%TYPE;
32 Sort_By_Name pa_lookups.meaning%TYPE;
33
34 begin
35
36 /*srw.user_exit('FND SRWINIT');*/null;
37
38
39
40 if START_ORG_ID is not NULL then
41 select substr(name,1,60) into Org_Name from
42 hr_organization_units
43 where organization_id = START_ORG_ID;
44 end if;
45 C_Org_Name := Org_Name;
46 if SORT_BY is not NULL then
47 select meaning into Sort_By_Name from pa_lookups
48 where lookup_code = SORT_BY
49 and lookup_type ='LABOR RATE SORT BY';
50 end if;
51 C_Sort_By_Name := Sort_By_Name;
52 if ( get_company_name <> TRUE ) then
53 raise init_error;
54 end if;
55
56 if ( get_start_org <> TRUE) then
57 raise init_error;
58 end if;
59
60 end;
61 return (TRUE);
62 end;
63
64 FUNCTION get_start_org RETURN BOOLEAN IS
65 c_start_organization_id number;
66
67
68 BEGIN
69 select
70 decode(start_org_id,null, start_organization_id,start_org_id)
71 into
72 c_start_organization_id
73 from
74 pa_implementations;
75
76 insert into
77 pa_org_reporting_sessions
78 (start_organization_id,session_id)
79 values
80 (c_start_organization_id,userenv('SESSIONID'));
81
82 RETURN (TRUE);
83
84 EXCEPTION
85 WHEN OTHERS THEN
86 RETURN (FALSE);
87
88 END;
89
90 function AfterReport return boolean is
91 begin
92
93 Begin
94 /*srw.user_exit('FND SRWEXIT');*/null;
95
96 Rollback;
97 End; return (TRUE);
98 end;
99
100 function BeforePForm return boolean is
101 begin
102
103 return (TRUE);
104 end;
105
106 function AfterPForm return boolean is
107 begin
108
109 return (TRUE);
110 end;
111
112 function BetweenPage return boolean is
113 begin
114
115 return (TRUE);
116 end;
117
118 function CF_Currency_CodeFormula return Char is
119 begin
120 return(pa_multi_currency.get_acct_currency_code);
121 end;
122
123 --Functions to refer Oracle report placeholders--
124
125 Function C_Company_Name_Header_p return varchar2 is
126 Begin
127 return C_Company_Name_Header;
128 END;
129 Function C_Org_Name_p return varchar2 is
130 Begin
131 return C_Org_Name;
132 END;
133 Function C_Sort_By_Name_p return varchar2 is
134 Begin
135 return C_Sort_By_Name;
136 END;
137 END PA_PAXRWLCO_XMLP_PKG ;
138