[Home] [Help]
PACKAGE BODY: APPS.PVX_TIMEOUT_SETUP_PVT_W
Source
1 package body pvx_timeout_setup_pvt_w as
2 /* $Header: pvxwtmob.pls 115.9 2002/12/11 12:40:23 anubhavk ship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5
6 function rosetta_g_miss_num_map(n number) return number as
7 a number := fnd_api.g_miss_num;
8 b number := 0-1962.0724;
9 begin
10 if n=a then return b; end if;
11 if n=b then return a; end if;
12 return n;
13 end;
14
15 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
16 function rosetta_g_miss_date_in_map(d date) return date as
17 begin
18 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
19 return d;
20 end;
21
22 procedure create_timeout_setup(p_api_version NUMBER
23 , p_init_msg_list VARCHAR2
24 , p_commit VARCHAR2
25 , p_validation_level NUMBER
26 , x_return_status out nocopy VARCHAR2
27 , x_msg_count out nocopy NUMBER
28 , x_msg_data out nocopy VARCHAR2
29 , x_timeout_setup_id out nocopy NUMBER
30 , p7_a0 NUMBER := 0-1962.0724
31 , p7_a1 DATE := fnd_api.g_miss_date
32 , p7_a2 NUMBER := 0-1962.0724
33 , p7_a3 DATE := fnd_api.g_miss_date
34 , p7_a4 NUMBER := 0-1962.0724
35 , p7_a5 NUMBER := 0-1962.0724
36 , p7_a6 NUMBER := 0-1962.0724
37 , p7_a7 NUMBER := 0-1962.0724
38 , p7_a8 VARCHAR2 := fnd_api.g_miss_char
39 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
40 )
41 as
42 ddp_timeout_setup_rec pvx_timeout_setup_pvt.timeout_setup_rec_type;
43 ddindx binary_integer; indx binary_integer;
44 begin
45
46 -- copy data to the local IN or IN-OUT args, if any
47
48
49
50
51
52
53
54 ddp_timeout_setup_rec.timeout_id := rosetta_g_miss_num_map(p7_a0);
55 ddp_timeout_setup_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
56 ddp_timeout_setup_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
57 ddp_timeout_setup_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
58 ddp_timeout_setup_rec.created_by := rosetta_g_miss_num_map(p7_a4);
59 ddp_timeout_setup_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
60 ddp_timeout_setup_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
61 ddp_timeout_setup_rec.timeout_period := rosetta_g_miss_num_map(p7_a7);
62 ddp_timeout_setup_rec.timeout_type := p7_a8;
63 ddp_timeout_setup_rec.country_code := p7_a9;
64
65
66 -- here's the delegated call to the old PL/SQL routine
67 pvx_timeout_setup_pvt.create_timeout_setup(p_api_version,
68 p_init_msg_list,
69 p_commit,
70 p_validation_level,
71 x_return_status,
72 x_msg_count,
73 x_msg_data,
74 ddp_timeout_setup_rec,
75 x_timeout_setup_id);
76
77 -- copy data back from the local OUT or IN-OUT args, if any
78
79
80
81
82
83
84
85
86 end;
87
88 procedure update_timeout_setup(p_api_version NUMBER
89 , p_init_msg_list VARCHAR2
90 , p_commit VARCHAR2
91 , p_validation_level NUMBER
92 , x_return_status out nocopy VARCHAR2
93 , x_msg_count out nocopy NUMBER
94 , x_msg_data out nocopy VARCHAR2
95 , p7_a0 NUMBER := 0-1962.0724
96 , p7_a1 DATE := fnd_api.g_miss_date
97 , p7_a2 NUMBER := 0-1962.0724
98 , p7_a3 DATE := fnd_api.g_miss_date
99 , p7_a4 NUMBER := 0-1962.0724
100 , p7_a5 NUMBER := 0-1962.0724
101 , p7_a6 NUMBER := 0-1962.0724
102 , p7_a7 NUMBER := 0-1962.0724
103 , p7_a8 VARCHAR2 := fnd_api.g_miss_char
104 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
105 )
106 as
107 ddp_timeout_setup_rec pvx_timeout_setup_pvt.timeout_setup_rec_type;
108 ddindx binary_integer; indx binary_integer;
109 begin
110
111 -- copy data to the local IN or IN-OUT args, if any
112
113
114
115
116
117
118
119 ddp_timeout_setup_rec.timeout_id := rosetta_g_miss_num_map(p7_a0);
120 ddp_timeout_setup_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
121 ddp_timeout_setup_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
122 ddp_timeout_setup_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
123 ddp_timeout_setup_rec.created_by := rosetta_g_miss_num_map(p7_a4);
124 ddp_timeout_setup_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
125 ddp_timeout_setup_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
126 ddp_timeout_setup_rec.timeout_period := rosetta_g_miss_num_map(p7_a7);
127 ddp_timeout_setup_rec.timeout_type := p7_a8;
128 ddp_timeout_setup_rec.country_code := p7_a9;
129
130 -- here's the delegated call to the old PL/SQL routine
131 pvx_timeout_setup_pvt.update_timeout_setup(p_api_version,
132 p_init_msg_list,
133 p_commit,
134 p_validation_level,
135 x_return_status,
136 x_msg_count,
137 x_msg_data,
138 ddp_timeout_setup_rec);
139
140 -- copy data back from the local OUT or IN-OUT args, if any
141
142
143
144
145
146
147
148 end;
149
150 procedure validate_timeout_setup(p_api_version NUMBER
151 , p_init_msg_list VARCHAR2
152 , p_validation_level NUMBER
153 , x_return_status out nocopy VARCHAR2
154 , x_msg_count out nocopy NUMBER
155 , x_msg_data out nocopy VARCHAR2
156 , p6_a0 NUMBER := 0-1962.0724
157 , p6_a1 DATE := fnd_api.g_miss_date
158 , p6_a2 NUMBER := 0-1962.0724
159 , p6_a3 DATE := fnd_api.g_miss_date
160 , p6_a4 NUMBER := 0-1962.0724
161 , p6_a5 NUMBER := 0-1962.0724
162 , p6_a6 NUMBER := 0-1962.0724
163 , p6_a7 NUMBER := 0-1962.0724
164 , p6_a8 VARCHAR2 := fnd_api.g_miss_char
165 , p6_a9 VARCHAR2 := fnd_api.g_miss_char
166 )
167 as
168 ddp_timeout_setup_rec pvx_timeout_setup_pvt.timeout_setup_rec_type;
169 ddindx binary_integer; indx binary_integer;
170 begin
171
172 -- copy data to the local IN or IN-OUT args, if any
173
174
175
176
177
178
179 ddp_timeout_setup_rec.timeout_id := rosetta_g_miss_num_map(p6_a0);
180 ddp_timeout_setup_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a1);
181 ddp_timeout_setup_rec.last_updated_by := rosetta_g_miss_num_map(p6_a2);
182 ddp_timeout_setup_rec.creation_date := rosetta_g_miss_date_in_map(p6_a3);
183 ddp_timeout_setup_rec.created_by := rosetta_g_miss_num_map(p6_a4);
184 ddp_timeout_setup_rec.last_update_login := rosetta_g_miss_num_map(p6_a5);
185 ddp_timeout_setup_rec.object_version_number := rosetta_g_miss_num_map(p6_a6);
186 ddp_timeout_setup_rec.timeout_period := rosetta_g_miss_num_map(p6_a7);
187 ddp_timeout_setup_rec.timeout_type := p6_a8;
188 ddp_timeout_setup_rec.country_code := p6_a9;
189
190 -- here's the delegated call to the old PL/SQL routine
191 pvx_timeout_setup_pvt.validate_timeout_setup(p_api_version,
192 p_init_msg_list,
193 p_validation_level,
194 x_return_status,
195 x_msg_count,
196 x_msg_data,
197 ddp_timeout_setup_rec);
198
199 -- copy data back from the local OUT or IN-OUT args, if any
200
201
202
203
204
205
206 end;
207
208 procedure check_timeout_items(p_validation_mode VARCHAR2
209 , x_return_status out nocopy VARCHAR2
210 , p2_a0 NUMBER := 0-1962.0724
211 , p2_a1 DATE := fnd_api.g_miss_date
212 , p2_a2 NUMBER := 0-1962.0724
213 , p2_a3 DATE := fnd_api.g_miss_date
214 , p2_a4 NUMBER := 0-1962.0724
215 , p2_a5 NUMBER := 0-1962.0724
216 , p2_a6 NUMBER := 0-1962.0724
217 , p2_a7 NUMBER := 0-1962.0724
218 , p2_a8 VARCHAR2 := fnd_api.g_miss_char
219 , p2_a9 VARCHAR2 := fnd_api.g_miss_char
220 )
221 as
222 ddp_timeout_setup_rec pvx_timeout_setup_pvt.timeout_setup_rec_type;
223 ddindx binary_integer; indx binary_integer;
224 begin
225
226 -- copy data to the local IN or IN-OUT args, if any
227
228
229 ddp_timeout_setup_rec.timeout_id := rosetta_g_miss_num_map(p2_a0);
230 ddp_timeout_setup_rec.last_update_date := rosetta_g_miss_date_in_map(p2_a1);
231 ddp_timeout_setup_rec.last_updated_by := rosetta_g_miss_num_map(p2_a2);
232 ddp_timeout_setup_rec.creation_date := rosetta_g_miss_date_in_map(p2_a3);
233 ddp_timeout_setup_rec.created_by := rosetta_g_miss_num_map(p2_a4);
234 ddp_timeout_setup_rec.last_update_login := rosetta_g_miss_num_map(p2_a5);
235 ddp_timeout_setup_rec.object_version_number := rosetta_g_miss_num_map(p2_a6);
236 ddp_timeout_setup_rec.timeout_period := rosetta_g_miss_num_map(p2_a7);
237 ddp_timeout_setup_rec.timeout_type := p2_a8;
238 ddp_timeout_setup_rec.country_code := p2_a9;
239
240 -- here's the delegated call to the old PL/SQL routine
241 pvx_timeout_setup_pvt.check_timeout_items(p_validation_mode,
242 x_return_status,
243 ddp_timeout_setup_rec);
244
245 -- copy data back from the local OUT or IN-OUT args, if any
246
247
248 end;
249
250 procedure check_timeout_rec(p_mode VARCHAR2
251 , x_return_status out nocopy VARCHAR2
252 , p0_a0 NUMBER := 0-1962.0724
253 , p0_a1 DATE := fnd_api.g_miss_date
254 , p0_a2 NUMBER := 0-1962.0724
255 , p0_a3 DATE := fnd_api.g_miss_date
256 , p0_a4 NUMBER := 0-1962.0724
257 , p0_a5 NUMBER := 0-1962.0724
258 , p0_a6 NUMBER := 0-1962.0724
259 , p0_a7 NUMBER := 0-1962.0724
260 , p0_a8 VARCHAR2 := fnd_api.g_miss_char
261 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
262 , p1_a0 NUMBER := 0-1962.0724
263 , p1_a1 DATE := fnd_api.g_miss_date
264 , p1_a2 NUMBER := 0-1962.0724
265 , p1_a3 DATE := fnd_api.g_miss_date
266 , p1_a4 NUMBER := 0-1962.0724
267 , p1_a5 NUMBER := 0-1962.0724
268 , p1_a6 NUMBER := 0-1962.0724
269 , p1_a7 NUMBER := 0-1962.0724
270 , p1_a8 VARCHAR2 := fnd_api.g_miss_char
271 , p1_a9 VARCHAR2 := fnd_api.g_miss_char
272 )
273 as
274 ddp_timeout_setup_rec pvx_timeout_setup_pvt.timeout_setup_rec_type;
275 ddp_complete_rec pvx_timeout_setup_pvt.timeout_setup_rec_type;
276 ddindx binary_integer; indx binary_integer;
277 begin
278
279 -- copy data to the local IN or IN-OUT args, if any
280 ddp_timeout_setup_rec.timeout_id := rosetta_g_miss_num_map(p0_a0);
281 ddp_timeout_setup_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
282 ddp_timeout_setup_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
283 ddp_timeout_setup_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
284 ddp_timeout_setup_rec.created_by := rosetta_g_miss_num_map(p0_a4);
285 ddp_timeout_setup_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
286 ddp_timeout_setup_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
287 ddp_timeout_setup_rec.timeout_period := rosetta_g_miss_num_map(p0_a7);
288 ddp_timeout_setup_rec.timeout_type := p0_a8;
289 ddp_timeout_setup_rec.country_code := p0_a9;
290
291 ddp_complete_rec.timeout_id := rosetta_g_miss_num_map(p1_a0);
292 ddp_complete_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
293 ddp_complete_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
294 ddp_complete_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
295 ddp_complete_rec.created_by := rosetta_g_miss_num_map(p1_a4);
296 ddp_complete_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
297 ddp_complete_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
298 ddp_complete_rec.timeout_period := rosetta_g_miss_num_map(p1_a7);
299 ddp_complete_rec.timeout_type := p1_a8;
300 ddp_complete_rec.country_code := p1_a9;
301
302
303
304 -- here's the delegated call to the old PL/SQL routine
305 pvx_timeout_setup_pvt.check_timeout_rec(ddp_timeout_setup_rec,
306 ddp_complete_rec,
307 p_mode,
308 x_return_status);
309
310 -- copy data back from the local OUT or IN-OUT args, if any
311
312
313
314 end;
315
316 procedure init_timeout_rec(p0_a0 out nocopy NUMBER
317 , p0_a1 out nocopy DATE
318 , p0_a2 out nocopy NUMBER
319 , p0_a3 out nocopy DATE
320 , p0_a4 out nocopy NUMBER
321 , p0_a5 out nocopy NUMBER
322 , p0_a6 out nocopy NUMBER
323 , p0_a7 out nocopy NUMBER
324 , p0_a8 out nocopy VARCHAR2
325 , p0_a9 out nocopy VARCHAR2
326 )
327 as
328 ddx_timeout_setup_rec pvx_timeout_setup_pvt.timeout_setup_rec_type;
329 ddindx binary_integer; indx binary_integer;
330 begin
331
332 -- copy data to the local IN or IN-OUT args, if any
333
334 -- here's the delegated call to the old PL/SQL routine
335 pvx_timeout_setup_pvt.init_timeout_rec(ddx_timeout_setup_rec);
336
337 -- copy data back from the local OUT or IN-OUT args, if any
338 p0_a0 := rosetta_g_miss_num_map(ddx_timeout_setup_rec.timeout_id);
339 p0_a1 := ddx_timeout_setup_rec.last_update_date;
340 p0_a2 := rosetta_g_miss_num_map(ddx_timeout_setup_rec.last_updated_by);
341 p0_a3 := ddx_timeout_setup_rec.creation_date;
342 p0_a4 := rosetta_g_miss_num_map(ddx_timeout_setup_rec.created_by);
343 p0_a5 := rosetta_g_miss_num_map(ddx_timeout_setup_rec.last_update_login);
344 p0_a6 := rosetta_g_miss_num_map(ddx_timeout_setup_rec.object_version_number);
345 p0_a7 := rosetta_g_miss_num_map(ddx_timeout_setup_rec.timeout_period);
346 p0_a8 := ddx_timeout_setup_rec.timeout_type;
347 p0_a9 := ddx_timeout_setup_rec.country_code;
348 end;
349
350 procedure complete_timeout_rec(p1_a0 out nocopy NUMBER
351 , p1_a1 out nocopy DATE
352 , p1_a2 out nocopy NUMBER
353 , p1_a3 out nocopy DATE
354 , p1_a4 out nocopy NUMBER
355 , p1_a5 out nocopy NUMBER
356 , p1_a6 out nocopy NUMBER
357 , p1_a7 out nocopy NUMBER
358 , p1_a8 out nocopy VARCHAR2
359 , p1_a9 out nocopy VARCHAR2
360 , p0_a0 NUMBER := 0-1962.0724
361 , p0_a1 DATE := fnd_api.g_miss_date
362 , p0_a2 NUMBER := 0-1962.0724
363 , p0_a3 DATE := fnd_api.g_miss_date
364 , p0_a4 NUMBER := 0-1962.0724
365 , p0_a5 NUMBER := 0-1962.0724
366 , p0_a6 NUMBER := 0-1962.0724
367 , p0_a7 NUMBER := 0-1962.0724
368 , p0_a8 VARCHAR2 := fnd_api.g_miss_char
369 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
370 )
371 as
372 ddp_timeout_setup_rec pvx_timeout_setup_pvt.timeout_setup_rec_type;
373 ddx_complete_rec pvx_timeout_setup_pvt.timeout_setup_rec_type;
374 ddindx binary_integer; indx binary_integer;
375 begin
376
377 -- copy data to the local IN or IN-OUT args, if any
378 ddp_timeout_setup_rec.timeout_id := rosetta_g_miss_num_map(p0_a0);
379 ddp_timeout_setup_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
380 ddp_timeout_setup_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
381 ddp_timeout_setup_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
382 ddp_timeout_setup_rec.created_by := rosetta_g_miss_num_map(p0_a4);
383 ddp_timeout_setup_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
384 ddp_timeout_setup_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
385 ddp_timeout_setup_rec.timeout_period := rosetta_g_miss_num_map(p0_a7);
386 ddp_timeout_setup_rec.timeout_type := p0_a8;
387 ddp_timeout_setup_rec.country_code := p0_a9;
388
389
390 -- here's the delegated call to the old PL/SQL routine
391 pvx_timeout_setup_pvt.complete_timeout_rec(ddp_timeout_setup_rec,
392 ddx_complete_rec);
393
394 -- copy data back from the local OUT or IN-OUT args, if any
395
396 p1_a0 := rosetta_g_miss_num_map(ddx_complete_rec.timeout_id);
397 p1_a1 := ddx_complete_rec.last_update_date;
398 p1_a2 := rosetta_g_miss_num_map(ddx_complete_rec.last_updated_by);
399 p1_a3 := ddx_complete_rec.creation_date;
400 p1_a4 := rosetta_g_miss_num_map(ddx_complete_rec.created_by);
401 p1_a5 := rosetta_g_miss_num_map(ddx_complete_rec.last_update_login);
402 p1_a6 := rosetta_g_miss_num_map(ddx_complete_rec.object_version_number);
403 p1_a7 := rosetta_g_miss_num_map(ddx_complete_rec.timeout_period);
404 p1_a8 := ddx_complete_rec.timeout_type;
405 p1_a9 := ddx_complete_rec.country_code;
406 end;
407
408 end pvx_timeout_setup_pvt_w;