[Home] [Help]
PACKAGE BODY: APPS.IEM_MAILITEM_PUB_W
Source
1 package body iem_mailitem_pub_w as
2 /* $Header: IEMPMICB.pls 120.4.12020000.3 2012/10/05 06:25:40 lkullamb 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 iem_mailitem_pub.email_count_tbl, a0 JTF_NUMBER_TABLE
17 , a1 JTF_NUMBER_TABLE
18 , a2 JTF_VARCHAR2_TABLE_100
19 , a3 JTF_VARCHAR2_TABLE_100
20 , a4 JTF_NUMBER_TABLE
21 , a5 JTF_NUMBER_TABLE
22 , a6 JTF_NUMBER_TABLE
23 , a7 JTF_NUMBER_TABLE
24 , a8 JTF_NUMBER_TABLE
25 ) as
26 ddindx binary_integer; indx binary_integer;
27 begin
28 if a0 is not null and a0.count > 0 then
29 if a0.count > 0 then
30 indx := a0.first;
31 ddindx := 1;
32 while true loop
33 t(ddindx).email_account_id := a0(indx);
34 t(ddindx).rt_classification_id := a1(indx);
35 t(ddindx).rt_classification_name := a2(indx);
36 t(ddindx).email_account_name := a3(indx);
37 t(ddindx).email_que_count := a4(indx);
38 t(ddindx).email_acq_count := a5(indx);
39 t(ddindx).email_max_qwait := a6(indx);
40 t(ddindx).email_max_await := a7(indx);
41 t(ddindx).email_status := a8(indx);
42 ddindx := ddindx+1;
43 if a0.last =indx
44 then exit;
45 end if;
46 indx := a0.next(indx);
47 end loop;
48 end if;
49 end if;
50 end rosetta_table_copy_in_p1;
51 procedure rosetta_table_copy_out_p1(t iem_mailitem_pub.email_count_tbl, a0 out nocopy JTF_NUMBER_TABLE
52 , a1 out nocopy JTF_NUMBER_TABLE
53 , a2 out nocopy JTF_VARCHAR2_TABLE_100
54 , a3 out nocopy JTF_VARCHAR2_TABLE_100
55 , a4 out nocopy JTF_NUMBER_TABLE
56 , a5 out nocopy JTF_NUMBER_TABLE
57 , a6 out nocopy JTF_NUMBER_TABLE
58 , a7 out nocopy JTF_NUMBER_TABLE
59 , a8 out nocopy JTF_NUMBER_TABLE
60 ) as
61 ddindx binary_integer; indx binary_integer;
62 begin
63 if t is null or t.count = 0 then
64 a0 := JTF_NUMBER_TABLE();
65 a1 := JTF_NUMBER_TABLE();
66 a2 := JTF_VARCHAR2_TABLE_100();
67 a3 := JTF_VARCHAR2_TABLE_100();
68 a4 := JTF_NUMBER_TABLE();
69 a5 := JTF_NUMBER_TABLE();
70 a6 := JTF_NUMBER_TABLE();
71 a7 := JTF_NUMBER_TABLE();
72 a8 := JTF_NUMBER_TABLE();
73 else
74 a0 := JTF_NUMBER_TABLE();
75 a1 := JTF_NUMBER_TABLE();
76 a2 := JTF_VARCHAR2_TABLE_100();
77 a3 := JTF_VARCHAR2_TABLE_100();
78 a4 := JTF_NUMBER_TABLE();
79 a5 := JTF_NUMBER_TABLE();
80 a6 := JTF_NUMBER_TABLE();
81 a7 := JTF_NUMBER_TABLE();
82 a8 := JTF_NUMBER_TABLE();
83 if t.count > 0 then
84 a0.extend(t.count);
85 a1.extend(t.count);
86 a2.extend(t.count);
87 a3.extend(t.count);
88 a4.extend(t.count);
89 a5.extend(t.count);
90 a6.extend(t.count);
91 a7.extend(t.count);
92 a8.extend(t.count);
93 ddindx := t.first;
94 indx := 1;
95 while true loop
96 a0(indx) := t(ddindx).email_account_id;
97 a1(indx) := t(ddindx).rt_classification_id;
98 a2(indx) := t(ddindx).rt_classification_name;
99 a3(indx) := t(ddindx).email_account_name;
100 a4(indx) := t(ddindx).email_que_count;
101 a5(indx) := t(ddindx).email_acq_count;
102 a6(indx) := t(ddindx).email_max_qwait;
103 a7(indx) := t(ddindx).email_max_await;
104 a8(indx) := t(ddindx).email_status;
105 indx := indx+1;
106 if t.last =ddindx
107 then exit;
108 end if;
109 ddindx := t.next(ddindx);
110 end loop;
111 end if;
112 end if;
113 end rosetta_table_copy_out_p1;
114
115 procedure rosetta_table_copy_in_p3(t out nocopy iem_mailitem_pub.class_count_tbl, a0 JTF_NUMBER_TABLE
116 , a1 JTF_VARCHAR2_TABLE_100
117 , a2 JTF_NUMBER_TABLE
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).rt_classification_id := a0(indx);
127 t(ddindx).rt_classification_name := a1(indx);
128 t(ddindx).email_count := a2(indx);
129 ddindx := ddindx+1;
130 if a0.last =indx
131 then exit;
132 end if;
133 indx := a0.next(indx);
134 end loop;
135 end if;
136 end if;
137 end rosetta_table_copy_in_p3;
138 procedure rosetta_table_copy_out_p3(t iem_mailitem_pub.class_count_tbl, a0 out nocopy JTF_NUMBER_TABLE
139 , a1 out nocopy JTF_VARCHAR2_TABLE_100
140 , a2 out nocopy JTF_NUMBER_TABLE
141 ) as
142 ddindx binary_integer; indx binary_integer;
143 begin
144 if t is null or t.count = 0 then
145 a0 := JTF_NUMBER_TABLE();
146 a1 := JTF_VARCHAR2_TABLE_100();
147 a2 := JTF_NUMBER_TABLE();
148 else
149 a0 := JTF_NUMBER_TABLE();
150 a1 := JTF_VARCHAR2_TABLE_100();
151 a2 := JTF_NUMBER_TABLE();
152 if t.count > 0 then
153 a0.extend(t.count);
154 a1.extend(t.count);
155 a2.extend(t.count);
156 ddindx := t.first;
157 indx := 1;
158 while true loop
159 a0(indx) := t(ddindx).rt_classification_id;
160 a1(indx) := t(ddindx).rt_classification_name;
161 a2(indx) := t(ddindx).email_count;
162 indx := indx+1;
163 if t.last =ddindx
164 then exit;
165 end if;
166 ddindx := t.next(ddindx);
167 end loop;
168 end if;
169 end if;
170 end rosetta_table_copy_out_p3;
171
172 procedure rosetta_table_copy_in_p4(t out nocopy iem_mailitem_pub.t_number_table, a0 JTF_NUMBER_TABLE) as
173 ddindx binary_integer; indx binary_integer;
174 begin
175 if a0 is null then
176 t := null;
177 elsif a0.count = 0 then
178 t := iem_mailitem_pub.t_number_table();
179 else
180 if a0.count > 0 then
181 t := iem_mailitem_pub.t_number_table();
182 t.extend(a0.count);
183 indx := a0.first;
184 ddindx := 1;
185 while true loop
186 t(ddindx) := a0(indx);
187 ddindx := ddindx+1;
188 if a0.last =indx
189 then exit;
190 end if;
191 indx := a0.next(indx);
192 end loop;
193 end if;
194 end if;
195 end rosetta_table_copy_in_p4;
196 procedure rosetta_table_copy_out_p4(t iem_mailitem_pub.t_number_table, a0 out nocopy JTF_NUMBER_TABLE) as
197 ddindx binary_integer; indx binary_integer;
198 begin
199 if t is null then
200 a0 := null;
201 elsif t.count = 0 then
202 a0 := JTF_NUMBER_TABLE();
203 else
204 a0 := JTF_NUMBER_TABLE();
205 if t.count > 0 then
206 a0.extend(t.count);
207 ddindx := t.first;
208 indx := 1;
209 while true loop
210 a0(indx) := t(ddindx);
211 indx := indx+1;
212 if t.last =ddindx
213 then exit;
214 end if;
215 ddindx := t.next(ddindx);
216 end loop;
217 end if;
218 end if;
219 end rosetta_table_copy_out_p4;
220
221 procedure rosetta_table_copy_in_p6(t out nocopy iem_mailitem_pub.acq_email_info_tbl, a0 JTF_NUMBER_TABLE
222 , a1 JTF_NUMBER_TABLE
223 , a2 JTF_VARCHAR2_TABLE_100
224 , a3 JTF_NUMBER_TABLE
225 , a4 JTF_NUMBER_TABLE
226 , a5 JTF_NUMBER_TABLE
227 , a6 JTF_VARCHAR2_TABLE_100
228 , a7 JTF_VARCHAR2_TABLE_200
229 , a8 JTF_VARCHAR2_TABLE_2000
230 , a9 JTF_VARCHAR2_TABLE_100
231 , a10 JTF_VARCHAR2_TABLE_100
232 , a11 JTF_VARCHAR2_TABLE_100
233 , a12 JTF_VARCHAR2_TABLE_100
234 , a13 JTF_NUMBER_TABLE
235 , a14 JTF_VARCHAR2_TABLE_100
236 , a15 JTF_VARCHAR2_TABLE_300
237 ) as
238 ddindx binary_integer; indx binary_integer;
239 begin
240 if a0 is not null and a0.count > 0 then
241 if a0.count > 0 then
242 indx := a0.first;
243 ddindx := 1;
244 while true loop
245 t(ddindx).message_id := a0(indx);
246 t(ddindx).rt_classification_id := a1(indx);
247 t(ddindx).rt_classification_name := a2(indx);
248 t(ddindx).rt_media_item_id := a3(indx);
249 t(ddindx).rt_interaction_id := a4(indx);
250 t(ddindx).email_account_id := a5(indx);
251 t(ddindx).message_flag := a6(indx);
252 t(ddindx).sender_name := a7(indx);
253 t(ddindx).subject := a8(indx);
254 t(ddindx).priority := a9(indx);
255 t(ddindx).msg_status := a10(indx);
256 t(ddindx).sent_date := a11(indx);
257 t(ddindx).mail_item_status := a12(indx);
258 t(ddindx).from_agent_id := a13(indx);
259 t(ddindx).read_status := a14(indx);
260 t(ddindx).description := a15(indx);
261 ddindx := ddindx+1;
262 if a0.last =indx
263 then exit;
264 end if;
265 indx := a0.next(indx);
266 end loop;
267 end if;
268 end if;
269 end rosetta_table_copy_in_p6;
270 procedure rosetta_table_copy_out_p6(t iem_mailitem_pub.acq_email_info_tbl, a0 out nocopy JTF_NUMBER_TABLE
271 , a1 out nocopy JTF_NUMBER_TABLE
272 , a2 out nocopy JTF_VARCHAR2_TABLE_100
273 , a3 out nocopy JTF_NUMBER_TABLE
274 , a4 out nocopy JTF_NUMBER_TABLE
275 , a5 out nocopy JTF_NUMBER_TABLE
276 , a6 out nocopy JTF_VARCHAR2_TABLE_100
277 , a7 out nocopy JTF_VARCHAR2_TABLE_200
278 , a8 out nocopy JTF_VARCHAR2_TABLE_2000
279 , a9 out nocopy JTF_VARCHAR2_TABLE_100
280 , a10 out nocopy JTF_VARCHAR2_TABLE_100
281 , a11 out nocopy JTF_VARCHAR2_TABLE_100
282 , a12 out nocopy JTF_VARCHAR2_TABLE_100
283 , a13 out nocopy JTF_NUMBER_TABLE
284 , a14 out nocopy JTF_VARCHAR2_TABLE_100
285 , a15 out nocopy JTF_VARCHAR2_TABLE_300
286 ) as
287 ddindx binary_integer; indx binary_integer;
288 begin
289 if t is null or t.count = 0 then
290 a0 := JTF_NUMBER_TABLE();
291 a1 := JTF_NUMBER_TABLE();
292 a2 := JTF_VARCHAR2_TABLE_100();
293 a3 := JTF_NUMBER_TABLE();
294 a4 := JTF_NUMBER_TABLE();
295 a5 := JTF_NUMBER_TABLE();
296 a6 := JTF_VARCHAR2_TABLE_100();
297 a7 := JTF_VARCHAR2_TABLE_200();
298 a8 := JTF_VARCHAR2_TABLE_2000();
299 a9 := JTF_VARCHAR2_TABLE_100();
300 a10 := JTF_VARCHAR2_TABLE_100();
301 a11 := JTF_VARCHAR2_TABLE_100();
302 a12 := JTF_VARCHAR2_TABLE_100();
303 a13 := JTF_NUMBER_TABLE();
304 a14 := JTF_VARCHAR2_TABLE_100();
305 a15 := JTF_VARCHAR2_TABLE_300();
306 else
307 a0 := JTF_NUMBER_TABLE();
308 a1 := JTF_NUMBER_TABLE();
309 a2 := JTF_VARCHAR2_TABLE_100();
310 a3 := JTF_NUMBER_TABLE();
311 a4 := JTF_NUMBER_TABLE();
312 a5 := JTF_NUMBER_TABLE();
313 a6 := JTF_VARCHAR2_TABLE_100();
314 a7 := JTF_VARCHAR2_TABLE_200();
315 a8 := JTF_VARCHAR2_TABLE_2000();
316 a9 := JTF_VARCHAR2_TABLE_100();
317 a10 := JTF_VARCHAR2_TABLE_100();
318 a11 := JTF_VARCHAR2_TABLE_100();
319 a12 := JTF_VARCHAR2_TABLE_100();
320 a13 := JTF_NUMBER_TABLE();
321 a14 := JTF_VARCHAR2_TABLE_100();
322 a15 := JTF_VARCHAR2_TABLE_300();
323 if t.count > 0 then
324 a0.extend(t.count);
325 a1.extend(t.count);
326 a2.extend(t.count);
327 a3.extend(t.count);
328 a4.extend(t.count);
329 a5.extend(t.count);
330 a6.extend(t.count);
331 a7.extend(t.count);
332 a8.extend(t.count);
333 a9.extend(t.count);
334 a10.extend(t.count);
335 a11.extend(t.count);
336 a12.extend(t.count);
337 a13.extend(t.count);
338 a14.extend(t.count);
339 a15.extend(t.count);
340 ddindx := t.first;
341 indx := 1;
342 while true loop
343 a0(indx) := t(ddindx).message_id;
344 a1(indx) := t(ddindx).rt_classification_id;
345 a2(indx) := t(ddindx).rt_classification_name;
346 a3(indx) := t(ddindx).rt_media_item_id;
347 a4(indx) := t(ddindx).rt_interaction_id;
348 a5(indx) := t(ddindx).email_account_id;
349 a6(indx) := t(ddindx).message_flag;
350 a7(indx) := t(ddindx).sender_name;
351 a8(indx) := t(ddindx).subject;
352 a9(indx) := t(ddindx).priority;
353 a10(indx) := t(ddindx).msg_status;
354 a11(indx) := t(ddindx).sent_date;
355 a12(indx) := t(ddindx).mail_item_status;
356 a13(indx) := t(ddindx).from_agent_id;
357 a14(indx) := t(ddindx).read_status;
358 a15(indx) := t(ddindx).description;
359 indx := indx+1;
360 if t.last =ddindx
361 then exit;
362 end if;
363 ddindx := t.next(ddindx);
364 end loop;
365 end if;
366 end if;
367 end rosetta_table_copy_out_p6;
368
369 procedure rosetta_table_copy_in_p8(t out nocopy iem_mailitem_pub.queue_email_info_tbl, a0 JTF_NUMBER_TABLE
370 , a1 JTF_NUMBER_TABLE
371 , a2 JTF_VARCHAR2_TABLE_100
372 , a3 JTF_NUMBER_TABLE
373 , a4 JTF_VARCHAR2_TABLE_200
374 , a5 JTF_VARCHAR2_TABLE_2000
375 , a6 JTF_VARCHAR2_TABLE_100
376 , a7 JTF_NUMBER_TABLE
377 , a8 JTF_VARCHAR2_TABLE_400
378 , a9 JTF_NUMBER_TABLE
379 , a10 JTF_NUMBER_TABLE
380 , a11 JTF_VARCHAR2_TABLE_100
381 , a12 JTF_VARCHAR2_TABLE_100
382 , a13 JTF_VARCHAR2_TABLE_100
383 ) as
384 ddindx binary_integer; indx binary_integer;
385 begin
386 if a0 is not null and a0.count > 0 then
387 if a0.count > 0 then
388 indx := a0.first;
389 ddindx := 1;
390 while true loop
391 t(ddindx).message_id := a0(indx);
392 t(ddindx).rt_classification_id := a1(indx);
393 t(ddindx).rt_classification_name := a2(indx);
394 t(ddindx).email_account_id := a3(indx);
395 t(ddindx).sender_name := a4(indx);
396 t(ddindx).subject := a5(indx);
397 t(ddindx).sent_date := a6(indx);
398 t(ddindx).from_agent_id := a7(indx);
399 t(ddindx).party_name := a8(indx);
400 t(ddindx).party_id := a9(indx);
401 t(ddindx).contact_id := a10(indx);
402 t(ddindx).group_name := a11(indx);
403 t(ddindx).source := a12(indx);
404 t(ddindx).source_number := a13(indx);
405 ddindx := ddindx+1;
406 if a0.last =indx
407 then exit;
408 end if;
409 indx := a0.next(indx);
410 end loop;
411 end if;
412 end if;
413 end rosetta_table_copy_in_p8;
414 procedure rosetta_table_copy_out_p8(t iem_mailitem_pub.queue_email_info_tbl, a0 out nocopy JTF_NUMBER_TABLE
415 , a1 out nocopy JTF_NUMBER_TABLE
416 , a2 out nocopy JTF_VARCHAR2_TABLE_100
417 , a3 out nocopy JTF_NUMBER_TABLE
418 , a4 out nocopy JTF_VARCHAR2_TABLE_200
419 , a5 out nocopy JTF_VARCHAR2_TABLE_2000
420 , a6 out nocopy JTF_VARCHAR2_TABLE_100
421 , a7 out nocopy JTF_NUMBER_TABLE
422 , a8 out nocopy JTF_VARCHAR2_TABLE_400
423 , a9 out nocopy JTF_NUMBER_TABLE
424 , a10 out nocopy JTF_NUMBER_TABLE
425 , a11 out nocopy JTF_VARCHAR2_TABLE_100
426 , a12 out nocopy JTF_VARCHAR2_TABLE_100
427 , a13 out nocopy JTF_VARCHAR2_TABLE_100
428 ) as
429 ddindx binary_integer; indx binary_integer;
430 begin
431 if t is null or t.count = 0 then
432 a0 := JTF_NUMBER_TABLE();
433 a1 := JTF_NUMBER_TABLE();
434 a2 := JTF_VARCHAR2_TABLE_100();
435 a3 := JTF_NUMBER_TABLE();
436 a4 := JTF_VARCHAR2_TABLE_200();
437 a5 := JTF_VARCHAR2_TABLE_2000();
438 a6 := JTF_VARCHAR2_TABLE_100();
439 a7 := JTF_NUMBER_TABLE();
440 a8 := JTF_VARCHAR2_TABLE_400();
441 a9 := JTF_NUMBER_TABLE();
442 a10 := JTF_NUMBER_TABLE();
443 a11 := JTF_VARCHAR2_TABLE_100();
444 a12 := JTF_VARCHAR2_TABLE_100();
445 a13 := JTF_VARCHAR2_TABLE_100();
446 else
447 a0 := JTF_NUMBER_TABLE();
448 a1 := JTF_NUMBER_TABLE();
449 a2 := JTF_VARCHAR2_TABLE_100();
450 a3 := JTF_NUMBER_TABLE();
451 a4 := JTF_VARCHAR2_TABLE_200();
452 a5 := JTF_VARCHAR2_TABLE_2000();
453 a6 := JTF_VARCHAR2_TABLE_100();
454 a7 := JTF_NUMBER_TABLE();
455 a8 := JTF_VARCHAR2_TABLE_400();
456 a9 := JTF_NUMBER_TABLE();
457 a10 := JTF_NUMBER_TABLE();
458 a11 := JTF_VARCHAR2_TABLE_100();
459 a12 := JTF_VARCHAR2_TABLE_100();
460 a13 := JTF_VARCHAR2_TABLE_100();
461 if t.count > 0 then
462 a0.extend(t.count);
463 a1.extend(t.count);
464 a2.extend(t.count);
465 a3.extend(t.count);
466 a4.extend(t.count);
467 a5.extend(t.count);
468 a6.extend(t.count);
469 a7.extend(t.count);
470 a8.extend(t.count);
471 a9.extend(t.count);
472 a10.extend(t.count);
473 a11.extend(t.count);
474 a12.extend(t.count);
475 a13.extend(t.count);
476 ddindx := t.first;
477 indx := 1;
478 while true loop
479 a0(indx) := t(ddindx).message_id;
480 a1(indx) := t(ddindx).rt_classification_id;
481 a2(indx) := t(ddindx).rt_classification_name;
482 a3(indx) := t(ddindx).email_account_id;
483 a4(indx) := t(ddindx).sender_name;
484 a5(indx) := t(ddindx).subject;
485 a6(indx) := t(ddindx).sent_date;
486 a7(indx) := t(ddindx).from_agent_id;
487 a8(indx) := t(ddindx).party_name;
488 a9(indx) := t(ddindx).party_id;
489 a10(indx) := t(ddindx).contact_id;
490 a11(indx) := t(ddindx).group_name;
491 a12(indx) := t(ddindx).source;
492 a13(indx) := t(ddindx).source_number;
493 indx := indx+1;
494 if t.last =ddindx
495 then exit;
496 end if;
497 ddindx := t.next(ddindx);
498 end loop;
499 end if;
500 end if;
501 end rosetta_table_copy_out_p8;
502
503 procedure rosetta_table_copy_in_p10(t out nocopy iem_mailitem_pub.keyvals_tbl_type, a0 JTF_VARCHAR2_TABLE_100
504 , a1 JTF_VARCHAR2_TABLE_300
505 , a2 JTF_VARCHAR2_TABLE_100
506 ) as
507 ddindx binary_integer; indx binary_integer;
508 begin
509 if a0 is not null and a0.count > 0 then
510 if a0.count > 0 then
511 indx := a0.first;
512 ddindx := 1;
513 while true loop
514 t(ddindx).key := a0(indx);
515 t(ddindx).value := a1(indx);
516 t(ddindx).datatype := a2(indx);
517 ddindx := ddindx+1;
518 if a0.last =indx
519 then exit;
520 end if;
521 indx := a0.next(indx);
522 end loop;
523 end if;
524 end if;
525 end rosetta_table_copy_in_p10;
526 procedure rosetta_table_copy_out_p10(t iem_mailitem_pub.keyvals_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
527 , a1 out nocopy JTF_VARCHAR2_TABLE_300
528 , a2 out nocopy JTF_VARCHAR2_TABLE_100
529 ) as
530 ddindx binary_integer; indx binary_integer;
531 begin
532 if t is null or t.count = 0 then
533 a0 := JTF_VARCHAR2_TABLE_100();
534 a1 := JTF_VARCHAR2_TABLE_300();
535 a2 := JTF_VARCHAR2_TABLE_100();
536 else
537 a0 := JTF_VARCHAR2_TABLE_100();
538 a1 := JTF_VARCHAR2_TABLE_300();
539 a2 := JTF_VARCHAR2_TABLE_100();
540 if t.count > 0 then
541 a0.extend(t.count);
542 a1.extend(t.count);
543 a2.extend(t.count);
544 ddindx := t.first;
545 indx := 1;
546 while true loop
547 a0(indx) := t(ddindx).key;
548 a1(indx) := t(ddindx).value;
549 a2(indx) := t(ddindx).datatype;
550 indx := indx+1;
551 if t.last =ddindx
552 then exit;
553 end if;
554 ddindx := t.next(ddindx);
555 end loop;
556 end if;
557 end if;
558 end rosetta_table_copy_out_p10;
559
560 procedure getmailitemcount(p_api_version_number NUMBER
561 , p_init_msg_list VARCHAR2
562 , p_commit VARCHAR2
563 , p_resource_id NUMBER
564 , p_tbl JTF_NUMBER_TABLE
565 , p5_a0 out nocopy JTF_NUMBER_TABLE
566 , p5_a1 out nocopy JTF_NUMBER_TABLE
567 , p5_a2 out nocopy JTF_VARCHAR2_TABLE_100
568 , p5_a3 out nocopy JTF_VARCHAR2_TABLE_100
569 , p5_a4 out nocopy JTF_NUMBER_TABLE
570 , p5_a5 out nocopy JTF_NUMBER_TABLE
571 , p5_a6 out nocopy JTF_NUMBER_TABLE
572 , p5_a7 out nocopy JTF_NUMBER_TABLE
573 , p5_a8 out nocopy JTF_NUMBER_TABLE
574 , x_return_status out nocopy VARCHAR2
575 , x_msg_count out nocopy NUMBER
576 , x_msg_data out nocopy VARCHAR2
577 )
578
579 as
580 ddp_tbl iem_mailitem_pub.t_number_table;
581 ddx_email_count iem_mailitem_pub.email_count_tbl;
582 ddindx binary_integer; indx binary_integer;
583 begin
584
585 -- copy data to the local IN or IN-OUT args, if any
586
587
588
589
590 iem_mailitem_pub_w.rosetta_table_copy_in_p4(ddp_tbl, p_tbl);
591
592
593
594
595
596 -- here's the delegated call to the old PL/SQL routine
597 iem_mailitem_pub.getmailitemcount(p_api_version_number,
598 p_init_msg_list,
599 p_commit,
600 p_resource_id,
601 ddp_tbl,
602 ddx_email_count,
603 x_return_status,
604 x_msg_count,
605 x_msg_data);
606
607 -- copy data back from the local variables to OUT or IN-OUT args, if any
608
609
610
611
612
613 iem_mailitem_pub_w.rosetta_table_copy_out_p1(ddx_email_count, p5_a0
614 , p5_a1
615 , p5_a2
616 , p5_a3
617 , p5_a4
618 , p5_a5
619 , p5_a6
620 , p5_a7
621 , p5_a8
622 );
623
624
625
626 end;
627
628 procedure getmailitemcount(p_api_version_number NUMBER
629 , p_init_msg_list VARCHAR2
630 , p_commit VARCHAR2
631 , p_resource_id NUMBER
632 , p_tbl JTF_NUMBER_TABLE
633 , p_email_account_id NUMBER
634 , p6_a0 out nocopy JTF_NUMBER_TABLE
635 , p6_a1 out nocopy JTF_VARCHAR2_TABLE_100
636 , p6_a2 out nocopy JTF_NUMBER_TABLE
637 , x_return_status out nocopy VARCHAR2
638 , x_msg_count out nocopy NUMBER
639 , x_msg_data out nocopy VARCHAR2
640 )
641
642 as
643 ddp_tbl iem_mailitem_pub.t_number_table;
644 ddx_class_bin iem_mailitem_pub.class_count_tbl;
645 ddindx binary_integer; indx binary_integer;
646 begin
647
648 -- copy data to the local IN or IN-OUT args, if any
649
650
651
652
653 iem_mailitem_pub_w.rosetta_table_copy_in_p4(ddp_tbl, p_tbl);
654
655
656
657
658
659
660 -- here's the delegated call to the old PL/SQL routine
661 iem_mailitem_pub.getmailitemcount(p_api_version_number,
662 p_init_msg_list,
663 p_commit,
664 p_resource_id,
665 ddp_tbl,
666 p_email_account_id,
667 ddx_class_bin,
668 x_return_status,
669 x_msg_count,
670 x_msg_data);
671
672 -- copy data back from the local variables to OUT or IN-OUT args, if any
673
674
675
676
677
678
679 iem_mailitem_pub_w.rosetta_table_copy_out_p3(ddx_class_bin, p6_a0
680 , p6_a1
681 , p6_a2
682 );
683
684
685
686 end;
687
688 procedure getmailitemcount(p_api_version_number NUMBER
689 , p_init_msg_list VARCHAR2
690 , p_commit VARCHAR2
691 , p_email_account_id NUMBER
692 , p4_a0 out nocopy JTF_NUMBER_TABLE
693 , p4_a1 out nocopy JTF_VARCHAR2_TABLE_100
694 , p4_a2 out nocopy JTF_NUMBER_TABLE
695 , x_return_status out nocopy VARCHAR2
696 , x_msg_count out nocopy NUMBER
697 , x_msg_data out nocopy VARCHAR2
698 )
699
700 as
701 ddx_class_bin iem_mailitem_pub.class_count_tbl;
702 ddindx binary_integer; indx binary_integer;
703 begin
704
705 -- copy data to the local IN or IN-OUT args, if any
706
707
708
709
710
711
712
713
714 -- here's the delegated call to the old PL/SQL routine
715 iem_mailitem_pub.getmailitemcount(p_api_version_number,
716 p_init_msg_list,
717 p_commit,
718 p_email_account_id,
719 ddx_class_bin,
720 x_return_status,
721 x_msg_count,
722 x_msg_data);
723
724 -- copy data back from the local variables to OUT or IN-OUT args, if any
725
726
727
728
729 iem_mailitem_pub_w.rosetta_table_copy_out_p3(ddx_class_bin, p4_a0
730 , p4_a1
731 , p4_a2
732 );
733
734
735
736 end;
737
738 procedure getmailitemcount(p_api_version_number NUMBER
739 , p_init_msg_list VARCHAR2
740 , p_commit VARCHAR2
741 , p_resource_id NUMBER
742 , p_tbl JTF_NUMBER_TABLE
743 , p_email_account_id NUMBER
744 , p_classification_id NUMBER
745 , x_count out nocopy NUMBER
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_tbl iem_mailitem_pub.t_number_table;
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 iem_mailitem_pub_w.rosetta_table_copy_in_p4(ddp_tbl, p_tbl);
762
763
764
765
766
767
768
769 -- here's the delegated call to the old PL/SQL routine
770 iem_mailitem_pub.getmailitemcount(p_api_version_number,
771 p_init_msg_list,
772 p_commit,
773 p_resource_id,
774 ddp_tbl,
775 p_email_account_id,
776 p_classification_id,
777 x_count,
778 x_return_status,
779 x_msg_count,
780 x_msg_data);
781
782 -- copy data back from the local variables to OUT or IN-OUT args, if any
783
784
785
786
787
788
789
790
791
792
793 end;
794
795 procedure getmailitem(p_api_version_number NUMBER
796 , p_init_msg_list VARCHAR2
797 , p_commit VARCHAR2
798 , p_resource_id NUMBER
799 , p_tbl JTF_NUMBER_TABLE
800 , p_rt_classification NUMBER
801 , p_account_id NUMBER
802 , p7_a0 out nocopy NUMBER
803 , p7_a1 out nocopy NUMBER
804 , p7_a2 out nocopy NUMBER
805 , p7_a3 out nocopy NUMBER
806 , p7_a4 out nocopy NUMBER
807 , p7_a5 out nocopy VARCHAR2
808 , p7_a6 out nocopy DATE
809 , p7_a7 out nocopy NUMBER
810 , p7_a8 out nocopy NUMBER
811 , p7_a9 out nocopy NUMBER
812 , p7_a10 out nocopy NUMBER
813 , p7_a11 out nocopy NUMBER
814 , p7_a12 out nocopy NUMBER
815 , p7_a13 out nocopy VARCHAR2
816 , p7_a14 out nocopy VARCHAR2
817 , p7_a15 out nocopy VARCHAR2
818 , p7_a16 out nocopy VARCHAR2
819 , p7_a17 out nocopy VARCHAR2
820 , p7_a18 out nocopy NUMBER
821 , p7_a19 out nocopy NUMBER
822 , p7_a20 out nocopy VARCHAR2
823 , p7_a21 out nocopy VARCHAR2
824 , p7_a22 out nocopy NUMBER
825 , p7_a23 out nocopy NUMBER
826 , p7_a24 out nocopy DATE
827 , p7_a25 out nocopy NUMBER
828 , p7_a26 out nocopy DATE
829 , p7_a27 out nocopy NUMBER
830 , p7_a28 out nocopy VARCHAR2
831 , p7_a29 out nocopy VARCHAR2
832 , p7_a30 out nocopy VARCHAR2
833 , p7_a31 out nocopy VARCHAR2
834 , p7_a32 out nocopy VARCHAR2
835 , p7_a33 out nocopy VARCHAR2
836 , p7_a34 out nocopy VARCHAR2
837 , p7_a35 out nocopy VARCHAR2
838 , p7_a36 out nocopy VARCHAR2
839 , p7_a37 out nocopy VARCHAR2
840 , p7_a38 out nocopy VARCHAR2
841 , p7_a39 out nocopy VARCHAR2
842 , p7_a40 out nocopy VARCHAR2
843 , p7_a41 out nocopy VARCHAR2
844 , p7_a42 out nocopy VARCHAR2
845 , p7_a43 out nocopy NUMBER
846 , x_return_status out nocopy VARCHAR2
847 , x_msg_count out nocopy NUMBER
848 , x_msg_data out nocopy VARCHAR2
849 )
850
851 as
852 ddp_tbl iem_mailitem_pub.t_number_table;
853 ddx_email_data iem_rt_proc_emails%rowtype;
854 ddindx binary_integer; indx binary_integer;
855 begin
856
857 -- copy data to the local IN or IN-OUT args, if any
858
859
860
861
862 iem_mailitem_pub_w.rosetta_table_copy_in_p4(ddp_tbl, p_tbl);
863
864
865
866
867
868
869
870 -- here's the delegated call to the old PL/SQL routine
871 iem_mailitem_pub.getmailitem(p_api_version_number,
872 p_init_msg_list,
873 p_commit,
874 p_resource_id,
875 ddp_tbl,
876 p_rt_classification,
877 p_account_id,
878 ddx_email_data,
879 x_return_status,
880 x_msg_count,
881 x_msg_data);
882
883 -- copy data back from the local variables to OUT or IN-OUT args, if any
884
885
886
887
888
889
890
891 p7_a0 := ddx_email_data.message_id;
892 p7_a1 := ddx_email_data.email_account_id;
893 p7_a2 := ddx_email_data.priority;
894 p7_a3 := ddx_email_data.resource_id;
895 p7_a4 := ddx_email_data.group_id;
896 p7_a5 := ddx_email_data.sent_date;
897 p7_a6 := ddx_email_data.received_date;
898 p7_a7 := ddx_email_data.rt_classification_id;
899 p7_a8 := ddx_email_data.customer_id;
900 p7_a9 := ddx_email_data.contact_id;
901 p7_a10 := ddx_email_data.relationship_id;
902 p7_a11 := ddx_email_data.ih_interaction_id;
903 p7_a12 := ddx_email_data.ih_media_item_id;
904 p7_a13 := ddx_email_data.message_flag;
905 p7_a14 := ddx_email_data.msg_status;
906 p7_a15 := ddx_email_data.mail_item_status;
907 p7_a16 := ddx_email_data.mail_proc_status;
908 p7_a17 := ddx_email_data.queue_status;
909 p7_a18 := ddx_email_data.category_map_id;
910 p7_a19 := ddx_email_data.rule_id;
911 p7_a20 := ddx_email_data.subject;
912 p7_a21 := ddx_email_data.from_address;
913 p7_a22 := ddx_email_data.from_resource_id;
914 p7_a23 := ddx_email_data.created_by;
915 p7_a24 := ddx_email_data.creation_date;
916 p7_a25 := ddx_email_data.last_updated_by;
917 p7_a26 := ddx_email_data.last_update_date;
918 p7_a27 := ddx_email_data.last_update_login;
919 p7_a28 := ddx_email_data.attribute1;
920 p7_a29 := ddx_email_data.attribute2;
921 p7_a30 := ddx_email_data.attribute3;
922 p7_a31 := ddx_email_data.attribute4;
923 p7_a32 := ddx_email_data.attribute5;
924 p7_a33 := ddx_email_data.attribute6;
925 p7_a34 := ddx_email_data.attribute7;
926 p7_a35 := ddx_email_data.attribute8;
927 p7_a36 := ddx_email_data.attribute9;
928 p7_a37 := ddx_email_data.attribute10;
929 p7_a38 := ddx_email_data.attribute11;
930 p7_a39 := ddx_email_data.attribute12;
931 p7_a40 := ddx_email_data.attribute13;
932 p7_a41 := ddx_email_data.attribute14;
933 p7_a42 := ddx_email_data.attribute15;
934 p7_a43 := ddx_email_data.security_group_id;
935
936
937
938 end;
939
940 procedure getmailitem(p_api_version_number NUMBER
941 , p_init_msg_list VARCHAR2
942 , p_commit VARCHAR2
943 , p_resource_id NUMBER
944 , p_tbl JTF_NUMBER_TABLE
945 , p_rt_classification NUMBER
946 , p_account_id NUMBER
947 , p7_a0 out nocopy NUMBER
948 , p7_a1 out nocopy NUMBER
949 , p7_a2 out nocopy NUMBER
950 , p7_a3 out nocopy NUMBER
951 , p7_a4 out nocopy NUMBER
952 , p7_a5 out nocopy VARCHAR2
953 , p7_a6 out nocopy DATE
954 , p7_a7 out nocopy NUMBER
955 , p7_a8 out nocopy NUMBER
956 , p7_a9 out nocopy NUMBER
957 , p7_a10 out nocopy NUMBER
958 , p7_a11 out nocopy NUMBER
959 , p7_a12 out nocopy NUMBER
960 , p7_a13 out nocopy VARCHAR2
961 , p7_a14 out nocopy VARCHAR2
962 , p7_a15 out nocopy VARCHAR2
963 , p7_a16 out nocopy VARCHAR2
964 , p7_a17 out nocopy VARCHAR2
965 , p7_a18 out nocopy NUMBER
966 , p7_a19 out nocopy NUMBER
967 , p7_a20 out nocopy VARCHAR2
968 , p7_a21 out nocopy VARCHAR2
969 , p7_a22 out nocopy NUMBER
970 , p7_a23 out nocopy NUMBER
971 , p7_a24 out nocopy DATE
972 , p7_a25 out nocopy NUMBER
973 , p7_a26 out nocopy DATE
974 , p7_a27 out nocopy NUMBER
975 , p7_a28 out nocopy VARCHAR2
976 , p7_a29 out nocopy VARCHAR2
977 , p7_a30 out nocopy VARCHAR2
978 , p7_a31 out nocopy VARCHAR2
979 , p7_a32 out nocopy VARCHAR2
980 , p7_a33 out nocopy VARCHAR2
981 , p7_a34 out nocopy VARCHAR2
982 , p7_a35 out nocopy VARCHAR2
983 , p7_a36 out nocopy VARCHAR2
984 , p7_a37 out nocopy VARCHAR2
985 , p7_a38 out nocopy VARCHAR2
986 , p7_a39 out nocopy VARCHAR2
987 , p7_a40 out nocopy VARCHAR2
988 , p7_a41 out nocopy VARCHAR2
989 , p7_a42 out nocopy VARCHAR2
990 , p7_a43 out nocopy NUMBER
991 , p8_a0 out nocopy JTF_VARCHAR2_TABLE_100
992 , p8_a1 out nocopy JTF_VARCHAR2_TABLE_300
993 , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
994 , x_encrypted_id out nocopy VARCHAR2
995 , x_return_status out nocopy VARCHAR2
996 , x_msg_count out nocopy NUMBER
997 , x_msg_data out nocopy VARCHAR2
998 )
999
1000 as
1001 ddp_tbl iem_mailitem_pub.t_number_table;
1002 ddx_email_data iem_rt_proc_emails%rowtype;
1003 ddx_tag_key_value iem_mailitem_pub.keyvals_tbl_type;
1004 ddindx binary_integer; indx binary_integer;
1005 begin
1006
1007 -- copy data to the local IN or IN-OUT args, if any
1008
1009
1010
1011
1012 iem_mailitem_pub_w.rosetta_table_copy_in_p4(ddp_tbl, p_tbl);
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022 -- here's the delegated call to the old PL/SQL routine
1023 iem_mailitem_pub.getmailitem(p_api_version_number,
1024 p_init_msg_list,
1025 p_commit,
1026 p_resource_id,
1027 ddp_tbl,
1028 p_rt_classification,
1029 p_account_id,
1030 ddx_email_data,
1031 ddx_tag_key_value,
1032 x_encrypted_id,
1033 x_return_status,
1034 x_msg_count,
1035 x_msg_data);
1036
1037 -- copy data back from the local variables to OUT or IN-OUT args, if any
1038
1039
1040
1041
1042
1043
1044
1045 p7_a0 := ddx_email_data.message_id;
1046 p7_a1 := ddx_email_data.email_account_id;
1047 p7_a2 := ddx_email_data.priority;
1048 p7_a3 := ddx_email_data.resource_id;
1049 p7_a4 := ddx_email_data.group_id;
1050 p7_a5 := ddx_email_data.sent_date;
1051 p7_a6 := ddx_email_data.received_date;
1052 p7_a7 := ddx_email_data.rt_classification_id;
1053 p7_a8 := ddx_email_data.customer_id;
1054 p7_a9 := ddx_email_data.contact_id;
1055 p7_a10 := ddx_email_data.relationship_id;
1056 p7_a11 := ddx_email_data.ih_interaction_id;
1057 p7_a12 := ddx_email_data.ih_media_item_id;
1058 p7_a13 := ddx_email_data.message_flag;
1059 p7_a14 := ddx_email_data.msg_status;
1060 p7_a15 := ddx_email_data.mail_item_status;
1061 p7_a16 := ddx_email_data.mail_proc_status;
1062 p7_a17 := ddx_email_data.queue_status;
1063 p7_a18 := ddx_email_data.category_map_id;
1064 p7_a19 := ddx_email_data.rule_id;
1065 p7_a20 := ddx_email_data.subject;
1066 p7_a21 := ddx_email_data.from_address;
1067 p7_a22 := ddx_email_data.from_resource_id;
1068 p7_a23 := ddx_email_data.created_by;
1069 p7_a24 := ddx_email_data.creation_date;
1070 p7_a25 := ddx_email_data.last_updated_by;
1071 p7_a26 := ddx_email_data.last_update_date;
1072 p7_a27 := ddx_email_data.last_update_login;
1073 p7_a28 := ddx_email_data.attribute1;
1074 p7_a29 := ddx_email_data.attribute2;
1075 p7_a30 := ddx_email_data.attribute3;
1076 p7_a31 := ddx_email_data.attribute4;
1077 p7_a32 := ddx_email_data.attribute5;
1078 p7_a33 := ddx_email_data.attribute6;
1079 p7_a34 := ddx_email_data.attribute7;
1080 p7_a35 := ddx_email_data.attribute8;
1081 p7_a36 := ddx_email_data.attribute9;
1082 p7_a37 := ddx_email_data.attribute10;
1083 p7_a38 := ddx_email_data.attribute11;
1084 p7_a39 := ddx_email_data.attribute12;
1085 p7_a40 := ddx_email_data.attribute13;
1086 p7_a41 := ddx_email_data.attribute14;
1087 p7_a42 := ddx_email_data.attribute15;
1088 p7_a43 := ddx_email_data.security_group_id;
1089
1090 iem_mailitem_pub_w.rosetta_table_copy_out_p10(ddx_tag_key_value, p8_a0
1091 , p8_a1
1092 , p8_a2
1093 );
1094
1095
1096
1097
1098 end;
1099
1100 procedure getmailitem(p_api_version_number NUMBER
1101 , p_init_msg_list VARCHAR2
1102 , p_commit VARCHAR2
1103 , p_resource_id NUMBER
1104 , p_acct_rt_class_id NUMBER
1105 , p5_a0 out nocopy NUMBER
1106 , p5_a1 out nocopy NUMBER
1107 , p5_a2 out nocopy NUMBER
1108 , p5_a3 out nocopy NUMBER
1109 , p5_a4 out nocopy NUMBER
1110 , p5_a5 out nocopy VARCHAR2
1111 , p5_a6 out nocopy DATE
1112 , p5_a7 out nocopy NUMBER
1113 , p5_a8 out nocopy NUMBER
1114 , p5_a9 out nocopy NUMBER
1115 , p5_a10 out nocopy NUMBER
1116 , p5_a11 out nocopy NUMBER
1117 , p5_a12 out nocopy NUMBER
1118 , p5_a13 out nocopy VARCHAR2
1119 , p5_a14 out nocopy VARCHAR2
1120 , p5_a15 out nocopy VARCHAR2
1121 , p5_a16 out nocopy VARCHAR2
1122 , p5_a17 out nocopy VARCHAR2
1123 , p5_a18 out nocopy NUMBER
1124 , p5_a19 out nocopy NUMBER
1125 , p5_a20 out nocopy VARCHAR2
1126 , p5_a21 out nocopy VARCHAR2
1127 , p5_a22 out nocopy NUMBER
1128 , p5_a23 out nocopy NUMBER
1129 , p5_a24 out nocopy DATE
1130 , p5_a25 out nocopy NUMBER
1131 , p5_a26 out nocopy DATE
1132 , p5_a27 out nocopy NUMBER
1133 , p5_a28 out nocopy VARCHAR2
1134 , p5_a29 out nocopy VARCHAR2
1135 , p5_a30 out nocopy VARCHAR2
1136 , p5_a31 out nocopy VARCHAR2
1137 , p5_a32 out nocopy VARCHAR2
1138 , p5_a33 out nocopy VARCHAR2
1139 , p5_a34 out nocopy VARCHAR2
1140 , p5_a35 out nocopy VARCHAR2
1141 , p5_a36 out nocopy VARCHAR2
1142 , p5_a37 out nocopy VARCHAR2
1143 , p5_a38 out nocopy VARCHAR2
1144 , p5_a39 out nocopy VARCHAR2
1145 , p5_a40 out nocopy VARCHAR2
1146 , p5_a41 out nocopy VARCHAR2
1147 , p5_a42 out nocopy VARCHAR2
1148 , p5_a43 out nocopy NUMBER
1149 , x_return_status out nocopy VARCHAR2
1150 , x_msg_count out nocopy NUMBER
1151 , x_msg_data out nocopy VARCHAR2
1152 )
1153
1154 as
1155 ddx_email_data iem_rt_proc_emails%rowtype;
1156 ddindx binary_integer; indx binary_integer;
1157 begin
1158
1159 -- copy data to the local IN or IN-OUT args, if any
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169 -- here's the delegated call to the old PL/SQL routine
1170 iem_mailitem_pub.getmailitem(p_api_version_number,
1171 p_init_msg_list,
1172 p_commit,
1173 p_resource_id,
1174 p_acct_rt_class_id,
1175 ddx_email_data,
1176 x_return_status,
1177 x_msg_count,
1178 x_msg_data);
1179
1180 -- copy data back from the local variables to OUT or IN-OUT args, if any
1181
1182
1183
1184
1185
1186 p5_a0 := ddx_email_data.message_id;
1187 p5_a1 := ddx_email_data.email_account_id;
1188 p5_a2 := ddx_email_data.priority;
1189 p5_a3 := ddx_email_data.resource_id;
1190 p5_a4 := ddx_email_data.group_id;
1191 p5_a5 := ddx_email_data.sent_date;
1192 p5_a6 := ddx_email_data.received_date;
1193 p5_a7 := ddx_email_data.rt_classification_id;
1194 p5_a8 := ddx_email_data.customer_id;
1195 p5_a9 := ddx_email_data.contact_id;
1196 p5_a10 := ddx_email_data.relationship_id;
1197 p5_a11 := ddx_email_data.ih_interaction_id;
1198 p5_a12 := ddx_email_data.ih_media_item_id;
1199 p5_a13 := ddx_email_data.message_flag;
1200 p5_a14 := ddx_email_data.msg_status;
1201 p5_a15 := ddx_email_data.mail_item_status;
1202 p5_a16 := ddx_email_data.mail_proc_status;
1203 p5_a17 := ddx_email_data.queue_status;
1204 p5_a18 := ddx_email_data.category_map_id;
1205 p5_a19 := ddx_email_data.rule_id;
1206 p5_a20 := ddx_email_data.subject;
1207 p5_a21 := ddx_email_data.from_address;
1208 p5_a22 := ddx_email_data.from_resource_id;
1209 p5_a23 := ddx_email_data.created_by;
1210 p5_a24 := ddx_email_data.creation_date;
1211 p5_a25 := ddx_email_data.last_updated_by;
1212 p5_a26 := ddx_email_data.last_update_date;
1213 p5_a27 := ddx_email_data.last_update_login;
1214 p5_a28 := ddx_email_data.attribute1;
1215 p5_a29 := ddx_email_data.attribute2;
1216 p5_a30 := ddx_email_data.attribute3;
1217 p5_a31 := ddx_email_data.attribute4;
1218 p5_a32 := ddx_email_data.attribute5;
1219 p5_a33 := ddx_email_data.attribute6;
1220 p5_a34 := ddx_email_data.attribute7;
1221 p5_a35 := ddx_email_data.attribute8;
1222 p5_a36 := ddx_email_data.attribute9;
1223 p5_a37 := ddx_email_data.attribute10;
1224 p5_a38 := ddx_email_data.attribute11;
1225 p5_a39 := ddx_email_data.attribute12;
1226 p5_a40 := ddx_email_data.attribute13;
1227 p5_a41 := ddx_email_data.attribute14;
1228 p5_a42 := ddx_email_data.attribute15;
1229 p5_a43 := ddx_email_data.security_group_id;
1230
1231
1232
1233 end;
1234
1235 procedure getgroupdetails(p_api_version_number NUMBER
1236 , p_init_msg_list VARCHAR2
1237 , p_commit VARCHAR2
1238 , p_resource_id NUMBER
1239 , x_tbl out nocopy JTF_NUMBER_TABLE
1240 , x_return_status out nocopy VARCHAR2
1241 , x_msg_count out nocopy NUMBER
1242 , x_msg_data out nocopy VARCHAR2
1243 )
1244
1245 as
1246 ddx_tbl iem_mailitem_pub.t_number_table;
1247 ddindx binary_integer; indx binary_integer;
1248 begin
1249
1250 -- copy data to the local IN or IN-OUT args, if any
1251
1252
1253
1254
1255
1256
1257
1258
1259 -- here's the delegated call to the old PL/SQL routine
1260 iem_mailitem_pub.getgroupdetails(p_api_version_number,
1261 p_init_msg_list,
1262 p_commit,
1263 p_resource_id,
1264 ddx_tbl,
1265 x_return_status,
1266 x_msg_count,
1267 x_msg_data);
1268
1269 -- copy data back from the local variables to OUT or IN-OUT args, if any
1270
1271
1272
1273
1274 iem_mailitem_pub_w.rosetta_table_copy_out_p4(ddx_tbl, x_tbl);
1275
1276
1277
1278 end;
1279
1280 procedure updatemailitem(p_api_version_number NUMBER
1281 , p_init_msg_list VARCHAR2
1282 , p_commit VARCHAR2
1283 , p3_a0 NUMBER
1284 , p3_a1 NUMBER
1285 , p3_a2 NUMBER
1286 , p3_a3 NUMBER
1287 , p3_a4 NUMBER
1288 , p3_a5 VARCHAR2
1289 , p3_a6 DATE
1290 , p3_a7 NUMBER
1291 , p3_a8 NUMBER
1292 , p3_a9 NUMBER
1293 , p3_a10 NUMBER
1294 , p3_a11 NUMBER
1295 , p3_a12 NUMBER
1296 , p3_a13 VARCHAR2
1297 , p3_a14 VARCHAR2
1298 , p3_a15 VARCHAR2
1299 , p3_a16 VARCHAR2
1300 , p3_a17 VARCHAR2
1301 , p3_a18 NUMBER
1302 , p3_a19 NUMBER
1303 , p3_a20 VARCHAR2
1304 , p3_a21 VARCHAR2
1305 , p3_a22 NUMBER
1306 , p3_a23 NUMBER
1307 , p3_a24 DATE
1308 , p3_a25 NUMBER
1309 , p3_a26 DATE
1310 , p3_a27 NUMBER
1311 , p3_a28 VARCHAR2
1312 , p3_a29 VARCHAR2
1313 , p3_a30 VARCHAR2
1314 , p3_a31 VARCHAR2
1315 , p3_a32 VARCHAR2
1316 , p3_a33 VARCHAR2
1317 , p3_a34 VARCHAR2
1318 , p3_a35 VARCHAR2
1319 , p3_a36 VARCHAR2
1320 , p3_a37 VARCHAR2
1321 , p3_a38 VARCHAR2
1322 , p3_a39 VARCHAR2
1323 , p3_a40 VARCHAR2
1324 , p3_a41 VARCHAR2
1325 , p3_a42 VARCHAR2
1326 , p3_a43 NUMBER
1327 , x_return_status out nocopy VARCHAR2
1328 , x_msg_count out nocopy NUMBER
1329 , x_msg_data out nocopy VARCHAR2
1330 )
1331
1332 as
1333 ddp_email_data iem_rt_proc_emails%rowtype;
1334 ddindx binary_integer; indx binary_integer;
1335 begin
1336
1337 -- copy data to the local IN or IN-OUT args, if any
1338
1339
1340
1341 ddp_email_data.message_id := p3_a0;
1342 ddp_email_data.email_account_id := p3_a1;
1343 ddp_email_data.priority := p3_a2;
1344 ddp_email_data.resource_id := p3_a3;
1345 ddp_email_data.group_id := p3_a4;
1346 ddp_email_data.sent_date := p3_a5;
1347 ddp_email_data.received_date := rosetta_g_miss_date_in_map(p3_a6);
1348 ddp_email_data.rt_classification_id := p3_a7;
1349 ddp_email_data.customer_id := p3_a8;
1350 ddp_email_data.contact_id := p3_a9;
1351 ddp_email_data.relationship_id := p3_a10;
1352 ddp_email_data.ih_interaction_id := p3_a11;
1353 ddp_email_data.ih_media_item_id := p3_a12;
1354 ddp_email_data.message_flag := p3_a13;
1355 ddp_email_data.msg_status := p3_a14;
1356 ddp_email_data.mail_item_status := p3_a15;
1357 ddp_email_data.mail_proc_status := p3_a16;
1358 ddp_email_data.queue_status := p3_a17;
1359 ddp_email_data.category_map_id := p3_a18;
1360 ddp_email_data.rule_id := p3_a19;
1361 ddp_email_data.subject := p3_a20;
1362 ddp_email_data.from_address := p3_a21;
1363 ddp_email_data.from_resource_id := p3_a22;
1364 ddp_email_data.created_by := p3_a23;
1365 ddp_email_data.creation_date := rosetta_g_miss_date_in_map(p3_a24);
1366 ddp_email_data.last_updated_by := p3_a25;
1367 ddp_email_data.last_update_date := rosetta_g_miss_date_in_map(p3_a26);
1368 ddp_email_data.last_update_login := p3_a27;
1369 ddp_email_data.attribute1 := p3_a28;
1370 ddp_email_data.attribute2 := p3_a29;
1371 ddp_email_data.attribute3 := p3_a30;
1372 ddp_email_data.attribute4 := p3_a31;
1373 ddp_email_data.attribute5 := p3_a32;
1374 ddp_email_data.attribute6 := p3_a33;
1375 ddp_email_data.attribute7 := p3_a34;
1376 ddp_email_data.attribute8 := p3_a35;
1377 ddp_email_data.attribute9 := p3_a36;
1378 ddp_email_data.attribute10 := p3_a37;
1379 ddp_email_data.attribute11 := p3_a38;
1380 ddp_email_data.attribute12 := p3_a39;
1381 ddp_email_data.attribute13 := p3_a40;
1382 ddp_email_data.attribute14 := p3_a41;
1383 ddp_email_data.attribute15 := p3_a42;
1384 ddp_email_data.security_group_id := p3_a43;
1385
1386
1387
1388
1389 -- here's the delegated call to the old PL/SQL routine
1390 iem_mailitem_pub.updatemailitem(p_api_version_number,
1391 p_init_msg_list,
1392 p_commit,
1393 ddp_email_data,
1394 x_return_status,
1395 x_msg_count,
1396 x_msg_data);
1397
1398 -- copy data back from the local variables to OUT or IN-OUT args, if any
1399
1400
1401
1402
1403
1404
1405 end;
1406
1407 procedure getmailiteminfo(p_api_version_number NUMBER
1408 , p_init_msg_list VARCHAR2
1409 , p_commit VARCHAR2
1410 , p_message_id NUMBER
1411 , p_account_id NUMBER
1412 , p_agent_id NUMBER
1413 , p6_a0 out nocopy NUMBER
1414 , p6_a1 out nocopy NUMBER
1415 , p6_a2 out nocopy NUMBER
1416 , p6_a3 out nocopy NUMBER
1417 , p6_a4 out nocopy NUMBER
1418 , p6_a5 out nocopy VARCHAR2
1419 , p6_a6 out nocopy DATE
1420 , p6_a7 out nocopy NUMBER
1421 , p6_a8 out nocopy NUMBER
1422 , p6_a9 out nocopy NUMBER
1423 , p6_a10 out nocopy NUMBER
1424 , p6_a11 out nocopy NUMBER
1425 , p6_a12 out nocopy NUMBER
1426 , p6_a13 out nocopy VARCHAR2
1427 , p6_a14 out nocopy VARCHAR2
1428 , p6_a15 out nocopy VARCHAR2
1429 , p6_a16 out nocopy VARCHAR2
1430 , p6_a17 out nocopy VARCHAR2
1431 , p6_a18 out nocopy NUMBER
1432 , p6_a19 out nocopy NUMBER
1433 , p6_a20 out nocopy VARCHAR2
1434 , p6_a21 out nocopy VARCHAR2
1435 , p6_a22 out nocopy NUMBER
1436 , p6_a23 out nocopy NUMBER
1437 , p6_a24 out nocopy DATE
1438 , p6_a25 out nocopy NUMBER
1439 , p6_a26 out nocopy DATE
1440 , p6_a27 out nocopy NUMBER
1441 , p6_a28 out nocopy VARCHAR2
1442 , p6_a29 out nocopy VARCHAR2
1443 , p6_a30 out nocopy VARCHAR2
1444 , p6_a31 out nocopy VARCHAR2
1445 , p6_a32 out nocopy VARCHAR2
1446 , p6_a33 out nocopy VARCHAR2
1447 , p6_a34 out nocopy VARCHAR2
1448 , p6_a35 out nocopy VARCHAR2
1449 , p6_a36 out nocopy VARCHAR2
1450 , p6_a37 out nocopy VARCHAR2
1451 , p6_a38 out nocopy VARCHAR2
1452 , p6_a39 out nocopy VARCHAR2
1453 , p6_a40 out nocopy VARCHAR2
1454 , p6_a41 out nocopy VARCHAR2
1455 , p6_a42 out nocopy VARCHAR2
1456 , p6_a43 out nocopy NUMBER
1457 , x_return_status out nocopy VARCHAR2
1458 , x_msg_count out nocopy NUMBER
1459 , x_msg_data out nocopy VARCHAR2
1460 )
1461
1462 as
1463 ddx_email_data iem_rt_proc_emails%rowtype;
1464 ddindx binary_integer; indx binary_integer;
1465 begin
1466
1467 -- copy data to the local IN or IN-OUT args, if any
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478 -- here's the delegated call to the old PL/SQL routine
1479 iem_mailitem_pub.getmailiteminfo(p_api_version_number,
1480 p_init_msg_list,
1481 p_commit,
1482 p_message_id,
1483 p_account_id,
1484 p_agent_id,
1485 ddx_email_data,
1486 x_return_status,
1487 x_msg_count,
1488 x_msg_data);
1489
1490 -- copy data back from the local variables to OUT or IN-OUT args, if any
1491
1492
1493
1494
1495
1496
1497 p6_a0 := ddx_email_data.message_id;
1498 p6_a1 := ddx_email_data.email_account_id;
1499 p6_a2 := ddx_email_data.priority;
1500 p6_a3 := ddx_email_data.resource_id;
1501 p6_a4 := ddx_email_data.group_id;
1502 p6_a5 := ddx_email_data.sent_date;
1503 p6_a6 := ddx_email_data.received_date;
1504 p6_a7 := ddx_email_data.rt_classification_id;
1505 p6_a8 := ddx_email_data.customer_id;
1506 p6_a9 := ddx_email_data.contact_id;
1507 p6_a10 := ddx_email_data.relationship_id;
1508 p6_a11 := ddx_email_data.ih_interaction_id;
1509 p6_a12 := ddx_email_data.ih_media_item_id;
1510 p6_a13 := ddx_email_data.message_flag;
1511 p6_a14 := ddx_email_data.msg_status;
1512 p6_a15 := ddx_email_data.mail_item_status;
1513 p6_a16 := ddx_email_data.mail_proc_status;
1514 p6_a17 := ddx_email_data.queue_status;
1515 p6_a18 := ddx_email_data.category_map_id;
1516 p6_a19 := ddx_email_data.rule_id;
1517 p6_a20 := ddx_email_data.subject;
1518 p6_a21 := ddx_email_data.from_address;
1519 p6_a22 := ddx_email_data.from_resource_id;
1520 p6_a23 := ddx_email_data.created_by;
1521 p6_a24 := ddx_email_data.creation_date;
1522 p6_a25 := ddx_email_data.last_updated_by;
1523 p6_a26 := ddx_email_data.last_update_date;
1524 p6_a27 := ddx_email_data.last_update_login;
1525 p6_a28 := ddx_email_data.attribute1;
1526 p6_a29 := ddx_email_data.attribute2;
1527 p6_a30 := ddx_email_data.attribute3;
1528 p6_a31 := ddx_email_data.attribute4;
1529 p6_a32 := ddx_email_data.attribute5;
1530 p6_a33 := ddx_email_data.attribute6;
1531 p6_a34 := ddx_email_data.attribute7;
1532 p6_a35 := ddx_email_data.attribute8;
1533 p6_a36 := ddx_email_data.attribute9;
1534 p6_a37 := ddx_email_data.attribute10;
1535 p6_a38 := ddx_email_data.attribute11;
1536 p6_a39 := ddx_email_data.attribute12;
1537 p6_a40 := ddx_email_data.attribute13;
1538 p6_a41 := ddx_email_data.attribute14;
1539 p6_a42 := ddx_email_data.attribute15;
1540 p6_a43 := ddx_email_data.security_group_id;
1541
1542
1543
1544 end;
1545
1546 procedure getemailheaders(p_api_version_number NUMBER
1547 , p_init_msg_list VARCHAR2
1548 , p_commit VARCHAR2
1549 , p_resource_id NUMBER
1550 , p_email_account_id NUMBER
1551 , p_display_size NUMBER
1552 , p_page_count NUMBER
1553 , p_sort_by VARCHAR2
1554 , p_sort_order NUMBER
1555 , x_total_message out nocopy NUMBER
1556 , p10_a0 out nocopy JTF_NUMBER_TABLE
1557 , p10_a1 out nocopy JTF_NUMBER_TABLE
1558 , p10_a2 out nocopy JTF_VARCHAR2_TABLE_100
1559 , p10_a3 out nocopy JTF_NUMBER_TABLE
1560 , p10_a4 out nocopy JTF_NUMBER_TABLE
1561 , p10_a5 out nocopy JTF_NUMBER_TABLE
1562 , p10_a6 out nocopy JTF_VARCHAR2_TABLE_100
1563 , p10_a7 out nocopy JTF_VARCHAR2_TABLE_200
1564 , p10_a8 out nocopy JTF_VARCHAR2_TABLE_2000
1565 , p10_a9 out nocopy JTF_VARCHAR2_TABLE_100
1566 , p10_a10 out nocopy JTF_VARCHAR2_TABLE_100
1567 , p10_a11 out nocopy JTF_VARCHAR2_TABLE_100
1568 , p10_a12 out nocopy JTF_VARCHAR2_TABLE_100
1569 , p10_a13 out nocopy JTF_NUMBER_TABLE
1570 , p10_a14 out nocopy JTF_VARCHAR2_TABLE_100
1571 , p10_a15 out nocopy JTF_VARCHAR2_TABLE_300
1572 , x_return_status out nocopy VARCHAR2
1573 , x_msg_count out nocopy NUMBER
1574 , x_msg_data out nocopy VARCHAR2
1575 )
1576
1577 as
1578 ddx_acq_email_data iem_mailitem_pub.acq_email_info_tbl;
1579 ddindx binary_integer; indx binary_integer;
1580 begin
1581
1582 -- copy data to the local IN or IN-OUT args, if any
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597 -- here's the delegated call to the old PL/SQL routine
1598 iem_mailitem_pub.getemailheaders(p_api_version_number,
1599 p_init_msg_list,
1600 p_commit,
1601 p_resource_id,
1602 p_email_account_id,
1603 p_display_size,
1604 p_page_count,
1605 p_sort_by,
1606 p_sort_order,
1607 x_total_message,
1608 ddx_acq_email_data,
1609 x_return_status,
1610 x_msg_count,
1611 x_msg_data);
1612
1613 -- copy data back from the local variables to OUT or IN-OUT args, if any
1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624 iem_mailitem_pub_w.rosetta_table_copy_out_p6(ddx_acq_email_data, p10_a0
1625 , p10_a1
1626 , p10_a2
1627 , p10_a3
1628 , p10_a4
1629 , p10_a5
1630 , p10_a6
1631 , p10_a7
1632 , p10_a8
1633 , p10_a9
1634 , p10_a10
1635 , p10_a11
1636 , p10_a12
1637 , p10_a13
1638 , p10_a14
1639 , p10_a15
1640 );
1641
1642
1643
1644 end;
1645
1646 procedure getunreademailheaders(p_api_version_number NUMBER
1647 , p_init_msg_list VARCHAR2
1648 , p_commit VARCHAR2
1649 , p_resource_id NUMBER
1650 , p_email_account_id NUMBER
1651 , p_display_size NUMBER
1652 , p_page_count NUMBER
1653 , p_sort_by VARCHAR2
1654 , p_sort_order NUMBER
1655 , x_total_message out nocopy NUMBER
1656 , p10_a0 out nocopy JTF_NUMBER_TABLE
1657 , p10_a1 out nocopy JTF_NUMBER_TABLE
1658 , p10_a2 out nocopy JTF_VARCHAR2_TABLE_100
1659 , p10_a3 out nocopy JTF_NUMBER_TABLE
1660 , p10_a4 out nocopy JTF_VARCHAR2_TABLE_200
1661 , p10_a5 out nocopy JTF_VARCHAR2_TABLE_2000
1662 , p10_a6 out nocopy JTF_VARCHAR2_TABLE_100
1663 , p10_a7 out nocopy JTF_NUMBER_TABLE
1664 , p10_a8 out nocopy JTF_VARCHAR2_TABLE_400
1665 , p10_a9 out nocopy JTF_NUMBER_TABLE
1666 , p10_a10 out nocopy JTF_NUMBER_TABLE
1667 , p10_a11 out nocopy JTF_VARCHAR2_TABLE_100
1668 , p10_a12 out nocopy JTF_VARCHAR2_TABLE_100
1669 , p10_a13 out nocopy JTF_VARCHAR2_TABLE_100
1670 , x_return_status out nocopy VARCHAR2
1671 , x_msg_count out nocopy NUMBER
1672 , x_msg_data out nocopy VARCHAR2
1673 )
1674
1675 as
1676 ddx_queue_email_data iem_mailitem_pub.queue_email_info_tbl;
1677 ddindx binary_integer; indx binary_integer;
1678 begin
1679
1680 -- copy data to the local IN or IN-OUT args, if any
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695 -- here's the delegated call to the old PL/SQL routine
1696 iem_mailitem_pub.getunreademailheaders(p_api_version_number,
1697 p_init_msg_list,
1698 p_commit,
1699 p_resource_id,
1700 p_email_account_id,
1701 p_display_size,
1702 p_page_count,
1703 p_sort_by,
1704 p_sort_order,
1705 x_total_message,
1706 ddx_queue_email_data,
1707 x_return_status,
1708 x_msg_count,
1709 x_msg_data);
1710
1711 -- copy data back from the local variables to OUT or IN-OUT args, if any
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722 iem_mailitem_pub_w.rosetta_table_copy_out_p8(ddx_queue_email_data, p10_a0
1723 , p10_a1
1724 , p10_a2
1725 , p10_a3
1726 , p10_a4
1727 , p10_a5
1728 , p10_a6
1729 , p10_a7
1730 , p10_a8
1731 , p10_a9
1732 , p10_a10
1733 , p10_a11
1734 , p10_a12
1735 , p10_a13
1736 );
1737
1738
1739
1740 end;
1741
1742 procedure getqueueitemdata(p_api_version_number NUMBER
1743 , p_init_msg_list VARCHAR2
1744 , p_commit VARCHAR2
1745 , p_message_id NUMBER
1746 , p_from_agent_id NUMBER
1747 , p_to_agent_id NUMBER
1748 , p_mail_item_status VARCHAR2
1749 , p7_a0 out nocopy NUMBER
1750 , p7_a1 out nocopy NUMBER
1751 , p7_a2 out nocopy NUMBER
1752 , p7_a3 out nocopy NUMBER
1753 , p7_a4 out nocopy NUMBER
1754 , p7_a5 out nocopy VARCHAR2
1755 , p7_a6 out nocopy DATE
1756 , p7_a7 out nocopy NUMBER
1757 , p7_a8 out nocopy NUMBER
1758 , p7_a9 out nocopy NUMBER
1759 , p7_a10 out nocopy NUMBER
1760 , p7_a11 out nocopy NUMBER
1761 , p7_a12 out nocopy NUMBER
1762 , p7_a13 out nocopy VARCHAR2
1763 , p7_a14 out nocopy VARCHAR2
1764 , p7_a15 out nocopy VARCHAR2
1765 , p7_a16 out nocopy VARCHAR2
1766 , p7_a17 out nocopy VARCHAR2
1767 , p7_a18 out nocopy NUMBER
1768 , p7_a19 out nocopy NUMBER
1769 , p7_a20 out nocopy VARCHAR2
1770 , p7_a21 out nocopy VARCHAR2
1771 , p7_a22 out nocopy NUMBER
1772 , p7_a23 out nocopy NUMBER
1773 , p7_a24 out nocopy DATE
1774 , p7_a25 out nocopy NUMBER
1775 , p7_a26 out nocopy DATE
1776 , p7_a27 out nocopy NUMBER
1777 , p7_a28 out nocopy VARCHAR2
1778 , p7_a29 out nocopy VARCHAR2
1779 , p7_a30 out nocopy VARCHAR2
1780 , p7_a31 out nocopy VARCHAR2
1781 , p7_a32 out nocopy VARCHAR2
1782 , p7_a33 out nocopy VARCHAR2
1783 , p7_a34 out nocopy VARCHAR2
1784 , p7_a35 out nocopy VARCHAR2
1785 , p7_a36 out nocopy VARCHAR2
1786 , p7_a37 out nocopy VARCHAR2
1787 , p7_a38 out nocopy VARCHAR2
1788 , p7_a39 out nocopy VARCHAR2
1789 , p7_a40 out nocopy VARCHAR2
1790 , p7_a41 out nocopy VARCHAR2
1791 , p7_a42 out nocopy VARCHAR2
1792 , p7_a43 out nocopy NUMBER
1793 , p8_a0 out nocopy JTF_VARCHAR2_TABLE_100
1794 , p8_a1 out nocopy JTF_VARCHAR2_TABLE_300
1795 , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
1796 , x_encrypted_id out nocopy VARCHAR2
1797 , x_return_status out nocopy VARCHAR2
1798 , x_msg_count out nocopy NUMBER
1799 , x_msg_data out nocopy VARCHAR2
1800 )
1801
1802 as
1803 ddx_email_data iem_rt_proc_emails%rowtype;
1804 ddx_tag_key_value iem_mailitem_pub.keyvals_tbl_type;
1805 ddindx binary_integer; indx binary_integer;
1806 begin
1807
1808 -- copy data to the local IN or IN-OUT args, if any
1809
1810
1811
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822 -- here's the delegated call to the old PL/SQL routine
1823 iem_mailitem_pub.getqueueitemdata(p_api_version_number,
1824 p_init_msg_list,
1825 p_commit,
1826 p_message_id,
1827 p_from_agent_id,
1828 p_to_agent_id,
1829 p_mail_item_status,
1830 ddx_email_data,
1831 ddx_tag_key_value,
1832 x_encrypted_id,
1833 x_return_status,
1834 x_msg_count,
1835 x_msg_data);
1836
1837 -- copy data back from the local variables to OUT or IN-OUT args, if any
1838
1839
1840
1841
1842
1843
1844
1845 p7_a0 := ddx_email_data.message_id;
1846 p7_a1 := ddx_email_data.email_account_id;
1847 p7_a2 := ddx_email_data.priority;
1848 p7_a3 := ddx_email_data.resource_id;
1849 p7_a4 := ddx_email_data.group_id;
1850 p7_a5 := ddx_email_data.sent_date;
1851 p7_a6 := ddx_email_data.received_date;
1852 p7_a7 := ddx_email_data.rt_classification_id;
1853 p7_a8 := ddx_email_data.customer_id;
1854 p7_a9 := ddx_email_data.contact_id;
1855 p7_a10 := ddx_email_data.relationship_id;
1856 p7_a11 := ddx_email_data.ih_interaction_id;
1857 p7_a12 := ddx_email_data.ih_media_item_id;
1858 p7_a13 := ddx_email_data.message_flag;
1859 p7_a14 := ddx_email_data.msg_status;
1860 p7_a15 := ddx_email_data.mail_item_status;
1861 p7_a16 := ddx_email_data.mail_proc_status;
1862 p7_a17 := ddx_email_data.queue_status;
1863 p7_a18 := ddx_email_data.category_map_id;
1864 p7_a19 := ddx_email_data.rule_id;
1865 p7_a20 := ddx_email_data.subject;
1866 p7_a21 := ddx_email_data.from_address;
1867 p7_a22 := ddx_email_data.from_resource_id;
1868 p7_a23 := ddx_email_data.created_by;
1869 p7_a24 := ddx_email_data.creation_date;
1870 p7_a25 := ddx_email_data.last_updated_by;
1871 p7_a26 := ddx_email_data.last_update_date;
1872 p7_a27 := ddx_email_data.last_update_login;
1873 p7_a28 := ddx_email_data.attribute1;
1874 p7_a29 := ddx_email_data.attribute2;
1875 p7_a30 := ddx_email_data.attribute3;
1876 p7_a31 := ddx_email_data.attribute4;
1877 p7_a32 := ddx_email_data.attribute5;
1878 p7_a33 := ddx_email_data.attribute6;
1879 p7_a34 := ddx_email_data.attribute7;
1880 p7_a35 := ddx_email_data.attribute8;
1881 p7_a36 := ddx_email_data.attribute9;
1882 p7_a37 := ddx_email_data.attribute10;
1883 p7_a38 := ddx_email_data.attribute11;
1884 p7_a39 := ddx_email_data.attribute12;
1885 p7_a40 := ddx_email_data.attribute13;
1886 p7_a41 := ddx_email_data.attribute14;
1887 p7_a42 := ddx_email_data.attribute15;
1888 p7_a43 := ddx_email_data.security_group_id;
1889
1890 iem_mailitem_pub_w.rosetta_table_copy_out_p10(ddx_tag_key_value, p8_a0
1891 , p8_a1
1892 , p8_a2
1893 );
1894
1895
1896
1897
1898 end;
1899
1900 end iem_mailitem_pub_w;