[Home] [Help]
PACKAGE BODY: APPS.IEM_SERVICEREQUEST_PVT_W
Source
1 package body iem_servicerequest_pvt_w as
2 /* $Header: iemcspkb.pls 115.3 2002/12/23 19:34:53 mrabatin 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_p4(t out nocopy iem_servicerequest_pvt.notes_table, a0 JTF_VARCHAR2_TABLE_2000
14 , a1 JTF_VARCHAR2_TABLE_32767
15 , a2 JTF_VARCHAR2_TABLE_300
16 , a3 JTF_VARCHAR2_TABLE_100
17 , a4 JTF_NUMBER_TABLE
18 , a5 JTF_VARCHAR2_TABLE_100
19 , a6 JTF_NUMBER_TABLE
20 , a7 JTF_VARCHAR2_TABLE_100
21 , a8 JTF_NUMBER_TABLE
22 ) as
23 ddindx binary_integer; indx binary_integer;
24 begin
25 if a0 is not null and a0.count > 0 then
26 if a0.count > 0 then
27 indx := a0.first;
28 ddindx := 1;
29 while true loop
30 t(ddindx).note := a0(indx);
31 t(ddindx).note_detail := a1(indx);
32 t(ddindx).note_type := a2(indx);
33 t(ddindx).note_context_type_01 := a3(indx);
34 t(ddindx).note_context_type_id_01 := a4(indx);
35 t(ddindx).note_context_type_02 := a5(indx);
36 t(ddindx).note_context_type_id_02 := a6(indx);
37 t(ddindx).note_context_type_03 := a7(indx);
38 t(ddindx).note_context_type_id_03 := a8(indx);
39 ddindx := ddindx+1;
40 if a0.last =indx
41 then exit;
42 end if;
43 indx := a0.next(indx);
44 end loop;
45 end if;
46 end if;
47 end rosetta_table_copy_in_p4;
48 procedure rosetta_table_copy_out_p4(t iem_servicerequest_pvt.notes_table, a0 out nocopy JTF_VARCHAR2_TABLE_2000
49 , a1 out nocopy JTF_VARCHAR2_TABLE_32767
50 , a2 out nocopy JTF_VARCHAR2_TABLE_300
51 , a3 out nocopy JTF_VARCHAR2_TABLE_100
52 , a4 out nocopy JTF_NUMBER_TABLE
53 , a5 out nocopy JTF_VARCHAR2_TABLE_100
54 , a6 out nocopy JTF_NUMBER_TABLE
55 , a7 out nocopy JTF_VARCHAR2_TABLE_100
56 , a8 out nocopy JTF_NUMBER_TABLE
57 ) as
58 ddindx binary_integer; indx binary_integer;
59 begin
60 if t is null or t.count = 0 then
61 a0 := JTF_VARCHAR2_TABLE_2000();
62 a1 := JTF_VARCHAR2_TABLE_32767();
63 a2 := JTF_VARCHAR2_TABLE_300();
64 a3 := JTF_VARCHAR2_TABLE_100();
65 a4 := JTF_NUMBER_TABLE();
66 a5 := JTF_VARCHAR2_TABLE_100();
67 a6 := JTF_NUMBER_TABLE();
68 a7 := JTF_VARCHAR2_TABLE_100();
69 a8 := JTF_NUMBER_TABLE();
70 else
71 a0 := JTF_VARCHAR2_TABLE_2000();
72 a1 := JTF_VARCHAR2_TABLE_32767();
73 a2 := JTF_VARCHAR2_TABLE_300();
74 a3 := JTF_VARCHAR2_TABLE_100();
75 a4 := JTF_NUMBER_TABLE();
76 a5 := JTF_VARCHAR2_TABLE_100();
77 a6 := JTF_NUMBER_TABLE();
78 a7 := JTF_VARCHAR2_TABLE_100();
79 a8 := JTF_NUMBER_TABLE();
80 if t.count > 0 then
81 a0.extend(t.count);
82 a1.extend(t.count);
83 a2.extend(t.count);
84 a3.extend(t.count);
85 a4.extend(t.count);
86 a5.extend(t.count);
87 a6.extend(t.count);
88 a7.extend(t.count);
89 a8.extend(t.count);
90 ddindx := t.first;
91 indx := 1;
92 while true loop
93 a0(indx) := t(ddindx).note;
94 a1(indx) := t(ddindx).note_detail;
95 a2(indx) := t(ddindx).note_type;
96 a3(indx) := t(ddindx).note_context_type_01;
97 a4(indx) := t(ddindx).note_context_type_id_01;
98 a5(indx) := t(ddindx).note_context_type_02;
99 a6(indx) := t(ddindx).note_context_type_id_02;
100 a7(indx) := t(ddindx).note_context_type_03;
101 a8(indx) := t(ddindx).note_context_type_id_03;
102 indx := indx+1;
103 if t.last =ddindx
104 then exit;
105 end if;
106 ddindx := t.next(ddindx);
107 end loop;
108 end if;
109 end if;
110 end rosetta_table_copy_out_p4;
111
112 procedure rosetta_table_copy_in_p6(t out nocopy iem_servicerequest_pvt.contacts_table, a0 JTF_NUMBER_TABLE
113 , a1 JTF_NUMBER_TABLE
114 , a2 JTF_NUMBER_TABLE
115 , a3 JTF_VARCHAR2_TABLE_100
116 , a4 JTF_VARCHAR2_TABLE_100
117 , a5 JTF_VARCHAR2_TABLE_100
118 ) as
119 ddindx binary_integer; indx binary_integer;
120 begin
121 if a0 is not null and a0.count > 0 then
122 if a0.count > 0 then
123 indx := a0.first;
124 ddindx := 1;
125 while true loop
126 t(ddindx).sr_contact_point_id := a0(indx);
127 t(ddindx).party_id := a1(indx);
128 t(ddindx).contact_point_id := a2(indx);
129 t(ddindx).contact_point_type := a3(indx);
130 t(ddindx).primary_flag := a4(indx);
131 t(ddindx).contact_type := a5(indx);
132 ddindx := ddindx+1;
133 if a0.last =indx
134 then exit;
135 end if;
136 indx := a0.next(indx);
137 end loop;
138 end if;
139 end if;
140 end rosetta_table_copy_in_p6;
141 procedure rosetta_table_copy_out_p6(t iem_servicerequest_pvt.contacts_table, a0 out nocopy JTF_NUMBER_TABLE
142 , a1 out nocopy JTF_NUMBER_TABLE
143 , a2 out nocopy JTF_NUMBER_TABLE
144 , a3 out nocopy JTF_VARCHAR2_TABLE_100
145 , a4 out nocopy JTF_VARCHAR2_TABLE_100
146 , a5 out nocopy JTF_VARCHAR2_TABLE_100
147 ) as
148 ddindx binary_integer; indx binary_integer;
149 begin
150 if t is null or t.count = 0 then
151 a0 := JTF_NUMBER_TABLE();
152 a1 := JTF_NUMBER_TABLE();
153 a2 := JTF_NUMBER_TABLE();
154 a3 := JTF_VARCHAR2_TABLE_100();
155 a4 := JTF_VARCHAR2_TABLE_100();
156 a5 := JTF_VARCHAR2_TABLE_100();
157 else
158 a0 := JTF_NUMBER_TABLE();
159 a1 := JTF_NUMBER_TABLE();
160 a2 := JTF_NUMBER_TABLE();
161 a3 := JTF_VARCHAR2_TABLE_100();
162 a4 := JTF_VARCHAR2_TABLE_100();
163 a5 := JTF_VARCHAR2_TABLE_100();
164 if t.count > 0 then
165 a0.extend(t.count);
166 a1.extend(t.count);
167 a2.extend(t.count);
168 a3.extend(t.count);
169 a4.extend(t.count);
170 a5.extend(t.count);
171 ddindx := t.first;
172 indx := 1;
173 while true loop
174 a0(indx) := t(ddindx).sr_contact_point_id;
175 a1(indx) := t(ddindx).party_id;
176 a2(indx) := t(ddindx).contact_point_id;
177 a3(indx) := t(ddindx).contact_point_type;
178 a4(indx) := t(ddindx).primary_flag;
179 a5(indx) := t(ddindx).contact_type;
180 indx := indx+1;
181 if t.last =ddindx
182 then exit;
183 end if;
184 ddindx := t.next(ddindx);
185 end loop;
186 end if;
187 end if;
188 end rosetta_table_copy_out_p6;
189
190 procedure create_servicerequest_wrap(p_api_version NUMBER
191 , p_init_msg_list VARCHAR2
192 , p_commit VARCHAR2
193 , x_return_status out nocopy VARCHAR2
194 , x_msg_count out nocopy NUMBER
195 , x_msg_data out nocopy VARCHAR2
196 , p_resp_appl_id NUMBER
197 , p_resp_id NUMBER
198 , p_user_id NUMBER
199 , p_login_id NUMBER
200 , p_org_id NUMBER
201 , p_request_id NUMBER
202 , p_request_number VARCHAR2
203 , p13_a0 DATE
204 , p13_a1 NUMBER
205 , p13_a2 VARCHAR2
206 , p13_a3 NUMBER
207 , p13_a4 VARCHAR2
208 , p13_a5 NUMBER
209 , p13_a6 VARCHAR2
210 , p13_a7 NUMBER
211 , p13_a8 VARCHAR2
212 , p13_a9 DATE
213 , p13_a10 NUMBER
214 , p13_a11 NUMBER
215 , p13_a12 VARCHAR2
216 , p13_a13 VARCHAR2
217 , p13_a14 VARCHAR2
218 , p13_a15 NUMBER
219 , p13_a16 VARCHAR2
220 , p13_a17 NUMBER
221 , p13_a18 VARCHAR2
222 , p13_a19 VARCHAR2
223 , p13_a20 NUMBER
224 , p13_a21 NUMBER
225 , p13_a22 VARCHAR2
226 , p13_a23 VARCHAR2
227 , p13_a24 NUMBER
228 , p13_a25 NUMBER
229 , p13_a26 NUMBER
230 , p13_a27 NUMBER
231 , p13_a28 NUMBER
232 , p13_a29 NUMBER
233 , p13_a30 VARCHAR2
234 , p13_a31 NUMBER
235 , p13_a32 NUMBER
236 , p13_a33 VARCHAR2
237 , p13_a34 VARCHAR2
238 , p13_a35 VARCHAR2
239 , p13_a36 VARCHAR2
240 , p13_a37 VARCHAR2
241 , p13_a38 VARCHAR2
242 , p13_a39 VARCHAR2
243 , p13_a40 VARCHAR2
244 , p13_a41 VARCHAR2
245 , p13_a42 VARCHAR2
246 , p13_a43 VARCHAR2
247 , p13_a44 VARCHAR2
248 , p13_a45 VARCHAR2
249 , p13_a46 VARCHAR2
250 , p13_a47 VARCHAR2
251 , p13_a48 VARCHAR2
252 , p13_a49 VARCHAR2
253 , p13_a50 VARCHAR2
254 , p13_a51 VARCHAR2
255 , p13_a52 VARCHAR2
256 , p13_a53 VARCHAR2
257 , p13_a54 VARCHAR2
258 , p13_a55 NUMBER
259 , p13_a56 VARCHAR2
260 , p13_a57 NUMBER
261 , p13_a58 VARCHAR2
262 , p13_a59 VARCHAR2
263 , p13_a60 DATE
264 , p13_a61 NUMBER
265 , p13_a62 VARCHAR2
266 , p13_a63 VARCHAR2
267 , p13_a64 VARCHAR2
268 , p13_a65 VARCHAR2
269 , p13_a66 VARCHAR2
270 , p13_a67 VARCHAR2
271 , p13_a68 VARCHAR2
272 , p13_a69 VARCHAR2
273 , p13_a70 VARCHAR2
274 , p13_a71 VARCHAR2
275 , p13_a72 VARCHAR2
276 , p13_a73 VARCHAR2
277 , p13_a74 VARCHAR2
278 , p13_a75 VARCHAR2
279 , p13_a76 VARCHAR2
280 , p13_a77 VARCHAR2
281 , p13_a78 NUMBER
282 , p13_a79 NUMBER
283 , p13_a80 NUMBER
284 , p13_a81 NUMBER
285 , p13_a82 VARCHAR2
286 , p13_a83 DATE
287 , p13_a84 VARCHAR2
288 , p13_a85 NUMBER
289 , p13_a86 NUMBER
290 , p13_a87 VARCHAR2
291 , p13_a88 NUMBER
292 , p13_a89 VARCHAR2
293 , p13_a90 NUMBER
294 , p13_a91 NUMBER
295 , p13_a92 VARCHAR2
296 , p13_a93 NUMBER
297 , p13_a94 VARCHAR2
298 , p13_a95 VARCHAR2
299 , p13_a96 VARCHAR2
300 , p13_a97 DATE
301 , p13_a98 NUMBER
302 , p13_a99 NUMBER
303 , p13_a100 NUMBER
304 , p13_a101 NUMBER
305 , p13_a102 NUMBER
306 , p13_a103 VARCHAR2
307 , p13_a104 NUMBER
308 , p13_a105 VARCHAR2
309 , p13_a106 NUMBER
310 , p13_a107 VARCHAR2
311 , p13_a108 NUMBER
312 , p13_a109 VARCHAR2
313 , p13_a110 VARCHAR2
314 , p13_a111 VARCHAR2
315 , p13_a112 VARCHAR2
316 , p13_a113 VARCHAR2
317 , p13_a114 VARCHAR2
318 , p13_a115 NUMBER
319 , p13_a116 NUMBER
320 , p13_a117 VARCHAR2
321 , p13_a118 NUMBER
322 , p13_a119 NUMBER
323 , p13_a120 VARCHAR2
324 , p13_a121 VARCHAR2
325 , p13_a122 VARCHAR2
326 , p13_a123 VARCHAR2
327 , p13_a124 VARCHAR2
328 , p13_a125 VARCHAR2
329 , p14_a0 JTF_VARCHAR2_TABLE_2000
330 , p14_a1 JTF_VARCHAR2_TABLE_32767
331 , p14_a2 JTF_VARCHAR2_TABLE_300
332 , p14_a3 JTF_VARCHAR2_TABLE_100
333 , p14_a4 JTF_NUMBER_TABLE
334 , p14_a5 JTF_VARCHAR2_TABLE_100
335 , p14_a6 JTF_NUMBER_TABLE
336 , p14_a7 JTF_VARCHAR2_TABLE_100
337 , p14_a8 JTF_NUMBER_TABLE
338 , p15_a0 JTF_NUMBER_TABLE
339 , p15_a1 JTF_NUMBER_TABLE
340 , p15_a2 JTF_NUMBER_TABLE
341 , p15_a3 JTF_VARCHAR2_TABLE_100
342 , p15_a4 JTF_VARCHAR2_TABLE_100
343 , p15_a5 JTF_VARCHAR2_TABLE_100
344 , x_request_id out nocopy NUMBER
345 , x_request_number out nocopy VARCHAR2
346 , x_interaction_id out nocopy NUMBER
347 , x_workflow_process_id out nocopy NUMBER
348 )
349
350 as
351 ddp_service_request_rec iem_servicerequest_pvt.service_request_rec_type;
352 ddp_notes iem_servicerequest_pvt.notes_table;
353 ddp_contacts iem_servicerequest_pvt.contacts_table;
354 ddindx binary_integer; indx binary_integer;
355 begin
356
357 -- copy data to the local IN or IN-OUT args, if any
358
359
360
361
362
363
364
365
366
367
368
369
370
371 ddp_service_request_rec.request_date := rosetta_g_miss_date_in_map(p13_a0);
372 ddp_service_request_rec.type_id := p13_a1;
373 ddp_service_request_rec.type_name := p13_a2;
374 ddp_service_request_rec.status_id := p13_a3;
375 ddp_service_request_rec.status_name := p13_a4;
376 ddp_service_request_rec.severity_id := p13_a5;
377 ddp_service_request_rec.severity_name := p13_a6;
378 ddp_service_request_rec.urgency_id := p13_a7;
379 ddp_service_request_rec.urgency_name := p13_a8;
380 ddp_service_request_rec.closed_date := rosetta_g_miss_date_in_map(p13_a9);
381 ddp_service_request_rec.owner_id := p13_a10;
382 ddp_service_request_rec.owner_group_id := p13_a11;
383 ddp_service_request_rec.publish_flag := p13_a12;
384 ddp_service_request_rec.summary := p13_a13;
385 ddp_service_request_rec.caller_type := p13_a14;
386 ddp_service_request_rec.customer_id := p13_a15;
387 ddp_service_request_rec.customer_number := p13_a16;
388 ddp_service_request_rec.employee_id := p13_a17;
389 ddp_service_request_rec.employee_number := p13_a18;
390 ddp_service_request_rec.verify_cp_flag := p13_a19;
391 ddp_service_request_rec.customer_product_id := p13_a20;
392 ddp_service_request_rec.platform_id := p13_a21;
393 ddp_service_request_rec.platform_version := p13_a22;
394 ddp_service_request_rec.db_version := p13_a23;
395 ddp_service_request_rec.platform_version_id := p13_a24;
396 ddp_service_request_rec.cp_component_id := p13_a25;
397 ddp_service_request_rec.cp_component_version_id := p13_a26;
398 ddp_service_request_rec.cp_subcomponent_id := p13_a27;
399 ddp_service_request_rec.cp_subcomponent_version_id := p13_a28;
400 ddp_service_request_rec.language_id := p13_a29;
401 ddp_service_request_rec.language := p13_a30;
402 ddp_service_request_rec.cp_ref_number := p13_a31;
403 ddp_service_request_rec.inventory_item_id := p13_a32;
404 ddp_service_request_rec.inventory_item_conc_segs := p13_a33;
405 ddp_service_request_rec.inventory_item_segment1 := p13_a34;
406 ddp_service_request_rec.inventory_item_segment2 := p13_a35;
407 ddp_service_request_rec.inventory_item_segment3 := p13_a36;
408 ddp_service_request_rec.inventory_item_segment4 := p13_a37;
409 ddp_service_request_rec.inventory_item_segment5 := p13_a38;
410 ddp_service_request_rec.inventory_item_segment6 := p13_a39;
411 ddp_service_request_rec.inventory_item_segment7 := p13_a40;
412 ddp_service_request_rec.inventory_item_segment8 := p13_a41;
413 ddp_service_request_rec.inventory_item_segment9 := p13_a42;
414 ddp_service_request_rec.inventory_item_segment10 := p13_a43;
415 ddp_service_request_rec.inventory_item_segment11 := p13_a44;
416 ddp_service_request_rec.inventory_item_segment12 := p13_a45;
417 ddp_service_request_rec.inventory_item_segment13 := p13_a46;
418 ddp_service_request_rec.inventory_item_segment14 := p13_a47;
419 ddp_service_request_rec.inventory_item_segment15 := p13_a48;
420 ddp_service_request_rec.inventory_item_segment16 := p13_a49;
421 ddp_service_request_rec.inventory_item_segment17 := p13_a50;
422 ddp_service_request_rec.inventory_item_segment18 := p13_a51;
423 ddp_service_request_rec.inventory_item_segment19 := p13_a52;
424 ddp_service_request_rec.inventory_item_segment20 := p13_a53;
425 ddp_service_request_rec.inventory_item_vals_or_ids := p13_a54;
426 ddp_service_request_rec.inventory_org_id := p13_a55;
427 ddp_service_request_rec.current_serial_number := p13_a56;
428 ddp_service_request_rec.original_order_number := p13_a57;
429 ddp_service_request_rec.purchase_order_num := p13_a58;
430 ddp_service_request_rec.problem_code := p13_a59;
431 ddp_service_request_rec.exp_resolution_date := rosetta_g_miss_date_in_map(p13_a60);
432 ddp_service_request_rec.install_site_use_id := p13_a61;
433 ddp_service_request_rec.request_attribute_1 := p13_a62;
434 ddp_service_request_rec.request_attribute_2 := p13_a63;
435 ddp_service_request_rec.request_attribute_3 := p13_a64;
436 ddp_service_request_rec.request_attribute_4 := p13_a65;
437 ddp_service_request_rec.request_attribute_5 := p13_a66;
438 ddp_service_request_rec.request_attribute_6 := p13_a67;
439 ddp_service_request_rec.request_attribute_7 := p13_a68;
440 ddp_service_request_rec.request_attribute_8 := p13_a69;
441 ddp_service_request_rec.request_attribute_9 := p13_a70;
442 ddp_service_request_rec.request_attribute_10 := p13_a71;
443 ddp_service_request_rec.request_attribute_11 := p13_a72;
444 ddp_service_request_rec.request_attribute_12 := p13_a73;
445 ddp_service_request_rec.request_attribute_13 := p13_a74;
446 ddp_service_request_rec.request_attribute_14 := p13_a75;
447 ddp_service_request_rec.request_attribute_15 := p13_a76;
448 ddp_service_request_rec.request_context := p13_a77;
449 ddp_service_request_rec.bill_to_site_use_id := p13_a78;
450 ddp_service_request_rec.bill_to_contact_id := p13_a79;
451 ddp_service_request_rec.ship_to_site_use_id := p13_a80;
452 ddp_service_request_rec.ship_to_contact_id := p13_a81;
453 ddp_service_request_rec.resolution_code := p13_a82;
454 ddp_service_request_rec.act_resolution_date := rosetta_g_miss_date_in_map(p13_a83);
455 ddp_service_request_rec.public_comment_flag := p13_a84;
456 ddp_service_request_rec.parent_interaction_id := p13_a85;
457 ddp_service_request_rec.contract_service_id := p13_a86;
458 ddp_service_request_rec.contract_service_number := p13_a87;
459 ddp_service_request_rec.contract_id := p13_a88;
460 ddp_service_request_rec.project_number := p13_a89;
461 ddp_service_request_rec.qa_collection_plan_id := p13_a90;
462 ddp_service_request_rec.account_id := p13_a91;
463 ddp_service_request_rec.resource_type := p13_a92;
464 ddp_service_request_rec.resource_subtype_id := p13_a93;
465 ddp_service_request_rec.cust_po_number := p13_a94;
466 ddp_service_request_rec.cust_ticket_number := p13_a95;
467 ddp_service_request_rec.sr_creation_channel := p13_a96;
468 ddp_service_request_rec.obligation_date := rosetta_g_miss_date_in_map(p13_a97);
469 ddp_service_request_rec.time_zone_id := p13_a98;
470 ddp_service_request_rec.time_difference := p13_a99;
471 ddp_service_request_rec.site_id := p13_a100;
472 ddp_service_request_rec.customer_site_id := p13_a101;
473 ddp_service_request_rec.territory_id := p13_a102;
474 ddp_service_request_rec.initialize_flag := p13_a103;
475 ddp_service_request_rec.cp_revision_id := p13_a104;
476 ddp_service_request_rec.inv_item_revision := p13_a105;
477 ddp_service_request_rec.inv_component_id := p13_a106;
478 ddp_service_request_rec.inv_component_version := p13_a107;
479 ddp_service_request_rec.inv_subcomponent_id := p13_a108;
480 ddp_service_request_rec.inv_subcomponent_version := p13_a109;
481 ddp_service_request_rec.tier := p13_a110;
482 ddp_service_request_rec.tier_version := p13_a111;
483 ddp_service_request_rec.operating_system := p13_a112;
484 ddp_service_request_rec.operating_system_version := p13_a113;
485 ddp_service_request_rec.database := p13_a114;
486 ddp_service_request_rec.cust_pref_lang_id := p13_a115;
487 ddp_service_request_rec.category_id := p13_a116;
488 ddp_service_request_rec.group_type := p13_a117;
489 ddp_service_request_rec.group_territory_id := p13_a118;
490 ddp_service_request_rec.inv_platform_org_id := p13_a119;
491 ddp_service_request_rec.component_version := p13_a120;
492 ddp_service_request_rec.subcomponent_version := p13_a121;
493 ddp_service_request_rec.product_revision := p13_a122;
494 ddp_service_request_rec.comm_pref_code := p13_a123;
495 ddp_service_request_rec.cust_pref_lang_code := p13_a124;
496 ddp_service_request_rec.last_update_channel := p13_a125;
497
498 iem_servicerequest_pvt_w.rosetta_table_copy_in_p4(ddp_notes, p14_a0
499 , p14_a1
500 , p14_a2
501 , p14_a3
502 , p14_a4
503 , p14_a5
504 , p14_a6
505 , p14_a7
506 , p14_a8
507 );
508
509 iem_servicerequest_pvt_w.rosetta_table_copy_in_p6(ddp_contacts, p15_a0
510 , p15_a1
511 , p15_a2
512 , p15_a3
513 , p15_a4
514 , p15_a5
515 );
516
517
518
519
520
521 -- here's the delegated call to the old PL/SQL routine
522 iem_servicerequest_pvt.create_servicerequest_wrap(p_api_version,
523 p_init_msg_list,
524 p_commit,
525 x_return_status,
526 x_msg_count,
527 x_msg_data,
528 p_resp_appl_id,
529 p_resp_id,
530 p_user_id,
531 p_login_id,
532 p_org_id,
533 p_request_id,
534 p_request_number,
535 ddp_service_request_rec,
536 ddp_notes,
537 ddp_contacts,
538 x_request_id,
539 x_request_number,
540 x_interaction_id,
541 x_workflow_process_id);
542
543 -- copy data back from the local variables to OUT or IN-OUT args, if any
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563 end;
564
565 procedure update_servicerequest_wrap(p_api_version NUMBER
566 , p_init_msg_list VARCHAR2
567 , p_commit VARCHAR2
568 , x_return_status out nocopy VARCHAR2
569 , x_msg_count out nocopy NUMBER
570 , x_msg_data out nocopy VARCHAR2
571 , p_request_id NUMBER
572 , p_request_number VARCHAR2
573 , p_audit_comments VARCHAR2
574 , p_object_version_number NUMBER
575 , p_resp_appl_id NUMBER
576 , p_resp_id NUMBER
577 , p_last_updated_by NUMBER
578 , p_last_update_login NUMBER
579 , p_last_update_date date
580 , p15_a0 DATE
581 , p15_a1 NUMBER
582 , p15_a2 VARCHAR2
583 , p15_a3 NUMBER
584 , p15_a4 VARCHAR2
585 , p15_a5 NUMBER
586 , p15_a6 VARCHAR2
587 , p15_a7 NUMBER
588 , p15_a8 VARCHAR2
589 , p15_a9 DATE
590 , p15_a10 NUMBER
591 , p15_a11 NUMBER
592 , p15_a12 VARCHAR2
593 , p15_a13 VARCHAR2
594 , p15_a14 VARCHAR2
595 , p15_a15 NUMBER
596 , p15_a16 VARCHAR2
597 , p15_a17 NUMBER
598 , p15_a18 VARCHAR2
599 , p15_a19 VARCHAR2
600 , p15_a20 NUMBER
601 , p15_a21 NUMBER
602 , p15_a22 VARCHAR2
603 , p15_a23 VARCHAR2
604 , p15_a24 NUMBER
605 , p15_a25 NUMBER
606 , p15_a26 NUMBER
607 , p15_a27 NUMBER
608 , p15_a28 NUMBER
609 , p15_a29 NUMBER
610 , p15_a30 VARCHAR2
611 , p15_a31 NUMBER
612 , p15_a32 NUMBER
613 , p15_a33 VARCHAR2
614 , p15_a34 VARCHAR2
615 , p15_a35 VARCHAR2
616 , p15_a36 VARCHAR2
617 , p15_a37 VARCHAR2
618 , p15_a38 VARCHAR2
619 , p15_a39 VARCHAR2
620 , p15_a40 VARCHAR2
621 , p15_a41 VARCHAR2
622 , p15_a42 VARCHAR2
623 , p15_a43 VARCHAR2
624 , p15_a44 VARCHAR2
625 , p15_a45 VARCHAR2
626 , p15_a46 VARCHAR2
627 , p15_a47 VARCHAR2
628 , p15_a48 VARCHAR2
629 , p15_a49 VARCHAR2
630 , p15_a50 VARCHAR2
631 , p15_a51 VARCHAR2
632 , p15_a52 VARCHAR2
633 , p15_a53 VARCHAR2
634 , p15_a54 VARCHAR2
635 , p15_a55 NUMBER
636 , p15_a56 VARCHAR2
637 , p15_a57 NUMBER
638 , p15_a58 VARCHAR2
639 , p15_a59 VARCHAR2
640 , p15_a60 DATE
641 , p15_a61 NUMBER
642 , p15_a62 VARCHAR2
643 , p15_a63 VARCHAR2
644 , p15_a64 VARCHAR2
645 , p15_a65 VARCHAR2
646 , p15_a66 VARCHAR2
647 , p15_a67 VARCHAR2
648 , p15_a68 VARCHAR2
649 , p15_a69 VARCHAR2
650 , p15_a70 VARCHAR2
651 , p15_a71 VARCHAR2
652 , p15_a72 VARCHAR2
653 , p15_a73 VARCHAR2
654 , p15_a74 VARCHAR2
655 , p15_a75 VARCHAR2
656 , p15_a76 VARCHAR2
657 , p15_a77 VARCHAR2
658 , p15_a78 NUMBER
659 , p15_a79 NUMBER
660 , p15_a80 NUMBER
661 , p15_a81 NUMBER
662 , p15_a82 VARCHAR2
663 , p15_a83 DATE
664 , p15_a84 VARCHAR2
665 , p15_a85 NUMBER
666 , p15_a86 NUMBER
667 , p15_a87 VARCHAR2
668 , p15_a88 NUMBER
669 , p15_a89 VARCHAR2
670 , p15_a90 NUMBER
671 , p15_a91 NUMBER
672 , p15_a92 VARCHAR2
673 , p15_a93 NUMBER
674 , p15_a94 VARCHAR2
675 , p15_a95 VARCHAR2
676 , p15_a96 VARCHAR2
677 , p15_a97 DATE
678 , p15_a98 NUMBER
679 , p15_a99 NUMBER
680 , p15_a100 NUMBER
681 , p15_a101 NUMBER
682 , p15_a102 NUMBER
683 , p15_a103 VARCHAR2
684 , p15_a104 NUMBER
685 , p15_a105 VARCHAR2
686 , p15_a106 NUMBER
687 , p15_a107 VARCHAR2
688 , p15_a108 NUMBER
689 , p15_a109 VARCHAR2
690 , p15_a110 VARCHAR2
691 , p15_a111 VARCHAR2
692 , p15_a112 VARCHAR2
693 , p15_a113 VARCHAR2
694 , p15_a114 VARCHAR2
695 , p15_a115 NUMBER
696 , p15_a116 NUMBER
697 , p15_a117 VARCHAR2
698 , p15_a118 NUMBER
699 , p15_a119 NUMBER
700 , p15_a120 VARCHAR2
701 , p15_a121 VARCHAR2
702 , p15_a122 VARCHAR2
703 , p15_a123 VARCHAR2
704 , p15_a124 VARCHAR2
705 , p15_a125 VARCHAR2
706 , p16_a0 JTF_VARCHAR2_TABLE_2000
707 , p16_a1 JTF_VARCHAR2_TABLE_32767
708 , p16_a2 JTF_VARCHAR2_TABLE_300
709 , p16_a3 JTF_VARCHAR2_TABLE_100
710 , p16_a4 JTF_NUMBER_TABLE
711 , p16_a5 JTF_VARCHAR2_TABLE_100
712 , p16_a6 JTF_NUMBER_TABLE
713 , p16_a7 JTF_VARCHAR2_TABLE_100
714 , p16_a8 JTF_NUMBER_TABLE
715 , p17_a0 JTF_NUMBER_TABLE
716 , p17_a1 JTF_NUMBER_TABLE
717 , p17_a2 JTF_NUMBER_TABLE
718 , p17_a3 JTF_VARCHAR2_TABLE_100
719 , p17_a4 JTF_VARCHAR2_TABLE_100
720 , p17_a5 JTF_VARCHAR2_TABLE_100
721 , p_called_by_workflow VARCHAR2
722 , p_workflow_process_id NUMBER
723 , x_workflow_process_id out nocopy NUMBER
724 , x_interaction_id out nocopy NUMBER
725 )
726
727 as
728 ddp_last_update_date date;
729 ddp_service_request_rec iem_servicerequest_pvt.service_request_rec_type;
730 ddp_notes iem_servicerequest_pvt.notes_table;
731 ddp_contacts iem_servicerequest_pvt.contacts_table;
732 ddindx binary_integer; indx binary_integer;
733 begin
734
735 -- copy data to the local IN or IN-OUT args, if any
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750 ddp_last_update_date := rosetta_g_miss_date_in_map(p_last_update_date);
751
752 ddp_service_request_rec.request_date := rosetta_g_miss_date_in_map(p15_a0);
753 ddp_service_request_rec.type_id := p15_a1;
754 ddp_service_request_rec.type_name := p15_a2;
755 ddp_service_request_rec.status_id := p15_a3;
756 ddp_service_request_rec.status_name := p15_a4;
757 ddp_service_request_rec.severity_id := p15_a5;
758 ddp_service_request_rec.severity_name := p15_a6;
759 ddp_service_request_rec.urgency_id := p15_a7;
760 ddp_service_request_rec.urgency_name := p15_a8;
761 ddp_service_request_rec.closed_date := rosetta_g_miss_date_in_map(p15_a9);
762 ddp_service_request_rec.owner_id := p15_a10;
763 ddp_service_request_rec.owner_group_id := p15_a11;
764 ddp_service_request_rec.publish_flag := p15_a12;
765 ddp_service_request_rec.summary := p15_a13;
766 ddp_service_request_rec.caller_type := p15_a14;
767 ddp_service_request_rec.customer_id := p15_a15;
768 ddp_service_request_rec.customer_number := p15_a16;
769 ddp_service_request_rec.employee_id := p15_a17;
770 ddp_service_request_rec.employee_number := p15_a18;
771 ddp_service_request_rec.verify_cp_flag := p15_a19;
772 ddp_service_request_rec.customer_product_id := p15_a20;
773 ddp_service_request_rec.platform_id := p15_a21;
774 ddp_service_request_rec.platform_version := p15_a22;
775 ddp_service_request_rec.db_version := p15_a23;
776 ddp_service_request_rec.platform_version_id := p15_a24;
777 ddp_service_request_rec.cp_component_id := p15_a25;
778 ddp_service_request_rec.cp_component_version_id := p15_a26;
779 ddp_service_request_rec.cp_subcomponent_id := p15_a27;
780 ddp_service_request_rec.cp_subcomponent_version_id := p15_a28;
781 ddp_service_request_rec.language_id := p15_a29;
782 ddp_service_request_rec.language := p15_a30;
783 ddp_service_request_rec.cp_ref_number := p15_a31;
784 ddp_service_request_rec.inventory_item_id := p15_a32;
785 ddp_service_request_rec.inventory_item_conc_segs := p15_a33;
786 ddp_service_request_rec.inventory_item_segment1 := p15_a34;
787 ddp_service_request_rec.inventory_item_segment2 := p15_a35;
788 ddp_service_request_rec.inventory_item_segment3 := p15_a36;
789 ddp_service_request_rec.inventory_item_segment4 := p15_a37;
790 ddp_service_request_rec.inventory_item_segment5 := p15_a38;
791 ddp_service_request_rec.inventory_item_segment6 := p15_a39;
792 ddp_service_request_rec.inventory_item_segment7 := p15_a40;
793 ddp_service_request_rec.inventory_item_segment8 := p15_a41;
794 ddp_service_request_rec.inventory_item_segment9 := p15_a42;
795 ddp_service_request_rec.inventory_item_segment10 := p15_a43;
796 ddp_service_request_rec.inventory_item_segment11 := p15_a44;
797 ddp_service_request_rec.inventory_item_segment12 := p15_a45;
798 ddp_service_request_rec.inventory_item_segment13 := p15_a46;
799 ddp_service_request_rec.inventory_item_segment14 := p15_a47;
800 ddp_service_request_rec.inventory_item_segment15 := p15_a48;
801 ddp_service_request_rec.inventory_item_segment16 := p15_a49;
802 ddp_service_request_rec.inventory_item_segment17 := p15_a50;
803 ddp_service_request_rec.inventory_item_segment18 := p15_a51;
804 ddp_service_request_rec.inventory_item_segment19 := p15_a52;
805 ddp_service_request_rec.inventory_item_segment20 := p15_a53;
806 ddp_service_request_rec.inventory_item_vals_or_ids := p15_a54;
807 ddp_service_request_rec.inventory_org_id := p15_a55;
808 ddp_service_request_rec.current_serial_number := p15_a56;
809 ddp_service_request_rec.original_order_number := p15_a57;
810 ddp_service_request_rec.purchase_order_num := p15_a58;
811 ddp_service_request_rec.problem_code := p15_a59;
812 ddp_service_request_rec.exp_resolution_date := rosetta_g_miss_date_in_map(p15_a60);
813 ddp_service_request_rec.install_site_use_id := p15_a61;
814 ddp_service_request_rec.request_attribute_1 := p15_a62;
815 ddp_service_request_rec.request_attribute_2 := p15_a63;
816 ddp_service_request_rec.request_attribute_3 := p15_a64;
817 ddp_service_request_rec.request_attribute_4 := p15_a65;
818 ddp_service_request_rec.request_attribute_5 := p15_a66;
819 ddp_service_request_rec.request_attribute_6 := p15_a67;
820 ddp_service_request_rec.request_attribute_7 := p15_a68;
821 ddp_service_request_rec.request_attribute_8 := p15_a69;
822 ddp_service_request_rec.request_attribute_9 := p15_a70;
823 ddp_service_request_rec.request_attribute_10 := p15_a71;
824 ddp_service_request_rec.request_attribute_11 := p15_a72;
825 ddp_service_request_rec.request_attribute_12 := p15_a73;
826 ddp_service_request_rec.request_attribute_13 := p15_a74;
827 ddp_service_request_rec.request_attribute_14 := p15_a75;
828 ddp_service_request_rec.request_attribute_15 := p15_a76;
829 ddp_service_request_rec.request_context := p15_a77;
830 ddp_service_request_rec.bill_to_site_use_id := p15_a78;
831 ddp_service_request_rec.bill_to_contact_id := p15_a79;
832 ddp_service_request_rec.ship_to_site_use_id := p15_a80;
833 ddp_service_request_rec.ship_to_contact_id := p15_a81;
834 ddp_service_request_rec.resolution_code := p15_a82;
835 ddp_service_request_rec.act_resolution_date := rosetta_g_miss_date_in_map(p15_a83);
836 ddp_service_request_rec.public_comment_flag := p15_a84;
837 ddp_service_request_rec.parent_interaction_id := p15_a85;
838 ddp_service_request_rec.contract_service_id := p15_a86;
839 ddp_service_request_rec.contract_service_number := p15_a87;
840 ddp_service_request_rec.contract_id := p15_a88;
841 ddp_service_request_rec.project_number := p15_a89;
842 ddp_service_request_rec.qa_collection_plan_id := p15_a90;
843 ddp_service_request_rec.account_id := p15_a91;
844 ddp_service_request_rec.resource_type := p15_a92;
845 ddp_service_request_rec.resource_subtype_id := p15_a93;
846 ddp_service_request_rec.cust_po_number := p15_a94;
847 ddp_service_request_rec.cust_ticket_number := p15_a95;
848 ddp_service_request_rec.sr_creation_channel := p15_a96;
849 ddp_service_request_rec.obligation_date := rosetta_g_miss_date_in_map(p15_a97);
850 ddp_service_request_rec.time_zone_id := p15_a98;
851 ddp_service_request_rec.time_difference := p15_a99;
852 ddp_service_request_rec.site_id := p15_a100;
853 ddp_service_request_rec.customer_site_id := p15_a101;
854 ddp_service_request_rec.territory_id := p15_a102;
855 ddp_service_request_rec.initialize_flag := p15_a103;
856 ddp_service_request_rec.cp_revision_id := p15_a104;
857 ddp_service_request_rec.inv_item_revision := p15_a105;
858 ddp_service_request_rec.inv_component_id := p15_a106;
859 ddp_service_request_rec.inv_component_version := p15_a107;
860 ddp_service_request_rec.inv_subcomponent_id := p15_a108;
861 ddp_service_request_rec.inv_subcomponent_version := p15_a109;
862 ddp_service_request_rec.tier := p15_a110;
863 ddp_service_request_rec.tier_version := p15_a111;
864 ddp_service_request_rec.operating_system := p15_a112;
865 ddp_service_request_rec.operating_system_version := p15_a113;
866 ddp_service_request_rec.database := p15_a114;
867 ddp_service_request_rec.cust_pref_lang_id := p15_a115;
868 ddp_service_request_rec.category_id := p15_a116;
869 ddp_service_request_rec.group_type := p15_a117;
870 ddp_service_request_rec.group_territory_id := p15_a118;
871 ddp_service_request_rec.inv_platform_org_id := p15_a119;
872 ddp_service_request_rec.component_version := p15_a120;
873 ddp_service_request_rec.subcomponent_version := p15_a121;
874 ddp_service_request_rec.product_revision := p15_a122;
875 ddp_service_request_rec.comm_pref_code := p15_a123;
876 ddp_service_request_rec.cust_pref_lang_code := p15_a124;
877 ddp_service_request_rec.last_update_channel := p15_a125;
878
879 iem_servicerequest_pvt_w.rosetta_table_copy_in_p4(ddp_notes, p16_a0
880 , p16_a1
881 , p16_a2
882 , p16_a3
883 , p16_a4
884 , p16_a5
885 , p16_a6
886 , p16_a7
887 , p16_a8
888 );
889
890 iem_servicerequest_pvt_w.rosetta_table_copy_in_p6(ddp_contacts, p17_a0
891 , p17_a1
892 , p17_a2
893 , p17_a3
894 , p17_a4
895 , p17_a5
896 );
897
898
899
900
901
902 -- here's the delegated call to the old PL/SQL routine
903 iem_servicerequest_pvt.update_servicerequest_wrap(p_api_version,
904 p_init_msg_list,
905 p_commit,
906 x_return_status,
907 x_msg_count,
908 x_msg_data,
909 p_request_id,
910 p_request_number,
911 p_audit_comments,
912 p_object_version_number,
913 p_resp_appl_id,
914 p_resp_id,
915 p_last_updated_by,
916 p_last_update_login,
917 ddp_last_update_date,
918 ddp_service_request_rec,
919 ddp_notes,
920 ddp_contacts,
921 p_called_by_workflow,
922 p_workflow_process_id,
923 x_workflow_process_id,
924 x_interaction_id);
925
926 -- copy data back from the local variables to OUT or IN-OUT args, if any
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948 end;
949
950 procedure initialize_rec(p0_a0 in out nocopy DATE
951 , p0_a1 in out nocopy NUMBER
952 , p0_a2 in out nocopy VARCHAR2
953 , p0_a3 in out nocopy NUMBER
954 , p0_a4 in out nocopy VARCHAR2
955 , p0_a5 in out nocopy NUMBER
956 , p0_a6 in out nocopy VARCHAR2
957 , p0_a7 in out nocopy NUMBER
958 , p0_a8 in out nocopy VARCHAR2
959 , p0_a9 in out nocopy DATE
960 , p0_a10 in out nocopy NUMBER
961 , p0_a11 in out nocopy NUMBER
962 , p0_a12 in out nocopy VARCHAR2
963 , p0_a13 in out nocopy VARCHAR2
964 , p0_a14 in out nocopy VARCHAR2
965 , p0_a15 in out nocopy NUMBER
966 , p0_a16 in out nocopy VARCHAR2
967 , p0_a17 in out nocopy NUMBER
968 , p0_a18 in out nocopy VARCHAR2
969 , p0_a19 in out nocopy VARCHAR2
970 , p0_a20 in out nocopy NUMBER
971 , p0_a21 in out nocopy NUMBER
972 , p0_a22 in out nocopy VARCHAR2
973 , p0_a23 in out nocopy VARCHAR2
974 , p0_a24 in out nocopy NUMBER
975 , p0_a25 in out nocopy NUMBER
976 , p0_a26 in out nocopy NUMBER
977 , p0_a27 in out nocopy NUMBER
978 , p0_a28 in out nocopy NUMBER
979 , p0_a29 in out nocopy NUMBER
980 , p0_a30 in out nocopy VARCHAR2
981 , p0_a31 in out nocopy NUMBER
982 , p0_a32 in out nocopy NUMBER
983 , p0_a33 in out nocopy VARCHAR2
984 , p0_a34 in out nocopy VARCHAR2
985 , p0_a35 in out nocopy VARCHAR2
986 , p0_a36 in out nocopy VARCHAR2
987 , p0_a37 in out nocopy VARCHAR2
988 , p0_a38 in out nocopy VARCHAR2
989 , p0_a39 in out nocopy VARCHAR2
990 , p0_a40 in out nocopy VARCHAR2
991 , p0_a41 in out nocopy VARCHAR2
992 , p0_a42 in out nocopy VARCHAR2
993 , p0_a43 in out nocopy VARCHAR2
994 , p0_a44 in out nocopy VARCHAR2
995 , p0_a45 in out nocopy VARCHAR2
996 , p0_a46 in out nocopy VARCHAR2
997 , p0_a47 in out nocopy VARCHAR2
998 , p0_a48 in out nocopy VARCHAR2
999 , p0_a49 in out nocopy VARCHAR2
1000 , p0_a50 in out nocopy VARCHAR2
1001 , p0_a51 in out nocopy VARCHAR2
1002 , p0_a52 in out nocopy VARCHAR2
1003 , p0_a53 in out nocopy VARCHAR2
1004 , p0_a54 in out nocopy VARCHAR2
1005 , p0_a55 in out nocopy NUMBER
1006 , p0_a56 in out nocopy VARCHAR2
1007 , p0_a57 in out nocopy NUMBER
1008 , p0_a58 in out nocopy VARCHAR2
1009 , p0_a59 in out nocopy VARCHAR2
1010 , p0_a60 in out nocopy DATE
1011 , p0_a61 in out nocopy NUMBER
1012 , p0_a62 in out nocopy VARCHAR2
1013 , p0_a63 in out nocopy VARCHAR2
1014 , p0_a64 in out nocopy VARCHAR2
1015 , p0_a65 in out nocopy VARCHAR2
1016 , p0_a66 in out nocopy VARCHAR2
1017 , p0_a67 in out nocopy VARCHAR2
1018 , p0_a68 in out nocopy VARCHAR2
1019 , p0_a69 in out nocopy VARCHAR2
1020 , p0_a70 in out nocopy VARCHAR2
1021 , p0_a71 in out nocopy VARCHAR2
1022 , p0_a72 in out nocopy VARCHAR2
1023 , p0_a73 in out nocopy VARCHAR2
1024 , p0_a74 in out nocopy VARCHAR2
1025 , p0_a75 in out nocopy VARCHAR2
1026 , p0_a76 in out nocopy VARCHAR2
1027 , p0_a77 in out nocopy VARCHAR2
1028 , p0_a78 in out nocopy NUMBER
1029 , p0_a79 in out nocopy NUMBER
1030 , p0_a80 in out nocopy NUMBER
1031 , p0_a81 in out nocopy NUMBER
1032 , p0_a82 in out nocopy VARCHAR2
1033 , p0_a83 in out nocopy DATE
1034 , p0_a84 in out nocopy VARCHAR2
1035 , p0_a85 in out nocopy NUMBER
1036 , p0_a86 in out nocopy NUMBER
1037 , p0_a87 in out nocopy VARCHAR2
1038 , p0_a88 in out nocopy NUMBER
1039 , p0_a89 in out nocopy VARCHAR2
1040 , p0_a90 in out nocopy NUMBER
1041 , p0_a91 in out nocopy NUMBER
1042 , p0_a92 in out nocopy VARCHAR2
1043 , p0_a93 in out nocopy NUMBER
1044 , p0_a94 in out nocopy VARCHAR2
1045 , p0_a95 in out nocopy VARCHAR2
1046 , p0_a96 in out nocopy VARCHAR2
1047 , p0_a97 in out nocopy DATE
1048 , p0_a98 in out nocopy NUMBER
1049 , p0_a99 in out nocopy NUMBER
1050 , p0_a100 in out nocopy NUMBER
1051 , p0_a101 in out nocopy NUMBER
1052 , p0_a102 in out nocopy NUMBER
1053 , p0_a103 in out nocopy VARCHAR2
1054 , p0_a104 in out nocopy NUMBER
1055 , p0_a105 in out nocopy VARCHAR2
1056 , p0_a106 in out nocopy NUMBER
1057 , p0_a107 in out nocopy VARCHAR2
1058 , p0_a108 in out nocopy NUMBER
1059 , p0_a109 in out nocopy VARCHAR2
1060 , p0_a110 in out nocopy VARCHAR2
1061 , p0_a111 in out nocopy VARCHAR2
1062 , p0_a112 in out nocopy VARCHAR2
1063 , p0_a113 in out nocopy VARCHAR2
1064 , p0_a114 in out nocopy VARCHAR2
1065 , p0_a115 in out nocopy NUMBER
1066 , p0_a116 in out nocopy NUMBER
1067 , p0_a117 in out nocopy VARCHAR2
1068 , p0_a118 in out nocopy NUMBER
1069 , p0_a119 in out nocopy NUMBER
1070 , p0_a120 in out nocopy VARCHAR2
1071 , p0_a121 in out nocopy VARCHAR2
1072 , p0_a122 in out nocopy VARCHAR2
1073 , p0_a123 in out nocopy VARCHAR2
1074 , p0_a124 in out nocopy VARCHAR2
1075 , p0_a125 in out nocopy VARCHAR2
1076 )
1077
1078 as
1079 ddp_sr_record iem_servicerequest_pvt.service_request_rec_type;
1080 ddindx binary_integer; indx binary_integer;
1081 begin
1082
1083 -- copy data to the local IN or IN-OUT args, if any
1084 ddp_sr_record.request_date := rosetta_g_miss_date_in_map(p0_a0);
1085 ddp_sr_record.type_id := p0_a1;
1086 ddp_sr_record.type_name := p0_a2;
1087 ddp_sr_record.status_id := p0_a3;
1088 ddp_sr_record.status_name := p0_a4;
1089 ddp_sr_record.severity_id := p0_a5;
1090 ddp_sr_record.severity_name := p0_a6;
1091 ddp_sr_record.urgency_id := p0_a7;
1092 ddp_sr_record.urgency_name := p0_a8;
1093 ddp_sr_record.closed_date := rosetta_g_miss_date_in_map(p0_a9);
1094 ddp_sr_record.owner_id := p0_a10;
1095 ddp_sr_record.owner_group_id := p0_a11;
1096 ddp_sr_record.publish_flag := p0_a12;
1097 ddp_sr_record.summary := p0_a13;
1098 ddp_sr_record.caller_type := p0_a14;
1099 ddp_sr_record.customer_id := p0_a15;
1100 ddp_sr_record.customer_number := p0_a16;
1101 ddp_sr_record.employee_id := p0_a17;
1102 ddp_sr_record.employee_number := p0_a18;
1103 ddp_sr_record.verify_cp_flag := p0_a19;
1104 ddp_sr_record.customer_product_id := p0_a20;
1105 ddp_sr_record.platform_id := p0_a21;
1106 ddp_sr_record.platform_version := p0_a22;
1107 ddp_sr_record.db_version := p0_a23;
1108 ddp_sr_record.platform_version_id := p0_a24;
1109 ddp_sr_record.cp_component_id := p0_a25;
1110 ddp_sr_record.cp_component_version_id := p0_a26;
1111 ddp_sr_record.cp_subcomponent_id := p0_a27;
1112 ddp_sr_record.cp_subcomponent_version_id := p0_a28;
1113 ddp_sr_record.language_id := p0_a29;
1114 ddp_sr_record.language := p0_a30;
1115 ddp_sr_record.cp_ref_number := p0_a31;
1116 ddp_sr_record.inventory_item_id := p0_a32;
1117 ddp_sr_record.inventory_item_conc_segs := p0_a33;
1118 ddp_sr_record.inventory_item_segment1 := p0_a34;
1119 ddp_sr_record.inventory_item_segment2 := p0_a35;
1120 ddp_sr_record.inventory_item_segment3 := p0_a36;
1121 ddp_sr_record.inventory_item_segment4 := p0_a37;
1122 ddp_sr_record.inventory_item_segment5 := p0_a38;
1123 ddp_sr_record.inventory_item_segment6 := p0_a39;
1124 ddp_sr_record.inventory_item_segment7 := p0_a40;
1125 ddp_sr_record.inventory_item_segment8 := p0_a41;
1126 ddp_sr_record.inventory_item_segment9 := p0_a42;
1127 ddp_sr_record.inventory_item_segment10 := p0_a43;
1128 ddp_sr_record.inventory_item_segment11 := p0_a44;
1129 ddp_sr_record.inventory_item_segment12 := p0_a45;
1130 ddp_sr_record.inventory_item_segment13 := p0_a46;
1131 ddp_sr_record.inventory_item_segment14 := p0_a47;
1132 ddp_sr_record.inventory_item_segment15 := p0_a48;
1133 ddp_sr_record.inventory_item_segment16 := p0_a49;
1134 ddp_sr_record.inventory_item_segment17 := p0_a50;
1135 ddp_sr_record.inventory_item_segment18 := p0_a51;
1136 ddp_sr_record.inventory_item_segment19 := p0_a52;
1137 ddp_sr_record.inventory_item_segment20 := p0_a53;
1138 ddp_sr_record.inventory_item_vals_or_ids := p0_a54;
1139 ddp_sr_record.inventory_org_id := p0_a55;
1140 ddp_sr_record.current_serial_number := p0_a56;
1141 ddp_sr_record.original_order_number := p0_a57;
1142 ddp_sr_record.purchase_order_num := p0_a58;
1143 ddp_sr_record.problem_code := p0_a59;
1144 ddp_sr_record.exp_resolution_date := rosetta_g_miss_date_in_map(p0_a60);
1145 ddp_sr_record.install_site_use_id := p0_a61;
1146 ddp_sr_record.request_attribute_1 := p0_a62;
1147 ddp_sr_record.request_attribute_2 := p0_a63;
1148 ddp_sr_record.request_attribute_3 := p0_a64;
1149 ddp_sr_record.request_attribute_4 := p0_a65;
1150 ddp_sr_record.request_attribute_5 := p0_a66;
1151 ddp_sr_record.request_attribute_6 := p0_a67;
1152 ddp_sr_record.request_attribute_7 := p0_a68;
1153 ddp_sr_record.request_attribute_8 := p0_a69;
1154 ddp_sr_record.request_attribute_9 := p0_a70;
1155 ddp_sr_record.request_attribute_10 := p0_a71;
1156 ddp_sr_record.request_attribute_11 := p0_a72;
1157 ddp_sr_record.request_attribute_12 := p0_a73;
1158 ddp_sr_record.request_attribute_13 := p0_a74;
1159 ddp_sr_record.request_attribute_14 := p0_a75;
1160 ddp_sr_record.request_attribute_15 := p0_a76;
1161 ddp_sr_record.request_context := p0_a77;
1162 ddp_sr_record.bill_to_site_use_id := p0_a78;
1163 ddp_sr_record.bill_to_contact_id := p0_a79;
1164 ddp_sr_record.ship_to_site_use_id := p0_a80;
1165 ddp_sr_record.ship_to_contact_id := p0_a81;
1166 ddp_sr_record.resolution_code := p0_a82;
1167 ddp_sr_record.act_resolution_date := rosetta_g_miss_date_in_map(p0_a83);
1168 ddp_sr_record.public_comment_flag := p0_a84;
1169 ddp_sr_record.parent_interaction_id := p0_a85;
1170 ddp_sr_record.contract_service_id := p0_a86;
1171 ddp_sr_record.contract_service_number := p0_a87;
1172 ddp_sr_record.contract_id := p0_a88;
1173 ddp_sr_record.project_number := p0_a89;
1174 ddp_sr_record.qa_collection_plan_id := p0_a90;
1175 ddp_sr_record.account_id := p0_a91;
1176 ddp_sr_record.resource_type := p0_a92;
1177 ddp_sr_record.resource_subtype_id := p0_a93;
1178 ddp_sr_record.cust_po_number := p0_a94;
1179 ddp_sr_record.cust_ticket_number := p0_a95;
1180 ddp_sr_record.sr_creation_channel := p0_a96;
1181 ddp_sr_record.obligation_date := rosetta_g_miss_date_in_map(p0_a97);
1182 ddp_sr_record.time_zone_id := p0_a98;
1183 ddp_sr_record.time_difference := p0_a99;
1184 ddp_sr_record.site_id := p0_a100;
1185 ddp_sr_record.customer_site_id := p0_a101;
1186 ddp_sr_record.territory_id := p0_a102;
1187 ddp_sr_record.initialize_flag := p0_a103;
1188 ddp_sr_record.cp_revision_id := p0_a104;
1189 ddp_sr_record.inv_item_revision := p0_a105;
1190 ddp_sr_record.inv_component_id := p0_a106;
1191 ddp_sr_record.inv_component_version := p0_a107;
1192 ddp_sr_record.inv_subcomponent_id := p0_a108;
1193 ddp_sr_record.inv_subcomponent_version := p0_a109;
1194 ddp_sr_record.tier := p0_a110;
1195 ddp_sr_record.tier_version := p0_a111;
1196 ddp_sr_record.operating_system := p0_a112;
1197 ddp_sr_record.operating_system_version := p0_a113;
1198 ddp_sr_record.database := p0_a114;
1199 ddp_sr_record.cust_pref_lang_id := p0_a115;
1200 ddp_sr_record.category_id := p0_a116;
1201 ddp_sr_record.group_type := p0_a117;
1202 ddp_sr_record.group_territory_id := p0_a118;
1203 ddp_sr_record.inv_platform_org_id := p0_a119;
1204 ddp_sr_record.component_version := p0_a120;
1205 ddp_sr_record.subcomponent_version := p0_a121;
1206 ddp_sr_record.product_revision := p0_a122;
1207 ddp_sr_record.comm_pref_code := p0_a123;
1208 ddp_sr_record.cust_pref_lang_code := p0_a124;
1209 ddp_sr_record.last_update_channel := p0_a125;
1210
1211 -- here's the delegated call to the old PL/SQL routine
1212 iem_servicerequest_pvt.initialize_rec(ddp_sr_record);
1213
1214 -- copy data back from the local variables to OUT or IN-OUT args, if any
1215 p0_a0 := ddp_sr_record.request_date;
1216 p0_a1 := ddp_sr_record.type_id;
1217 p0_a2 := ddp_sr_record.type_name;
1218 p0_a3 := ddp_sr_record.status_id;
1219 p0_a4 := ddp_sr_record.status_name;
1220 p0_a5 := ddp_sr_record.severity_id;
1221 p0_a6 := ddp_sr_record.severity_name;
1222 p0_a7 := ddp_sr_record.urgency_id;
1223 p0_a8 := ddp_sr_record.urgency_name;
1224 p0_a9 := ddp_sr_record.closed_date;
1225 p0_a10 := ddp_sr_record.owner_id;
1226 p0_a11 := ddp_sr_record.owner_group_id;
1227 p0_a12 := ddp_sr_record.publish_flag;
1228 p0_a13 := ddp_sr_record.summary;
1229 p0_a14 := ddp_sr_record.caller_type;
1230 p0_a15 := ddp_sr_record.customer_id;
1231 p0_a16 := ddp_sr_record.customer_number;
1232 p0_a17 := ddp_sr_record.employee_id;
1233 p0_a18 := ddp_sr_record.employee_number;
1234 p0_a19 := ddp_sr_record.verify_cp_flag;
1235 p0_a20 := ddp_sr_record.customer_product_id;
1236 p0_a21 := ddp_sr_record.platform_id;
1237 p0_a22 := ddp_sr_record.platform_version;
1238 p0_a23 := ddp_sr_record.db_version;
1239 p0_a24 := ddp_sr_record.platform_version_id;
1240 p0_a25 := ddp_sr_record.cp_component_id;
1241 p0_a26 := ddp_sr_record.cp_component_version_id;
1242 p0_a27 := ddp_sr_record.cp_subcomponent_id;
1243 p0_a28 := ddp_sr_record.cp_subcomponent_version_id;
1244 p0_a29 := ddp_sr_record.language_id;
1245 p0_a30 := ddp_sr_record.language;
1246 p0_a31 := ddp_sr_record.cp_ref_number;
1247 p0_a32 := ddp_sr_record.inventory_item_id;
1248 p0_a33 := ddp_sr_record.inventory_item_conc_segs;
1249 p0_a34 := ddp_sr_record.inventory_item_segment1;
1250 p0_a35 := ddp_sr_record.inventory_item_segment2;
1251 p0_a36 := ddp_sr_record.inventory_item_segment3;
1252 p0_a37 := ddp_sr_record.inventory_item_segment4;
1253 p0_a38 := ddp_sr_record.inventory_item_segment5;
1254 p0_a39 := ddp_sr_record.inventory_item_segment6;
1255 p0_a40 := ddp_sr_record.inventory_item_segment7;
1256 p0_a41 := ddp_sr_record.inventory_item_segment8;
1257 p0_a42 := ddp_sr_record.inventory_item_segment9;
1258 p0_a43 := ddp_sr_record.inventory_item_segment10;
1259 p0_a44 := ddp_sr_record.inventory_item_segment11;
1260 p0_a45 := ddp_sr_record.inventory_item_segment12;
1261 p0_a46 := ddp_sr_record.inventory_item_segment13;
1262 p0_a47 := ddp_sr_record.inventory_item_segment14;
1263 p0_a48 := ddp_sr_record.inventory_item_segment15;
1264 p0_a49 := ddp_sr_record.inventory_item_segment16;
1265 p0_a50 := ddp_sr_record.inventory_item_segment17;
1266 p0_a51 := ddp_sr_record.inventory_item_segment18;
1267 p0_a52 := ddp_sr_record.inventory_item_segment19;
1268 p0_a53 := ddp_sr_record.inventory_item_segment20;
1269 p0_a54 := ddp_sr_record.inventory_item_vals_or_ids;
1270 p0_a55 := ddp_sr_record.inventory_org_id;
1271 p0_a56 := ddp_sr_record.current_serial_number;
1272 p0_a57 := ddp_sr_record.original_order_number;
1273 p0_a58 := ddp_sr_record.purchase_order_num;
1274 p0_a59 := ddp_sr_record.problem_code;
1275 p0_a60 := ddp_sr_record.exp_resolution_date;
1276 p0_a61 := ddp_sr_record.install_site_use_id;
1277 p0_a62 := ddp_sr_record.request_attribute_1;
1278 p0_a63 := ddp_sr_record.request_attribute_2;
1279 p0_a64 := ddp_sr_record.request_attribute_3;
1280 p0_a65 := ddp_sr_record.request_attribute_4;
1281 p0_a66 := ddp_sr_record.request_attribute_5;
1282 p0_a67 := ddp_sr_record.request_attribute_6;
1283 p0_a68 := ddp_sr_record.request_attribute_7;
1284 p0_a69 := ddp_sr_record.request_attribute_8;
1285 p0_a70 := ddp_sr_record.request_attribute_9;
1286 p0_a71 := ddp_sr_record.request_attribute_10;
1287 p0_a72 := ddp_sr_record.request_attribute_11;
1288 p0_a73 := ddp_sr_record.request_attribute_12;
1289 p0_a74 := ddp_sr_record.request_attribute_13;
1290 p0_a75 := ddp_sr_record.request_attribute_14;
1291 p0_a76 := ddp_sr_record.request_attribute_15;
1292 p0_a77 := ddp_sr_record.request_context;
1293 p0_a78 := ddp_sr_record.bill_to_site_use_id;
1294 p0_a79 := ddp_sr_record.bill_to_contact_id;
1295 p0_a80 := ddp_sr_record.ship_to_site_use_id;
1296 p0_a81 := ddp_sr_record.ship_to_contact_id;
1297 p0_a82 := ddp_sr_record.resolution_code;
1298 p0_a83 := ddp_sr_record.act_resolution_date;
1299 p0_a84 := ddp_sr_record.public_comment_flag;
1300 p0_a85 := ddp_sr_record.parent_interaction_id;
1301 p0_a86 := ddp_sr_record.contract_service_id;
1302 p0_a87 := ddp_sr_record.contract_service_number;
1303 p0_a88 := ddp_sr_record.contract_id;
1304 p0_a89 := ddp_sr_record.project_number;
1305 p0_a90 := ddp_sr_record.qa_collection_plan_id;
1306 p0_a91 := ddp_sr_record.account_id;
1307 p0_a92 := ddp_sr_record.resource_type;
1308 p0_a93 := ddp_sr_record.resource_subtype_id;
1309 p0_a94 := ddp_sr_record.cust_po_number;
1310 p0_a95 := ddp_sr_record.cust_ticket_number;
1311 p0_a96 := ddp_sr_record.sr_creation_channel;
1312 p0_a97 := ddp_sr_record.obligation_date;
1313 p0_a98 := ddp_sr_record.time_zone_id;
1314 p0_a99 := ddp_sr_record.time_difference;
1315 p0_a100 := ddp_sr_record.site_id;
1316 p0_a101 := ddp_sr_record.customer_site_id;
1317 p0_a102 := ddp_sr_record.territory_id;
1318 p0_a103 := ddp_sr_record.initialize_flag;
1319 p0_a104 := ddp_sr_record.cp_revision_id;
1320 p0_a105 := ddp_sr_record.inv_item_revision;
1321 p0_a106 := ddp_sr_record.inv_component_id;
1322 p0_a107 := ddp_sr_record.inv_component_version;
1323 p0_a108 := ddp_sr_record.inv_subcomponent_id;
1324 p0_a109 := ddp_sr_record.inv_subcomponent_version;
1325 p0_a110 := ddp_sr_record.tier;
1326 p0_a111 := ddp_sr_record.tier_version;
1327 p0_a112 := ddp_sr_record.operating_system;
1328 p0_a113 := ddp_sr_record.operating_system_version;
1329 p0_a114 := ddp_sr_record.database;
1330 p0_a115 := ddp_sr_record.cust_pref_lang_id;
1331 p0_a116 := ddp_sr_record.category_id;
1332 p0_a117 := ddp_sr_record.group_type;
1333 p0_a118 := ddp_sr_record.group_territory_id;
1334 p0_a119 := ddp_sr_record.inv_platform_org_id;
1335 p0_a120 := ddp_sr_record.component_version;
1336 p0_a121 := ddp_sr_record.subcomponent_version;
1337 p0_a122 := ddp_sr_record.product_revision;
1338 p0_a123 := ddp_sr_record.comm_pref_code;
1339 p0_a124 := ddp_sr_record.cust_pref_lang_code;
1340 p0_a125 := ddp_sr_record.last_update_channel;
1341 end;
1342
1343 end iem_servicerequest_pvt_w;