[Home] [Help]
PACKAGE BODY: APPS.PA_PAXRWPRT_XMLP_PKG
Source
1 PACKAGE BODY PA_PAXRWPRT_XMLP_PKG AS
2 /* $Header: PAXRWPRTB.pls 120.0 2008/01/02 12:12:14 krreddy noship $ */
3
4 FUNCTION get_company_name RETURN BOOLEAN IS
5 l_name gl_sets_of_books.name%TYPE;
6 BEGIN
7
8 select name
9 into l_name
10 from gl_sets_of_books
11 where set_of_books_id = fnd_profile.value('GL_SET_OF_BKS_ID');
12
13
14 c_company_name_header := l_name;
15
16 RETURN (TRUE);
17
18 EXCEPTION
19
20 WHEN OTHERS THEN
21 RETURN (FALSE);
22
23 END;
24
25 function BeforeReport return boolean is
26 begin
27
28
29 declare
30 init_error exception;
31 begin
32 /*srw.user_exit('FND SRWINIT');*/null;
33
34 if ( get_company_name <> TRUE ) then
35 raise init_error;
36 end if;
37 end; return (TRUE);
38 end;
39
40 function AfterReport return boolean is
41 begin
42 /*srw.user_exit('FND SRWEXIT') ;*/null;
43
44 return (TRUE);
45 end;
46
47 --Functions to refer Oracle report placeholders--
48
49 Function C_Company_name_header_p return varchar2 is
50 Begin
51 return C_Company_name_header;
52 END;
53 END PA_PAXRWPRT_XMLP_PKG ;
54