PACKAGE BODY: APPS.GL_GLXACDAL_XMLP_PKG

Source

1 PACKAGE BODY GL_GLXACDAL_XMLP_PKG AS
2 /* $Header: GLXACDALB.pls 120.0 2007/12/27 14:42:19 vijranga noship $ */
3 function BeforeReport return boolean is
4 begin
5   /*srw.user_exit('FND SRWINIT');*/null;
6   declare
7     errbuf     VARCHAR2(132);
8   begin
9     COA_NAME := gl_flexfields_pkg.get_coa_name(P_STRUCT_NUM);
10     exception
11       when NO_DATA_FOUND then
12         errbuf := gl_message.get_message('GL_PLL_ROUTINE_ERROR', 'N',
13                    'ROUTINE','gl_flexfields_pkg.get_coa_name');
14         /*srw.message('00', errbuf);*/null;
15         raise_application_error(-20101,null);/*srw.program_abort;*/null;
16   end;
17   /*srw.reference( P_STRUCT_NUM) ;*/null;
18  null;
19   /*srw.reference( P_STRUCT_NUM );*/null;
20  null;
21   /*srw.reference( P_STRUCT_NUM );*/null;
22   /*srw.reference( P_FLEX_LOW );*/null;
23   /*srw.reference( P_FLEX_HIGH );*/null;
24  null;
25   /*srw.reference( P_STRUCT_NUM );*/null;
26  null;
27   return (TRUE);
28 end;
29 function AfterReport return boolean is
30 begin
31   /*srw.user_exit('FND SRWEXIT');*/null;
32   return (TRUE);
33 end;
34 --Functions to refer Oracle report placeholders--
35  Function FLEX_SELECT_ALL_p return varchar2 is
36 	Begin
37 	 return FLEX_SELECT_ALL;
38 	 END;
39  Function FLEX_WHERE_ALL_p return varchar2 is
40 	Begin
41 	 return FLEX_WHERE_ALL;
42 	 END;
43  Function FLEX_ORDERBY_ALL_p return varchar2 is
44 	Begin
45 	 return FLEX_ORDERBY_ALL;
46 	 END;
47  Function FLEX_NODATA_SELECT_BAL_p return varchar2 is
48 	Begin
49 	 return FLEX_NODATA_SELECT_BAL;
50 	 END;
51  Function COA_NAME_p return varchar2 is
52 	Begin
53 	 return COA_NAME;
54 	 END;
55 END GL_GLXACDAL_XMLP_PKG ;
56 
57