[Home] [Help]
PACKAGE BODY: APPS.AHL_VWP_TASKS_PVT_W
Source
1 package body ahl_vwp_tasks_pvt_w as
2 /* $Header: AHLWTSKB.pls 120.6.12020000.2 2012/12/14 06:56:23 shnatu ship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5 rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6 rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7
8 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9 function rosetta_g_miss_date_in_map(d date) return date as
10 begin
11 if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12 if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13 return d;
14 end;
15
16 procedure rosetta_table_copy_in_p1(t out nocopy ahl_vwp_tasks_pvt.srch_task_tbl_type, a0 JTF_NUMBER_TABLE
17 , a1 JTF_DATE_TABLE
18 , a2 JTF_DATE_TABLE
19 ) as
20 ddindx binary_integer; indx binary_integer;
21 begin
22 if a0 is not null and a0.count > 0 then
23 if a0.count > 0 then
24 indx := a0.first;
25 ddindx := 1;
26 while true loop
27 t(ddindx).task_id := a0(indx);
28 t(ddindx).task_start_time := rosetta_g_miss_date_in_map(a1(indx));
29 t(ddindx).task_end_time := rosetta_g_miss_date_in_map(a2(indx));
30 ddindx := ddindx+1;
31 if a0.last =indx
32 then exit;
33 end if;
34 indx := a0.next(indx);
35 end loop;
36 end if;
37 end if;
38 end rosetta_table_copy_in_p1;
39 procedure rosetta_table_copy_out_p1(t ahl_vwp_tasks_pvt.srch_task_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
40 , a1 out nocopy JTF_DATE_TABLE
41 , a2 out nocopy JTF_DATE_TABLE
42 ) as
43 ddindx binary_integer; indx binary_integer;
44 begin
45 if t is null or t.count = 0 then
46 a0 := JTF_NUMBER_TABLE();
47 a1 := JTF_DATE_TABLE();
48 a2 := JTF_DATE_TABLE();
49 else
50 a0 := JTF_NUMBER_TABLE();
51 a1 := JTF_DATE_TABLE();
52 a2 := JTF_DATE_TABLE();
53 if t.count > 0 then
54 a0.extend(t.count);
55 a1.extend(t.count);
56 a2.extend(t.count);
57 ddindx := t.first;
58 indx := 1;
59 while true loop
60 a0(indx) := t(ddindx).task_id;
61 a1(indx) := t(ddindx).task_start_time;
62 a2(indx) := t(ddindx).task_end_time;
63 indx := indx+1;
64 if t.last =ddindx
65 then exit;
66 end if;
67 ddindx := t.next(ddindx);
68 end loop;
69 end if;
70 end if;
71 end rosetta_table_copy_out_p1;
72
73 procedure get_task_details(p_api_version NUMBER
74 , p_init_msg_list VARCHAR2
75 , p_commit VARCHAR2
76 , p_validation_level NUMBER
77 , p_module_type VARCHAR2
78 , p_task_id NUMBER
79 , p6_a0 out nocopy NUMBER
80 , p6_a1 out nocopy NUMBER
81 , p6_a2 out nocopy NUMBER
82 , p6_a3 out nocopy VARCHAR2
83 , p6_a4 out nocopy NUMBER
84 , p6_a5 out nocopy NUMBER
85 , p6_a6 out nocopy VARCHAR2
86 , p6_a7 out nocopy NUMBER
87 , p6_a8 out nocopy NUMBER
88 , p6_a9 out nocopy NUMBER
89 , p6_a10 out nocopy VARCHAR2
90 , p6_a11 out nocopy NUMBER
91 , p6_a12 out nocopy VARCHAR2
92 , p6_a13 out nocopy NUMBER
93 , p6_a14 out nocopy NUMBER
94 , p6_a15 out nocopy VARCHAR2
95 , p6_a16 out nocopy NUMBER
96 , p6_a17 out nocopy VARCHAR2
97 , p6_a18 out nocopy NUMBER
98 , p6_a19 out nocopy NUMBER
99 , p6_a20 out nocopy NUMBER
100 , p6_a21 out nocopy VARCHAR2
101 , p6_a22 out nocopy NUMBER
102 , p6_a23 out nocopy VARCHAR2
103 , p6_a24 out nocopy NUMBER
104 , p6_a25 out nocopy NUMBER
105 , p6_a26 out nocopy NUMBER
106 , p6_a27 out nocopy VARCHAR2
107 , p6_a28 out nocopy VARCHAR2
108 , p6_a29 out nocopy VARCHAR2
109 , p6_a30 out nocopy VARCHAR2
110 , p6_a31 out nocopy VARCHAR2
111 , p6_a32 out nocopy VARCHAR2
112 , p6_a33 out nocopy NUMBER
113 , p6_a34 out nocopy DATE
114 , p6_a35 out nocopy NUMBER
115 , p6_a36 out nocopy DATE
116 , p6_a37 out nocopy NUMBER
117 , p6_a38 out nocopy NUMBER
118 , p6_a39 out nocopy VARCHAR2
119 , p6_a40 out nocopy VARCHAR2
120 , p6_a41 out nocopy VARCHAR2
121 , p6_a42 out nocopy VARCHAR2
122 , p6_a43 out nocopy VARCHAR2
123 , p6_a44 out nocopy VARCHAR2
124 , p6_a45 out nocopy VARCHAR2
125 , p6_a46 out nocopy VARCHAR2
126 , p6_a47 out nocopy VARCHAR2
127 , p6_a48 out nocopy VARCHAR2
128 , p6_a49 out nocopy VARCHAR2
129 , p6_a50 out nocopy VARCHAR2
130 , p6_a51 out nocopy VARCHAR2
131 , p6_a52 out nocopy VARCHAR2
132 , p6_a53 out nocopy VARCHAR2
133 , p6_a54 out nocopy VARCHAR2
134 , p6_a55 out nocopy DATE
135 , p6_a56 out nocopy DATE
136 , p6_a57 out nocopy DATE
137 , p6_a58 out nocopy VARCHAR2
138 , p6_a59 out nocopy VARCHAR2
139 , p6_a60 out nocopy NUMBER
140 , p6_a61 out nocopy NUMBER
141 , p6_a62 out nocopy VARCHAR2
142 , p6_a63 out nocopy NUMBER
143 , p6_a64 out nocopy VARCHAR2
144 , p6_a65 out nocopy VARCHAR2
145 , p6_a66 out nocopy DATE
146 , p6_a67 out nocopy DATE
147 , p6_a68 out nocopy VARCHAR2
148 , p6_a69 out nocopy VARCHAR2
149 , p6_a70 out nocopy VARCHAR2
150 , p6_a71 out nocopy NUMBER
151 , p6_a72 out nocopy VARCHAR2
152 , p6_a73 out nocopy NUMBER
153 , p6_a74 out nocopy VARCHAR2
154 , p6_a75 out nocopy VARCHAR2
155 , p6_a76 out nocopy VARCHAR2
156 , p6_a77 out nocopy VARCHAR2
157 , p6_a78 out nocopy DATE
158 , p6_a79 out nocopy DATE
159 , p6_a80 out nocopy NUMBER
160 , p6_a81 out nocopy NUMBER
161 , p6_a82 out nocopy NUMBER
162 , p6_a83 out nocopy VARCHAR2
163 , p6_a84 out nocopy VARCHAR2
164 , p6_a85 out nocopy VARCHAR2
165 , p6_a86 out nocopy VARCHAR2
166 , p6_a87 out nocopy VARCHAR2
167 , p6_a88 out nocopy VARCHAR2
168 , p6_a89 out nocopy VARCHAR2
169 , p6_a90 out nocopy VARCHAR2
170 , p6_a91 out nocopy VARCHAR2
171 , p6_a92 out nocopy VARCHAR2
172 , p6_a93 out nocopy NUMBER
173 , p6_a94 out nocopy VARCHAR2
174 , x_return_status out nocopy VARCHAR2
175 , x_msg_count out nocopy NUMBER
176 , x_msg_data out nocopy VARCHAR2
177 )
178
179 as
180 ddx_task_rec ahl_vwp_rules_pvt.task_rec_type;
181 ddindx binary_integer; indx binary_integer;
182 begin
183
184 -- copy data to the local IN or IN-OUT args, if any
185
186
187
188
189
190
191
192
193
194
195 -- here's the delegated call to the old PL/SQL routine
196 ahl_vwp_tasks_pvt.get_task_details(p_api_version,
197 p_init_msg_list,
198 p_commit,
199 p_validation_level,
200 p_module_type,
201 p_task_id,
202 ddx_task_rec,
203 x_return_status,
204 x_msg_count,
205 x_msg_data);
206
207 -- copy data back from the local variables to OUT or IN-OUT args, if any
208
209
210
211
212
213
214 p6_a0 := ddx_task_rec.visit_task_id;
215 p6_a1 := ddx_task_rec.visit_task_number;
216 p6_a2 := ddx_task_rec.visit_id;
217 p6_a3 := ddx_task_rec.template_flag;
218 p6_a4 := ddx_task_rec.inventory_item_id;
219 p6_a5 := ddx_task_rec.item_organization_id;
220 p6_a6 := ddx_task_rec.item_name;
221 p6_a7 := ddx_task_rec.cost_parent_id;
222 p6_a8 := ddx_task_rec.cost_parent_number;
223 p6_a9 := ddx_task_rec.mr_route_id;
224 p6_a10 := ddx_task_rec.route_number;
225 p6_a11 := ddx_task_rec.mr_id;
226 p6_a12 := ddx_task_rec.mr_title;
227 p6_a13 := ddx_task_rec.unit_effectivity_id;
228 p6_a14 := ddx_task_rec.department_id;
229 p6_a15 := ddx_task_rec.dept_name;
230 p6_a16 := ddx_task_rec.service_request_id;
231 p6_a17 := ddx_task_rec.service_request_number;
232 p6_a18 := ddx_task_rec.originating_task_id;
233 p6_a19 := ddx_task_rec.orginating_task_number;
234 p6_a20 := ddx_task_rec.instance_id;
235 p6_a21 := ddx_task_rec.serial_number;
236 p6_a22 := ddx_task_rec.project_task_id;
237 p6_a23 := ddx_task_rec.project_task_number;
238 p6_a24 := ddx_task_rec.primary_visit_task_id;
239 p6_a25 := ddx_task_rec.start_from_hour;
240 p6_a26 := ddx_task_rec.duration;
241 p6_a27 := ddx_task_rec.task_type_code;
242 p6_a28 := ddx_task_rec.task_type_value;
243 p6_a29 := ddx_task_rec.visit_task_name;
244 p6_a30 := ddx_task_rec.description;
245 p6_a31 := ddx_task_rec.task_status_code;
246 p6_a32 := ddx_task_rec.task_status_value;
247 p6_a33 := ddx_task_rec.object_version_number;
248 p6_a34 := ddx_task_rec.last_update_date;
249 p6_a35 := ddx_task_rec.last_updated_by;
250 p6_a36 := ddx_task_rec.creation_date;
251 p6_a37 := ddx_task_rec.created_by;
252 p6_a38 := ddx_task_rec.last_update_login;
253 p6_a39 := ddx_task_rec.attribute_category;
254 p6_a40 := ddx_task_rec.attribute1;
255 p6_a41 := ddx_task_rec.attribute2;
256 p6_a42 := ddx_task_rec.attribute3;
257 p6_a43 := ddx_task_rec.attribute4;
258 p6_a44 := ddx_task_rec.attribute5;
259 p6_a45 := ddx_task_rec.attribute6;
260 p6_a46 := ddx_task_rec.attribute7;
261 p6_a47 := ddx_task_rec.attribute8;
262 p6_a48 := ddx_task_rec.attribute9;
263 p6_a49 := ddx_task_rec.attribute10;
264 p6_a50 := ddx_task_rec.attribute11;
265 p6_a51 := ddx_task_rec.attribute12;
266 p6_a52 := ddx_task_rec.attribute13;
267 p6_a53 := ddx_task_rec.attribute14;
268 p6_a54 := ddx_task_rec.attribute15;
269 p6_a55 := ddx_task_rec.task_start_date;
270 p6_a56 := ddx_task_rec.task_end_date;
271 p6_a57 := ddx_task_rec.due_by_date;
272 p6_a58 := ddx_task_rec.zone_name;
273 p6_a59 := ddx_task_rec.sub_zone_name;
274 p6_a60 := ddx_task_rec.tolerance_after;
275 p6_a61 := ddx_task_rec.tolerance_before;
276 p6_a62 := ddx_task_rec.tolerance_uom;
277 p6_a63 := ddx_task_rec.workorder_id;
278 p6_a64 := ddx_task_rec.wo_name;
279 p6_a65 := ddx_task_rec.wo_status;
280 p6_a66 := ddx_task_rec.wo_start_date;
281 p6_a67 := ddx_task_rec.wo_end_date;
282 p6_a68 := ddx_task_rec.operation_flag;
283 p6_a69 := ddx_task_rec.is_production_flag;
284 p6_a70 := ddx_task_rec.create_job_flag;
285 p6_a71 := ddx_task_rec.stage_id;
286 p6_a72 := ddx_task_rec.stage_name;
287 p6_a73 := ddx_task_rec.quantity;
288 p6_a74 := ddx_task_rec.uom;
289 p6_a75 := ddx_task_rec.instance_number;
290 p6_a76 := ddx_task_rec.service_type_code;
291 p6_a77 := ddx_task_rec.service_type;
292 p6_a78 := ddx_task_rec.past_task_start_date;
293 p6_a79 := ddx_task_rec.past_task_end_date;
294 p6_a80 := ddx_task_rec.route_id;
295 p6_a81 := ddx_task_rec.warranty_entitlement_id;
296 p6_a82 := ddx_task_rec.contract_number;
297 p6_a83 := ddx_task_rec.entitlement_status;
298 p6_a84 := ddx_task_rec.entitlement_status_code;
299 p6_a85 := ddx_task_rec.claim_name;
300 p6_a86 := ddx_task_rec.claim_status;
301 p6_a87 := ddx_task_rec.claim_status_code;
302 p6_a88 := ddx_task_rec.task_warranty;
303 p6_a89 := ddx_task_rec.instance_warranty;
304 p6_a90 := ddx_task_rec.warranty_not_appl_flag;
305 p6_a91 := ddx_task_rec.stage_type_code;
306 p6_a92 := ddx_task_rec.return_to_supply_flag;
307 p6_a93 := ddx_task_rec.target_qty;
308 p6_a94 := ddx_task_rec.repair_batch_name;
309
310
311
312 end;
313
314 procedure create_task(p_api_version NUMBER
315 , p_init_msg_list VARCHAR2
316 , p_commit VARCHAR2
317 , p_validation_level NUMBER
318 , p_module_type VARCHAR2
319 , p5_a0 in out nocopy NUMBER
320 , p5_a1 in out nocopy NUMBER
321 , p5_a2 in out nocopy NUMBER
322 , p5_a3 in out nocopy VARCHAR2
323 , p5_a4 in out nocopy NUMBER
324 , p5_a5 in out nocopy NUMBER
325 , p5_a6 in out nocopy VARCHAR2
326 , p5_a7 in out nocopy NUMBER
327 , p5_a8 in out nocopy NUMBER
328 , p5_a9 in out nocopy NUMBER
329 , p5_a10 in out nocopy VARCHAR2
330 , p5_a11 in out nocopy NUMBER
331 , p5_a12 in out nocopy VARCHAR2
332 , p5_a13 in out nocopy NUMBER
333 , p5_a14 in out nocopy NUMBER
334 , p5_a15 in out nocopy VARCHAR2
335 , p5_a16 in out nocopy NUMBER
336 , p5_a17 in out nocopy VARCHAR2
337 , p5_a18 in out nocopy NUMBER
338 , p5_a19 in out nocopy NUMBER
339 , p5_a20 in out nocopy NUMBER
340 , p5_a21 in out nocopy VARCHAR2
341 , p5_a22 in out nocopy NUMBER
342 , p5_a23 in out nocopy VARCHAR2
343 , p5_a24 in out nocopy NUMBER
344 , p5_a25 in out nocopy NUMBER
345 , p5_a26 in out nocopy NUMBER
346 , p5_a27 in out nocopy VARCHAR2
347 , p5_a28 in out nocopy VARCHAR2
348 , p5_a29 in out nocopy VARCHAR2
349 , p5_a30 in out nocopy VARCHAR2
350 , p5_a31 in out nocopy VARCHAR2
351 , p5_a32 in out nocopy VARCHAR2
352 , p5_a33 in out nocopy NUMBER
353 , p5_a34 in out nocopy DATE
354 , p5_a35 in out nocopy NUMBER
355 , p5_a36 in out nocopy DATE
356 , p5_a37 in out nocopy NUMBER
357 , p5_a38 in out nocopy NUMBER
358 , p5_a39 in out nocopy VARCHAR2
359 , p5_a40 in out nocopy VARCHAR2
360 , p5_a41 in out nocopy VARCHAR2
361 , p5_a42 in out nocopy VARCHAR2
362 , p5_a43 in out nocopy VARCHAR2
363 , p5_a44 in out nocopy VARCHAR2
364 , p5_a45 in out nocopy VARCHAR2
365 , p5_a46 in out nocopy VARCHAR2
366 , p5_a47 in out nocopy VARCHAR2
367 , p5_a48 in out nocopy VARCHAR2
368 , p5_a49 in out nocopy VARCHAR2
369 , p5_a50 in out nocopy VARCHAR2
370 , p5_a51 in out nocopy VARCHAR2
371 , p5_a52 in out nocopy VARCHAR2
372 , p5_a53 in out nocopy VARCHAR2
373 , p5_a54 in out nocopy VARCHAR2
374 , p5_a55 in out nocopy DATE
375 , p5_a56 in out nocopy DATE
376 , p5_a57 in out nocopy DATE
377 , p5_a58 in out nocopy VARCHAR2
378 , p5_a59 in out nocopy VARCHAR2
379 , p5_a60 in out nocopy NUMBER
380 , p5_a61 in out nocopy NUMBER
381 , p5_a62 in out nocopy VARCHAR2
382 , p5_a63 in out nocopy NUMBER
383 , p5_a64 in out nocopy VARCHAR2
384 , p5_a65 in out nocopy VARCHAR2
385 , p5_a66 in out nocopy DATE
386 , p5_a67 in out nocopy DATE
387 , p5_a68 in out nocopy VARCHAR2
388 , p5_a69 in out nocopy VARCHAR2
389 , p5_a70 in out nocopy VARCHAR2
390 , p5_a71 in out nocopy NUMBER
391 , p5_a72 in out nocopy VARCHAR2
392 , p5_a73 in out nocopy NUMBER
393 , p5_a74 in out nocopy VARCHAR2
394 , p5_a75 in out nocopy VARCHAR2
395 , p5_a76 in out nocopy VARCHAR2
396 , p5_a77 in out nocopy VARCHAR2
397 , p5_a78 in out nocopy DATE
398 , p5_a79 in out nocopy DATE
399 , p5_a80 in out nocopy NUMBER
400 , p5_a81 in out nocopy NUMBER
401 , p5_a82 in out nocopy NUMBER
402 , p5_a83 in out nocopy VARCHAR2
403 , p5_a84 in out nocopy VARCHAR2
404 , p5_a85 in out nocopy VARCHAR2
405 , p5_a86 in out nocopy VARCHAR2
406 , p5_a87 in out nocopy VARCHAR2
407 , p5_a88 in out nocopy VARCHAR2
408 , p5_a89 in out nocopy VARCHAR2
409 , p5_a90 in out nocopy VARCHAR2
410 , p5_a91 in out nocopy VARCHAR2
411 , p5_a92 in out nocopy VARCHAR2
412 , p5_a93 in out nocopy NUMBER
413 , p5_a94 in out nocopy VARCHAR2
414 , x_return_status out nocopy VARCHAR2
415 , x_msg_count out nocopy NUMBER
416 , x_msg_data out nocopy VARCHAR2
417 )
418
419 as
420 ddp_x_task_rec ahl_vwp_rules_pvt.task_rec_type;
421 ddindx binary_integer; indx binary_integer;
422 begin
423
424 -- copy data to the local IN or IN-OUT args, if any
425
426
427
428
429
430 ddp_x_task_rec.visit_task_id := p5_a0;
431 ddp_x_task_rec.visit_task_number := p5_a1;
432 ddp_x_task_rec.visit_id := p5_a2;
433 ddp_x_task_rec.template_flag := p5_a3;
434 ddp_x_task_rec.inventory_item_id := p5_a4;
435 ddp_x_task_rec.item_organization_id := p5_a5;
436 ddp_x_task_rec.item_name := p5_a6;
437 ddp_x_task_rec.cost_parent_id := p5_a7;
438 ddp_x_task_rec.cost_parent_number := p5_a8;
439 ddp_x_task_rec.mr_route_id := p5_a9;
440 ddp_x_task_rec.route_number := p5_a10;
441 ddp_x_task_rec.mr_id := p5_a11;
442 ddp_x_task_rec.mr_title := p5_a12;
443 ddp_x_task_rec.unit_effectivity_id := p5_a13;
444 ddp_x_task_rec.department_id := p5_a14;
445 ddp_x_task_rec.dept_name := p5_a15;
446 ddp_x_task_rec.service_request_id := p5_a16;
447 ddp_x_task_rec.service_request_number := p5_a17;
448 ddp_x_task_rec.originating_task_id := p5_a18;
449 ddp_x_task_rec.orginating_task_number := p5_a19;
450 ddp_x_task_rec.instance_id := p5_a20;
451 ddp_x_task_rec.serial_number := p5_a21;
452 ddp_x_task_rec.project_task_id := p5_a22;
453 ddp_x_task_rec.project_task_number := p5_a23;
454 ddp_x_task_rec.primary_visit_task_id := p5_a24;
455 ddp_x_task_rec.start_from_hour := p5_a25;
456 ddp_x_task_rec.duration := p5_a26;
457 ddp_x_task_rec.task_type_code := p5_a27;
458 ddp_x_task_rec.task_type_value := p5_a28;
459 ddp_x_task_rec.visit_task_name := p5_a29;
460 ddp_x_task_rec.description := p5_a30;
461 ddp_x_task_rec.task_status_code := p5_a31;
462 ddp_x_task_rec.task_status_value := p5_a32;
463 ddp_x_task_rec.object_version_number := p5_a33;
464 ddp_x_task_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a34);
465 ddp_x_task_rec.last_updated_by := p5_a35;
466 ddp_x_task_rec.creation_date := rosetta_g_miss_date_in_map(p5_a36);
467 ddp_x_task_rec.created_by := p5_a37;
468 ddp_x_task_rec.last_update_login := p5_a38;
469 ddp_x_task_rec.attribute_category := p5_a39;
470 ddp_x_task_rec.attribute1 := p5_a40;
471 ddp_x_task_rec.attribute2 := p5_a41;
472 ddp_x_task_rec.attribute3 := p5_a42;
473 ddp_x_task_rec.attribute4 := p5_a43;
474 ddp_x_task_rec.attribute5 := p5_a44;
475 ddp_x_task_rec.attribute6 := p5_a45;
476 ddp_x_task_rec.attribute7 := p5_a46;
477 ddp_x_task_rec.attribute8 := p5_a47;
478 ddp_x_task_rec.attribute9 := p5_a48;
479 ddp_x_task_rec.attribute10 := p5_a49;
480 ddp_x_task_rec.attribute11 := p5_a50;
481 ddp_x_task_rec.attribute12 := p5_a51;
482 ddp_x_task_rec.attribute13 := p5_a52;
483 ddp_x_task_rec.attribute14 := p5_a53;
484 ddp_x_task_rec.attribute15 := p5_a54;
485 ddp_x_task_rec.task_start_date := rosetta_g_miss_date_in_map(p5_a55);
486 ddp_x_task_rec.task_end_date := rosetta_g_miss_date_in_map(p5_a56);
487 ddp_x_task_rec.due_by_date := rosetta_g_miss_date_in_map(p5_a57);
488 ddp_x_task_rec.zone_name := p5_a58;
489 ddp_x_task_rec.sub_zone_name := p5_a59;
490 ddp_x_task_rec.tolerance_after := p5_a60;
491 ddp_x_task_rec.tolerance_before := p5_a61;
492 ddp_x_task_rec.tolerance_uom := p5_a62;
493 ddp_x_task_rec.workorder_id := p5_a63;
494 ddp_x_task_rec.wo_name := p5_a64;
495 ddp_x_task_rec.wo_status := p5_a65;
496 ddp_x_task_rec.wo_start_date := rosetta_g_miss_date_in_map(p5_a66);
497 ddp_x_task_rec.wo_end_date := rosetta_g_miss_date_in_map(p5_a67);
498 ddp_x_task_rec.operation_flag := p5_a68;
499 ddp_x_task_rec.is_production_flag := p5_a69;
500 ddp_x_task_rec.create_job_flag := p5_a70;
501 ddp_x_task_rec.stage_id := p5_a71;
502 ddp_x_task_rec.stage_name := p5_a72;
503 ddp_x_task_rec.quantity := p5_a73;
504 ddp_x_task_rec.uom := p5_a74;
505 ddp_x_task_rec.instance_number := p5_a75;
506 ddp_x_task_rec.service_type_code := p5_a76;
507 ddp_x_task_rec.service_type := p5_a77;
508 ddp_x_task_rec.past_task_start_date := rosetta_g_miss_date_in_map(p5_a78);
509 ddp_x_task_rec.past_task_end_date := rosetta_g_miss_date_in_map(p5_a79);
510 ddp_x_task_rec.route_id := p5_a80;
511 ddp_x_task_rec.warranty_entitlement_id := p5_a81;
512 ddp_x_task_rec.contract_number := p5_a82;
513 ddp_x_task_rec.entitlement_status := p5_a83;
514 ddp_x_task_rec.entitlement_status_code := p5_a84;
515 ddp_x_task_rec.claim_name := p5_a85;
516 ddp_x_task_rec.claim_status := p5_a86;
517 ddp_x_task_rec.claim_status_code := p5_a87;
518 ddp_x_task_rec.task_warranty := p5_a88;
519 ddp_x_task_rec.instance_warranty := p5_a89;
520 ddp_x_task_rec.warranty_not_appl_flag := p5_a90;
521 ddp_x_task_rec.stage_type_code := p5_a91;
522 ddp_x_task_rec.return_to_supply_flag := p5_a92;
523 ddp_x_task_rec.target_qty := p5_a93;
524 ddp_x_task_rec.repair_batch_name := p5_a94;
525
526
527
528
529 -- here's the delegated call to the old PL/SQL routine
530 ahl_vwp_tasks_pvt.create_task(p_api_version,
531 p_init_msg_list,
532 p_commit,
533 p_validation_level,
534 p_module_type,
535 ddp_x_task_rec,
536 x_return_status,
537 x_msg_count,
538 x_msg_data);
539
540 -- copy data back from the local variables to OUT or IN-OUT args, if any
541
542
543
544
545
546 p5_a0 := ddp_x_task_rec.visit_task_id;
547 p5_a1 := ddp_x_task_rec.visit_task_number;
548 p5_a2 := ddp_x_task_rec.visit_id;
549 p5_a3 := ddp_x_task_rec.template_flag;
550 p5_a4 := ddp_x_task_rec.inventory_item_id;
551 p5_a5 := ddp_x_task_rec.item_organization_id;
552 p5_a6 := ddp_x_task_rec.item_name;
553 p5_a7 := ddp_x_task_rec.cost_parent_id;
554 p5_a8 := ddp_x_task_rec.cost_parent_number;
555 p5_a9 := ddp_x_task_rec.mr_route_id;
556 p5_a10 := ddp_x_task_rec.route_number;
557 p5_a11 := ddp_x_task_rec.mr_id;
558 p5_a12 := ddp_x_task_rec.mr_title;
559 p5_a13 := ddp_x_task_rec.unit_effectivity_id;
560 p5_a14 := ddp_x_task_rec.department_id;
561 p5_a15 := ddp_x_task_rec.dept_name;
562 p5_a16 := ddp_x_task_rec.service_request_id;
563 p5_a17 := ddp_x_task_rec.service_request_number;
564 p5_a18 := ddp_x_task_rec.originating_task_id;
565 p5_a19 := ddp_x_task_rec.orginating_task_number;
566 p5_a20 := ddp_x_task_rec.instance_id;
567 p5_a21 := ddp_x_task_rec.serial_number;
568 p5_a22 := ddp_x_task_rec.project_task_id;
569 p5_a23 := ddp_x_task_rec.project_task_number;
570 p5_a24 := ddp_x_task_rec.primary_visit_task_id;
571 p5_a25 := ddp_x_task_rec.start_from_hour;
572 p5_a26 := ddp_x_task_rec.duration;
573 p5_a27 := ddp_x_task_rec.task_type_code;
574 p5_a28 := ddp_x_task_rec.task_type_value;
575 p5_a29 := ddp_x_task_rec.visit_task_name;
576 p5_a30 := ddp_x_task_rec.description;
577 p5_a31 := ddp_x_task_rec.task_status_code;
578 p5_a32 := ddp_x_task_rec.task_status_value;
579 p5_a33 := ddp_x_task_rec.object_version_number;
580 p5_a34 := ddp_x_task_rec.last_update_date;
581 p5_a35 := ddp_x_task_rec.last_updated_by;
582 p5_a36 := ddp_x_task_rec.creation_date;
583 p5_a37 := ddp_x_task_rec.created_by;
584 p5_a38 := ddp_x_task_rec.last_update_login;
585 p5_a39 := ddp_x_task_rec.attribute_category;
586 p5_a40 := ddp_x_task_rec.attribute1;
587 p5_a41 := ddp_x_task_rec.attribute2;
588 p5_a42 := ddp_x_task_rec.attribute3;
589 p5_a43 := ddp_x_task_rec.attribute4;
590 p5_a44 := ddp_x_task_rec.attribute5;
591 p5_a45 := ddp_x_task_rec.attribute6;
592 p5_a46 := ddp_x_task_rec.attribute7;
593 p5_a47 := ddp_x_task_rec.attribute8;
594 p5_a48 := ddp_x_task_rec.attribute9;
595 p5_a49 := ddp_x_task_rec.attribute10;
596 p5_a50 := ddp_x_task_rec.attribute11;
597 p5_a51 := ddp_x_task_rec.attribute12;
598 p5_a52 := ddp_x_task_rec.attribute13;
599 p5_a53 := ddp_x_task_rec.attribute14;
600 p5_a54 := ddp_x_task_rec.attribute15;
601 p5_a55 := ddp_x_task_rec.task_start_date;
602 p5_a56 := ddp_x_task_rec.task_end_date;
603 p5_a57 := ddp_x_task_rec.due_by_date;
604 p5_a58 := ddp_x_task_rec.zone_name;
605 p5_a59 := ddp_x_task_rec.sub_zone_name;
606 p5_a60 := ddp_x_task_rec.tolerance_after;
607 p5_a61 := ddp_x_task_rec.tolerance_before;
608 p5_a62 := ddp_x_task_rec.tolerance_uom;
609 p5_a63 := ddp_x_task_rec.workorder_id;
610 p5_a64 := ddp_x_task_rec.wo_name;
611 p5_a65 := ddp_x_task_rec.wo_status;
612 p5_a66 := ddp_x_task_rec.wo_start_date;
613 p5_a67 := ddp_x_task_rec.wo_end_date;
614 p5_a68 := ddp_x_task_rec.operation_flag;
615 p5_a69 := ddp_x_task_rec.is_production_flag;
616 p5_a70 := ddp_x_task_rec.create_job_flag;
617 p5_a71 := ddp_x_task_rec.stage_id;
618 p5_a72 := ddp_x_task_rec.stage_name;
619 p5_a73 := ddp_x_task_rec.quantity;
620 p5_a74 := ddp_x_task_rec.uom;
621 p5_a75 := ddp_x_task_rec.instance_number;
622 p5_a76 := ddp_x_task_rec.service_type_code;
623 p5_a77 := ddp_x_task_rec.service_type;
624 p5_a78 := ddp_x_task_rec.past_task_start_date;
625 p5_a79 := ddp_x_task_rec.past_task_end_date;
626 p5_a80 := ddp_x_task_rec.route_id;
627 p5_a81 := ddp_x_task_rec.warranty_entitlement_id;
628 p5_a82 := ddp_x_task_rec.contract_number;
629 p5_a83 := ddp_x_task_rec.entitlement_status;
630 p5_a84 := ddp_x_task_rec.entitlement_status_code;
631 p5_a85 := ddp_x_task_rec.claim_name;
632 p5_a86 := ddp_x_task_rec.claim_status;
633 p5_a87 := ddp_x_task_rec.claim_status_code;
634 p5_a88 := ddp_x_task_rec.task_warranty;
635 p5_a89 := ddp_x_task_rec.instance_warranty;
636 p5_a90 := ddp_x_task_rec.warranty_not_appl_flag;
637 p5_a91 := ddp_x_task_rec.stage_type_code;
638 p5_a92 := ddp_x_task_rec.return_to_supply_flag;
639 p5_a93 := ddp_x_task_rec.target_qty;
640 p5_a94 := ddp_x_task_rec.repair_batch_name;
641
642
643
644 end;
645
646 procedure update_task(p_api_version NUMBER
647 , p_init_msg_list VARCHAR2
648 , p_commit VARCHAR2
649 , p_validation_level NUMBER
650 , p_module_type VARCHAR2
651 , p5_a0 in out nocopy NUMBER
652 , p5_a1 in out nocopy NUMBER
653 , p5_a2 in out nocopy NUMBER
654 , p5_a3 in out nocopy VARCHAR2
655 , p5_a4 in out nocopy NUMBER
656 , p5_a5 in out nocopy NUMBER
657 , p5_a6 in out nocopy VARCHAR2
658 , p5_a7 in out nocopy NUMBER
659 , p5_a8 in out nocopy NUMBER
660 , p5_a9 in out nocopy NUMBER
661 , p5_a10 in out nocopy VARCHAR2
662 , p5_a11 in out nocopy NUMBER
663 , p5_a12 in out nocopy VARCHAR2
664 , p5_a13 in out nocopy NUMBER
665 , p5_a14 in out nocopy NUMBER
666 , p5_a15 in out nocopy VARCHAR2
667 , p5_a16 in out nocopy NUMBER
668 , p5_a17 in out nocopy VARCHAR2
669 , p5_a18 in out nocopy NUMBER
670 , p5_a19 in out nocopy NUMBER
671 , p5_a20 in out nocopy NUMBER
672 , p5_a21 in out nocopy VARCHAR2
673 , p5_a22 in out nocopy NUMBER
674 , p5_a23 in out nocopy VARCHAR2
675 , p5_a24 in out nocopy NUMBER
676 , p5_a25 in out nocopy NUMBER
677 , p5_a26 in out nocopy NUMBER
678 , p5_a27 in out nocopy VARCHAR2
679 , p5_a28 in out nocopy VARCHAR2
680 , p5_a29 in out nocopy VARCHAR2
681 , p5_a30 in out nocopy VARCHAR2
682 , p5_a31 in out nocopy VARCHAR2
683 , p5_a32 in out nocopy VARCHAR2
684 , p5_a33 in out nocopy NUMBER
685 , p5_a34 in out nocopy DATE
686 , p5_a35 in out nocopy NUMBER
687 , p5_a36 in out nocopy DATE
688 , p5_a37 in out nocopy NUMBER
689 , p5_a38 in out nocopy NUMBER
690 , p5_a39 in out nocopy VARCHAR2
691 , p5_a40 in out nocopy VARCHAR2
692 , p5_a41 in out nocopy VARCHAR2
693 , p5_a42 in out nocopy VARCHAR2
694 , p5_a43 in out nocopy VARCHAR2
695 , p5_a44 in out nocopy VARCHAR2
696 , p5_a45 in out nocopy VARCHAR2
697 , p5_a46 in out nocopy VARCHAR2
698 , p5_a47 in out nocopy VARCHAR2
699 , p5_a48 in out nocopy VARCHAR2
700 , p5_a49 in out nocopy VARCHAR2
701 , p5_a50 in out nocopy VARCHAR2
702 , p5_a51 in out nocopy VARCHAR2
703 , p5_a52 in out nocopy VARCHAR2
704 , p5_a53 in out nocopy VARCHAR2
705 , p5_a54 in out nocopy VARCHAR2
706 , p5_a55 in out nocopy DATE
707 , p5_a56 in out nocopy DATE
708 , p5_a57 in out nocopy DATE
709 , p5_a58 in out nocopy VARCHAR2
710 , p5_a59 in out nocopy VARCHAR2
711 , p5_a60 in out nocopy NUMBER
712 , p5_a61 in out nocopy NUMBER
713 , p5_a62 in out nocopy VARCHAR2
714 , p5_a63 in out nocopy NUMBER
715 , p5_a64 in out nocopy VARCHAR2
716 , p5_a65 in out nocopy VARCHAR2
717 , p5_a66 in out nocopy DATE
718 , p5_a67 in out nocopy DATE
719 , p5_a68 in out nocopy VARCHAR2
720 , p5_a69 in out nocopy VARCHAR2
721 , p5_a70 in out nocopy VARCHAR2
722 , p5_a71 in out nocopy NUMBER
723 , p5_a72 in out nocopy VARCHAR2
724 , p5_a73 in out nocopy NUMBER
725 , p5_a74 in out nocopy VARCHAR2
726 , p5_a75 in out nocopy VARCHAR2
727 , p5_a76 in out nocopy VARCHAR2
728 , p5_a77 in out nocopy VARCHAR2
729 , p5_a78 in out nocopy DATE
730 , p5_a79 in out nocopy DATE
731 , p5_a80 in out nocopy NUMBER
732 , p5_a81 in out nocopy NUMBER
733 , p5_a82 in out nocopy NUMBER
734 , p5_a83 in out nocopy VARCHAR2
735 , p5_a84 in out nocopy VARCHAR2
736 , p5_a85 in out nocopy VARCHAR2
737 , p5_a86 in out nocopy VARCHAR2
738 , p5_a87 in out nocopy VARCHAR2
739 , p5_a88 in out nocopy VARCHAR2
740 , p5_a89 in out nocopy VARCHAR2
741 , p5_a90 in out nocopy VARCHAR2
742 , p5_a91 in out nocopy VARCHAR2
743 , p5_a92 in out nocopy VARCHAR2
744 , p5_a93 in out nocopy NUMBER
745 , p5_a94 in out nocopy VARCHAR2
746 , x_return_status out nocopy VARCHAR2
747 , x_msg_count out nocopy NUMBER
748 , x_msg_data out nocopy VARCHAR2
749 )
750
751 as
752 ddp_x_task_rec ahl_vwp_rules_pvt.task_rec_type;
753 ddindx binary_integer; indx binary_integer;
754 begin
755
756 -- copy data to the local IN or IN-OUT args, if any
757
758
759
760
761
762 ddp_x_task_rec.visit_task_id := p5_a0;
763 ddp_x_task_rec.visit_task_number := p5_a1;
764 ddp_x_task_rec.visit_id := p5_a2;
765 ddp_x_task_rec.template_flag := p5_a3;
766 ddp_x_task_rec.inventory_item_id := p5_a4;
767 ddp_x_task_rec.item_organization_id := p5_a5;
768 ddp_x_task_rec.item_name := p5_a6;
769 ddp_x_task_rec.cost_parent_id := p5_a7;
770 ddp_x_task_rec.cost_parent_number := p5_a8;
771 ddp_x_task_rec.mr_route_id := p5_a9;
772 ddp_x_task_rec.route_number := p5_a10;
773 ddp_x_task_rec.mr_id := p5_a11;
774 ddp_x_task_rec.mr_title := p5_a12;
775 ddp_x_task_rec.unit_effectivity_id := p5_a13;
776 ddp_x_task_rec.department_id := p5_a14;
777 ddp_x_task_rec.dept_name := p5_a15;
778 ddp_x_task_rec.service_request_id := p5_a16;
779 ddp_x_task_rec.service_request_number := p5_a17;
780 ddp_x_task_rec.originating_task_id := p5_a18;
781 ddp_x_task_rec.orginating_task_number := p5_a19;
782 ddp_x_task_rec.instance_id := p5_a20;
783 ddp_x_task_rec.serial_number := p5_a21;
784 ddp_x_task_rec.project_task_id := p5_a22;
785 ddp_x_task_rec.project_task_number := p5_a23;
786 ddp_x_task_rec.primary_visit_task_id := p5_a24;
787 ddp_x_task_rec.start_from_hour := p5_a25;
788 ddp_x_task_rec.duration := p5_a26;
789 ddp_x_task_rec.task_type_code := p5_a27;
790 ddp_x_task_rec.task_type_value := p5_a28;
791 ddp_x_task_rec.visit_task_name := p5_a29;
792 ddp_x_task_rec.description := p5_a30;
793 ddp_x_task_rec.task_status_code := p5_a31;
794 ddp_x_task_rec.task_status_value := p5_a32;
795 ddp_x_task_rec.object_version_number := p5_a33;
796 ddp_x_task_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a34);
797 ddp_x_task_rec.last_updated_by := p5_a35;
798 ddp_x_task_rec.creation_date := rosetta_g_miss_date_in_map(p5_a36);
799 ddp_x_task_rec.created_by := p5_a37;
800 ddp_x_task_rec.last_update_login := p5_a38;
801 ddp_x_task_rec.attribute_category := p5_a39;
802 ddp_x_task_rec.attribute1 := p5_a40;
803 ddp_x_task_rec.attribute2 := p5_a41;
804 ddp_x_task_rec.attribute3 := p5_a42;
805 ddp_x_task_rec.attribute4 := p5_a43;
806 ddp_x_task_rec.attribute5 := p5_a44;
807 ddp_x_task_rec.attribute6 := p5_a45;
808 ddp_x_task_rec.attribute7 := p5_a46;
809 ddp_x_task_rec.attribute8 := p5_a47;
810 ddp_x_task_rec.attribute9 := p5_a48;
811 ddp_x_task_rec.attribute10 := p5_a49;
812 ddp_x_task_rec.attribute11 := p5_a50;
813 ddp_x_task_rec.attribute12 := p5_a51;
814 ddp_x_task_rec.attribute13 := p5_a52;
815 ddp_x_task_rec.attribute14 := p5_a53;
816 ddp_x_task_rec.attribute15 := p5_a54;
817 ddp_x_task_rec.task_start_date := rosetta_g_miss_date_in_map(p5_a55);
818 ddp_x_task_rec.task_end_date := rosetta_g_miss_date_in_map(p5_a56);
819 ddp_x_task_rec.due_by_date := rosetta_g_miss_date_in_map(p5_a57);
820 ddp_x_task_rec.zone_name := p5_a58;
821 ddp_x_task_rec.sub_zone_name := p5_a59;
822 ddp_x_task_rec.tolerance_after := p5_a60;
823 ddp_x_task_rec.tolerance_before := p5_a61;
824 ddp_x_task_rec.tolerance_uom := p5_a62;
825 ddp_x_task_rec.workorder_id := p5_a63;
826 ddp_x_task_rec.wo_name := p5_a64;
827 ddp_x_task_rec.wo_status := p5_a65;
828 ddp_x_task_rec.wo_start_date := rosetta_g_miss_date_in_map(p5_a66);
829 ddp_x_task_rec.wo_end_date := rosetta_g_miss_date_in_map(p5_a67);
830 ddp_x_task_rec.operation_flag := p5_a68;
831 ddp_x_task_rec.is_production_flag := p5_a69;
832 ddp_x_task_rec.create_job_flag := p5_a70;
833 ddp_x_task_rec.stage_id := p5_a71;
834 ddp_x_task_rec.stage_name := p5_a72;
835 ddp_x_task_rec.quantity := p5_a73;
836 ddp_x_task_rec.uom := p5_a74;
837 ddp_x_task_rec.instance_number := p5_a75;
838 ddp_x_task_rec.service_type_code := p5_a76;
839 ddp_x_task_rec.service_type := p5_a77;
840 ddp_x_task_rec.past_task_start_date := rosetta_g_miss_date_in_map(p5_a78);
841 ddp_x_task_rec.past_task_end_date := rosetta_g_miss_date_in_map(p5_a79);
842 ddp_x_task_rec.route_id := p5_a80;
843 ddp_x_task_rec.warranty_entitlement_id := p5_a81;
844 ddp_x_task_rec.contract_number := p5_a82;
845 ddp_x_task_rec.entitlement_status := p5_a83;
846 ddp_x_task_rec.entitlement_status_code := p5_a84;
847 ddp_x_task_rec.claim_name := p5_a85;
848 ddp_x_task_rec.claim_status := p5_a86;
849 ddp_x_task_rec.claim_status_code := p5_a87;
850 ddp_x_task_rec.task_warranty := p5_a88;
851 ddp_x_task_rec.instance_warranty := p5_a89;
852 ddp_x_task_rec.warranty_not_appl_flag := p5_a90;
853 ddp_x_task_rec.stage_type_code := p5_a91;
854 ddp_x_task_rec.return_to_supply_flag := p5_a92;
855 ddp_x_task_rec.target_qty := p5_a93;
856 ddp_x_task_rec.repair_batch_name := p5_a94;
857
858
859
860
861 -- here's the delegated call to the old PL/SQL routine
862 ahl_vwp_tasks_pvt.update_task(p_api_version,
863 p_init_msg_list,
864 p_commit,
865 p_validation_level,
866 p_module_type,
867 ddp_x_task_rec,
868 x_return_status,
869 x_msg_count,
870 x_msg_data);
871
872 -- copy data back from the local variables to OUT or IN-OUT args, if any
873
874
875
876
877
878 p5_a0 := ddp_x_task_rec.visit_task_id;
879 p5_a1 := ddp_x_task_rec.visit_task_number;
880 p5_a2 := ddp_x_task_rec.visit_id;
881 p5_a3 := ddp_x_task_rec.template_flag;
882 p5_a4 := ddp_x_task_rec.inventory_item_id;
883 p5_a5 := ddp_x_task_rec.item_organization_id;
884 p5_a6 := ddp_x_task_rec.item_name;
885 p5_a7 := ddp_x_task_rec.cost_parent_id;
886 p5_a8 := ddp_x_task_rec.cost_parent_number;
887 p5_a9 := ddp_x_task_rec.mr_route_id;
888 p5_a10 := ddp_x_task_rec.route_number;
889 p5_a11 := ddp_x_task_rec.mr_id;
890 p5_a12 := ddp_x_task_rec.mr_title;
891 p5_a13 := ddp_x_task_rec.unit_effectivity_id;
892 p5_a14 := ddp_x_task_rec.department_id;
893 p5_a15 := ddp_x_task_rec.dept_name;
894 p5_a16 := ddp_x_task_rec.service_request_id;
895 p5_a17 := ddp_x_task_rec.service_request_number;
896 p5_a18 := ddp_x_task_rec.originating_task_id;
897 p5_a19 := ddp_x_task_rec.orginating_task_number;
898 p5_a20 := ddp_x_task_rec.instance_id;
899 p5_a21 := ddp_x_task_rec.serial_number;
900 p5_a22 := ddp_x_task_rec.project_task_id;
901 p5_a23 := ddp_x_task_rec.project_task_number;
902 p5_a24 := ddp_x_task_rec.primary_visit_task_id;
903 p5_a25 := ddp_x_task_rec.start_from_hour;
904 p5_a26 := ddp_x_task_rec.duration;
905 p5_a27 := ddp_x_task_rec.task_type_code;
906 p5_a28 := ddp_x_task_rec.task_type_value;
907 p5_a29 := ddp_x_task_rec.visit_task_name;
908 p5_a30 := ddp_x_task_rec.description;
909 p5_a31 := ddp_x_task_rec.task_status_code;
910 p5_a32 := ddp_x_task_rec.task_status_value;
911 p5_a33 := ddp_x_task_rec.object_version_number;
912 p5_a34 := ddp_x_task_rec.last_update_date;
913 p5_a35 := ddp_x_task_rec.last_updated_by;
914 p5_a36 := ddp_x_task_rec.creation_date;
915 p5_a37 := ddp_x_task_rec.created_by;
916 p5_a38 := ddp_x_task_rec.last_update_login;
917 p5_a39 := ddp_x_task_rec.attribute_category;
918 p5_a40 := ddp_x_task_rec.attribute1;
919 p5_a41 := ddp_x_task_rec.attribute2;
920 p5_a42 := ddp_x_task_rec.attribute3;
921 p5_a43 := ddp_x_task_rec.attribute4;
922 p5_a44 := ddp_x_task_rec.attribute5;
923 p5_a45 := ddp_x_task_rec.attribute6;
924 p5_a46 := ddp_x_task_rec.attribute7;
925 p5_a47 := ddp_x_task_rec.attribute8;
926 p5_a48 := ddp_x_task_rec.attribute9;
927 p5_a49 := ddp_x_task_rec.attribute10;
928 p5_a50 := ddp_x_task_rec.attribute11;
929 p5_a51 := ddp_x_task_rec.attribute12;
930 p5_a52 := ddp_x_task_rec.attribute13;
931 p5_a53 := ddp_x_task_rec.attribute14;
932 p5_a54 := ddp_x_task_rec.attribute15;
933 p5_a55 := ddp_x_task_rec.task_start_date;
934 p5_a56 := ddp_x_task_rec.task_end_date;
935 p5_a57 := ddp_x_task_rec.due_by_date;
936 p5_a58 := ddp_x_task_rec.zone_name;
937 p5_a59 := ddp_x_task_rec.sub_zone_name;
938 p5_a60 := ddp_x_task_rec.tolerance_after;
939 p5_a61 := ddp_x_task_rec.tolerance_before;
940 p5_a62 := ddp_x_task_rec.tolerance_uom;
941 p5_a63 := ddp_x_task_rec.workorder_id;
942 p5_a64 := ddp_x_task_rec.wo_name;
943 p5_a65 := ddp_x_task_rec.wo_status;
944 p5_a66 := ddp_x_task_rec.wo_start_date;
945 p5_a67 := ddp_x_task_rec.wo_end_date;
946 p5_a68 := ddp_x_task_rec.operation_flag;
947 p5_a69 := ddp_x_task_rec.is_production_flag;
948 p5_a70 := ddp_x_task_rec.create_job_flag;
949 p5_a71 := ddp_x_task_rec.stage_id;
950 p5_a72 := ddp_x_task_rec.stage_name;
951 p5_a73 := ddp_x_task_rec.quantity;
952 p5_a74 := ddp_x_task_rec.uom;
953 p5_a75 := ddp_x_task_rec.instance_number;
954 p5_a76 := ddp_x_task_rec.service_type_code;
955 p5_a77 := ddp_x_task_rec.service_type;
956 p5_a78 := ddp_x_task_rec.past_task_start_date;
957 p5_a79 := ddp_x_task_rec.past_task_end_date;
958 p5_a80 := ddp_x_task_rec.route_id;
959 p5_a81 := ddp_x_task_rec.warranty_entitlement_id;
960 p5_a82 := ddp_x_task_rec.contract_number;
961 p5_a83 := ddp_x_task_rec.entitlement_status;
962 p5_a84 := ddp_x_task_rec.entitlement_status_code;
963 p5_a85 := ddp_x_task_rec.claim_name;
964 p5_a86 := ddp_x_task_rec.claim_status;
965 p5_a87 := ddp_x_task_rec.claim_status_code;
966 p5_a88 := ddp_x_task_rec.task_warranty;
967 p5_a89 := ddp_x_task_rec.instance_warranty;
968 p5_a90 := ddp_x_task_rec.warranty_not_appl_flag;
969 p5_a91 := ddp_x_task_rec.stage_type_code;
970 p5_a92 := ddp_x_task_rec.return_to_supply_flag;
971 p5_a93 := ddp_x_task_rec.target_qty;
972 p5_a94 := ddp_x_task_rec.repair_batch_name;
973
974
975
976 end;
977
978 procedure search_task(p_api_version NUMBER
979 , p_init_msg_list VARCHAR2
980 , p_commit VARCHAR2
981 , p_validation_level NUMBER
982 , p_module_type VARCHAR2
983 , p_visit_id NUMBER
984 , p6_a0 in out nocopy JTF_NUMBER_TABLE
985 , p6_a1 in out nocopy JTF_DATE_TABLE
986 , p6_a2 in out nocopy JTF_DATE_TABLE
987 , x_return_status out nocopy VARCHAR2
988 , x_msg_count out nocopy NUMBER
989 , x_msg_data out nocopy VARCHAR2
990 )
991
992 as
993 ddp_x_srch_task_tbl ahl_vwp_tasks_pvt.srch_task_tbl_type;
994 ddindx binary_integer; indx binary_integer;
995 begin
996
997 -- copy data to the local IN or IN-OUT args, if any
998
999
1000
1001
1002
1003
1004 ahl_vwp_tasks_pvt_w.rosetta_table_copy_in_p1(ddp_x_srch_task_tbl, p6_a0
1005 , p6_a1
1006 , p6_a2
1007 );
1008
1009
1010
1011
1012 -- here's the delegated call to the old PL/SQL routine
1013 ahl_vwp_tasks_pvt.search_task(p_api_version,
1014 p_init_msg_list,
1015 p_commit,
1016 p_validation_level,
1017 p_module_type,
1018 p_visit_id,
1019 ddp_x_srch_task_tbl,
1020 x_return_status,
1021 x_msg_count,
1022 x_msg_data);
1023
1024 -- copy data back from the local variables to OUT or IN-OUT args, if any
1025
1026
1027
1028
1029
1030
1031 ahl_vwp_tasks_pvt_w.rosetta_table_copy_out_p1(ddp_x_srch_task_tbl, p6_a0
1032 , p6_a1
1033 , p6_a2
1034 );
1035
1036
1037
1038 end;
1039
1040 procedure create_pup_tasks(p_api_version NUMBER
1041 , p_init_msg_list VARCHAR2
1042 , p_commit VARCHAR2
1043 , p_validation_level NUMBER
1044 , p_module_type VARCHAR2
1045 , p5_a0 in out nocopy JTF_NUMBER_TABLE
1046 , p5_a1 in out nocopy JTF_NUMBER_TABLE
1047 , p5_a2 in out nocopy JTF_NUMBER_TABLE
1048 , p5_a3 in out nocopy JTF_VARCHAR2_TABLE_100
1049 , p5_a4 in out nocopy JTF_NUMBER_TABLE
1050 , p5_a5 in out nocopy JTF_NUMBER_TABLE
1051 , p5_a6 in out nocopy JTF_VARCHAR2_TABLE_100
1052 , p5_a7 in out nocopy JTF_NUMBER_TABLE
1053 , p5_a8 in out nocopy JTF_NUMBER_TABLE
1054 , p5_a9 in out nocopy JTF_NUMBER_TABLE
1055 , p5_a10 in out nocopy JTF_VARCHAR2_TABLE_100
1056 , p5_a11 in out nocopy JTF_NUMBER_TABLE
1057 , p5_a12 in out nocopy JTF_VARCHAR2_TABLE_100
1058 , p5_a13 in out nocopy JTF_NUMBER_TABLE
1059 , p5_a14 in out nocopy JTF_NUMBER_TABLE
1060 , p5_a15 in out nocopy JTF_VARCHAR2_TABLE_300
1061 , p5_a16 in out nocopy JTF_NUMBER_TABLE
1062 , p5_a17 in out nocopy JTF_VARCHAR2_TABLE_100
1063 , p5_a18 in out nocopy JTF_NUMBER_TABLE
1064 , p5_a19 in out nocopy JTF_NUMBER_TABLE
1065 , p5_a20 in out nocopy JTF_NUMBER_TABLE
1066 , p5_a21 in out nocopy JTF_VARCHAR2_TABLE_100
1067 , p5_a22 in out nocopy JTF_NUMBER_TABLE
1068 , p5_a23 in out nocopy JTF_VARCHAR2_TABLE_100
1069 , p5_a24 in out nocopy JTF_NUMBER_TABLE
1070 , p5_a25 in out nocopy JTF_NUMBER_TABLE
1071 , p5_a26 in out nocopy JTF_NUMBER_TABLE
1072 , p5_a27 in out nocopy JTF_VARCHAR2_TABLE_100
1073 , p5_a28 in out nocopy JTF_VARCHAR2_TABLE_100
1074 , p5_a29 in out nocopy JTF_VARCHAR2_TABLE_100
1075 , p5_a30 in out nocopy JTF_VARCHAR2_TABLE_4000
1076 , p5_a31 in out nocopy JTF_VARCHAR2_TABLE_100
1077 , p5_a32 in out nocopy JTF_VARCHAR2_TABLE_100
1078 , p5_a33 in out nocopy JTF_NUMBER_TABLE
1079 , p5_a34 in out nocopy JTF_DATE_TABLE
1080 , p5_a35 in out nocopy JTF_NUMBER_TABLE
1081 , p5_a36 in out nocopy JTF_DATE_TABLE
1082 , p5_a37 in out nocopy JTF_NUMBER_TABLE
1083 , p5_a38 in out nocopy JTF_NUMBER_TABLE
1084 , p5_a39 in out nocopy JTF_VARCHAR2_TABLE_100
1085 , p5_a40 in out nocopy JTF_VARCHAR2_TABLE_200
1086 , p5_a41 in out nocopy JTF_VARCHAR2_TABLE_200
1087 , p5_a42 in out nocopy JTF_VARCHAR2_TABLE_200
1088 , p5_a43 in out nocopy JTF_VARCHAR2_TABLE_200
1089 , p5_a44 in out nocopy JTF_VARCHAR2_TABLE_200
1090 , p5_a45 in out nocopy JTF_VARCHAR2_TABLE_200
1091 , p5_a46 in out nocopy JTF_VARCHAR2_TABLE_200
1092 , p5_a47 in out nocopy JTF_VARCHAR2_TABLE_200
1093 , p5_a48 in out nocopy JTF_VARCHAR2_TABLE_200
1094 , p5_a49 in out nocopy JTF_VARCHAR2_TABLE_200
1095 , p5_a50 in out nocopy JTF_VARCHAR2_TABLE_200
1096 , p5_a51 in out nocopy JTF_VARCHAR2_TABLE_200
1097 , p5_a52 in out nocopy JTF_VARCHAR2_TABLE_200
1098 , p5_a53 in out nocopy JTF_VARCHAR2_TABLE_200
1099 , p5_a54 in out nocopy JTF_VARCHAR2_TABLE_200
1100 , p5_a55 in out nocopy JTF_DATE_TABLE
1101 , p5_a56 in out nocopy JTF_DATE_TABLE
1102 , p5_a57 in out nocopy JTF_DATE_TABLE
1103 , p5_a58 in out nocopy JTF_VARCHAR2_TABLE_100
1104 , p5_a59 in out nocopy JTF_VARCHAR2_TABLE_100
1105 , p5_a60 in out nocopy JTF_NUMBER_TABLE
1106 , p5_a61 in out nocopy JTF_NUMBER_TABLE
1107 , p5_a62 in out nocopy JTF_VARCHAR2_TABLE_100
1108 , p5_a63 in out nocopy JTF_NUMBER_TABLE
1109 , p5_a64 in out nocopy JTF_VARCHAR2_TABLE_300
1110 , p5_a65 in out nocopy JTF_VARCHAR2_TABLE_100
1111 , p5_a66 in out nocopy JTF_DATE_TABLE
1112 , p5_a67 in out nocopy JTF_DATE_TABLE
1113 , p5_a68 in out nocopy JTF_VARCHAR2_TABLE_100
1114 , p5_a69 in out nocopy JTF_VARCHAR2_TABLE_100
1115 , p5_a70 in out nocopy JTF_VARCHAR2_TABLE_100
1116 , p5_a71 in out nocopy JTF_NUMBER_TABLE
1117 , p5_a72 in out nocopy JTF_VARCHAR2_TABLE_100
1118 , p5_a73 in out nocopy JTF_NUMBER_TABLE
1119 , p5_a74 in out nocopy JTF_VARCHAR2_TABLE_100
1120 , p5_a75 in out nocopy JTF_VARCHAR2_TABLE_100
1121 , p5_a76 in out nocopy JTF_VARCHAR2_TABLE_100
1122 , p5_a77 in out nocopy JTF_VARCHAR2_TABLE_100
1123 , p5_a78 in out nocopy JTF_DATE_TABLE
1124 , p5_a79 in out nocopy JTF_DATE_TABLE
1125 , p5_a80 in out nocopy JTF_NUMBER_TABLE
1126 , p5_a81 in out nocopy JTF_NUMBER_TABLE
1127 , p5_a82 in out nocopy JTF_NUMBER_TABLE
1128 , p5_a83 in out nocopy JTF_VARCHAR2_TABLE_100
1129 , p5_a84 in out nocopy JTF_VARCHAR2_TABLE_100
1130 , p5_a85 in out nocopy JTF_VARCHAR2_TABLE_100
1131 , p5_a86 in out nocopy JTF_VARCHAR2_TABLE_100
1132 , p5_a87 in out nocopy JTF_VARCHAR2_TABLE_100
1133 , p5_a88 in out nocopy JTF_VARCHAR2_TABLE_100
1134 , p5_a89 in out nocopy JTF_VARCHAR2_TABLE_100
1135 , p5_a90 in out nocopy JTF_VARCHAR2_TABLE_100
1136 , p5_a91 in out nocopy JTF_VARCHAR2_TABLE_100
1137 , p5_a92 in out nocopy JTF_VARCHAR2_TABLE_100
1138 , p5_a93 in out nocopy JTF_NUMBER_TABLE
1139 , p5_a94 in out nocopy JTF_VARCHAR2_TABLE_300
1140 , x_return_status out nocopy VARCHAR2
1141 , x_msg_count out nocopy NUMBER
1142 , x_msg_data out nocopy VARCHAR2
1143 )
1144
1145 as
1146 ddp_x_task_tbl ahl_vwp_rules_pvt.task_tbl_type;
1147 ddindx binary_integer; indx binary_integer;
1148 begin
1149
1150 -- copy data to the local IN or IN-OUT args, if any
1151
1152
1153
1154
1155
1156 ahl_vwp_rules_pvt_w.rosetta_table_copy_in_p5(ddp_x_task_tbl, p5_a0
1157 , p5_a1
1158 , p5_a2
1159 , p5_a3
1160 , p5_a4
1161 , p5_a5
1162 , p5_a6
1163 , p5_a7
1164 , p5_a8
1165 , p5_a9
1166 , p5_a10
1167 , p5_a11
1168 , p5_a12
1169 , p5_a13
1170 , p5_a14
1171 , p5_a15
1172 , p5_a16
1173 , p5_a17
1174 , p5_a18
1175 , p5_a19
1176 , p5_a20
1177 , p5_a21
1178 , p5_a22
1179 , p5_a23
1180 , p5_a24
1181 , p5_a25
1182 , p5_a26
1183 , p5_a27
1184 , p5_a28
1185 , p5_a29
1186 , p5_a30
1187 , p5_a31
1188 , p5_a32
1189 , p5_a33
1190 , p5_a34
1191 , p5_a35
1192 , p5_a36
1193 , p5_a37
1194 , p5_a38
1195 , p5_a39
1196 , p5_a40
1197 , p5_a41
1198 , p5_a42
1199 , p5_a43
1200 , p5_a44
1201 , p5_a45
1202 , p5_a46
1203 , p5_a47
1204 , p5_a48
1205 , p5_a49
1206 , p5_a50
1207 , p5_a51
1208 , p5_a52
1209 , p5_a53
1210 , p5_a54
1211 , p5_a55
1212 , p5_a56
1213 , p5_a57
1214 , p5_a58
1215 , p5_a59
1216 , p5_a60
1217 , p5_a61
1218 , p5_a62
1219 , p5_a63
1220 , p5_a64
1221 , p5_a65
1222 , p5_a66
1223 , p5_a67
1224 , p5_a68
1225 , p5_a69
1226 , p5_a70
1227 , p5_a71
1228 , p5_a72
1229 , p5_a73
1230 , p5_a74
1231 , p5_a75
1232 , p5_a76
1233 , p5_a77
1234 , p5_a78
1235 , p5_a79
1236 , p5_a80
1237 , p5_a81
1238 , p5_a82
1239 , p5_a83
1240 , p5_a84
1241 , p5_a85
1242 , p5_a86
1243 , p5_a87
1244 , p5_a88
1245 , p5_a89
1246 , p5_a90
1247 , p5_a91
1248 , p5_a92
1249 , p5_a93
1250 , p5_a94
1251 );
1252
1253
1254
1255
1256 -- here's the delegated call to the old PL/SQL routine
1257 ahl_vwp_tasks_pvt.create_pup_tasks(p_api_version,
1258 p_init_msg_list,
1259 p_commit,
1260 p_validation_level,
1261 p_module_type,
1262 ddp_x_task_tbl,
1263 x_return_status,
1264 x_msg_count,
1265 x_msg_data);
1266
1267 -- copy data back from the local variables to OUT or IN-OUT args, if any
1268
1269
1270
1271
1272
1273 ahl_vwp_rules_pvt_w.rosetta_table_copy_out_p5(ddp_x_task_tbl, p5_a0
1274 , p5_a1
1275 , p5_a2
1276 , p5_a3
1277 , p5_a4
1278 , p5_a5
1279 , p5_a6
1280 , p5_a7
1281 , p5_a8
1282 , p5_a9
1283 , p5_a10
1284 , p5_a11
1285 , p5_a12
1286 , p5_a13
1287 , p5_a14
1288 , p5_a15
1289 , p5_a16
1290 , p5_a17
1291 , p5_a18
1292 , p5_a19
1293 , p5_a20
1294 , p5_a21
1295 , p5_a22
1296 , p5_a23
1297 , p5_a24
1298 , p5_a25
1299 , p5_a26
1300 , p5_a27
1301 , p5_a28
1302 , p5_a29
1303 , p5_a30
1304 , p5_a31
1305 , p5_a32
1306 , p5_a33
1307 , p5_a34
1308 , p5_a35
1309 , p5_a36
1310 , p5_a37
1311 , p5_a38
1312 , p5_a39
1313 , p5_a40
1314 , p5_a41
1315 , p5_a42
1316 , p5_a43
1317 , p5_a44
1318 , p5_a45
1319 , p5_a46
1320 , p5_a47
1321 , p5_a48
1322 , p5_a49
1323 , p5_a50
1324 , p5_a51
1325 , p5_a52
1326 , p5_a53
1327 , p5_a54
1328 , p5_a55
1329 , p5_a56
1330 , p5_a57
1331 , p5_a58
1332 , p5_a59
1333 , p5_a60
1334 , p5_a61
1335 , p5_a62
1336 , p5_a63
1337 , p5_a64
1338 , p5_a65
1339 , p5_a66
1340 , p5_a67
1341 , p5_a68
1342 , p5_a69
1343 , p5_a70
1344 , p5_a71
1345 , p5_a72
1346 , p5_a73
1347 , p5_a74
1348 , p5_a75
1349 , p5_a76
1350 , p5_a77
1351 , p5_a78
1352 , p5_a79
1353 , p5_a80
1354 , p5_a81
1355 , p5_a82
1356 , p5_a83
1357 , p5_a84
1358 , p5_a85
1359 , p5_a86
1360 , p5_a87
1361 , p5_a88
1362 , p5_a89
1363 , p5_a90
1364 , p5_a91
1365 , p5_a92
1366 , p5_a93
1367 , p5_a94
1368 );
1369
1370
1371
1372 end;
1373
1374 procedure associate_default_mrs(p_api_version NUMBER
1375 , p_init_msg_list VARCHAR2
1376 , p_commit VARCHAR2
1377 , p_validation_level NUMBER
1378 , p_module_type VARCHAR2
1379 , x_return_status out nocopy VARCHAR2
1380 , x_msg_count out nocopy NUMBER
1381 , x_msg_data out nocopy VARCHAR2
1382 , p8_a0 NUMBER
1383 , p8_a1 VARCHAR2
1384 , p8_a2 NUMBER
1385 , p8_a3 NUMBER
1386 , p8_a4 DATE
1387 , p8_a5 NUMBER
1388 , p8_a6 DATE
1389 , p8_a7 NUMBER
1390 , p8_a8 NUMBER
1391 , p8_a9 NUMBER
1392 , p8_a10 VARCHAR2
1393 , p8_a11 NUMBER
1394 , p8_a12 VARCHAR2
1395 , p8_a13 NUMBER
1396 , p8_a14 VARCHAR2
1397 , p8_a15 VARCHAR2
1398 , p8_a16 VARCHAR2
1399 , p8_a17 DATE
1400 , p8_a18 NUMBER
1401 , p8_a19 NUMBER
1402 , p8_a20 DATE
1403 , p8_a21 NUMBER
1404 , p8_a22 NUMBER
1405 , p8_a23 DATE
1406 , p8_a24 DATE
1407 , p8_a25 VARCHAR2
1408 , p8_a26 VARCHAR2
1409 , p8_a27 VARCHAR2
1410 , p8_a28 VARCHAR2
1411 , p8_a29 NUMBER
1412 , p8_a30 VARCHAR2
1413 , p8_a31 NUMBER
1414 , p8_a32 VARCHAR2
1415 , p8_a33 NUMBER
1416 , p8_a34 VARCHAR2
1417 , p8_a35 NUMBER
1418 , p8_a36 NUMBER
1419 , p8_a37 VARCHAR2
1420 , p8_a38 VARCHAR2
1421 , p8_a39 VARCHAR2
1422 , p8_a40 VARCHAR2
1423 , p8_a41 VARCHAR2
1424 , p8_a42 VARCHAR2
1425 , p8_a43 NUMBER
1426 , p8_a44 NUMBER
1427 , p8_a45 VARCHAR2
1428 , p8_a46 NUMBER
1429 , p8_a47 VARCHAR2
1430 , p8_a48 VARCHAR2
1431 , p8_a49 VARCHAR2
1432 , p8_a50 VARCHAR2
1433 , p8_a51 VARCHAR2
1434 , p8_a52 VARCHAR2
1435 , p8_a53 VARCHAR2
1436 , p8_a54 VARCHAR2
1437 , p8_a55 VARCHAR2
1438 , p8_a56 VARCHAR2
1439 , p8_a57 VARCHAR2
1440 , p8_a58 VARCHAR2
1441 , p8_a59 VARCHAR2
1442 , p8_a60 VARCHAR2
1443 , p8_a61 VARCHAR2
1444 , p8_a62 VARCHAR2
1445 , p8_a63 VARCHAR2
1446 , p8_a64 VARCHAR2
1447 , p8_a65 VARCHAR2
1448 , p8_a66 VARCHAR2
1449 , p8_a67 NUMBER
1450 , p8_a68 VARCHAR2
1451 , p8_a69 VARCHAR2
1452 , p8_a70 NUMBER
1453 , p8_a71 VARCHAR2
1454 , p8_a72 VARCHAR2
1455 , p8_a73 NUMBER
1456 , p8_a74 VARCHAR2
1457 , p8_a75 VARCHAR2
1458 , p8_a76 NUMBER
1459 , p8_a77 VARCHAR2
1460 , p8_a78 VARCHAR2
1461 , p8_a79 NUMBER
1462 , p8_a80 NUMBER
1463 , p8_a81 VARCHAR2
1464 , p8_a82 VARCHAR2
1465 , p8_a83 DATE
1466 , p8_a84 VARCHAR2
1467 , p8_a85 VARCHAR2
1468 , p8_a86 VARCHAR2
1469 , p8_a87 VARCHAR2
1470 , p8_a88 VARCHAR2
1471 , p8_a89 VARCHAR2
1472 , p8_a90 VARCHAR2
1473 , p8_a91 NUMBER
1474 , p8_a92 NUMBER
1475 , p8_a93 VARCHAR2
1476 , p8_a94 VARCHAR2
1477 , p8_a95 NUMBER
1478 , p8_a96 VARCHAR2
1479 , p8_a97 VARCHAR2
1480 , p8_a98 NUMBER
1481 , p8_a99 VARCHAR2
1482 )
1483
1484 as
1485 ddp_visit_rec ahl_vwp_visits_pvt.visit_rec_type;
1486 ddindx binary_integer; indx binary_integer;
1487 begin
1488
1489 -- copy data to the local IN or IN-OUT args, if any
1490
1491
1492
1493
1494
1495
1496
1497
1498 ddp_visit_rec.visit_id := p8_a0;
1499 ddp_visit_rec.visit_name := p8_a1;
1500 ddp_visit_rec.visit_number := p8_a2;
1501 ddp_visit_rec.object_version_number := p8_a3;
1502 ddp_visit_rec.last_update_date := rosetta_g_miss_date_in_map(p8_a4);
1503 ddp_visit_rec.last_updated_by := p8_a5;
1504 ddp_visit_rec.creation_date := rosetta_g_miss_date_in_map(p8_a6);
1505 ddp_visit_rec.created_by := p8_a7;
1506 ddp_visit_rec.last_update_login := p8_a8;
1507 ddp_visit_rec.organization_id := p8_a9;
1508 ddp_visit_rec.org_name := p8_a10;
1509 ddp_visit_rec.department_id := p8_a11;
1510 ddp_visit_rec.dept_name := p8_a12;
1511 ddp_visit_rec.service_request_id := p8_a13;
1512 ddp_visit_rec.service_request_number := p8_a14;
1513 ddp_visit_rec.space_category_code := p8_a15;
1514 ddp_visit_rec.space_category_name := p8_a16;
1515 ddp_visit_rec.start_date := rosetta_g_miss_date_in_map(p8_a17);
1516 ddp_visit_rec.start_hour := p8_a18;
1517 ddp_visit_rec.start_min := p8_a19;
1518 ddp_visit_rec.plan_end_date := rosetta_g_miss_date_in_map(p8_a20);
1519 ddp_visit_rec.plan_end_hour := p8_a21;
1520 ddp_visit_rec.plan_end_min := p8_a22;
1521 ddp_visit_rec.end_date := rosetta_g_miss_date_in_map(p8_a23);
1522 ddp_visit_rec.due_by_date := rosetta_g_miss_date_in_map(p8_a24);
1523 ddp_visit_rec.visit_type_code := p8_a25;
1524 ddp_visit_rec.visit_type_name := p8_a26;
1525 ddp_visit_rec.status_code := p8_a27;
1526 ddp_visit_rec.status_name := p8_a28;
1527 ddp_visit_rec.simulation_plan_id := p8_a29;
1528 ddp_visit_rec.simulation_plan_name := p8_a30;
1529 ddp_visit_rec.asso_primary_visit_id := p8_a31;
1530 ddp_visit_rec.unit_name := p8_a32;
1531 ddp_visit_rec.item_instance_id := p8_a33;
1532 ddp_visit_rec.serial_number := p8_a34;
1533 ddp_visit_rec.inventory_item_id := p8_a35;
1534 ddp_visit_rec.item_organization_id := p8_a36;
1535 ddp_visit_rec.item_name := p8_a37;
1536 ddp_visit_rec.simulation_delete_flag := p8_a38;
1537 ddp_visit_rec.template_flag := p8_a39;
1538 ddp_visit_rec.out_of_sync_flag := p8_a40;
1539 ddp_visit_rec.project_flag := p8_a41;
1540 ddp_visit_rec.project_flag_code := p8_a42;
1541 ddp_visit_rec.project_id := p8_a43;
1542 ddp_visit_rec.project_number := p8_a44;
1543 ddp_visit_rec.description := p8_a45;
1544 ddp_visit_rec.duration := p8_a46;
1545 ddp_visit_rec.attribute_category := p8_a47;
1546 ddp_visit_rec.attribute1 := p8_a48;
1547 ddp_visit_rec.attribute2 := p8_a49;
1548 ddp_visit_rec.attribute3 := p8_a50;
1549 ddp_visit_rec.attribute4 := p8_a51;
1550 ddp_visit_rec.attribute5 := p8_a52;
1551 ddp_visit_rec.attribute6 := p8_a53;
1552 ddp_visit_rec.attribute7 := p8_a54;
1553 ddp_visit_rec.attribute8 := p8_a55;
1554 ddp_visit_rec.attribute9 := p8_a56;
1555 ddp_visit_rec.attribute10 := p8_a57;
1556 ddp_visit_rec.attribute11 := p8_a58;
1557 ddp_visit_rec.attribute12 := p8_a59;
1558 ddp_visit_rec.attribute13 := p8_a60;
1559 ddp_visit_rec.attribute14 := p8_a61;
1560 ddp_visit_rec.attribute15 := p8_a62;
1561 ddp_visit_rec.operation_flag := p8_a63;
1562 ddp_visit_rec.outside_party_flag := p8_a64;
1563 ddp_visit_rec.job_number := p8_a65;
1564 ddp_visit_rec.proj_template_name := p8_a66;
1565 ddp_visit_rec.proj_template_id := p8_a67;
1566 ddp_visit_rec.priority_value := p8_a68;
1567 ddp_visit_rec.priority_code := p8_a69;
1568 ddp_visit_rec.unit_schedule_id := p8_a70;
1569 ddp_visit_rec.visit_create_type := p8_a71;
1570 ddp_visit_rec.visit_create_meaning := p8_a72;
1571 ddp_visit_rec.unit_header_id := p8_a73;
1572 ddp_visit_rec.flight_number := p8_a74;
1573 ddp_visit_rec.project_name := p8_a75;
1574 ddp_visit_rec.top_project_task_id := p8_a76;
1575 ddp_visit_rec.subinventory := p8_a77;
1576 ddp_visit_rec.locator_segment := p8_a78;
1577 ddp_visit_rec.inv_locator_id := p8_a79;
1578 ddp_visit_rec.cp_request_id := p8_a80;
1579 ddp_visit_rec.cp_phase_code := p8_a81;
1580 ddp_visit_rec.cp_status_code := p8_a82;
1581 ddp_visit_rec.cp_request_date := rosetta_g_miss_date_in_map(p8_a83);
1582 ddp_visit_rec.jc_exist := p8_a84;
1583 ddp_visit_rec.view_jc_url := p8_a85;
1584 ddp_visit_rec.jc_gen_status := p8_a86;
1585 ddp_visit_rec.jc_gen_error_text := p8_a87;
1586 ddp_visit_rec.past_dated_visit_flag := p8_a88;
1587 ddp_visit_rec.locked_flag := p8_a89;
1588 ddp_visit_rec.firmed_flag := p8_a90;
1589 ddp_visit_rec.tasks_ovn_updated_count := p8_a91;
1590 ddp_visit_rec.stages_ovn_updated_count := p8_a92;
1591 ddp_visit_rec.comp_planning_subinv := p8_a93;
1592 ddp_visit_rec.comp_planning_loc_seg := p8_a94;
1593 ddp_visit_rec.comp_planning_loc_id := p8_a95;
1594 ddp_visit_rec.comp_inrepair_subinv := p8_a96;
1595 ddp_visit_rec.comp_inrepair_loc_seg := p8_a97;
1596 ddp_visit_rec.comp_inrepair_loc_id := p8_a98;
1597 ddp_visit_rec.item_owner_flag := p8_a99;
1598
1599 -- here's the delegated call to the old PL/SQL routine
1600 ahl_vwp_tasks_pvt.associate_default_mrs(p_api_version,
1601 p_init_msg_list,
1602 p_commit,
1603 p_validation_level,
1604 p_module_type,
1605 x_return_status,
1606 x_msg_count,
1607 x_msg_data,
1608 ddp_visit_rec);
1609
1610 -- copy data back from the local variables to OUT or IN-OUT args, if any
1611
1612
1613
1614
1615
1616
1617
1618
1619 end;
1620
1621 end ahl_vwp_tasks_pvt_w;