1 Package Body OKI_REFRESH_PUB AS
2 /* $Header: OKIPRFHB.pls 115.12 2003/11/25 11:22:56 kbajaj ship $ */
3
4 --
5 -- Procedure to refresh the latest conversion rates from gl table to oki schema
6 --
7 PROCEDURE refresh_daily_rates(errbuf OUT NOCOPY VARCHAR2
8 ,retcode OUT NOCOPY VARCHAR2) IS
9 BEGIN
10 OKI_REFRESH_PVT.refresh_daily_rates(errbuf, retcode);
11 END refresh_daily_rates;
12
13 --
14 -- Procedure to refresh the denormalized header table
15 --
16 PROCEDURE refresh_sales_k_hdrs(errbuf OUT NOCOPY VARCHAR2
17 ,retcode OUT NOCOPY VARCHAR2) IS
18 BEGIN
19 oki_refresh_pvt.refresh_sales_k_hdrs(errbuf, retcode);
20 END refresh_sales_k_hdrs;
21
22 --
23 -- Procedure to refresh the addresses table
24 --
25 PROCEDURE refresh_addrs(errbuf OUT NOCOPY VARCHAR2
26 ,retcode OUT NOCOPY VARCHAR2) IS
27 BEGIN
28 oki_refresh_pvt.refresh_addrs(errbuf, retcode);
29 END refresh_addrs;
30
31 --
32 -- Procedure to refresh the sold item lines table
33 --
34 PROCEDURE refresh_sold_itm_lines(errbuf OUT NOCOPY VARCHAR2
35 ,retcode OUT NOCOPY VARCHAR2) IS
36 BEGIN
37 oki_refresh_pvt.refresh_sold_itm_lines(errbuf, retcode);
38 END refresh_sold_itm_lines;
39
40 --
41 -- Procedure to refresh the covered product lines table
42 --
43 PROCEDURE refresh_cov_prd_lines(errbuf OUT NOCOPY VARCHAR2
44 ,retcode OUT NOCOPY VARCHAR2) IS
45 BEGIN
46 oki_refresh_pvt.refresh_cov_prd_lines(errbuf, retcode);
47 END refresh_cov_prd_lines;
48
49 --
50 -- Procedure to refresh the expired lines table
51 --
52 PROCEDURE refresh_expired_lines(errbuf OUT NOCOPY VARCHAR2
53 ,retcode OUT NOCOPY VARCHAR2) IS
54 BEGIN
55 oki_refresh_pvt.refresh_expired_lines(errbuf, retcode);
56 END refresh_expired_lines;
57
58 --
59 -- Procedure to refresh the contract salesreps table
60 --
61 PROCEDURE refresh_k_salesreps(errbuf OUT NOCOPY VARCHAR2
62 ,retcode OUT NOCOPY VARCHAR2) IS
63 BEGIN
64 oki_refresh_pvt.refresh_k_salesreps(errbuf, retcode);
65 END refresh_k_salesreps;
66
67
68 PROCEDURE refresh_k_conv_rates(errbuf OUT NOCOPY VARCHAR2
69 ,retcode OUT NOCOPY VARCHAR2) IS
70 BEGIN
71 oki_refresh_pvt.refresh_k_conv_rates(errbuf, retcode);
72 END refresh_k_conv_rates;
73
74 --
75 -- Procedure to start the setup for the fast refresh process
76 --
77 PROCEDURE job_start( x_errbuf OUT NOCOPY VARCHAR2
78 , x_retcode OUT NOCOPY VARCHAR2
79 , p_job_start_date IN VARCHAR2 ) IS
80
81 l_job_start_date DATE := NULL ;
82 BEGIN
83 l_job_start_date := fnd_conc_date.string_to_date(p_job_start_date );
84
85 oki_refresh_pvt.job_start(
86 p_job_start_date => l_job_start_date
87 , x_errbuf => x_errbuf
88 , x_retcode => x_retcode ) ;
89 END job_start ;
90
91 --
92 -- Procedure to complete the setup for the fast refresh process
93 --
94 PROCEDURE job_end( x_errbuf OUT NOCOPY VARCHAR2
95 , x_retcode OUT NOCOPY VARCHAR2 ) IS
96 BEGIN
97 oki_refresh_pvt.job_end(
98 x_errbuf => x_errbuf
99 , x_retcode => x_retcode ) ;
100 END job_end ;
101
102 --
103 -- Procedure to fast refresh the sales header denormalized table
104 --
105 PROCEDURE fast_sales_k_hdrs( x_errbuf OUT NOCOPY VARCHAR2
106 , x_retcode OUT NOCOPY VARCHAR2 ) IS
107 BEGIN
108 oki_refresh_pvt.fast_sales_k_hdrs(
109 x_errbuf => x_errbuf
110 , x_retcode => x_retcode ) ;
111 END fast_sales_k_hdrs ;
112
113 --
114 -- Procedure to fast refresh the sold item lines denormalized table
115 --
116 PROCEDURE fast_sold_itm_lines( x_errbuf OUT NOCOPY VARCHAR2
117 , x_retcode OUT NOCOPY VARCHAR2 ) IS
118 BEGIN
119 oki_refresh_pvt.fast_sold_itm_lines(
120 x_errbuf => x_errbuf
121 , x_retcode => x_retcode ) ;
122 END fast_sold_itm_lines ;
123
124 --
125 -- Procedure to fast refresh the covered product lines denormalized table
126 --
127 PROCEDURE fast_cov_prd_lines( x_errbuf OUT NOCOPY VARCHAR2
128 , x_retcode OUT NOCOPY VARCHAR2 ) IS
129 BEGIN
130 oki_refresh_pvt.fast_cov_prd_lines(
131 x_errbuf => x_errbuf
132 , x_retcode => x_retcode ) ;
133 END fast_cov_prd_lines ;
134
135 --
136 -- Procedure to fast refresh the expired lines denormalized table
137 --
138 PROCEDURE fast_expired_lines( x_errbuf OUT NOCOPY VARCHAR2
139 , x_retcode OUT NOCOPY VARCHAR2 ) IS
140 BEGIN
141 oki_refresh_pvt.fast_expired_lines(
142 x_errbuf => x_errbuf
143 , x_retcode => x_retcode ) ;
144 END fast_expired_lines ;
145
146 --
147 -- Procedure to fast refresh the contract salesrep denormalized table
148 --
149 PROCEDURE fast_k_salesreps( x_errbuf OUT NOCOPY VARCHAR2
150 , x_retcode OUT NOCOPY VARCHAR2 ) IS
151 BEGIN
152 oki_refresh_pvt.fast_k_salesreps(
153 x_errbuf => x_errbuf
154 , x_retcode => x_retcode ) ;
155 END fast_k_salesreps ;
156
157 --
158 -- Procedure to fast refresh the addresses denormalized table
159 --
160 PROCEDURE fast_addrs( x_errbuf OUT NOCOPY VARCHAR2
161 , x_retcode OUT NOCOPY VARCHAR2 ) IS
162 BEGIN
163 oki_refresh_pvt.fast_addrs(
164 x_errbuf => x_errbuf
165 , x_retcode => x_retcode ) ;
166 END fast_addrs ;
167
168 --
169 -- Procedure to handle the first time fast refresh load
170 --
171 PROCEDURE initial_job_check( x_errbuf OUT NOCOPY VARCHAR2
172 , x_retcode OUT NOCOPY VARCHAR2 ) IS
173 BEGIN
174 oki_refresh_pvt.initial_job_check(
175 x_errbuf => x_errbuf
176 , x_retcode => x_retcode ) ;
177 END initial_job_check ;
178
179 --
180 -- Procedure to bring contract pricing rules rand quote to contact information
181 -- into OKI schema
182 --
183 PROCEDURE refresh_k_pricing_rules( x_errbuf OUT NOCOPY VARCHAR2
184 , x_retcode OUT NOCOPY VARCHAR2 ) IS
185 BEGIN
186 oki_refresh_pvt.refresh_k_pricing_rules( x_errbuf => x_errbuf
187 , x_retcode => x_retcode ) ;
188 END refresh_k_pricing_rules ;
189
190 --
191 -- Procedure to bring contract pricing rules rand quote to contact information into OKI schema
192 -- for only those contracts whose data has changed between last full or fast refresh and rundate
193 --
194 PROCEDURE fast_k_pricing_rules( x_errbuf OUT NOCOPY VARCHAR2
195 , x_retcode OUT NOCOPY VARCHAR2 ) IS
196 BEGIN
197
198 oki_refresh_pvt.fast_k_pricing_rules( x_errbuf =>x_errbuf
199 , x_retcode =>x_retcode );
200 END fast_k_pricing_rules;
201
202 --
203 -- Procedure to update Top line price_negotiated amount with
204 -- sum of covered product line amounts for service contracts.
205 --
206 PROCEDURE update_service_line( x_errbuf OUT NOCOPY VARCHAR2
207 , x_retcode OUT NOCOPY VARCHAR2 )IS
208 BEGIN
209 oki_refresh_pvt.update_service_line( x_errbuf => x_errbuf
210 , x_retcode => x_retcode );
211 END update_service_line;
212
213 --
214 -- Procedure to update Top line price_negotiated amount with
215 -- sum of covered product line amounts for service contracts.
216 -- for only those contracts whose data has changed between last full or fast refresh and rundate
217 --
218 PROCEDURE fast_update_service_line( x_errbuf OUT NOCOPY VARCHAR2
219 , x_retcode OUT NOCOPY VARCHAR2 ) IS
220 BEGIN
221 oki_refresh_pvt. fast_update_service_line( x_errbuf => x_errbuf
222 , x_retcode => x_retcode );
223 END fast_update_service_line;
224
225 --
226 --
227 --
228 --
229 --Procedure to load the job_run_dtl with contracts with currency conversion rate
230 --information during inital load
231 PROCEDURE initial_load_job_run_dtl( p_job_run_id IN NUMBER
232 , p_job_curr_start_date IN DATE
233 , p_job_curr_end_date IN DATE
234 ,x_retcode OUT NOCOPY VARCHAR2) IS
235 BEGIN
236 oki_refresh_pvt.initial_load_job_run_dtl( p_job_run_id
237 , p_job_curr_start_date
238 , p_job_curr_end_date
239 , x_retcode );
240 END initial_load_job_run_dtl;
241
242
243 --Procedure to kick the job start during inital load
244
245 PROCEDURE initial_load_job_start(x_errbuf OUT NOCOPY VARCHAR2
246 ,x_retcode OUT NOCOPY VARCHAR2) IS
247 BEGIN
248 oki_refresh_pvt.initial_load_job_start( x_errbuf => x_errbuf
249 ,x_retcode => x_retcode );
250 END initial_load_job_start;
251
252
253 END OKI_REFRESH_PUB;