PACKAGE BODY: APPS.PO_POXFIPOL_XMLP_PKG

Source

1 PACKAGE BODY PO_POXFIPOL_XMLP_PKG AS
2 /* $Header: POXFIPOLB.pls 120.1 2007/12/25 10:58:08 krreddy noship $ */
3 
4 USER_EXIT_FAILURE EXCEPTION;
5 
6 function select_rev(revision_sort_ordering in varchar2) return character is
7 begin
8     if revision_sort_ordering is null then
9        return(', null revision_ordering');
10     else
11        return(', plc1.displayed_field revision_ordering');
12     end if;
13 RETURN NULL; end;
14 
15 function from_rev(revision_sort_ordering in varchar2) return character is
16 begin
17     if revision_sort_ordering is null then
18        return('  ');
19     else
20        return(', po_lookup_codes plc1');
21    end if;
22 RETURN NULL; end;
23 
24 function where_rev(revision_sort_ordering in varchar2) return character is
25 begin
26     if revision_sort_ordering is null then
27        return('AND 1=1');
28     else
29        return('and (plc1.lookup_type = ''REVISION SORT ORDERING'' and to_number(plc1.lookup_code) = fsp.revision_sort_ordering)');
30   end if;
31 RETURN NULL; end;
32 
33 function BeforeReport return boolean is
34 begin
35 po_moac_utils_pvt.set_org_context(204);
36 BEGIN
37   /*SRW.USER_EXIT('FND SRWINIT');*/null;
38 
39   EXCEPTION WHEN  USER_EXIT_FAILURE /*SRW.USER_EXIT_FAILURE */THEN
40             /*SRW.MESSAGE(1,'srw_init');*/null;
41 
42 END;
43 DECLARE
44 l_INDUSTRY      varchar2(100);
45 l_Oracle_schema  varchar2(100);
46 L_boolean_var boolean;
47 Begin
48 
49 L_boolean_var:=fnd_installation.GET_APP_INFO('PO',P_OE_STATUS,l_INDUSTRY,l_Oracle_schema);
50 
51 
52   /*srw.user_exit('FND INSTALLATION OUTPUT_TYPE="STATUS"
53                                  OUTPUT_FIELD="P_OE_STATUS"
54                                          APPS="ONT"') ;*/null;
55 
56   /*srw.message(1,'ONT Installation status is ' || P_OE_STATUS) ;*/null;
57 
58   EXCEPTION WHEN  USER_EXIT_FAILURE /*SRW.USER_EXIT_FAILURE */THEN
59             /*SRW.MESSAGE(1,'Failure to get ONT status.');*/null;
60 
61 End;
62 BEGIN
63 
64  null;
65   EXCEPTION WHEN  USER_EXIT_FAILURE /*SRW.USER_EXIT_FAILURE */THEN
66             /*SRW.MESSAGE(1,'Before Acc Flex');*/null;
67 
68 END;
69 RETURN TRUE;   return (TRUE);
70 end;
71 
72 function AfterReport return boolean is
73 begin
74 
75 /*SRW.USER_EXIT('FND SRWEXIT');*/null;
76   return (TRUE);
77 end;
78 
79 function C_select_order_typeFormula return VARCHAR2 is
80 begin
81 
82 if (P_OE_STATUS = 'I' ) then return ('sot.name') ;
83 else return('null') ;
84 end if;
85 RETURN NULL; end;
86 
87 function C_select_order_sourceFormula return VARCHAR2 is
88 begin
89 
90 if (P_OE_STATUS = 'I' ) then return ('sos.name') ;
91 else return('null') ;
92 end if;
93 RETURN NULL; end;
94 
95 function C_select_oe_tablesFormula return VARCHAR2 is
96 begin
97 
98 if (P_OE_STATUS = 'I' ) then return (',so_order_types sot,so_order_sources sos') ;
99 else return('  ') ;
100 end if;
101 RETURN NULL; end;
102 
103 function C_from_oe_clauseFormula return VARCHAR2 is
104 begin
105 
106 if (P_OE_STATUS = 'I') then return(' psp1.order_type_id=sot.order_type_id(+) AND psp1.order_source_id=sos.order_source_id(+)') ;
107 else return(' 1=1');
108 end if;
109 
110 RETURN NULL; end;
111 
112 --Functions to refer Oracle report placeholders--
113 
114 END PO_POXFIPOL_XMLP_PKG ;
115