PACKAGE BODY: APPS.PO_CHVPRSCH_XMLP_PKG

Source

1 PACKAGE BODY PO_CHVPRSCH_XMLP_PKG AS
2 /* $Header: CHVPRSCHB.pls 120.1 2007/12/25 10:37:33 krreddy noship $ */
3 
4 function BeforeReport return boolean is
5 begin
6 
7 BEGIN
8 /*SRW.USER_EXIT('FND SRWINIT');*/null;
9 
10 /*SRW.USER_EXIT('FND SRWEXIT');*/null;
11 
12 END;  return (TRUE);
13 end;
14 
15 procedure get_precision is
16 begin
17 /*srw.attr.mask        :=  SRW.FORMATMASK_ATTR;*/null;
18 
19 if P_qty_precision = 0 then /*srw.attr.formatmask  := '-NNN,NNN,NNN,NN0';*/null;
20 
21 else
22 if P_qty_precision = 1 then /*srw.attr.formatmask  := '-NNN,NNN,NNN,NN0.0';*/null;
23 
24 else
25 if P_qty_precision = 3 then /*srw.attr.formatmask  :=  '-NN,NNN,NNN,NN0.000';*/null;
26 
27 else
28 if P_qty_precision = 4 then /*srw.attr.formatmask  :=   '-N,NNN,NNN,NN0.0000';*/null;
29 
30 else
31 if P_qty_precision = 5 then /*srw.attr.formatmask  :=     '-NNN,NNN,NN0.00000';*/null;
32 
33 else
34 if P_qty_precision = 6 then /*srw.attr.formatmask  :=      '-NN,NNN,NN0.000000';*/null;
35 
36 else /*srw.attr.formatmask  :=  '-NNN,NNN,NNN,NN0.00';*/null;
37 
38 end if; end if; end if; end if; end if; end if;
39 /*srw.set_attr(0,srw.attr);*/null;
40 
41 end;
42 
43 function g_headersgroupfilter(csh_schedule_id in number) return boolean is
44 begin
45   if P_test_print <> 'Y' then
46 
47      UPDATE chv_schedule_headers
48        SET  last_print_date        = sysdate
49        ,    print_count            = decode(print_count,
50                                             NULL, 1,
51                                             print_count + 1)
52        WHERE  schedule_id = csh_schedule_id;
53 
54       COMMIT;
55 
56   end if;
57   return (TRUE);
58 end;
59 
60 function addressformula(organization_id in number) return char is
61   x_address varchar2(383);
62 begin
63 
64 if organization_id is not null then
65 
66  Begin
67 
68   SELECT LOC.ADDRESS_LINE_1||decode(LOC.ADDRESS_LINE_1, null, null,', ')||
69          LOC.ADDRESS_LINE_2||decode(LOC.ADDRESS_LINE_2, null, null,', ')||
70          LOC.ADDRESS_LINE_3||decode(LOC.ADDRESS_LINE_3, null, null,', ')||
71          LOC.TOWN_OR_CITY||decode(LOC.TOWN_OR_CITY, null, null,', ')||
72          LOC.REGION_2||decode(LOC.REGION_2, null, null,', ')||
73          LOC.COUNTRY||decode(LOC.COUNTRY, null, null,',  ')||
74          LOC.POSTAL_CODE
75   INTO   x_address
76   FROM   hr_locations_all LOC,
77          hr_organization_units UNITS
78   WHERE
79   	 UNITS.LOCATION_ID = LOC.LOCATION_ID AND
80 	 organization_id = UNITS.ORGANIZATION_ID;
81 
82 
83 
84 
85 
86  exception
87       when no_data_found then
88            x_address := NULL;
89  End;
90 
91 else
92 
93   x_address := NULL;
94 
95 end if;
96 
97 return x_address;
98 
99 end;
100 
101 function AfterReport return boolean is
102 begin
103 BEGIN
104 /*SRW.USER_EXIT('FND SRWINIT');*/null;
105 
106 /*SRW.USER_EXIT('FND SRWEXIT');*/null;
107 
108 END;
109   return (TRUE);
110 end;
111 
112 --Functions to refer Oracle report placeholders--
113 
114 END PO_CHVPRSCH_XMLP_PKG ;
115