DBA Data[Home] [Help]

PACKAGE BODY: APPS.PO_POXSURLC_XMLP_PKG

Source


1 PACKAGE BODY PO_POXSURLC_XMLP_PKG AS
2 /* $Header: POXSURLCB.pls 120.1 2007/12/25 12:30:13 krreddy noship $ */
3 function orderby_clauseFormula return VARCHAR2 is
4 begin
5 if    P_SORT = 'COUNTRY' then
6        return('country');
7 elsif P_SORT = 'STATE' then
8        return('province');
9 elsif P_SORT = 'LOCATION' then
10        return('location_code');
11 end if;
12 RETURN 'location_code'; end;
13 function BeforeReport return boolean is
14 begin
15 declare
16 l_active_inactive    po_lookup_codes.displayed_field%type ;
17 l_sort     po_lookup_codes.displayed_field%type ;
18 l_site     po_lookup_codes.displayed_field%type ;
19 begin
20 /*SRW.USER_EXIT('FND SRWINIT');*/null;
21 if P_active_inactive is not null then
22     select displayed_field
23     into l_active_inactive
24     from po_lookup_codes
25     where lookup_code = P_active_inactive
26     and lookup_type = 'ACTIVE_INACTIVE';
27     P_active_inactive_disp := l_active_inactive ;
28 else
29     P_active_inactive_disp := '' ;
30 end if;
31 if P_sort is not null then
32     select displayed_field
33     into l_sort
34     from po_lookup_codes
35     where lookup_code = P_sort
36     and lookup_type = 'SRS ORDER BY';
37     P_sort_disp := l_sort ;
38 else
39     P_sort_disp := '' ;
40 end if;
41 if P_site is not null then
42     select displayed_field
43     into l_site
44     from po_lookup_codes
45     where lookup_code = P_site
46     and lookup_type = 'SITE_TYPE';
47     P_site_disp := l_site ;
48 else
49     P_site_disp := '' ;
50 end if;
51 end;
52   return (TRUE);
53 end;
54 function AfterReport return boolean is
55 begin
56   /*SRW.USER_EXIT('FND SRWEXIT');*/null;
57   return (TRUE);
58 end;
59 --Functions to refer Oracle report placeholders--
60 END PO_POXSURLC_XMLP_PKG ;
61