[Home] [Help]
PACKAGE BODY: APPS.PO_POXSURUM_XMLP_PKG
Source
1 PACKAGE BODY PO_POXSURUM_XMLP_PKG AS
2 /* $Header: POXSURUMB.pls 120.1 2007/12/25 12:36:34 krreddy noship $ */
3
4 procedure get_precision is
5 begin
6 /*srw.attr.mask := SRW.FORMATMASK_ATTR;*/null;
7
8 if P_qty_precision = 0 then /*srw.attr.formatmask := '-NNN,NNN,NNN,NN0';*/null;
9
10 else
11 if P_qty_precision = 1 then /*srw.attr.formatmask := '-NNN,NNN,NNN,NN0.0';*/null;
12
13 else
14 if P_qty_precision = 3 then /*srw.attr.formatmask := '-NN,NNN,NNN,NN0.000';*/null;
15
16 else
17 if P_qty_precision = 4 then /*srw.attr.formatmask := '-N,NNN,NNN,NN0.0000';*/null;
18
19 else
20 if P_qty_precision = 5 then /*srw.attr.formatmask := '-NNN,NNN,NN0.00000';*/null;
21
22 else
23 if P_qty_precision = 6 then /*srw.attr.formatmask := '-NN,NNN,NN0.000000';*/null;
24
25 else /*srw.attr.formatmask := '-NNN,NNN,NNN,NN0.00';*/null;
26
27 end if; end if; end if; end if; end if; end if;
28 /*srw.set_attr(0,srw.attr);*/null;
29
30 end;
31
32 function BeforeReport return boolean is
33 begin
34
35 declare
36 l_active_inactive po_lookup_codes.displayed_field%type ;
37
38 begin
39 /*SRW.USER_EXIT('FND SRWINIT');*/null;
40
41 if P_active_inactive is not null then
42
43 select displayed_field
44 into l_active_inactive
45 from po_lookup_codes
46 where lookup_code = P_active_inactive
47 and lookup_type = 'ACTIVE_INACTIVE';
48
49 P_active_inactive_disp := l_active_inactive ;
50
51 else
52
53 P_active_inactive_disp := '' ;
54
55 end if;
56
57
58 end;
59 return (TRUE);
60 end;
61
62 function AfterReport return boolean is
63 begin
64 /*SRW.USER_EXIT('FND SRWEXIT');*/null;
65
66 return (TRUE);
67 end;
68
69 --Functions to refer Oracle report placeholders--
70
71 END PO_POXSURUM_XMLP_PKG ;
72
73