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