[Home] [Help]
PACKAGE BODY: APPS.OZF_THRESHOLD_RULE_PVT_W
Source
1 package body ozf_threshold_rule_pvt_w as
2 /* $Header: ozfwtrub.pls 115.1 2003/11/28 12:28:32 pkarthik 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 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7 function rosetta_g_miss_date_in_map(d date) return date as
8 begin
9 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10 return d;
11 end;
12
13 procedure rosetta_table_copy_in_p3(t out nocopy ozf_threshold_rule_pvt.threshold_rule_tbl_type, a0 JTF_NUMBER_TABLE
14 , a1 JTF_DATE_TABLE
15 , a2 JTF_NUMBER_TABLE
16 , a3 JTF_NUMBER_TABLE
17 , a4 JTF_DATE_TABLE
18 , a5 JTF_NUMBER_TABLE
19 , a6 JTF_VARCHAR2_TABLE_100
20 , a7 JTF_NUMBER_TABLE
21 , a8 JTF_NUMBER_TABLE
22 , a9 JTF_NUMBER_TABLE
23 , a10 JTF_DATE_TABLE
24 , a11 JTF_VARCHAR2_TABLE_100
25 , a12 JTF_VARCHAR2_TABLE_100
26 , a13 JTF_VARCHAR2_TABLE_100
27 , a14 JTF_VARCHAR2_TABLE_100
28 , a15 JTF_VARCHAR2_TABLE_100
29 , a16 JTF_NUMBER_TABLE
30 , a17 JTF_DATE_TABLE
31 , a18 JTF_DATE_TABLE
32 , a19 JTF_VARCHAR2_TABLE_100
33 , a20 JTF_VARCHAR2_TABLE_100
34 , a21 JTF_NUMBER_TABLE
35 , a22 JTF_VARCHAR2_TABLE_100
36 , a23 JTF_VARCHAR2_TABLE_100
37 , a24 JTF_NUMBER_TABLE
38 , a25 JTF_VARCHAR2_TABLE_100
39 , a26 JTF_VARCHAR2_TABLE_100
40 , a27 JTF_VARCHAR2_TABLE_200
41 , a28 JTF_VARCHAR2_TABLE_200
42 , a29 JTF_VARCHAR2_TABLE_200
43 , a30 JTF_VARCHAR2_TABLE_200
44 , a31 JTF_VARCHAR2_TABLE_200
45 , a32 JTF_VARCHAR2_TABLE_200
46 , a33 JTF_VARCHAR2_TABLE_200
47 , a34 JTF_VARCHAR2_TABLE_200
48 , a35 JTF_VARCHAR2_TABLE_200
49 , a36 JTF_VARCHAR2_TABLE_200
50 , a37 JTF_VARCHAR2_TABLE_200
51 , a38 JTF_VARCHAR2_TABLE_200
52 , a39 JTF_VARCHAR2_TABLE_200
53 , a40 JTF_VARCHAR2_TABLE_200
54 , a41 JTF_VARCHAR2_TABLE_200
55 , a42 JTF_NUMBER_TABLE
56 , a43 JTF_NUMBER_TABLE
57 , a44 JTF_NUMBER_TABLE
58 , a45 JTF_NUMBER_TABLE
59 ) as
60 ddindx binary_integer; indx binary_integer;
61 begin
62 if a0 is not null and a0.count > 0 then
63 if a0.count > 0 then
64 indx := a0.first;
65 ddindx := 1;
66 while true loop
67 t(ddindx).threshold_rule_id := a0(indx);
68 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a1(indx));
69 t(ddindx).last_updated_by := a2(indx);
70 t(ddindx).last_update_login := a3(indx);
71 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a4(indx));
72 t(ddindx).created_by := a5(indx);
73 t(ddindx).created_from := a6(indx);
74 t(ddindx).request_id := a7(indx);
75 t(ddindx).program_application_id := a8(indx);
76 t(ddindx).program_id := a9(indx);
77 t(ddindx).program_update_date := rosetta_g_miss_date_in_map(a10(indx));
78 t(ddindx).period_type := a11(indx);
79 t(ddindx).enabled_flag := a12(indx);
80 t(ddindx).threshold_calendar := a13(indx);
81 t(ddindx).start_period_name := a14(indx);
82 t(ddindx).end_period_name := a15(indx);
83 t(ddindx).threshold_id := a16(indx);
84 t(ddindx).start_date := rosetta_g_miss_date_in_map(a17(indx));
85 t(ddindx).end_date := rosetta_g_miss_date_in_map(a18(indx));
86 t(ddindx).value_limit := a19(indx);
87 t(ddindx).operator_code := a20(indx);
88 t(ddindx).percent_amount := a21(indx);
89 t(ddindx).base_line := a22(indx);
90 t(ddindx).error_mode := a23(indx);
91 t(ddindx).repeat_frequency := a24(indx);
92 t(ddindx).frequency_period := a25(indx);
93 t(ddindx).attribute_category := a26(indx);
94 t(ddindx).attribute1 := a27(indx);
95 t(ddindx).attribute2 := a28(indx);
96 t(ddindx).attribute3 := a29(indx);
97 t(ddindx).attribute4 := a30(indx);
98 t(ddindx).attribute5 := a31(indx);
99 t(ddindx).attribute6 := a32(indx);
100 t(ddindx).attribute7 := a33(indx);
101 t(ddindx).attribute8 := a34(indx);
102 t(ddindx).attribute9 := a35(indx);
103 t(ddindx).attribute10 := a36(indx);
104 t(ddindx).attribute11 := a37(indx);
105 t(ddindx).attribute12 := a38(indx);
106 t(ddindx).attribute13 := a39(indx);
107 t(ddindx).attribute14 := a40(indx);
108 t(ddindx).attribute15 := a41(indx);
109 t(ddindx).org_id := a42(indx);
110 t(ddindx).security_group_id := a43(indx);
111 t(ddindx).converted_days := a44(indx);
112 t(ddindx).object_version_number := a45(indx);
113 ddindx := ddindx+1;
114 if a0.last =indx
115 then exit;
116 end if;
117 indx := a0.next(indx);
118 end loop;
119 end if;
120 end if;
121 end rosetta_table_copy_in_p3;
122 procedure rosetta_table_copy_out_p3(t ozf_threshold_rule_pvt.threshold_rule_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
123 , a1 out nocopy JTF_DATE_TABLE
124 , a2 out nocopy JTF_NUMBER_TABLE
125 , a3 out nocopy JTF_NUMBER_TABLE
126 , a4 out nocopy JTF_DATE_TABLE
127 , a5 out nocopy JTF_NUMBER_TABLE
128 , a6 out nocopy JTF_VARCHAR2_TABLE_100
129 , a7 out nocopy JTF_NUMBER_TABLE
130 , a8 out nocopy JTF_NUMBER_TABLE
131 , a9 out nocopy JTF_NUMBER_TABLE
132 , a10 out nocopy JTF_DATE_TABLE
133 , a11 out nocopy JTF_VARCHAR2_TABLE_100
134 , a12 out nocopy JTF_VARCHAR2_TABLE_100
135 , a13 out nocopy JTF_VARCHAR2_TABLE_100
136 , a14 out nocopy JTF_VARCHAR2_TABLE_100
137 , a15 out nocopy JTF_VARCHAR2_TABLE_100
138 , a16 out nocopy JTF_NUMBER_TABLE
139 , a17 out nocopy JTF_DATE_TABLE
140 , a18 out nocopy JTF_DATE_TABLE
141 , a19 out nocopy JTF_VARCHAR2_TABLE_100
142 , a20 out nocopy JTF_VARCHAR2_TABLE_100
143 , a21 out nocopy JTF_NUMBER_TABLE
144 , a22 out nocopy JTF_VARCHAR2_TABLE_100
145 , a23 out nocopy JTF_VARCHAR2_TABLE_100
146 , a24 out nocopy JTF_NUMBER_TABLE
147 , a25 out nocopy JTF_VARCHAR2_TABLE_100
148 , a26 out nocopy JTF_VARCHAR2_TABLE_100
149 , a27 out nocopy JTF_VARCHAR2_TABLE_200
150 , a28 out nocopy JTF_VARCHAR2_TABLE_200
151 , a29 out nocopy JTF_VARCHAR2_TABLE_200
152 , a30 out nocopy JTF_VARCHAR2_TABLE_200
153 , a31 out nocopy JTF_VARCHAR2_TABLE_200
154 , a32 out nocopy JTF_VARCHAR2_TABLE_200
155 , a33 out nocopy JTF_VARCHAR2_TABLE_200
156 , a34 out nocopy JTF_VARCHAR2_TABLE_200
157 , a35 out nocopy JTF_VARCHAR2_TABLE_200
158 , a36 out nocopy JTF_VARCHAR2_TABLE_200
159 , a37 out nocopy JTF_VARCHAR2_TABLE_200
160 , a38 out nocopy JTF_VARCHAR2_TABLE_200
161 , a39 out nocopy JTF_VARCHAR2_TABLE_200
162 , a40 out nocopy JTF_VARCHAR2_TABLE_200
163 , a41 out nocopy JTF_VARCHAR2_TABLE_200
164 , a42 out nocopy JTF_NUMBER_TABLE
165 , a43 out nocopy JTF_NUMBER_TABLE
166 , a44 out nocopy JTF_NUMBER_TABLE
167 , a45 out nocopy JTF_NUMBER_TABLE
168 ) as
169 ddindx binary_integer; indx binary_integer;
170 begin
171 if t is null or t.count = 0 then
172 a0 := JTF_NUMBER_TABLE();
173 a1 := JTF_DATE_TABLE();
174 a2 := JTF_NUMBER_TABLE();
175 a3 := JTF_NUMBER_TABLE();
176 a4 := JTF_DATE_TABLE();
177 a5 := JTF_NUMBER_TABLE();
178 a6 := JTF_VARCHAR2_TABLE_100();
179 a7 := JTF_NUMBER_TABLE();
180 a8 := JTF_NUMBER_TABLE();
181 a9 := JTF_NUMBER_TABLE();
182 a10 := JTF_DATE_TABLE();
183 a11 := JTF_VARCHAR2_TABLE_100();
184 a12 := JTF_VARCHAR2_TABLE_100();
185 a13 := JTF_VARCHAR2_TABLE_100();
186 a14 := JTF_VARCHAR2_TABLE_100();
187 a15 := JTF_VARCHAR2_TABLE_100();
188 a16 := JTF_NUMBER_TABLE();
189 a17 := JTF_DATE_TABLE();
190 a18 := JTF_DATE_TABLE();
191 a19 := JTF_VARCHAR2_TABLE_100();
192 a20 := JTF_VARCHAR2_TABLE_100();
193 a21 := JTF_NUMBER_TABLE();
194 a22 := JTF_VARCHAR2_TABLE_100();
195 a23 := JTF_VARCHAR2_TABLE_100();
196 a24 := JTF_NUMBER_TABLE();
197 a25 := JTF_VARCHAR2_TABLE_100();
198 a26 := JTF_VARCHAR2_TABLE_100();
199 a27 := JTF_VARCHAR2_TABLE_200();
200 a28 := JTF_VARCHAR2_TABLE_200();
201 a29 := JTF_VARCHAR2_TABLE_200();
202 a30 := JTF_VARCHAR2_TABLE_200();
203 a31 := JTF_VARCHAR2_TABLE_200();
204 a32 := JTF_VARCHAR2_TABLE_200();
205 a33 := JTF_VARCHAR2_TABLE_200();
206 a34 := JTF_VARCHAR2_TABLE_200();
207 a35 := JTF_VARCHAR2_TABLE_200();
208 a36 := JTF_VARCHAR2_TABLE_200();
209 a37 := JTF_VARCHAR2_TABLE_200();
210 a38 := JTF_VARCHAR2_TABLE_200();
211 a39 := JTF_VARCHAR2_TABLE_200();
212 a40 := JTF_VARCHAR2_TABLE_200();
213 a41 := JTF_VARCHAR2_TABLE_200();
214 a42 := JTF_NUMBER_TABLE();
215 a43 := JTF_NUMBER_TABLE();
216 a44 := JTF_NUMBER_TABLE();
217 a45 := JTF_NUMBER_TABLE();
218 else
219 a0 := JTF_NUMBER_TABLE();
220 a1 := JTF_DATE_TABLE();
221 a2 := JTF_NUMBER_TABLE();
222 a3 := JTF_NUMBER_TABLE();
223 a4 := JTF_DATE_TABLE();
224 a5 := JTF_NUMBER_TABLE();
225 a6 := JTF_VARCHAR2_TABLE_100();
226 a7 := JTF_NUMBER_TABLE();
227 a8 := JTF_NUMBER_TABLE();
228 a9 := JTF_NUMBER_TABLE();
229 a10 := JTF_DATE_TABLE();
230 a11 := JTF_VARCHAR2_TABLE_100();
231 a12 := JTF_VARCHAR2_TABLE_100();
232 a13 := JTF_VARCHAR2_TABLE_100();
233 a14 := JTF_VARCHAR2_TABLE_100();
234 a15 := JTF_VARCHAR2_TABLE_100();
235 a16 := JTF_NUMBER_TABLE();
236 a17 := JTF_DATE_TABLE();
237 a18 := JTF_DATE_TABLE();
238 a19 := JTF_VARCHAR2_TABLE_100();
239 a20 := JTF_VARCHAR2_TABLE_100();
240 a21 := JTF_NUMBER_TABLE();
241 a22 := JTF_VARCHAR2_TABLE_100();
242 a23 := JTF_VARCHAR2_TABLE_100();
243 a24 := JTF_NUMBER_TABLE();
244 a25 := JTF_VARCHAR2_TABLE_100();
245 a26 := JTF_VARCHAR2_TABLE_100();
246 a27 := JTF_VARCHAR2_TABLE_200();
247 a28 := JTF_VARCHAR2_TABLE_200();
248 a29 := JTF_VARCHAR2_TABLE_200();
249 a30 := JTF_VARCHAR2_TABLE_200();
250 a31 := JTF_VARCHAR2_TABLE_200();
251 a32 := JTF_VARCHAR2_TABLE_200();
252 a33 := JTF_VARCHAR2_TABLE_200();
253 a34 := JTF_VARCHAR2_TABLE_200();
254 a35 := JTF_VARCHAR2_TABLE_200();
255 a36 := JTF_VARCHAR2_TABLE_200();
256 a37 := JTF_VARCHAR2_TABLE_200();
257 a38 := JTF_VARCHAR2_TABLE_200();
258 a39 := JTF_VARCHAR2_TABLE_200();
259 a40 := JTF_VARCHAR2_TABLE_200();
260 a41 := JTF_VARCHAR2_TABLE_200();
261 a42 := JTF_NUMBER_TABLE();
262 a43 := JTF_NUMBER_TABLE();
263 a44 := JTF_NUMBER_TABLE();
264 a45 := JTF_NUMBER_TABLE();
265 if t.count > 0 then
266 a0.extend(t.count);
267 a1.extend(t.count);
268 a2.extend(t.count);
269 a3.extend(t.count);
270 a4.extend(t.count);
271 a5.extend(t.count);
272 a6.extend(t.count);
273 a7.extend(t.count);
274 a8.extend(t.count);
275 a9.extend(t.count);
276 a10.extend(t.count);
277 a11.extend(t.count);
278 a12.extend(t.count);
279 a13.extend(t.count);
280 a14.extend(t.count);
281 a15.extend(t.count);
282 a16.extend(t.count);
283 a17.extend(t.count);
284 a18.extend(t.count);
285 a19.extend(t.count);
286 a20.extend(t.count);
287 a21.extend(t.count);
288 a22.extend(t.count);
289 a23.extend(t.count);
290 a24.extend(t.count);
291 a25.extend(t.count);
292 a26.extend(t.count);
293 a27.extend(t.count);
294 a28.extend(t.count);
295 a29.extend(t.count);
296 a30.extend(t.count);
297 a31.extend(t.count);
298 a32.extend(t.count);
299 a33.extend(t.count);
300 a34.extend(t.count);
301 a35.extend(t.count);
302 a36.extend(t.count);
303 a37.extend(t.count);
304 a38.extend(t.count);
305 a39.extend(t.count);
306 a40.extend(t.count);
307 a41.extend(t.count);
308 a42.extend(t.count);
309 a43.extend(t.count);
310 a44.extend(t.count);
311 a45.extend(t.count);
312 ddindx := t.first;
313 indx := 1;
314 while true loop
315 a0(indx) := t(ddindx).threshold_rule_id;
316 a1(indx) := t(ddindx).last_update_date;
317 a2(indx) := t(ddindx).last_updated_by;
318 a3(indx) := t(ddindx).last_update_login;
319 a4(indx) := t(ddindx).creation_date;
320 a5(indx) := t(ddindx).created_by;
321 a6(indx) := t(ddindx).created_from;
322 a7(indx) := t(ddindx).request_id;
323 a8(indx) := t(ddindx).program_application_id;
324 a9(indx) := t(ddindx).program_id;
325 a10(indx) := t(ddindx).program_update_date;
326 a11(indx) := t(ddindx).period_type;
327 a12(indx) := t(ddindx).enabled_flag;
328 a13(indx) := t(ddindx).threshold_calendar;
329 a14(indx) := t(ddindx).start_period_name;
330 a15(indx) := t(ddindx).end_period_name;
331 a16(indx) := t(ddindx).threshold_id;
332 a17(indx) := t(ddindx).start_date;
333 a18(indx) := t(ddindx).end_date;
334 a19(indx) := t(ddindx).value_limit;
335 a20(indx) := t(ddindx).operator_code;
336 a21(indx) := t(ddindx).percent_amount;
337 a22(indx) := t(ddindx).base_line;
338 a23(indx) := t(ddindx).error_mode;
339 a24(indx) := t(ddindx).repeat_frequency;
340 a25(indx) := t(ddindx).frequency_period;
341 a26(indx) := t(ddindx).attribute_category;
342 a27(indx) := t(ddindx).attribute1;
343 a28(indx) := t(ddindx).attribute2;
344 a29(indx) := t(ddindx).attribute3;
345 a30(indx) := t(ddindx).attribute4;
346 a31(indx) := t(ddindx).attribute5;
347 a32(indx) := t(ddindx).attribute6;
348 a33(indx) := t(ddindx).attribute7;
349 a34(indx) := t(ddindx).attribute8;
350 a35(indx) := t(ddindx).attribute9;
351 a36(indx) := t(ddindx).attribute10;
352 a37(indx) := t(ddindx).attribute11;
353 a38(indx) := t(ddindx).attribute12;
354 a39(indx) := t(ddindx).attribute13;
355 a40(indx) := t(ddindx).attribute14;
356 a41(indx) := t(ddindx).attribute15;
357 a42(indx) := t(ddindx).org_id;
358 a43(indx) := t(ddindx).security_group_id;
359 a44(indx) := t(ddindx).converted_days;
360 a45(indx) := t(ddindx).object_version_number;
361 indx := indx+1;
362 if t.last =ddindx
363 then exit;
364 end if;
365 ddindx := t.next(ddindx);
366 end loop;
367 end if;
368 end if;
369 end rosetta_table_copy_out_p3;
370
371 procedure create_threshold_rule(p_api_version_number NUMBER
372 , p_init_msg_list VARCHAR2
373 , p_commit VARCHAR2
374 , p_validation_level NUMBER
375 , x_return_status out nocopy VARCHAR2
376 , x_msg_count out nocopy NUMBER
377 , x_msg_data out nocopy VARCHAR2
378 , p7_a0 NUMBER
379 , p7_a1 DATE
380 , p7_a2 NUMBER
381 , p7_a3 NUMBER
382 , p7_a4 DATE
383 , p7_a5 NUMBER
384 , p7_a6 VARCHAR2
385 , p7_a7 NUMBER
386 , p7_a8 NUMBER
387 , p7_a9 NUMBER
388 , p7_a10 DATE
389 , p7_a11 VARCHAR2
390 , p7_a12 VARCHAR2
391 , p7_a13 VARCHAR2
392 , p7_a14 VARCHAR2
393 , p7_a15 VARCHAR2
394 , p7_a16 NUMBER
395 , p7_a17 DATE
396 , p7_a18 DATE
397 , p7_a19 VARCHAR2
398 , p7_a20 VARCHAR2
399 , p7_a21 NUMBER
400 , p7_a22 VARCHAR2
401 , p7_a23 VARCHAR2
402 , p7_a24 NUMBER
403 , p7_a25 VARCHAR2
404 , p7_a26 VARCHAR2
405 , p7_a27 VARCHAR2
406 , p7_a28 VARCHAR2
407 , p7_a29 VARCHAR2
408 , p7_a30 VARCHAR2
409 , p7_a31 VARCHAR2
410 , p7_a32 VARCHAR2
411 , p7_a33 VARCHAR2
412 , p7_a34 VARCHAR2
413 , p7_a35 VARCHAR2
414 , p7_a36 VARCHAR2
415 , p7_a37 VARCHAR2
416 , p7_a38 VARCHAR2
417 , p7_a39 VARCHAR2
418 , p7_a40 VARCHAR2
419 , p7_a41 VARCHAR2
420 , p7_a42 NUMBER
421 , p7_a43 NUMBER
422 , p7_a44 NUMBER
423 , p7_a45 NUMBER
424 , x_threshold_rule_id out nocopy NUMBER
425 , p_comparison_type VARCHAR2
426 , p_alert_type VARCHAR2
427 )
428
429 as
430 ddp_threshold_rule_rec ozf_threshold_rule_pvt.threshold_rule_rec_type;
431 ddindx binary_integer; indx binary_integer;
432 begin
433
434 -- copy data to the local IN or IN-OUT args, if any
435
436
437
438
439
440
441
442 ddp_threshold_rule_rec.threshold_rule_id := p7_a0;
443 ddp_threshold_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
444 ddp_threshold_rule_rec.last_updated_by := p7_a2;
445 ddp_threshold_rule_rec.last_update_login := p7_a3;
446 ddp_threshold_rule_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
447 ddp_threshold_rule_rec.created_by := p7_a5;
448 ddp_threshold_rule_rec.created_from := p7_a6;
449 ddp_threshold_rule_rec.request_id := p7_a7;
450 ddp_threshold_rule_rec.program_application_id := p7_a8;
451 ddp_threshold_rule_rec.program_id := p7_a9;
452 ddp_threshold_rule_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a10);
453 ddp_threshold_rule_rec.period_type := p7_a11;
454 ddp_threshold_rule_rec.enabled_flag := p7_a12;
455 ddp_threshold_rule_rec.threshold_calendar := p7_a13;
456 ddp_threshold_rule_rec.start_period_name := p7_a14;
457 ddp_threshold_rule_rec.end_period_name := p7_a15;
458 ddp_threshold_rule_rec.threshold_id := p7_a16;
459 ddp_threshold_rule_rec.start_date := rosetta_g_miss_date_in_map(p7_a17);
460 ddp_threshold_rule_rec.end_date := rosetta_g_miss_date_in_map(p7_a18);
461 ddp_threshold_rule_rec.value_limit := p7_a19;
462 ddp_threshold_rule_rec.operator_code := p7_a20;
463 ddp_threshold_rule_rec.percent_amount := p7_a21;
464 ddp_threshold_rule_rec.base_line := p7_a22;
465 ddp_threshold_rule_rec.error_mode := p7_a23;
466 ddp_threshold_rule_rec.repeat_frequency := p7_a24;
467 ddp_threshold_rule_rec.frequency_period := p7_a25;
468 ddp_threshold_rule_rec.attribute_category := p7_a26;
469 ddp_threshold_rule_rec.attribute1 := p7_a27;
470 ddp_threshold_rule_rec.attribute2 := p7_a28;
471 ddp_threshold_rule_rec.attribute3 := p7_a29;
472 ddp_threshold_rule_rec.attribute4 := p7_a30;
473 ddp_threshold_rule_rec.attribute5 := p7_a31;
474 ddp_threshold_rule_rec.attribute6 := p7_a32;
475 ddp_threshold_rule_rec.attribute7 := p7_a33;
476 ddp_threshold_rule_rec.attribute8 := p7_a34;
477 ddp_threshold_rule_rec.attribute9 := p7_a35;
478 ddp_threshold_rule_rec.attribute10 := p7_a36;
479 ddp_threshold_rule_rec.attribute11 := p7_a37;
480 ddp_threshold_rule_rec.attribute12 := p7_a38;
481 ddp_threshold_rule_rec.attribute13 := p7_a39;
482 ddp_threshold_rule_rec.attribute14 := p7_a40;
483 ddp_threshold_rule_rec.attribute15 := p7_a41;
484 ddp_threshold_rule_rec.org_id := p7_a42;
485 ddp_threshold_rule_rec.security_group_id := p7_a43;
486 ddp_threshold_rule_rec.converted_days := p7_a44;
487 ddp_threshold_rule_rec.object_version_number := p7_a45;
488 ddp_threshold_rule_rec.comparison_type := p_comparison_type;
489 ddp_threshold_rule_rec.alert_type := p_alert_type;
490
491 -- here's the delegated call to the old PL/SQL routine
492 ozf_threshold_rule_pvt.create_threshold_rule(p_api_version_number,
493 p_init_msg_list,
494 p_commit,
495 p_validation_level,
496 x_return_status,
497 x_msg_count,
498 x_msg_data,
499 ddp_threshold_rule_rec,
500 x_threshold_rule_id);
501
502 -- copy data back from the local variables to OUT or IN-OUT args, if any
503
504
505
506
507
508
509
510
511 end;
512
513 procedure update_threshold_rule(p_api_version_number NUMBER
514 , p_init_msg_list VARCHAR2
515 , p_commit VARCHAR2
516 , p_validation_level NUMBER
517 , x_return_status out nocopy VARCHAR2
518 , x_msg_count out nocopy NUMBER
519 , x_msg_data out nocopy VARCHAR2
520 , p7_a0 NUMBER
521 , p7_a1 DATE
522 , p7_a2 NUMBER
523 , p7_a3 NUMBER
524 , p7_a4 DATE
525 , p7_a5 NUMBER
526 , p7_a6 VARCHAR2
527 , p7_a7 NUMBER
528 , p7_a8 NUMBER
529 , p7_a9 NUMBER
530 , p7_a10 DATE
531 , p7_a11 VARCHAR2
532 , p7_a12 VARCHAR2
533 , p7_a13 VARCHAR2
534 , p7_a14 VARCHAR2
535 , p7_a15 VARCHAR2
536 , p7_a16 NUMBER
537 , p7_a17 DATE
538 , p7_a18 DATE
539 , p7_a19 VARCHAR2
540 , p7_a20 VARCHAR2
541 , p7_a21 NUMBER
542 , p7_a22 VARCHAR2
543 , p7_a23 VARCHAR2
544 , p7_a24 NUMBER
545 , p7_a25 VARCHAR2
546 , p7_a26 VARCHAR2
547 , p7_a27 VARCHAR2
548 , p7_a28 VARCHAR2
549 , p7_a29 VARCHAR2
550 , p7_a30 VARCHAR2
551 , p7_a31 VARCHAR2
552 , p7_a32 VARCHAR2
553 , p7_a33 VARCHAR2
554 , p7_a34 VARCHAR2
555 , p7_a35 VARCHAR2
556 , p7_a36 VARCHAR2
557 , p7_a37 VARCHAR2
558 , p7_a38 VARCHAR2
559 , p7_a39 VARCHAR2
560 , p7_a40 VARCHAR2
561 , p7_a41 VARCHAR2
562 , p7_a42 NUMBER
563 , p7_a43 NUMBER
564 , p7_a44 NUMBER
565 , p7_a45 NUMBER
566 , x_object_version_number out nocopy NUMBER
567 , p_comparison_type VARCHAR2
568 , p_alert_type VARCHAR2
569 )
570
571 as
572 ddp_threshold_rule_rec ozf_threshold_rule_pvt.threshold_rule_rec_type;
573 ddindx binary_integer; indx binary_integer;
574 begin
575
576 -- copy data to the local IN or IN-OUT args, if any
577
578
579
580
581
582
583
584 ddp_threshold_rule_rec.threshold_rule_id := p7_a0;
585 ddp_threshold_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
586 ddp_threshold_rule_rec.last_updated_by := p7_a2;
587 ddp_threshold_rule_rec.last_update_login := p7_a3;
588 ddp_threshold_rule_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
589 ddp_threshold_rule_rec.created_by := p7_a5;
590 ddp_threshold_rule_rec.created_from := p7_a6;
591 ddp_threshold_rule_rec.request_id := p7_a7;
592 ddp_threshold_rule_rec.program_application_id := p7_a8;
593 ddp_threshold_rule_rec.program_id := p7_a9;
594 ddp_threshold_rule_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a10);
595 ddp_threshold_rule_rec.period_type := p7_a11;
596 ddp_threshold_rule_rec.enabled_flag := p7_a12;
597 ddp_threshold_rule_rec.threshold_calendar := p7_a13;
598 ddp_threshold_rule_rec.start_period_name := p7_a14;
599 ddp_threshold_rule_rec.end_period_name := p7_a15;
600 ddp_threshold_rule_rec.threshold_id := p7_a16;
601 ddp_threshold_rule_rec.start_date := rosetta_g_miss_date_in_map(p7_a17);
602 ddp_threshold_rule_rec.end_date := rosetta_g_miss_date_in_map(p7_a18);
603 ddp_threshold_rule_rec.value_limit := p7_a19;
604 ddp_threshold_rule_rec.operator_code := p7_a20;
605 ddp_threshold_rule_rec.percent_amount := p7_a21;
606 ddp_threshold_rule_rec.base_line := p7_a22;
607 ddp_threshold_rule_rec.error_mode := p7_a23;
608 ddp_threshold_rule_rec.repeat_frequency := p7_a24;
609 ddp_threshold_rule_rec.frequency_period := p7_a25;
610 ddp_threshold_rule_rec.attribute_category := p7_a26;
611 ddp_threshold_rule_rec.attribute1 := p7_a27;
612 ddp_threshold_rule_rec.attribute2 := p7_a28;
613 ddp_threshold_rule_rec.attribute3 := p7_a29;
614 ddp_threshold_rule_rec.attribute4 := p7_a30;
615 ddp_threshold_rule_rec.attribute5 := p7_a31;
616 ddp_threshold_rule_rec.attribute6 := p7_a32;
617 ddp_threshold_rule_rec.attribute7 := p7_a33;
618 ddp_threshold_rule_rec.attribute8 := p7_a34;
619 ddp_threshold_rule_rec.attribute9 := p7_a35;
620 ddp_threshold_rule_rec.attribute10 := p7_a36;
621 ddp_threshold_rule_rec.attribute11 := p7_a37;
622 ddp_threshold_rule_rec.attribute12 := p7_a38;
623 ddp_threshold_rule_rec.attribute13 := p7_a39;
624 ddp_threshold_rule_rec.attribute14 := p7_a40;
625 ddp_threshold_rule_rec.attribute15 := p7_a41;
626 ddp_threshold_rule_rec.org_id := p7_a42;
627 ddp_threshold_rule_rec.security_group_id := p7_a43;
628 ddp_threshold_rule_rec.converted_days := p7_a44;
629 ddp_threshold_rule_rec.object_version_number := p7_a45;
630 ddp_threshold_rule_rec.comparison_type := p_comparison_type;
631 ddp_threshold_rule_rec.alert_type := p_alert_type;
632
633 -- here's the delegated call to the old PL/SQL routine
634 ozf_threshold_rule_pvt.update_threshold_rule(p_api_version_number,
635 p_init_msg_list,
636 p_commit,
637 p_validation_level,
638 x_return_status,
639 x_msg_count,
640 x_msg_data,
641 ddp_threshold_rule_rec,
642 x_object_version_number);
643
644 -- copy data back from the local variables to OUT or IN-OUT args, if any
645
646
647
648
649
650
651
652
653 end;
654
655 procedure validate_threshold_rule(p_api_version_number NUMBER
656 , p_init_msg_list VARCHAR2
657 , p_validation_level NUMBER
658 , p3_a0 NUMBER
659 , p3_a1 DATE
660 , p3_a2 NUMBER
661 , p3_a3 NUMBER
662 , p3_a4 DATE
663 , p3_a5 NUMBER
664 , p3_a6 VARCHAR2
665 , p3_a7 NUMBER
666 , p3_a8 NUMBER
667 , p3_a9 NUMBER
668 , p3_a10 DATE
669 , p3_a11 VARCHAR2
670 , p3_a12 VARCHAR2
671 , p3_a13 VARCHAR2
672 , p3_a14 VARCHAR2
673 , p3_a15 VARCHAR2
674 , p3_a16 NUMBER
675 , p3_a17 DATE
676 , p3_a18 DATE
677 , p3_a19 VARCHAR2
678 , p3_a20 VARCHAR2
679 , p3_a21 NUMBER
680 , p3_a22 VARCHAR2
681 , p3_a23 VARCHAR2
682 , p3_a24 NUMBER
683 , p3_a25 VARCHAR2
684 , p3_a26 VARCHAR2
685 , p3_a27 VARCHAR2
686 , p3_a28 VARCHAR2
687 , p3_a29 VARCHAR2
688 , p3_a30 VARCHAR2
689 , p3_a31 VARCHAR2
690 , p3_a32 VARCHAR2
691 , p3_a33 VARCHAR2
692 , p3_a34 VARCHAR2
693 , p3_a35 VARCHAR2
694 , p3_a36 VARCHAR2
695 , p3_a37 VARCHAR2
696 , p3_a38 VARCHAR2
697 , p3_a39 VARCHAR2
698 , p3_a40 VARCHAR2
699 , p3_a41 VARCHAR2
700 , p3_a42 NUMBER
701 , p3_a43 NUMBER
702 , p3_a44 NUMBER
703 , p3_a45 NUMBER
704 , x_return_status out nocopy VARCHAR2
705 , x_msg_count out nocopy NUMBER
706 , x_msg_data out nocopy VARCHAR2
707 , p_comparison_type VARCHAR2
708 , p_alert_type VARCHAR2
709 )
710
711 as
712 ddp_threshold_rule_rec ozf_threshold_rule_pvt.threshold_rule_rec_type;
713 ddindx binary_integer; indx binary_integer;
714 begin
715
716 -- copy data to the local IN or IN-OUT args, if any
717
718
719
720 ddp_threshold_rule_rec.threshold_rule_id := p3_a0;
721 ddp_threshold_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p3_a1);
722 ddp_threshold_rule_rec.last_updated_by := p3_a2;
723 ddp_threshold_rule_rec.last_update_login := p3_a3;
724 ddp_threshold_rule_rec.creation_date := rosetta_g_miss_date_in_map(p3_a4);
725 ddp_threshold_rule_rec.created_by := p3_a5;
726 ddp_threshold_rule_rec.created_from := p3_a6;
727 ddp_threshold_rule_rec.request_id := p3_a7;
728 ddp_threshold_rule_rec.program_application_id := p3_a8;
729 ddp_threshold_rule_rec.program_id := p3_a9;
730 ddp_threshold_rule_rec.program_update_date := rosetta_g_miss_date_in_map(p3_a10);
731 ddp_threshold_rule_rec.period_type := p3_a11;
732 ddp_threshold_rule_rec.enabled_flag := p3_a12;
733 ddp_threshold_rule_rec.threshold_calendar := p3_a13;
734 ddp_threshold_rule_rec.start_period_name := p3_a14;
735 ddp_threshold_rule_rec.end_period_name := p3_a15;
736 ddp_threshold_rule_rec.threshold_id := p3_a16;
737 ddp_threshold_rule_rec.start_date := rosetta_g_miss_date_in_map(p3_a17);
738 ddp_threshold_rule_rec.end_date := rosetta_g_miss_date_in_map(p3_a18);
739 ddp_threshold_rule_rec.value_limit := p3_a19;
740 ddp_threshold_rule_rec.operator_code := p3_a20;
741 ddp_threshold_rule_rec.percent_amount := p3_a21;
742 ddp_threshold_rule_rec.base_line := p3_a22;
743 ddp_threshold_rule_rec.error_mode := p3_a23;
744 ddp_threshold_rule_rec.repeat_frequency := p3_a24;
745 ddp_threshold_rule_rec.frequency_period := p3_a25;
746 ddp_threshold_rule_rec.attribute_category := p3_a26;
747 ddp_threshold_rule_rec.attribute1 := p3_a27;
748 ddp_threshold_rule_rec.attribute2 := p3_a28;
749 ddp_threshold_rule_rec.attribute3 := p3_a29;
750 ddp_threshold_rule_rec.attribute4 := p3_a30;
751 ddp_threshold_rule_rec.attribute5 := p3_a31;
752 ddp_threshold_rule_rec.attribute6 := p3_a32;
753 ddp_threshold_rule_rec.attribute7 := p3_a33;
754 ddp_threshold_rule_rec.attribute8 := p3_a34;
755 ddp_threshold_rule_rec.attribute9 := p3_a35;
756 ddp_threshold_rule_rec.attribute10 := p3_a36;
757 ddp_threshold_rule_rec.attribute11 := p3_a37;
758 ddp_threshold_rule_rec.attribute12 := p3_a38;
759 ddp_threshold_rule_rec.attribute13 := p3_a39;
760 ddp_threshold_rule_rec.attribute14 := p3_a40;
761 ddp_threshold_rule_rec.attribute15 := p3_a41;
762 ddp_threshold_rule_rec.org_id := p3_a42;
763 ddp_threshold_rule_rec.security_group_id := p3_a43;
764 ddp_threshold_rule_rec.converted_days := p3_a44;
765 ddp_threshold_rule_rec.object_version_number := p3_a45;
766 ddp_threshold_rule_rec.comparison_type := p_comparison_type;
767 ddp_threshold_rule_rec.alert_type := p_alert_type;
768
769
770
771 -- here's the delegated call to the old PL/SQL routine
772 ozf_threshold_rule_pvt.validate_threshold_rule(p_api_version_number,
773 p_init_msg_list,
774 p_validation_level,
775 ddp_threshold_rule_rec,
776 x_return_status,
777 x_msg_count,
778 x_msg_data);
779
780 -- copy data back from the local variables to OUT or IN-OUT args, if any
781
782
783
784
785
786
787 end;
788
789 procedure check_threshold_rule_items(p0_a0 NUMBER
790 , p0_a1 DATE
791 , p0_a2 NUMBER
792 , p0_a3 NUMBER
793 , p0_a4 DATE
794 , p0_a5 NUMBER
795 , p0_a6 VARCHAR2
796 , p0_a7 NUMBER
797 , p0_a8 NUMBER
798 , p0_a9 NUMBER
799 , p0_a10 DATE
800 , p0_a11 VARCHAR2
801 , p0_a12 VARCHAR2
802 , p0_a13 VARCHAR2
803 , p0_a14 VARCHAR2
804 , p0_a15 VARCHAR2
805 , p0_a16 NUMBER
806 , p0_a17 DATE
807 , p0_a18 DATE
808 , p0_a19 VARCHAR2
809 , p0_a20 VARCHAR2
810 , p0_a21 NUMBER
811 , p0_a22 VARCHAR2
812 , p0_a23 VARCHAR2
813 , p0_a24 NUMBER
814 , p0_a25 VARCHAR2
815 , p0_a26 VARCHAR2
816 , p0_a27 VARCHAR2
817 , p0_a28 VARCHAR2
818 , p0_a29 VARCHAR2
819 , p0_a30 VARCHAR2
820 , p0_a31 VARCHAR2
821 , p0_a32 VARCHAR2
822 , p0_a33 VARCHAR2
823 , p0_a34 VARCHAR2
824 , p0_a35 VARCHAR2
825 , p0_a36 VARCHAR2
826 , p0_a37 VARCHAR2
827 , p0_a38 VARCHAR2
828 , p0_a39 VARCHAR2
829 , p0_a40 VARCHAR2
830 , p0_a41 VARCHAR2
831 , p0_a42 NUMBER
832 , p0_a43 NUMBER
833 , p0_a44 NUMBER
834 , p0_a45 NUMBER
835 , p_validation_mode VARCHAR2
836 , x_return_status out nocopy VARCHAR2
837 , p_comparison_type VARCHAR2
838 , p_alert_type VARCHAR2
839 )
840
841 as
842 ddp_threshold_rule_rec ozf_threshold_rule_pvt.threshold_rule_rec_type;
843 ddindx binary_integer; indx binary_integer;
844 begin
845
846 -- copy data to the local IN or IN-OUT args, if any
847 ddp_threshold_rule_rec.threshold_rule_id := p0_a0;
848 ddp_threshold_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
849 ddp_threshold_rule_rec.last_updated_by := p0_a2;
850 ddp_threshold_rule_rec.last_update_login := p0_a3;
851 ddp_threshold_rule_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
852 ddp_threshold_rule_rec.created_by := p0_a5;
853 ddp_threshold_rule_rec.created_from := p0_a6;
854 ddp_threshold_rule_rec.request_id := p0_a7;
855 ddp_threshold_rule_rec.program_application_id := p0_a8;
856 ddp_threshold_rule_rec.program_id := p0_a9;
857 ddp_threshold_rule_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a10);
858 ddp_threshold_rule_rec.period_type := p0_a11;
859 ddp_threshold_rule_rec.enabled_flag := p0_a12;
860 ddp_threshold_rule_rec.threshold_calendar := p0_a13;
861 ddp_threshold_rule_rec.start_period_name := p0_a14;
862 ddp_threshold_rule_rec.end_period_name := p0_a15;
863 ddp_threshold_rule_rec.threshold_id := p0_a16;
864 ddp_threshold_rule_rec.start_date := rosetta_g_miss_date_in_map(p0_a17);
865 ddp_threshold_rule_rec.end_date := rosetta_g_miss_date_in_map(p0_a18);
866 ddp_threshold_rule_rec.value_limit := p0_a19;
867 ddp_threshold_rule_rec.operator_code := p0_a20;
868 ddp_threshold_rule_rec.percent_amount := p0_a21;
869 ddp_threshold_rule_rec.base_line := p0_a22;
870 ddp_threshold_rule_rec.error_mode := p0_a23;
871 ddp_threshold_rule_rec.repeat_frequency := p0_a24;
872 ddp_threshold_rule_rec.frequency_period := p0_a25;
873 ddp_threshold_rule_rec.attribute_category := p0_a26;
874 ddp_threshold_rule_rec.attribute1 := p0_a27;
875 ddp_threshold_rule_rec.attribute2 := p0_a28;
876 ddp_threshold_rule_rec.attribute3 := p0_a29;
877 ddp_threshold_rule_rec.attribute4 := p0_a30;
878 ddp_threshold_rule_rec.attribute5 := p0_a31;
879 ddp_threshold_rule_rec.attribute6 := p0_a32;
880 ddp_threshold_rule_rec.attribute7 := p0_a33;
881 ddp_threshold_rule_rec.attribute8 := p0_a34;
882 ddp_threshold_rule_rec.attribute9 := p0_a35;
883 ddp_threshold_rule_rec.attribute10 := p0_a36;
884 ddp_threshold_rule_rec.attribute11 := p0_a37;
885 ddp_threshold_rule_rec.attribute12 := p0_a38;
886 ddp_threshold_rule_rec.attribute13 := p0_a39;
887 ddp_threshold_rule_rec.attribute14 := p0_a40;
888 ddp_threshold_rule_rec.attribute15 := p0_a41;
889 ddp_threshold_rule_rec.org_id := p0_a42;
890 ddp_threshold_rule_rec.security_group_id := p0_a43;
891 ddp_threshold_rule_rec.converted_days := p0_a44;
892 ddp_threshold_rule_rec.object_version_number := p0_a45;
893 ddp_threshold_rule_rec.comparison_type := p_comparison_type;
894 ddp_threshold_rule_rec.alert_type := p_alert_type;
895
896
897 -- here's the delegated call to the old PL/SQL routine
898 ozf_threshold_rule_pvt.check_threshold_rule_items(ddp_threshold_rule_rec,
899 p_validation_mode,
900 x_return_status);
901
902 -- copy data back from the local variables to OUT or IN-OUT args, if any
903
904
905 end;
906
907 procedure validate_threshold_rule_rec(p_api_version_number NUMBER
908 , p_init_msg_list VARCHAR2
909 , x_return_status out nocopy VARCHAR2
910 , x_msg_count out nocopy NUMBER
911 , x_msg_data out nocopy VARCHAR2
912 , p5_a0 NUMBER
913 , p5_a1 DATE
914 , p5_a2 NUMBER
915 , p5_a3 NUMBER
916 , p5_a4 DATE
917 , p5_a5 NUMBER
918 , p5_a6 VARCHAR2
919 , p5_a7 NUMBER
920 , p5_a8 NUMBER
921 , p5_a9 NUMBER
922 , p5_a10 DATE
923 , p5_a11 VARCHAR2
924 , p5_a12 VARCHAR2
925 , p5_a13 VARCHAR2
926 , p5_a14 VARCHAR2
927 , p5_a15 VARCHAR2
928 , p5_a16 NUMBER
929 , p5_a17 DATE
930 , p5_a18 DATE
931 , p5_a19 VARCHAR2
932 , p5_a20 VARCHAR2
933 , p5_a21 NUMBER
934 , p5_a22 VARCHAR2
935 , p5_a23 VARCHAR2
936 , p5_a24 NUMBER
937 , p5_a25 VARCHAR2
938 , p5_a26 VARCHAR2
939 , p5_a27 VARCHAR2
940 , p5_a28 VARCHAR2
941 , p5_a29 VARCHAR2
942 , p5_a30 VARCHAR2
943 , p5_a31 VARCHAR2
944 , p5_a32 VARCHAR2
945 , p5_a33 VARCHAR2
946 , p5_a34 VARCHAR2
947 , p5_a35 VARCHAR2
948 , p5_a36 VARCHAR2
949 , p5_a37 VARCHAR2
950 , p5_a38 VARCHAR2
951 , p5_a39 VARCHAR2
952 , p5_a40 VARCHAR2
953 , p5_a41 VARCHAR2
954 , p5_a42 NUMBER
955 , p5_a43 NUMBER
956 , p5_a44 NUMBER
957 , p5_a45 NUMBER
958 , p_comparison_type VARCHAR2
959 , p_alert_type VARCHAR2
960 )
961
962 as
963 ddp_threshold_rule_rec ozf_threshold_rule_pvt.threshold_rule_rec_type;
964 ddindx binary_integer; indx binary_integer;
965 begin
966
967 -- copy data to the local IN or IN-OUT args, if any
968
969
970
971
972
973 ddp_threshold_rule_rec.threshold_rule_id := p5_a0;
974 ddp_threshold_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a1);
975 ddp_threshold_rule_rec.last_updated_by := p5_a2;
976 ddp_threshold_rule_rec.last_update_login := p5_a3;
977 ddp_threshold_rule_rec.creation_date := rosetta_g_miss_date_in_map(p5_a4);
978 ddp_threshold_rule_rec.created_by := p5_a5;
979 ddp_threshold_rule_rec.created_from := p5_a6;
980 ddp_threshold_rule_rec.request_id := p5_a7;
981 ddp_threshold_rule_rec.program_application_id := p5_a8;
982 ddp_threshold_rule_rec.program_id := p5_a9;
983 ddp_threshold_rule_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a10);
984 ddp_threshold_rule_rec.period_type := p5_a11;
985 ddp_threshold_rule_rec.enabled_flag := p5_a12;
986 ddp_threshold_rule_rec.threshold_calendar := p5_a13;
987 ddp_threshold_rule_rec.start_period_name := p5_a14;
988 ddp_threshold_rule_rec.end_period_name := p5_a15;
989 ddp_threshold_rule_rec.threshold_id := p5_a16;
990 ddp_threshold_rule_rec.start_date := rosetta_g_miss_date_in_map(p5_a17);
991 ddp_threshold_rule_rec.end_date := rosetta_g_miss_date_in_map(p5_a18);
992 ddp_threshold_rule_rec.value_limit := p5_a19;
993 ddp_threshold_rule_rec.operator_code := p5_a20;
994 ddp_threshold_rule_rec.percent_amount := p5_a21;
995 ddp_threshold_rule_rec.base_line := p5_a22;
996 ddp_threshold_rule_rec.error_mode := p5_a23;
997 ddp_threshold_rule_rec.repeat_frequency := p5_a24;
998 ddp_threshold_rule_rec.frequency_period := p5_a25;
999 ddp_threshold_rule_rec.attribute_category := p5_a26;
1000 ddp_threshold_rule_rec.attribute1 := p5_a27;
1001 ddp_threshold_rule_rec.attribute2 := p5_a28;
1002 ddp_threshold_rule_rec.attribute3 := p5_a29;
1003 ddp_threshold_rule_rec.attribute4 := p5_a30;
1004 ddp_threshold_rule_rec.attribute5 := p5_a31;
1005 ddp_threshold_rule_rec.attribute6 := p5_a32;
1006 ddp_threshold_rule_rec.attribute7 := p5_a33;
1007 ddp_threshold_rule_rec.attribute8 := p5_a34;
1008 ddp_threshold_rule_rec.attribute9 := p5_a35;
1009 ddp_threshold_rule_rec.attribute10 := p5_a36;
1010 ddp_threshold_rule_rec.attribute11 := p5_a37;
1011 ddp_threshold_rule_rec.attribute12 := p5_a38;
1012 ddp_threshold_rule_rec.attribute13 := p5_a39;
1013 ddp_threshold_rule_rec.attribute14 := p5_a40;
1014 ddp_threshold_rule_rec.attribute15 := p5_a41;
1015 ddp_threshold_rule_rec.org_id := p5_a42;
1016 ddp_threshold_rule_rec.security_group_id := p5_a43;
1017 ddp_threshold_rule_rec.converted_days := p5_a44;
1018 ddp_threshold_rule_rec.object_version_number := p5_a45;
1019 ddp_threshold_rule_rec.comparison_type := p_comparison_type;
1020 ddp_threshold_rule_rec.alert_type := p_alert_type;
1021
1022 -- here's the delegated call to the old PL/SQL routine
1023 ozf_threshold_rule_pvt.validate_threshold_rule_rec(p_api_version_number,
1024 p_init_msg_list,
1025 x_return_status,
1026 x_msg_count,
1027 x_msg_data,
1028 ddp_threshold_rule_rec);
1029
1030 -- copy data back from the local variables to OUT or IN-OUT args, if any
1031
1032
1033
1034
1035
1036 end;
1037
1038 procedure complete_threshold_rule_rec(p0_a0 NUMBER
1039 , p0_a1 DATE
1040 , p0_a2 NUMBER
1041 , p0_a3 NUMBER
1042 , p0_a4 DATE
1043 , p0_a5 NUMBER
1044 , p0_a6 VARCHAR2
1045 , p0_a7 NUMBER
1046 , p0_a8 NUMBER
1047 , p0_a9 NUMBER
1048 , p0_a10 DATE
1049 , p0_a11 VARCHAR2
1050 , p0_a12 VARCHAR2
1051 , p0_a13 VARCHAR2
1052 , p0_a14 VARCHAR2
1053 , p0_a15 VARCHAR2
1054 , p0_a16 NUMBER
1055 , p0_a17 DATE
1056 , p0_a18 DATE
1057 , p0_a19 VARCHAR2
1058 , p0_a20 VARCHAR2
1059 , p0_a21 NUMBER
1060 , p0_a22 VARCHAR2
1061 , p0_a23 VARCHAR2
1062 , p0_a24 NUMBER
1063 , p0_a25 VARCHAR2
1064 , p0_a26 VARCHAR2
1065 , p0_a27 VARCHAR2
1066 , p0_a28 VARCHAR2
1067 , p0_a29 VARCHAR2
1068 , p0_a30 VARCHAR2
1069 , p0_a31 VARCHAR2
1070 , p0_a32 VARCHAR2
1071 , p0_a33 VARCHAR2
1072 , p0_a34 VARCHAR2
1073 , p0_a35 VARCHAR2
1074 , p0_a36 VARCHAR2
1075 , p0_a37 VARCHAR2
1076 , p0_a38 VARCHAR2
1077 , p0_a39 VARCHAR2
1078 , p0_a40 VARCHAR2
1079 , p0_a41 VARCHAR2
1080 , p0_a42 NUMBER
1081 , p0_a43 NUMBER
1082 , p0_a44 NUMBER
1083 , p0_a45 NUMBER
1084 , p1_a0 out nocopy NUMBER
1085 , p1_a1 out nocopy DATE
1086 , p1_a2 out nocopy NUMBER
1087 , p1_a3 out nocopy NUMBER
1088 , p1_a4 out nocopy DATE
1089 , p1_a5 out nocopy NUMBER
1090 , p1_a6 out nocopy VARCHAR2
1091 , p1_a7 out nocopy NUMBER
1092 , p1_a8 out nocopy NUMBER
1093 , p1_a9 out nocopy NUMBER
1094 , p1_a10 out nocopy DATE
1095 , p1_a11 out nocopy VARCHAR2
1096 , p1_a12 out nocopy VARCHAR2
1097 , p1_a13 out nocopy VARCHAR2
1098 , p1_a14 out nocopy VARCHAR2
1099 , p1_a15 out nocopy VARCHAR2
1100 , p1_a16 out nocopy NUMBER
1101 , p1_a17 out nocopy DATE
1102 , p1_a18 out nocopy DATE
1103 , p1_a19 out nocopy VARCHAR2
1104 , p1_a20 out nocopy VARCHAR2
1105 , p1_a21 out nocopy NUMBER
1106 , p1_a22 out nocopy VARCHAR2
1107 , p1_a23 out nocopy VARCHAR2
1108 , p1_a24 out nocopy NUMBER
1109 , p1_a25 out nocopy VARCHAR2
1110 , p1_a26 out nocopy VARCHAR2
1111 , p1_a27 out nocopy VARCHAR2
1112 , p1_a28 out nocopy VARCHAR2
1113 , p1_a29 out nocopy VARCHAR2
1114 , p1_a30 out nocopy VARCHAR2
1115 , p1_a31 out nocopy VARCHAR2
1116 , p1_a32 out nocopy VARCHAR2
1117 , p1_a33 out nocopy VARCHAR2
1118 , p1_a34 out nocopy VARCHAR2
1119 , p1_a35 out nocopy VARCHAR2
1120 , p1_a36 out nocopy VARCHAR2
1121 , p1_a37 out nocopy VARCHAR2
1122 , p1_a38 out nocopy VARCHAR2
1123 , p1_a39 out nocopy VARCHAR2
1124 , p1_a40 out nocopy VARCHAR2
1125 , p1_a41 out nocopy VARCHAR2
1126 , p1_a42 out nocopy NUMBER
1127 , p1_a43 out nocopy NUMBER
1128 , p1_a44 out nocopy NUMBER
1129 , p1_a45 out nocopy NUMBER
1130 , p_comparison_type VARCHAR2
1131 , p_alert_type VARCHAR2
1132 )
1133
1134 as
1135 ddp_threshold_rule_rec ozf_threshold_rule_pvt.threshold_rule_rec_type;
1136 ddx_complete_rec ozf_threshold_rule_pvt.threshold_rule_rec_type;
1137 ddindx binary_integer; indx binary_integer;
1138 begin
1139
1140 -- copy data to the local IN or IN-OUT args, if any
1141 ddp_threshold_rule_rec.threshold_rule_id := p0_a0;
1142 ddp_threshold_rule_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
1143 ddp_threshold_rule_rec.last_updated_by := p0_a2;
1144 ddp_threshold_rule_rec.last_update_login := p0_a3;
1145 ddp_threshold_rule_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
1146 ddp_threshold_rule_rec.created_by := p0_a5;
1147 ddp_threshold_rule_rec.created_from := p0_a6;
1148 ddp_threshold_rule_rec.request_id := p0_a7;
1149 ddp_threshold_rule_rec.program_application_id := p0_a8;
1150 ddp_threshold_rule_rec.program_id := p0_a9;
1151 ddp_threshold_rule_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a10);
1152 ddp_threshold_rule_rec.period_type := p0_a11;
1153 ddp_threshold_rule_rec.enabled_flag := p0_a12;
1154 ddp_threshold_rule_rec.threshold_calendar := p0_a13;
1155 ddp_threshold_rule_rec.start_period_name := p0_a14;
1156 ddp_threshold_rule_rec.end_period_name := p0_a15;
1157 ddp_threshold_rule_rec.threshold_id := p0_a16;
1158 ddp_threshold_rule_rec.start_date := rosetta_g_miss_date_in_map(p0_a17);
1159 ddp_threshold_rule_rec.end_date := rosetta_g_miss_date_in_map(p0_a18);
1160 ddp_threshold_rule_rec.value_limit := p0_a19;
1161 ddp_threshold_rule_rec.operator_code := p0_a20;
1162 ddp_threshold_rule_rec.percent_amount := p0_a21;
1163 ddp_threshold_rule_rec.base_line := p0_a22;
1164 ddp_threshold_rule_rec.error_mode := p0_a23;
1165 ddp_threshold_rule_rec.repeat_frequency := p0_a24;
1166 ddp_threshold_rule_rec.frequency_period := p0_a25;
1167 ddp_threshold_rule_rec.attribute_category := p0_a26;
1168 ddp_threshold_rule_rec.attribute1 := p0_a27;
1169 ddp_threshold_rule_rec.attribute2 := p0_a28;
1170 ddp_threshold_rule_rec.attribute3 := p0_a29;
1171 ddp_threshold_rule_rec.attribute4 := p0_a30;
1172 ddp_threshold_rule_rec.attribute5 := p0_a31;
1173 ddp_threshold_rule_rec.attribute6 := p0_a32;
1174 ddp_threshold_rule_rec.attribute7 := p0_a33;
1175 ddp_threshold_rule_rec.attribute8 := p0_a34;
1176 ddp_threshold_rule_rec.attribute9 := p0_a35;
1177 ddp_threshold_rule_rec.attribute10 := p0_a36;
1178 ddp_threshold_rule_rec.attribute11 := p0_a37;
1179 ddp_threshold_rule_rec.attribute12 := p0_a38;
1180 ddp_threshold_rule_rec.attribute13 := p0_a39;
1181 ddp_threshold_rule_rec.attribute14 := p0_a40;
1182 ddp_threshold_rule_rec.attribute15 := p0_a41;
1183 ddp_threshold_rule_rec.org_id := p0_a42;
1184 ddp_threshold_rule_rec.security_group_id := p0_a43;
1185 ddp_threshold_rule_rec.converted_days := p0_a44;
1186 ddp_threshold_rule_rec.object_version_number := p0_a45;
1187 ddp_threshold_rule_rec.comparison_type := p_comparison_type;
1188 ddp_threshold_rule_rec.alert_type := p_alert_type;
1189
1190 -- here's the delegated call to the old PL/SQL routine
1191 ozf_threshold_rule_pvt.complete_threshold_rule_rec(ddp_threshold_rule_rec,
1192 ddx_complete_rec);
1193
1194 -- copy data back from the local variables to OUT or IN-OUT args, if any
1195
1196 p1_a0 := ddx_complete_rec.threshold_rule_id;
1197 p1_a1 := ddx_complete_rec.last_update_date;
1198 p1_a2 := ddx_complete_rec.last_updated_by;
1199 p1_a3 := ddx_complete_rec.last_update_login;
1200 p1_a4 := ddx_complete_rec.creation_date;
1201 p1_a5 := ddx_complete_rec.created_by;
1202 p1_a6 := ddx_complete_rec.created_from;
1203 p1_a7 := ddx_complete_rec.request_id;
1204 p1_a8 := ddx_complete_rec.program_application_id;
1205 p1_a9 := ddx_complete_rec.program_id;
1206 p1_a10 := ddx_complete_rec.program_update_date;
1207 p1_a11 := ddx_complete_rec.period_type;
1208 p1_a12 := ddx_complete_rec.enabled_flag;
1209 p1_a13 := ddx_complete_rec.threshold_calendar;
1210 p1_a14 := ddx_complete_rec.start_period_name;
1211 p1_a15 := ddx_complete_rec.end_period_name;
1212 p1_a16 := ddx_complete_rec.threshold_id;
1213 p1_a17 := ddx_complete_rec.start_date;
1214 p1_a18 := ddx_complete_rec.end_date;
1215 p1_a19 := ddx_complete_rec.value_limit;
1216 p1_a20 := ddx_complete_rec.operator_code;
1217 p1_a21 := ddx_complete_rec.percent_amount;
1218 p1_a22 := ddx_complete_rec.base_line;
1219 p1_a23 := ddx_complete_rec.error_mode;
1220 p1_a24 := ddx_complete_rec.repeat_frequency;
1221 p1_a25 := ddx_complete_rec.frequency_period;
1222 p1_a26 := ddx_complete_rec.attribute_category;
1223 p1_a27 := ddx_complete_rec.attribute1;
1224 p1_a28 := ddx_complete_rec.attribute2;
1225 p1_a29 := ddx_complete_rec.attribute3;
1226 p1_a30 := ddx_complete_rec.attribute4;
1227 p1_a31 := ddx_complete_rec.attribute5;
1228 p1_a32 := ddx_complete_rec.attribute6;
1229 p1_a33 := ddx_complete_rec.attribute7;
1230 p1_a34 := ddx_complete_rec.attribute8;
1231 p1_a35 := ddx_complete_rec.attribute9;
1232 p1_a36 := ddx_complete_rec.attribute10;
1233 p1_a37 := ddx_complete_rec.attribute11;
1234 p1_a38 := ddx_complete_rec.attribute12;
1235 p1_a39 := ddx_complete_rec.attribute13;
1236 p1_a40 := ddx_complete_rec.attribute14;
1237 p1_a41 := ddx_complete_rec.attribute15;
1238 p1_a42 := ddx_complete_rec.org_id;
1239 p1_a43 := ddx_complete_rec.security_group_id;
1240 p1_a44 := ddx_complete_rec.converted_days;
1241 p1_a45 := ddx_complete_rec.object_version_number;
1242 end;
1243
1244 end ozf_threshold_rule_pvt_w;