[Home] [Help]
PACKAGE BODY: APPS.OZF_DENORM_QUERIES_PVT_W
Source
1 package body ozf_denorm_queries_pvt_w as
2 /* $Header: ozfwofdb.pls 120.0 2005/06/01 02:50:08 appldev noship $ */
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 rosetta_table_copy_in_p1(t OUT NOCOPY ozf_denorm_queries_pvt.stringarray, a0 JTF_VARCHAR2_TABLE_4000) as
23 ddindx binary_integer; indx binary_integer;
24 begin
25 if a0 is not null and a0.count > 0 then
26 if a0.count > 0 then
27 indx := a0.first;
28 ddindx := 1;
29 while true loop
30 t(ddindx) := a0(indx);
31 ddindx := ddindx+1;
32 if a0.last =indx
33 then exit;
34 end if;
35 indx := a0.next(indx);
36 end loop;
37 end if;
38 end if;
39 end rosetta_table_copy_in_p1;
40 procedure rosetta_table_copy_out_p1(t ozf_denorm_queries_pvt.stringarray, a0 OUT NOCOPY JTF_VARCHAR2_TABLE_4000) as
41 ddindx binary_integer; indx binary_integer;
42 begin
43 if t is null or t.count = 0 then
44 a0 := JTF_VARCHAR2_TABLE_4000();
45 else
46 a0 := JTF_VARCHAR2_TABLE_4000();
47 if t.count > 0 then
48 a0.extend(t.count);
49 ddindx := t.first;
50 indx := 1;
51 while true loop
52 a0(indx) := t(ddindx);
53 indx := indx+1;
54 if t.last =ddindx
55 then exit;
56 end if;
57 ddindx := t.next(ddindx);
58 end loop;
59 end if;
60 end if;
61 end rosetta_table_copy_out_p1;
62
63 procedure create_denorm_queries(p_api_version NUMBER
64 , p_init_msg_list VARCHAR2
65 , p_commit VARCHAR2
66 , p_validation_level NUMBER
67 , x_return_status OUT NOCOPY VARCHAR2
68 , x_msg_count OUT NOCOPY NUMBER
69 , x_msg_data OUT NOCOPY VARCHAR2
70 , x_denorm_query_id OUT NOCOPY NUMBER
71 , p4_a0 NUMBER := 0-1962.0724
72 , p4_a1 VARCHAR2 := fnd_api.g_miss_char
73 , p4_a2 VARCHAR2 := fnd_api.g_miss_char
74 , p4_a3 VARCHAR2 := fnd_api.g_miss_char
75 , p4_a4 VARCHAR2 := fnd_api.g_miss_char
76 , p4_a5 VARCHAR2 := fnd_api.g_miss_char
77 , p4_a6 VARCHAR2 := fnd_api.g_miss_char
78 , p4_a7 VARCHAR2 := fnd_api.g_miss_char
79 , p4_a8 DATE := fnd_api.g_miss_date
80 , p4_a9 NUMBER := 0-1962.0724
81 , p4_a10 DATE := fnd_api.g_miss_date
82 , p4_a11 NUMBER := 0-1962.0724
83 , p4_a12 NUMBER := 0-1962.0724
84 , p4_a13 NUMBER := 0-1962.0724
85 , p4_a14 NUMBER := 0-1962.0724
86 )
87 as
88 ddp_denorm_queries_rec ozf_denorm_queries_pvt.denorm_queries_rec_type;
89 ddindx binary_integer; indx binary_integer;
90 begin
91
92 -- copy data to the local IN or IN-OUT args, if any
93
94
95
96
97 ddp_denorm_queries_rec.denorm_query_id := rosetta_g_miss_num_map(p4_a0);
98 ddp_denorm_queries_rec.query_for := p4_a1;
99 ddp_denorm_queries_rec.context := p4_a2;
100 ddp_denorm_queries_rec.attribute := p4_a3;
101 ddp_denorm_queries_rec.sql_statement := p4_a4;
102 ddp_denorm_queries_rec.active_flag := p4_a5;
103 ddp_denorm_queries_rec.condition_name_column := p4_a6;
104 ddp_denorm_queries_rec.condition_id_column := p4_a7;
105 ddp_denorm_queries_rec.last_update_date := rosetta_g_miss_date_in_map(p4_a8);
106 ddp_denorm_queries_rec.last_updated_by := rosetta_g_miss_num_map(p4_a9);
107 ddp_denorm_queries_rec.creation_date := rosetta_g_miss_date_in_map(p4_a10);
108 ddp_denorm_queries_rec.created_by := rosetta_g_miss_num_map(p4_a11);
109 ddp_denorm_queries_rec.last_update_login := rosetta_g_miss_num_map(p4_a12);
110 ddp_denorm_queries_rec.object_version_number := rosetta_g_miss_num_map(p4_a13);
111 ddp_denorm_queries_rec.security_group_id := rosetta_g_miss_num_map(p4_a14);
112
113
114
115
116
117 -- here's the delegated call to the old PL/SQL routine
118 ozf_denorm_queries_pvt.create_denorm_queries(p_api_version,
119 p_init_msg_list,
120 p_commit,
121 p_validation_level,
122 ddp_denorm_queries_rec,
123 x_return_status,
124 x_msg_count,
125 x_msg_data,
126 x_denorm_query_id);
127
128 -- copy data back from the local OUT or IN-OUT args, if any
129
130
131
132
133
134
135
136
137 end;
138
139 procedure update_denorm_queries(p_api_version NUMBER
140 , p_init_msg_list VARCHAR2
141 , p_commit VARCHAR2
142 , p_validation_level NUMBER
143 , x_return_status OUT NOCOPY VARCHAR2
144 , x_msg_count OUT NOCOPY NUMBER
145 , x_msg_data OUT NOCOPY VARCHAR2
146 , p4_a0 NUMBER := 0-1962.0724
147 , p4_a1 VARCHAR2 := fnd_api.g_miss_char
148 , p4_a2 VARCHAR2 := fnd_api.g_miss_char
149 , p4_a3 VARCHAR2 := fnd_api.g_miss_char
150 , p4_a4 VARCHAR2 := fnd_api.g_miss_char
151 , p4_a5 VARCHAR2 := fnd_api.g_miss_char
152 , p4_a6 VARCHAR2 := fnd_api.g_miss_char
153 , p4_a7 VARCHAR2 := fnd_api.g_miss_char
154 , p4_a8 DATE := fnd_api.g_miss_date
155 , p4_a9 NUMBER := 0-1962.0724
156 , p4_a10 DATE := fnd_api.g_miss_date
157 , p4_a11 NUMBER := 0-1962.0724
158 , p4_a12 NUMBER := 0-1962.0724
159 , p4_a13 NUMBER := 0-1962.0724
160 , p4_a14 NUMBER := 0-1962.0724
161 )
162 as
163 ddp_denorm_queries_rec ozf_denorm_queries_pvt.denorm_queries_rec_type;
164 ddindx binary_integer; indx binary_integer;
165 begin
166
167 -- copy data to the local IN or IN-OUT args, if any
168
169
170
171
172 ddp_denorm_queries_rec.denorm_query_id := rosetta_g_miss_num_map(p4_a0);
173 ddp_denorm_queries_rec.query_for := p4_a1;
174 ddp_denorm_queries_rec.context := p4_a2;
175 ddp_denorm_queries_rec.attribute := p4_a3;
176 ddp_denorm_queries_rec.sql_statement := p4_a4;
177 ddp_denorm_queries_rec.active_flag := p4_a5;
178 ddp_denorm_queries_rec.condition_name_column := p4_a6;
179 ddp_denorm_queries_rec.condition_id_column := p4_a7;
180 ddp_denorm_queries_rec.last_update_date := rosetta_g_miss_date_in_map(p4_a8);
181 ddp_denorm_queries_rec.last_updated_by := rosetta_g_miss_num_map(p4_a9);
182 ddp_denorm_queries_rec.creation_date := rosetta_g_miss_date_in_map(p4_a10);
183 ddp_denorm_queries_rec.created_by := rosetta_g_miss_num_map(p4_a11);
184 ddp_denorm_queries_rec.last_update_login := rosetta_g_miss_num_map(p4_a12);
185 ddp_denorm_queries_rec.object_version_number := rosetta_g_miss_num_map(p4_a13);
186 ddp_denorm_queries_rec.security_group_id := rosetta_g_miss_num_map(p4_a14);
187
188
189
190
191 -- here's the delegated call to the old PL/SQL routine
192 ozf_denorm_queries_pvt.update_denorm_queries(p_api_version,
193 p_init_msg_list,
194 p_commit,
195 p_validation_level,
196 ddp_denorm_queries_rec,
197 x_return_status,
198 x_msg_count,
199 x_msg_data);
200
201 -- copy data back from the local OUT or IN-OUT args, if any
202
203
204
205
206
207
208
209 end;
210
211 procedure validate_denorm_queries(p_api_version NUMBER
212 , p_init_msg_list VARCHAR2
213 , p_validation_level NUMBER
214 , p_validation_mode VARCHAR2
215 , x_return_status OUT NOCOPY VARCHAR2
216 , x_msg_count OUT NOCOPY NUMBER
217 , x_msg_data OUT NOCOPY VARCHAR2
218 , p4_a0 NUMBER := 0-1962.0724
219 , p4_a1 VARCHAR2 := fnd_api.g_miss_char
220 , p4_a2 VARCHAR2 := fnd_api.g_miss_char
221 , p4_a3 VARCHAR2 := fnd_api.g_miss_char
222 , p4_a4 VARCHAR2 := fnd_api.g_miss_char
223 , p4_a5 VARCHAR2 := fnd_api.g_miss_char
224 , p4_a6 VARCHAR2 := fnd_api.g_miss_char
225 , p4_a7 VARCHAR2 := fnd_api.g_miss_char
226 , p4_a8 DATE := fnd_api.g_miss_date
227 , p4_a9 NUMBER := 0-1962.0724
228 , p4_a10 DATE := fnd_api.g_miss_date
229 , p4_a11 NUMBER := 0-1962.0724
230 , p4_a12 NUMBER := 0-1962.0724
231 , p4_a13 NUMBER := 0-1962.0724
232 , p4_a14 NUMBER := 0-1962.0724
233 )
234 as
235 ddp_denorm_queries_rec ozf_denorm_queries_pvt.denorm_queries_rec_type;
236 ddindx binary_integer; indx binary_integer;
237 begin
238
239 -- copy data to the local IN or IN-OUT args, if any
240
241
242
243
244 ddp_denorm_queries_rec.denorm_query_id := rosetta_g_miss_num_map(p4_a0);
245 ddp_denorm_queries_rec.query_for := p4_a1;
246 ddp_denorm_queries_rec.context := p4_a2;
247 ddp_denorm_queries_rec.attribute := p4_a3;
248 ddp_denorm_queries_rec.sql_statement := p4_a4;
249 ddp_denorm_queries_rec.active_flag := p4_a5;
250 ddp_denorm_queries_rec.condition_name_column := p4_a6;
251 ddp_denorm_queries_rec.condition_id_column := p4_a7;
252 ddp_denorm_queries_rec.last_update_date := rosetta_g_miss_date_in_map(p4_a8);
253 ddp_denorm_queries_rec.last_updated_by := rosetta_g_miss_num_map(p4_a9);
254 ddp_denorm_queries_rec.creation_date := rosetta_g_miss_date_in_map(p4_a10);
255 ddp_denorm_queries_rec.created_by := rosetta_g_miss_num_map(p4_a11);
256 ddp_denorm_queries_rec.last_update_login := rosetta_g_miss_num_map(p4_a12);
257 ddp_denorm_queries_rec.object_version_number := rosetta_g_miss_num_map(p4_a13);
258 ddp_denorm_queries_rec.security_group_id := rosetta_g_miss_num_map(p4_a14);
259
260
261
262
263 -- here's the delegated call to the old PL/SQL routine
264 ozf_denorm_queries_pvt.validate_denorm_queries(p_api_version,
265 p_init_msg_list,
266 p_validation_level,
267 p_validation_mode,
268 ddp_denorm_queries_rec,
269 x_return_status,
270 x_msg_count,
271 x_msg_data);
272
273 -- copy data back from the local OUT or IN-OUT args, if any
274
275
276
277
278
279
280
281 end;
282
283 procedure check_denorm_queries_items(p_validation_mode VARCHAR2
284 , x_return_status OUT NOCOPY VARCHAR2
285 , p0_a0 NUMBER := 0-1962.0724
286 , p0_a1 VARCHAR2 := fnd_api.g_miss_char
287 , p0_a2 VARCHAR2 := fnd_api.g_miss_char
288 , p0_a3 VARCHAR2 := fnd_api.g_miss_char
289 , p0_a4 VARCHAR2 := fnd_api.g_miss_char
290 , p0_a5 VARCHAR2 := fnd_api.g_miss_char
291 , p0_a6 VARCHAR2 := fnd_api.g_miss_char
292 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
293 , p0_a8 DATE := fnd_api.g_miss_date
294 , p0_a9 NUMBER := 0-1962.0724
295 , p0_a10 DATE := fnd_api.g_miss_date
296 , p0_a11 NUMBER := 0-1962.0724
297 , p0_a12 NUMBER := 0-1962.0724
298 , p0_a13 NUMBER := 0-1962.0724
299 , p0_a14 NUMBER := 0-1962.0724
300 )
301 as
302 ddp_denorm_queries_rec ozf_denorm_queries_pvt.denorm_queries_rec_type;
303 ddindx binary_integer; indx binary_integer;
304 begin
305
306 -- copy data to the local IN or IN-OUT args, if any
307 ddp_denorm_queries_rec.denorm_query_id := rosetta_g_miss_num_map(p0_a0);
308 ddp_denorm_queries_rec.query_for := p0_a1;
309 ddp_denorm_queries_rec.context := p0_a2;
310 ddp_denorm_queries_rec.attribute := p0_a3;
311 ddp_denorm_queries_rec.sql_statement := p0_a4;
312 ddp_denorm_queries_rec.active_flag := p0_a5;
313 ddp_denorm_queries_rec.condition_name_column := p0_a6;
314 ddp_denorm_queries_rec.condition_id_column := p0_a7;
315 ddp_denorm_queries_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a8);
316 ddp_denorm_queries_rec.last_updated_by := rosetta_g_miss_num_map(p0_a9);
317 ddp_denorm_queries_rec.creation_date := rosetta_g_miss_date_in_map(p0_a10);
318 ddp_denorm_queries_rec.created_by := rosetta_g_miss_num_map(p0_a11);
319 ddp_denorm_queries_rec.last_update_login := rosetta_g_miss_num_map(p0_a12);
320 ddp_denorm_queries_rec.object_version_number := rosetta_g_miss_num_map(p0_a13);
321 ddp_denorm_queries_rec.security_group_id := rosetta_g_miss_num_map(p0_a14);
322
323
324
325 -- here's the delegated call to the old PL/SQL routine
326 ozf_denorm_queries_pvt.check_denorm_queries_items(ddp_denorm_queries_rec,
327 p_validation_mode,
328 x_return_status);
329
330 -- copy data back from the local OUT or IN-OUT args, if any
331
332
333 end;
334
335 procedure check_denorm_queries_record(x_return_status OUT NOCOPY VARCHAR2
336 , p0_a0 NUMBER := 0-1962.0724
337 , p0_a1 VARCHAR2 := fnd_api.g_miss_char
338 , p0_a2 VARCHAR2 := fnd_api.g_miss_char
339 , p0_a3 VARCHAR2 := fnd_api.g_miss_char
340 , p0_a4 VARCHAR2 := fnd_api.g_miss_char
341 , p0_a5 VARCHAR2 := fnd_api.g_miss_char
342 , p0_a6 VARCHAR2 := fnd_api.g_miss_char
343 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
344 , p0_a8 DATE := fnd_api.g_miss_date
345 , p0_a9 NUMBER := 0-1962.0724
346 , p0_a10 DATE := fnd_api.g_miss_date
347 , p0_a11 NUMBER := 0-1962.0724
348 , p0_a12 NUMBER := 0-1962.0724
349 , p0_a13 NUMBER := 0-1962.0724
350 , p0_a14 NUMBER := 0-1962.0724
351 )
352 as
353 ddp_denorm_queries_rec ozf_denorm_queries_pvt.denorm_queries_rec_type;
354 ddindx binary_integer; indx binary_integer;
355 begin
356
357 -- copy data to the local IN or IN-OUT args, if any
358 ddp_denorm_queries_rec.denorm_query_id := rosetta_g_miss_num_map(p0_a0);
359 ddp_denorm_queries_rec.query_for := p0_a1;
360 ddp_denorm_queries_rec.context := p0_a2;
361 ddp_denorm_queries_rec.attribute := p0_a3;
362 ddp_denorm_queries_rec.sql_statement := p0_a4;
363 ddp_denorm_queries_rec.active_flag := p0_a5;
364 ddp_denorm_queries_rec.condition_name_column := p0_a6;
365 ddp_denorm_queries_rec.condition_id_column := p0_a7;
366 ddp_denorm_queries_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a8);
367 ddp_denorm_queries_rec.last_updated_by := rosetta_g_miss_num_map(p0_a9);
368 ddp_denorm_queries_rec.creation_date := rosetta_g_miss_date_in_map(p0_a10);
369 ddp_denorm_queries_rec.created_by := rosetta_g_miss_num_map(p0_a11);
370 ddp_denorm_queries_rec.last_update_login := rosetta_g_miss_num_map(p0_a12);
371 ddp_denorm_queries_rec.object_version_number := rosetta_g_miss_num_map(p0_a13);
372 ddp_denorm_queries_rec.security_group_id := rosetta_g_miss_num_map(p0_a14);
373
374
375 -- here's the delegated call to the old PL/SQL routine
376 ozf_denorm_queries_pvt.check_denorm_queries_record(ddp_denorm_queries_rec,
377 x_return_status);
378
379 -- copy data back from the local OUT or IN-OUT args, if any
380
381 end;
382
383 procedure init_denorm_queries_rec(p0_a0 OUT NOCOPY NUMBER
384 , p0_a1 OUT NOCOPY VARCHAR2
385 , p0_a2 OUT NOCOPY VARCHAR2
386 , p0_a3 OUT NOCOPY VARCHAR2
387 , p0_a4 OUT NOCOPY VARCHAR2
388 , p0_a5 OUT NOCOPY VARCHAR2
389 , p0_a6 OUT NOCOPY VARCHAR2
390 , p0_a7 OUT NOCOPY VARCHAR2
391 , p0_a8 OUT NOCOPY DATE
392 , p0_a9 OUT NOCOPY NUMBER
393 , p0_a10 OUT NOCOPY DATE
394 , p0_a11 OUT NOCOPY NUMBER
395 , p0_a12 OUT NOCOPY NUMBER
396 , p0_a13 OUT NOCOPY NUMBER
397 , p0_a14 OUT NOCOPY NUMBER
398 )
399 as
400 ddx_denorm_queries_rec ozf_denorm_queries_pvt.denorm_queries_rec_type;
401 ddindx binary_integer; indx binary_integer;
402 begin
403
404 -- copy data to the local IN or IN-OUT args, if any
405
406 -- here's the delegated call to the old PL/SQL routine
407 ozf_denorm_queries_pvt.init_denorm_queries_rec(ddx_denorm_queries_rec);
408
409 -- copy data back from the local OUT or IN-OUT args, if any
410 p0_a0 := rosetta_g_miss_num_map(ddx_denorm_queries_rec.denorm_query_id);
411 p0_a1 := ddx_denorm_queries_rec.query_for;
412 p0_a2 := ddx_denorm_queries_rec.context;
413 p0_a3 := ddx_denorm_queries_rec.attribute;
414 p0_a4 := ddx_denorm_queries_rec.sql_statement;
415 p0_a5 := ddx_denorm_queries_rec.active_flag;
416 p0_a6 := ddx_denorm_queries_rec.condition_name_column;
417 p0_a7 := ddx_denorm_queries_rec.condition_id_column;
418 p0_a8 := ddx_denorm_queries_rec.last_update_date;
419 p0_a9 := rosetta_g_miss_num_map(ddx_denorm_queries_rec.last_updated_by);
420 p0_a10 := ddx_denorm_queries_rec.creation_date;
421 p0_a11 := rosetta_g_miss_num_map(ddx_denorm_queries_rec.created_by);
422 p0_a12 := rosetta_g_miss_num_map(ddx_denorm_queries_rec.last_update_login);
423 p0_a13 := rosetta_g_miss_num_map(ddx_denorm_queries_rec.object_version_number);
424 p0_a14 := rosetta_g_miss_num_map(ddx_denorm_queries_rec.security_group_id);
425 end;
426
427 procedure complete_denorm_queries_rec(p1_a0 OUT NOCOPY NUMBER
428 , p1_a1 OUT NOCOPY VARCHAR2
429 , p1_a2 OUT NOCOPY VARCHAR2
430 , p1_a3 OUT NOCOPY VARCHAR2
431 , p1_a4 OUT NOCOPY VARCHAR2
432 , p1_a5 OUT NOCOPY VARCHAR2
433 , p1_a6 OUT NOCOPY VARCHAR2
434 , p1_a7 OUT NOCOPY VARCHAR2
435 , p1_a8 OUT NOCOPY DATE
436 , p1_a9 OUT NOCOPY NUMBER
437 , p1_a10 OUT NOCOPY DATE
438 , p1_a11 OUT NOCOPY NUMBER
439 , p1_a12 OUT NOCOPY NUMBER
440 , p1_a13 OUT NOCOPY NUMBER
441 , p1_a14 OUT NOCOPY NUMBER
442 , p0_a0 NUMBER := 0-1962.0724
443 , p0_a1 VARCHAR2 := fnd_api.g_miss_char
444 , p0_a2 VARCHAR2 := fnd_api.g_miss_char
445 , p0_a3 VARCHAR2 := fnd_api.g_miss_char
446 , p0_a4 VARCHAR2 := fnd_api.g_miss_char
447 , p0_a5 VARCHAR2 := fnd_api.g_miss_char
448 , p0_a6 VARCHAR2 := fnd_api.g_miss_char
449 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
450 , p0_a8 DATE := fnd_api.g_miss_date
451 , p0_a9 NUMBER := 0-1962.0724
452 , p0_a10 DATE := fnd_api.g_miss_date
453 , p0_a11 NUMBER := 0-1962.0724
454 , p0_a12 NUMBER := 0-1962.0724
455 , p0_a13 NUMBER := 0-1962.0724
456 , p0_a14 NUMBER := 0-1962.0724
457 )
458 as
459 ddp_denorm_queries_rec ozf_denorm_queries_pvt.denorm_queries_rec_type;
460 ddx_complete_rec ozf_denorm_queries_pvt.denorm_queries_rec_type;
461 ddindx binary_integer; indx binary_integer;
462 begin
463
464 -- copy data to the local IN or IN-OUT args, if any
465 ddp_denorm_queries_rec.denorm_query_id := rosetta_g_miss_num_map(p0_a0);
466 ddp_denorm_queries_rec.query_for := p0_a1;
467 ddp_denorm_queries_rec.context := p0_a2;
468 ddp_denorm_queries_rec.attribute := p0_a3;
469 ddp_denorm_queries_rec.sql_statement := p0_a4;
470 ddp_denorm_queries_rec.active_flag := p0_a5;
471 ddp_denorm_queries_rec.condition_name_column := p0_a6;
472 ddp_denorm_queries_rec.condition_id_column := p0_a7;
473 ddp_denorm_queries_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a8);
474 ddp_denorm_queries_rec.last_updated_by := rosetta_g_miss_num_map(p0_a9);
475 ddp_denorm_queries_rec.creation_date := rosetta_g_miss_date_in_map(p0_a10);
476 ddp_denorm_queries_rec.created_by := rosetta_g_miss_num_map(p0_a11);
477 ddp_denorm_queries_rec.last_update_login := rosetta_g_miss_num_map(p0_a12);
478 ddp_denorm_queries_rec.object_version_number := rosetta_g_miss_num_map(p0_a13);
479 ddp_denorm_queries_rec.security_group_id := rosetta_g_miss_num_map(p0_a14);
480
481
482 -- here's the delegated call to the old PL/SQL routine
483 ozf_denorm_queries_pvt.complete_denorm_queries_rec(ddp_denorm_queries_rec,
484 ddx_complete_rec);
485
486 -- copy data back from the local OUT or IN-OUT args, if any
487
488 p1_a0 := rosetta_g_miss_num_map(ddx_complete_rec.denorm_query_id);
489 p1_a1 := ddx_complete_rec.query_for;
490 p1_a2 := ddx_complete_rec.context;
491 p1_a3 := ddx_complete_rec.attribute;
492 p1_a4 := ddx_complete_rec.sql_statement;
493 p1_a5 := ddx_complete_rec.active_flag;
494 p1_a6 := ddx_complete_rec.condition_name_column;
495 p1_a7 := ddx_complete_rec.condition_id_column;
496 p1_a8 := ddx_complete_rec.last_update_date;
497 p1_a9 := rosetta_g_miss_num_map(ddx_complete_rec.last_updated_by);
498 p1_a10 := ddx_complete_rec.creation_date;
499 p1_a11 := rosetta_g_miss_num_map(ddx_complete_rec.created_by);
500 p1_a12 := rosetta_g_miss_num_map(ddx_complete_rec.last_update_login);
501 p1_a13 := rosetta_g_miss_num_map(ddx_complete_rec.object_version_number);
502 p1_a14 := rosetta_g_miss_num_map(ddx_complete_rec.security_group_id);
503 end;
504
505 procedure string_length_check(sqlst VARCHAR2
506 , sarray OUT NOCOPY JTF_VARCHAR2_TABLE_4000
507 )
508 as
509 ddsarray ozf_denorm_queries_pvt.stringarray;
510 ddindx binary_integer; indx binary_integer;
511 begin
512
513 -- copy data to the local IN or IN-OUT args, if any
514
515
516 -- here's the delegated call to the old PL/SQL routine
517 ozf_denorm_queries_pvt.string_length_check(sqlst,
518 ddsarray);
519
520 -- copy data back from the local OUT or IN-OUT args, if any
521
522 ozf_denorm_queries_pvt_w.rosetta_table_copy_out_p1(ddsarray, sarray);
523 end;
524
525 end ozf_denorm_queries_pvt_w;