[Home] [Help]
PACKAGE BODY: APPS.IBE_ATTACHMENT_GRP_W
Source
1 package body ibe_attachment_grp_w as
2 /* $Header: IBEGRATB.pls 115.2 2002/12/18 07:06:58 schak 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
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 function rosetta_g_miss_num_map(n number) return number as
14 a number := fnd_api.g_miss_num;
15 b number := 0-1962.0724;
16 begin
17 if n=a then return b; end if;
18 if n=b then return a; end if;
19 return n;
20 end;
21
22 procedure rosetta_table_copy_in_p1(t out nocopy ibe_attachment_grp.attachment_tbl_type, a0 JTF_NUMBER_TABLE
23 , a1 JTF_NUMBER_TABLE
24 , a2 JTF_VARCHAR2_TABLE_300
25 , a3 JTF_NUMBER_TABLE
26 , a4 JTF_VARCHAR2_TABLE_100
27 , a5 JTF_VARCHAR2_TABLE_100
28 , a6 JTF_VARCHAR2_TABLE_100
29 , a7 JTF_VARCHAR2_TABLE_100
30 , a8 JTF_NUMBER_TABLE
31 , a9 JTF_VARCHAR2_TABLE_100
32 , a10 JTF_VARCHAR2_TABLE_300
33 , a11 JTF_NUMBER_TABLE
34 , a12 JTF_NUMBER_TABLE
35 , a13 JTF_VARCHAR2_TABLE_2000
36 , a14 JTF_VARCHAR2_TABLE_2000
37 , a15 JTF_VARCHAR2_TABLE_2000
38 , a16 JTF_VARCHAR2_TABLE_100
39 , a17 JTF_VARCHAR2_TABLE_100
40 , a18 JTF_VARCHAR2_TABLE_100
41 , a19 JTF_NUMBER_TABLE
42 , a20 JTF_VARCHAR2_TABLE_2000
43 , a21 JTF_VARCHAR2_TABLE_300
44 , a22 JTF_VARCHAR2_TABLE_1100
45 , a23 JTF_NUMBER_TABLE
46 , a24 JTF_VARCHAR2_TABLE_300
47 , a25 JTF_VARCHAR2_TABLE_100
48 , a26 JTF_VARCHAR2_TABLE_200
49 , a27 JTF_VARCHAR2_TABLE_200
50 , a28 JTF_VARCHAR2_TABLE_200
51 , a29 JTF_VARCHAR2_TABLE_200
52 , a30 JTF_VARCHAR2_TABLE_200
53 , a31 JTF_VARCHAR2_TABLE_200
54 , a32 JTF_VARCHAR2_TABLE_200
55 , a33 JTF_VARCHAR2_TABLE_200
56 , a34 JTF_VARCHAR2_TABLE_200
57 , a35 JTF_VARCHAR2_TABLE_200
58 , a36 JTF_VARCHAR2_TABLE_200
59 , a37 JTF_VARCHAR2_TABLE_200
60 , a38 JTF_VARCHAR2_TABLE_200
61 , a39 JTF_VARCHAR2_TABLE_200
62 , a40 JTF_VARCHAR2_TABLE_200
63 , a41 JTF_VARCHAR2_TABLE_2000
64 , a42 JTF_VARCHAR2_TABLE_1000
65 , a43 JTF_VARCHAR2_TABLE_100
66 , a44 JTF_VARCHAR2_TABLE_100
67 ) as
68 ddindx binary_integer; indx binary_integer;
69 begin
70 if a0 is not null and a0.count > 0 then
71 if a0.count > 0 then
72 indx := a0.first;
73 ddindx := 1;
74 while true loop
75 t(ddindx).attachment_id := rosetta_g_miss_num_map(a0(indx));
76 t(ddindx).deliverable_id := rosetta_g_miss_num_map(a1(indx));
77 t(ddindx).file_name := a2(indx);
78 t(ddindx).object_version_number := rosetta_g_miss_num_map(a3(indx));
79 t(ddindx).x_action_status := a4(indx);
80 t(ddindx).attachment_used_by := a5(indx);
81 t(ddindx).enabled_flag := a6(indx);
82 t(ddindx).can_fulfill_electronic_flag := a7(indx);
83 t(ddindx).file_id := rosetta_g_miss_num_map(a8(indx));
84 t(ddindx).file_extension := a9(indx);
85 t(ddindx).keywords := a10(indx);
86 t(ddindx).display_width := rosetta_g_miss_num_map(a11(indx));
87 t(ddindx).display_height := rosetta_g_miss_num_map(a12(indx));
88 t(ddindx).display_location := a13(indx);
89 t(ddindx).link_to := a14(indx);
90 t(ddindx).link_url := a15(indx);
91 t(ddindx).send_for_preview_flag := a16(indx);
92 t(ddindx).attachment_type := a17(indx);
93 t(ddindx).language_code := a18(indx);
94 t(ddindx).application_id := rosetta_g_miss_num_map(a19(indx));
95 t(ddindx).description := a20(indx);
96 t(ddindx).default_style_sheet := a21(indx);
97 t(ddindx).display_url := a22(indx);
98 t(ddindx).display_rule_id := rosetta_g_miss_num_map(a23(indx));
99 t(ddindx).display_program := a24(indx);
100 t(ddindx).attribute_category := a25(indx);
101 t(ddindx).attribute1 := a26(indx);
102 t(ddindx).attribute2 := a27(indx);
103 t(ddindx).attribute3 := a28(indx);
104 t(ddindx).attribute4 := a29(indx);
105 t(ddindx).attribute5 := a30(indx);
106 t(ddindx).attribute6 := a31(indx);
107 t(ddindx).attribute7 := a32(indx);
108 t(ddindx).attribute8 := a33(indx);
109 t(ddindx).attribute9 := a34(indx);
110 t(ddindx).attribute10 := a35(indx);
111 t(ddindx).attribute11 := a36(indx);
112 t(ddindx).attribute12 := a37(indx);
113 t(ddindx).attribute13 := a38(indx);
114 t(ddindx).attribute14 := a39(indx);
115 t(ddindx).attribute15 := a40(indx);
116 t(ddindx).display_text := a41(indx);
117 t(ddindx).alternate_text := a42(indx);
118 t(ddindx).attachment_sub_type := a43(indx);
119 t(ddindx).secured_flag := a44(indx);
120 ddindx := ddindx+1;
121 if a0.last =indx
122 then exit;
123 end if;
124 indx := a0.next(indx);
125 end loop;
126 end if;
127 end if;
128 end rosetta_table_copy_in_p1;
129 procedure rosetta_table_copy_out_p1(t ibe_attachment_grp.attachment_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
130 , a1 out nocopy JTF_NUMBER_TABLE
131 , a2 out nocopy JTF_VARCHAR2_TABLE_300
132 , a3 out nocopy JTF_NUMBER_TABLE
133 , a4 out nocopy JTF_VARCHAR2_TABLE_100
134 , a5 out nocopy JTF_VARCHAR2_TABLE_100
135 , a6 out nocopy JTF_VARCHAR2_TABLE_100
136 , a7 out nocopy JTF_VARCHAR2_TABLE_100
137 , a8 out nocopy JTF_NUMBER_TABLE
138 , a9 out nocopy JTF_VARCHAR2_TABLE_100
139 , a10 out nocopy JTF_VARCHAR2_TABLE_300
140 , a11 out nocopy JTF_NUMBER_TABLE
141 , a12 out nocopy JTF_NUMBER_TABLE
142 , a13 out nocopy JTF_VARCHAR2_TABLE_2000
143 , a14 out nocopy JTF_VARCHAR2_TABLE_2000
144 , a15 out nocopy JTF_VARCHAR2_TABLE_2000
145 , a16 out nocopy JTF_VARCHAR2_TABLE_100
146 , a17 out nocopy JTF_VARCHAR2_TABLE_100
147 , a18 out nocopy JTF_VARCHAR2_TABLE_100
148 , a19 out nocopy JTF_NUMBER_TABLE
149 , a20 out nocopy JTF_VARCHAR2_TABLE_2000
150 , a21 out nocopy JTF_VARCHAR2_TABLE_300
151 , a22 out nocopy JTF_VARCHAR2_TABLE_1100
152 , a23 out nocopy JTF_NUMBER_TABLE
153 , a24 out nocopy JTF_VARCHAR2_TABLE_300
154 , a25 out nocopy JTF_VARCHAR2_TABLE_100
155 , a26 out nocopy JTF_VARCHAR2_TABLE_200
156 , a27 out nocopy JTF_VARCHAR2_TABLE_200
157 , a28 out nocopy JTF_VARCHAR2_TABLE_200
158 , a29 out nocopy JTF_VARCHAR2_TABLE_200
159 , a30 out nocopy JTF_VARCHAR2_TABLE_200
160 , a31 out nocopy JTF_VARCHAR2_TABLE_200
161 , a32 out nocopy JTF_VARCHAR2_TABLE_200
162 , a33 out nocopy JTF_VARCHAR2_TABLE_200
163 , a34 out nocopy JTF_VARCHAR2_TABLE_200
164 , a35 out nocopy JTF_VARCHAR2_TABLE_200
165 , a36 out nocopy JTF_VARCHAR2_TABLE_200
166 , a37 out nocopy JTF_VARCHAR2_TABLE_200
167 , a38 out nocopy JTF_VARCHAR2_TABLE_200
168 , a39 out nocopy JTF_VARCHAR2_TABLE_200
169 , a40 out nocopy JTF_VARCHAR2_TABLE_200
170 , a41 out nocopy JTF_VARCHAR2_TABLE_2000
171 , a42 out nocopy JTF_VARCHAR2_TABLE_1000
172 , a43 out nocopy JTF_VARCHAR2_TABLE_100
173 , a44 out nocopy JTF_VARCHAR2_TABLE_100
174 ) as
175 ddindx binary_integer; indx binary_integer;
176 begin
177 if t is null or t.count = 0 then
178 a0 := JTF_NUMBER_TABLE();
179 a1 := JTF_NUMBER_TABLE();
180 a2 := JTF_VARCHAR2_TABLE_300();
181 a3 := JTF_NUMBER_TABLE();
182 a4 := JTF_VARCHAR2_TABLE_100();
183 a5 := JTF_VARCHAR2_TABLE_100();
184 a6 := JTF_VARCHAR2_TABLE_100();
185 a7 := JTF_VARCHAR2_TABLE_100();
186 a8 := JTF_NUMBER_TABLE();
187 a9 := JTF_VARCHAR2_TABLE_100();
188 a10 := JTF_VARCHAR2_TABLE_300();
189 a11 := JTF_NUMBER_TABLE();
190 a12 := JTF_NUMBER_TABLE();
191 a13 := JTF_VARCHAR2_TABLE_2000();
192 a14 := JTF_VARCHAR2_TABLE_2000();
193 a15 := JTF_VARCHAR2_TABLE_2000();
194 a16 := JTF_VARCHAR2_TABLE_100();
195 a17 := JTF_VARCHAR2_TABLE_100();
196 a18 := JTF_VARCHAR2_TABLE_100();
197 a19 := JTF_NUMBER_TABLE();
198 a20 := JTF_VARCHAR2_TABLE_2000();
199 a21 := JTF_VARCHAR2_TABLE_300();
200 a22 := JTF_VARCHAR2_TABLE_1100();
201 a23 := JTF_NUMBER_TABLE();
202 a24 := JTF_VARCHAR2_TABLE_300();
203 a25 := JTF_VARCHAR2_TABLE_100();
204 a26 := JTF_VARCHAR2_TABLE_200();
205 a27 := JTF_VARCHAR2_TABLE_200();
206 a28 := JTF_VARCHAR2_TABLE_200();
207 a29 := JTF_VARCHAR2_TABLE_200();
208 a30 := JTF_VARCHAR2_TABLE_200();
209 a31 := JTF_VARCHAR2_TABLE_200();
210 a32 := JTF_VARCHAR2_TABLE_200();
211 a33 := JTF_VARCHAR2_TABLE_200();
212 a34 := JTF_VARCHAR2_TABLE_200();
213 a35 := JTF_VARCHAR2_TABLE_200();
214 a36 := JTF_VARCHAR2_TABLE_200();
215 a37 := JTF_VARCHAR2_TABLE_200();
216 a38 := JTF_VARCHAR2_TABLE_200();
217 a39 := JTF_VARCHAR2_TABLE_200();
218 a40 := JTF_VARCHAR2_TABLE_200();
219 a41 := JTF_VARCHAR2_TABLE_2000();
220 a42 := JTF_VARCHAR2_TABLE_1000();
221 a43 := JTF_VARCHAR2_TABLE_100();
222 a44 := JTF_VARCHAR2_TABLE_100();
223 else
224 a0 := JTF_NUMBER_TABLE();
225 a1 := JTF_NUMBER_TABLE();
226 a2 := JTF_VARCHAR2_TABLE_300();
227 a3 := JTF_NUMBER_TABLE();
228 a4 := JTF_VARCHAR2_TABLE_100();
229 a5 := JTF_VARCHAR2_TABLE_100();
230 a6 := JTF_VARCHAR2_TABLE_100();
231 a7 := JTF_VARCHAR2_TABLE_100();
232 a8 := JTF_NUMBER_TABLE();
233 a9 := JTF_VARCHAR2_TABLE_100();
234 a10 := JTF_VARCHAR2_TABLE_300();
235 a11 := JTF_NUMBER_TABLE();
236 a12 := JTF_NUMBER_TABLE();
237 a13 := JTF_VARCHAR2_TABLE_2000();
238 a14 := JTF_VARCHAR2_TABLE_2000();
239 a15 := JTF_VARCHAR2_TABLE_2000();
240 a16 := JTF_VARCHAR2_TABLE_100();
241 a17 := JTF_VARCHAR2_TABLE_100();
242 a18 := JTF_VARCHAR2_TABLE_100();
243 a19 := JTF_NUMBER_TABLE();
244 a20 := JTF_VARCHAR2_TABLE_2000();
245 a21 := JTF_VARCHAR2_TABLE_300();
246 a22 := JTF_VARCHAR2_TABLE_1100();
247 a23 := JTF_NUMBER_TABLE();
248 a24 := JTF_VARCHAR2_TABLE_300();
249 a25 := JTF_VARCHAR2_TABLE_100();
250 a26 := JTF_VARCHAR2_TABLE_200();
251 a27 := JTF_VARCHAR2_TABLE_200();
252 a28 := JTF_VARCHAR2_TABLE_200();
253 a29 := JTF_VARCHAR2_TABLE_200();
254 a30 := JTF_VARCHAR2_TABLE_200();
255 a31 := JTF_VARCHAR2_TABLE_200();
256 a32 := JTF_VARCHAR2_TABLE_200();
257 a33 := JTF_VARCHAR2_TABLE_200();
258 a34 := JTF_VARCHAR2_TABLE_200();
259 a35 := JTF_VARCHAR2_TABLE_200();
260 a36 := JTF_VARCHAR2_TABLE_200();
261 a37 := JTF_VARCHAR2_TABLE_200();
262 a38 := JTF_VARCHAR2_TABLE_200();
263 a39 := JTF_VARCHAR2_TABLE_200();
264 a40 := JTF_VARCHAR2_TABLE_200();
265 a41 := JTF_VARCHAR2_TABLE_2000();
266 a42 := JTF_VARCHAR2_TABLE_1000();
267 a43 := JTF_VARCHAR2_TABLE_100();
268 a44 := JTF_VARCHAR2_TABLE_100();
269 if t.count > 0 then
270 a0.extend(t.count);
271 a1.extend(t.count);
272 a2.extend(t.count);
273 a3.extend(t.count);
274 a4.extend(t.count);
275 a5.extend(t.count);
276 a6.extend(t.count);
277 a7.extend(t.count);
278 a8.extend(t.count);
279 a9.extend(t.count);
280 a10.extend(t.count);
281 a11.extend(t.count);
282 a12.extend(t.count);
283 a13.extend(t.count);
284 a14.extend(t.count);
285 a15.extend(t.count);
286 a16.extend(t.count);
287 a17.extend(t.count);
288 a18.extend(t.count);
289 a19.extend(t.count);
290 a20.extend(t.count);
291 a21.extend(t.count);
292 a22.extend(t.count);
293 a23.extend(t.count);
294 a24.extend(t.count);
295 a25.extend(t.count);
296 a26.extend(t.count);
297 a27.extend(t.count);
298 a28.extend(t.count);
299 a29.extend(t.count);
300 a30.extend(t.count);
301 a31.extend(t.count);
302 a32.extend(t.count);
303 a33.extend(t.count);
304 a34.extend(t.count);
305 a35.extend(t.count);
306 a36.extend(t.count);
307 a37.extend(t.count);
308 a38.extend(t.count);
309 a39.extend(t.count);
310 a40.extend(t.count);
311 a41.extend(t.count);
312 a42.extend(t.count);
313 a43.extend(t.count);
314 a44.extend(t.count);
315 ddindx := t.first;
316 indx := 1;
317 while true loop
318 a0(indx) := rosetta_g_miss_num_map(t(ddindx).attachment_id);
319 a1(indx) := rosetta_g_miss_num_map(t(ddindx).deliverable_id);
320 a2(indx) := t(ddindx).file_name;
321 a3(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
322 a4(indx) := t(ddindx).x_action_status;
323 a5(indx) := t(ddindx).attachment_used_by;
324 a6(indx) := t(ddindx).enabled_flag;
325 a7(indx) := t(ddindx).can_fulfill_electronic_flag;
326 a8(indx) := rosetta_g_miss_num_map(t(ddindx).file_id);
327 a9(indx) := t(ddindx).file_extension;
328 a10(indx) := t(ddindx).keywords;
329 a11(indx) := rosetta_g_miss_num_map(t(ddindx).display_width);
330 a12(indx) := rosetta_g_miss_num_map(t(ddindx).display_height);
331 a13(indx) := t(ddindx).display_location;
332 a14(indx) := t(ddindx).link_to;
333 a15(indx) := t(ddindx).link_url;
334 a16(indx) := t(ddindx).send_for_preview_flag;
335 a17(indx) := t(ddindx).attachment_type;
336 a18(indx) := t(ddindx).language_code;
337 a19(indx) := rosetta_g_miss_num_map(t(ddindx).application_id);
338 a20(indx) := t(ddindx).description;
339 a21(indx) := t(ddindx).default_style_sheet;
340 a22(indx) := t(ddindx).display_url;
341 a23(indx) := rosetta_g_miss_num_map(t(ddindx).display_rule_id);
342 a24(indx) := t(ddindx).display_program;
343 a25(indx) := t(ddindx).attribute_category;
344 a26(indx) := t(ddindx).attribute1;
345 a27(indx) := t(ddindx).attribute2;
346 a28(indx) := t(ddindx).attribute3;
347 a29(indx) := t(ddindx).attribute4;
348 a30(indx) := t(ddindx).attribute5;
349 a31(indx) := t(ddindx).attribute6;
350 a32(indx) := t(ddindx).attribute7;
351 a33(indx) := t(ddindx).attribute8;
352 a34(indx) := t(ddindx).attribute9;
353 a35(indx) := t(ddindx).attribute10;
354 a36(indx) := t(ddindx).attribute11;
355 a37(indx) := t(ddindx).attribute12;
356 a38(indx) := t(ddindx).attribute13;
357 a39(indx) := t(ddindx).attribute14;
358 a40(indx) := t(ddindx).attribute15;
359 a41(indx) := t(ddindx).display_text;
360 a42(indx) := t(ddindx).alternate_text;
361 a43(indx) := t(ddindx).attachment_sub_type;
362 a44(indx) := t(ddindx).secured_flag;
363 indx := indx+1;
364 if t.last =ddindx
365 then exit;
366 end if;
367 ddindx := t.next(ddindx);
368 end loop;
369 end if;
370 end if;
371 end rosetta_table_copy_out_p1;
372
373 procedure rosetta_table_copy_in_p3(t out nocopy ibe_attachment_grp.ath_id_ver_tbl_type, a0 JTF_NUMBER_TABLE
374 , a1 JTF_VARCHAR2_TABLE_300
375 , a2 JTF_NUMBER_TABLE
376 , a3 JTF_VARCHAR2_TABLE_100
377 ) as
378 ddindx binary_integer; indx binary_integer;
379 begin
380 if a0 is not null and a0.count > 0 then
381 if a0.count > 0 then
382 indx := a0.first;
383 ddindx := 1;
384 while true loop
385 t(ddindx).attachment_id := rosetta_g_miss_num_map(a0(indx));
386 t(ddindx).file_name := a1(indx);
387 t(ddindx).object_version_number := rosetta_g_miss_num_map(a2(indx));
388 t(ddindx).x_action_status := a3(indx);
389 ddindx := ddindx+1;
390 if a0.last =indx
391 then exit;
392 end if;
393 indx := a0.next(indx);
394 end loop;
395 end if;
396 end if;
397 end rosetta_table_copy_in_p3;
398 procedure rosetta_table_copy_out_p3(t ibe_attachment_grp.ath_id_ver_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
399 , a1 out nocopy JTF_VARCHAR2_TABLE_300
400 , a2 out nocopy JTF_NUMBER_TABLE
401 , a3 out nocopy JTF_VARCHAR2_TABLE_100
402 ) as
403 ddindx binary_integer; indx binary_integer;
404 begin
405 if t is null or t.count = 0 then
406 a0 := JTF_NUMBER_TABLE();
407 a1 := JTF_VARCHAR2_TABLE_300();
408 a2 := JTF_NUMBER_TABLE();
409 a3 := JTF_VARCHAR2_TABLE_100();
410 else
411 a0 := JTF_NUMBER_TABLE();
412 a1 := JTF_VARCHAR2_TABLE_300();
413 a2 := JTF_NUMBER_TABLE();
414 a3 := JTF_VARCHAR2_TABLE_100();
415 if t.count > 0 then
416 a0.extend(t.count);
417 a1.extend(t.count);
418 a2.extend(t.count);
419 a3.extend(t.count);
420 ddindx := t.first;
421 indx := 1;
422 while true loop
423 a0(indx) := rosetta_g_miss_num_map(t(ddindx).attachment_id);
424 a1(indx) := t(ddindx).file_name;
425 a2(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
426 a3(indx) := t(ddindx).x_action_status;
427 indx := indx+1;
428 if t.last =ddindx
429 then exit;
430 end if;
431 ddindx := t.next(ddindx);
432 end loop;
433 end if;
434 end if;
435 end rosetta_table_copy_out_p3;
436
437 procedure rosetta_table_copy_in_p4(t out nocopy ibe_attachment_grp.number_table, a0 JTF_NUMBER_TABLE) as
438 ddindx binary_integer; indx binary_integer;
439 begin
440 if a0 is null then
441 t := null;
442 elsif a0.count = 0 then
443 t := ibe_attachment_grp.number_table();
444 else
445 if a0.count > 0 then
446 t := ibe_attachment_grp.number_table();
447 t.extend(a0.count);
448 indx := a0.first;
449 ddindx := 1;
450 while true loop
451 t(ddindx) := rosetta_g_miss_num_map(a0(indx));
452 ddindx := ddindx+1;
453 if a0.last =indx
454 then exit;
455 end if;
456 indx := a0.next(indx);
457 end loop;
458 end if;
459 end if;
460 end rosetta_table_copy_in_p4;
461 procedure rosetta_table_copy_out_p4(t ibe_attachment_grp.number_table, a0 out nocopy JTF_NUMBER_TABLE) as
462 ddindx binary_integer; indx binary_integer;
463 begin
464 if t is null then
465 a0 := null;
466 elsif t.count = 0 then
467 a0 := JTF_NUMBER_TABLE();
468 else
469 a0 := JTF_NUMBER_TABLE();
470 if t.count > 0 then
471 a0.extend(t.count);
472 ddindx := t.first;
473 indx := 1;
474 while true loop
475 a0(indx) := rosetta_g_miss_num_map(t(ddindx));
476 indx := indx+1;
477 if t.last =ddindx
478 then exit;
479 end if;
480 ddindx := t.next(ddindx);
481 end loop;
482 end if;
483 end if;
484 end rosetta_table_copy_out_p4;
485
486 procedure rosetta_table_copy_in_p5(t out nocopy ibe_attachment_grp.varchar2_table_300, a0 JTF_VARCHAR2_TABLE_300) as
487 ddindx binary_integer; indx binary_integer;
488 begin
489 if a0 is null then
490 t := null;
491 elsif a0.count = 0 then
492 t := ibe_attachment_grp.varchar2_table_300();
493 else
494 if a0.count > 0 then
495 t := ibe_attachment_grp.varchar2_table_300();
496 t.extend(a0.count);
497 indx := a0.first;
498 ddindx := 1;
499 while true loop
500 t(ddindx) := a0(indx);
501 ddindx := ddindx+1;
502 if a0.last =indx
503 then exit;
504 end if;
505 indx := a0.next(indx);
506 end loop;
507 end if;
508 end if;
509 end rosetta_table_copy_in_p5;
510 procedure rosetta_table_copy_out_p5(t ibe_attachment_grp.varchar2_table_300, a0 out nocopy JTF_VARCHAR2_TABLE_300) as
511 ddindx binary_integer; indx binary_integer;
512 begin
513 if t is null then
514 a0 := null;
515 elsif t.count = 0 then
516 a0 := JTF_VARCHAR2_TABLE_300();
517 else
518 a0 := JTF_VARCHAR2_TABLE_300();
519 if t.count > 0 then
520 a0.extend(t.count);
521 ddindx := t.first;
522 indx := 1;
523 while true loop
524 a0(indx) := t(ddindx);
525 indx := indx+1;
526 if t.last =ddindx
527 then exit;
528 end if;
529 ddindx := t.next(ddindx);
530 end loop;
531 end if;
532 end if;
533 end rosetta_table_copy_out_p5;
534
535 procedure rosetta_table_copy_in_p6(t out nocopy ibe_attachment_grp.varchar2_table_20, a0 JTF_VARCHAR2_TABLE_100) as
536 ddindx binary_integer; indx binary_integer;
537 begin
538 if a0 is null then
539 t := null;
540 elsif a0.count = 0 then
541 t := ibe_attachment_grp.varchar2_table_20();
542 else
543 if a0.count > 0 then
544 t := ibe_attachment_grp.varchar2_table_20();
545 t.extend(a0.count);
546 indx := a0.first;
547 ddindx := 1;
548 while true loop
549 t(ddindx) := a0(indx);
550 ddindx := ddindx+1;
551 if a0.last =indx
552 then exit;
553 end if;
554 indx := a0.next(indx);
555 end loop;
556 end if;
557 end if;
558 end rosetta_table_copy_in_p6;
559 procedure rosetta_table_copy_out_p6(t ibe_attachment_grp.varchar2_table_20, a0 out nocopy JTF_VARCHAR2_TABLE_100) as
560 ddindx binary_integer; indx binary_integer;
561 begin
562 if t is null then
563 a0 := null;
564 elsif t.count = 0 then
565 a0 := JTF_VARCHAR2_TABLE_100();
566 else
567 a0 := JTF_VARCHAR2_TABLE_100();
568 if t.count > 0 then
569 a0.extend(t.count);
570 ddindx := t.first;
571 indx := 1;
572 while true loop
573 a0(indx) := t(ddindx);
574 indx := indx+1;
575 if t.last =ddindx
576 then exit;
577 end if;
578 ddindx := t.next(ddindx);
579 end loop;
580 end if;
581 end if;
582 end rosetta_table_copy_out_p6;
583
584 procedure list_attachment(p_api_version NUMBER
585 , p_init_msg_list VARCHAR2
586 , x_return_status out nocopy VARCHAR2
587 , x_msg_count out nocopy NUMBER
588 , x_msg_data out nocopy VARCHAR2
589 , p_appl_id NUMBER
590 , p_deliverable_id NUMBER
591 , p_start_id NUMBER
592 , p_batch_size NUMBER
593 , x_row_count out nocopy NUMBER
594 , x_ath_id_tbl out nocopy JTF_NUMBER_TABLE
595 , x_dlv_id_tbl out nocopy JTF_NUMBER_TABLE
596 , x_file_name_tbl out nocopy JTF_VARCHAR2_TABLE_300
597 , x_file_id_tbl out nocopy JTF_NUMBER_TABLE
598 , x_file_ext_tbl out nocopy JTF_VARCHAR2_TABLE_100
599 , x_dsp_width_tbl out nocopy JTF_NUMBER_TABLE
600 , x_dsp_height_tbl out nocopy JTF_NUMBER_TABLE
601 , x_version_tbl out nocopy JTF_NUMBER_TABLE
602 )
603
604 as
605 ddx_ath_id_tbl ibe_attachment_grp.number_table;
606 ddx_dlv_id_tbl ibe_attachment_grp.number_table;
607 ddx_file_name_tbl ibe_attachment_grp.varchar2_table_300;
608 ddx_file_id_tbl ibe_attachment_grp.number_table;
609 ddx_file_ext_tbl ibe_attachment_grp.varchar2_table_20;
610 ddx_dsp_width_tbl ibe_attachment_grp.number_table;
611 ddx_dsp_height_tbl ibe_attachment_grp.number_table;
612 ddx_version_tbl ibe_attachment_grp.number_table;
613 ddindx binary_integer; indx binary_integer;
614 begin
615
616 -- copy data to the local IN or IN-OUT args, if any
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635 -- here's the delegated call to the old PL/SQL routine
636 ibe_attachment_grp.list_attachment(p_api_version,
637 p_init_msg_list,
638 x_return_status,
639 x_msg_count,
640 x_msg_data,
641 p_appl_id,
642 p_deliverable_id,
643 p_start_id,
644 p_batch_size,
645 x_row_count,
646 ddx_ath_id_tbl,
647 ddx_dlv_id_tbl,
648 ddx_file_name_tbl,
649 ddx_file_id_tbl,
650 ddx_file_ext_tbl,
651 ddx_dsp_width_tbl,
652 ddx_dsp_height_tbl,
653 ddx_version_tbl);
654
655 -- copy data back from the local variables to OUT or IN-OUT args, if any
656
657
658
659
660
661
662
663
664
665
666 ibe_attachment_grp_w.rosetta_table_copy_out_p4(ddx_ath_id_tbl, x_ath_id_tbl);
667
668 ibe_attachment_grp_w.rosetta_table_copy_out_p4(ddx_dlv_id_tbl, x_dlv_id_tbl);
669
670 ibe_attachment_grp_w.rosetta_table_copy_out_p5(ddx_file_name_tbl, x_file_name_tbl);
671
672 ibe_attachment_grp_w.rosetta_table_copy_out_p4(ddx_file_id_tbl, x_file_id_tbl);
673
674 ibe_attachment_grp_w.rosetta_table_copy_out_p6(ddx_file_ext_tbl, x_file_ext_tbl);
675
676 ibe_attachment_grp_w.rosetta_table_copy_out_p4(ddx_dsp_width_tbl, x_dsp_width_tbl);
677
678 ibe_attachment_grp_w.rosetta_table_copy_out_p4(ddx_dsp_height_tbl, x_dsp_height_tbl);
679
680 ibe_attachment_grp_w.rosetta_table_copy_out_p4(ddx_version_tbl, x_version_tbl);
681 end;
682
683 procedure save_attachment(p_api_version NUMBER
684 , p_init_msg_list VARCHAR2
685 , p_commit VARCHAR2
686 , x_return_status out nocopy VARCHAR2
687 , x_msg_count out nocopy NUMBER
688 , x_msg_data out nocopy VARCHAR2
689 , p6_a0 in out nocopy NUMBER
690 , p6_a1 in out nocopy NUMBER
691 , p6_a2 in out nocopy VARCHAR2
692 , p6_a3 in out nocopy NUMBER
693 , p6_a4 in out nocopy VARCHAR2
694 , p6_a5 in out nocopy VARCHAR2
695 , p6_a6 in out nocopy VARCHAR2
696 , p6_a7 in out nocopy VARCHAR2
697 , p6_a8 in out nocopy NUMBER
698 , p6_a9 in out nocopy VARCHAR2
699 , p6_a10 in out nocopy VARCHAR2
700 , p6_a11 in out nocopy NUMBER
701 , p6_a12 in out nocopy NUMBER
702 , p6_a13 in out nocopy VARCHAR2
703 , p6_a14 in out nocopy VARCHAR2
704 , p6_a15 in out nocopy VARCHAR2
705 , p6_a16 in out nocopy VARCHAR2
706 , p6_a17 in out nocopy VARCHAR2
707 , p6_a18 in out nocopy VARCHAR2
708 , p6_a19 in out nocopy NUMBER
709 , p6_a20 in out nocopy VARCHAR2
710 , p6_a21 in out nocopy VARCHAR2
711 , p6_a22 in out nocopy VARCHAR2
712 , p6_a23 in out nocopy NUMBER
713 , p6_a24 in out nocopy VARCHAR2
714 , p6_a25 in out nocopy VARCHAR2
715 , p6_a26 in out nocopy VARCHAR2
716 , p6_a27 in out nocopy VARCHAR2
717 , p6_a28 in out nocopy VARCHAR2
718 , p6_a29 in out nocopy VARCHAR2
719 , p6_a30 in out nocopy VARCHAR2
720 , p6_a31 in out nocopy VARCHAR2
721 , p6_a32 in out nocopy VARCHAR2
722 , p6_a33 in out nocopy VARCHAR2
723 , p6_a34 in out nocopy VARCHAR2
724 , p6_a35 in out nocopy VARCHAR2
725 , p6_a36 in out nocopy VARCHAR2
726 , p6_a37 in out nocopy VARCHAR2
727 , p6_a38 in out nocopy VARCHAR2
728 , p6_a39 in out nocopy VARCHAR2
729 , p6_a40 in out nocopy VARCHAR2
730 , p6_a41 in out nocopy VARCHAR2
731 , p6_a42 in out nocopy VARCHAR2
732 , p6_a43 in out nocopy VARCHAR2
733 , p6_a44 in out nocopy VARCHAR2
734 )
735
736 as
737 ddp_attachment_rec ibe_attachment_grp.attachment_rec_type;
738 ddindx binary_integer; indx binary_integer;
739 begin
740
741 -- copy data to the local IN or IN-OUT args, if any
742
743
744
745
746
747
748 ddp_attachment_rec.attachment_id := rosetta_g_miss_num_map(p6_a0);
749 ddp_attachment_rec.deliverable_id := rosetta_g_miss_num_map(p6_a1);
750 ddp_attachment_rec.file_name := p6_a2;
751 ddp_attachment_rec.object_version_number := rosetta_g_miss_num_map(p6_a3);
752 ddp_attachment_rec.x_action_status := p6_a4;
753 ddp_attachment_rec.attachment_used_by := p6_a5;
754 ddp_attachment_rec.enabled_flag := p6_a6;
755 ddp_attachment_rec.can_fulfill_electronic_flag := p6_a7;
756 ddp_attachment_rec.file_id := rosetta_g_miss_num_map(p6_a8);
757 ddp_attachment_rec.file_extension := p6_a9;
758 ddp_attachment_rec.keywords := p6_a10;
759 ddp_attachment_rec.display_width := rosetta_g_miss_num_map(p6_a11);
760 ddp_attachment_rec.display_height := rosetta_g_miss_num_map(p6_a12);
761 ddp_attachment_rec.display_location := p6_a13;
762 ddp_attachment_rec.link_to := p6_a14;
763 ddp_attachment_rec.link_url := p6_a15;
764 ddp_attachment_rec.send_for_preview_flag := p6_a16;
765 ddp_attachment_rec.attachment_type := p6_a17;
766 ddp_attachment_rec.language_code := p6_a18;
767 ddp_attachment_rec.application_id := rosetta_g_miss_num_map(p6_a19);
768 ddp_attachment_rec.description := p6_a20;
769 ddp_attachment_rec.default_style_sheet := p6_a21;
770 ddp_attachment_rec.display_url := p6_a22;
771 ddp_attachment_rec.display_rule_id := rosetta_g_miss_num_map(p6_a23);
772 ddp_attachment_rec.display_program := p6_a24;
773 ddp_attachment_rec.attribute_category := p6_a25;
774 ddp_attachment_rec.attribute1 := p6_a26;
775 ddp_attachment_rec.attribute2 := p6_a27;
776 ddp_attachment_rec.attribute3 := p6_a28;
777 ddp_attachment_rec.attribute4 := p6_a29;
778 ddp_attachment_rec.attribute5 := p6_a30;
779 ddp_attachment_rec.attribute6 := p6_a31;
780 ddp_attachment_rec.attribute7 := p6_a32;
781 ddp_attachment_rec.attribute8 := p6_a33;
782 ddp_attachment_rec.attribute9 := p6_a34;
783 ddp_attachment_rec.attribute10 := p6_a35;
784 ddp_attachment_rec.attribute11 := p6_a36;
785 ddp_attachment_rec.attribute12 := p6_a37;
786 ddp_attachment_rec.attribute13 := p6_a38;
787 ddp_attachment_rec.attribute14 := p6_a39;
788 ddp_attachment_rec.attribute15 := p6_a40;
789 ddp_attachment_rec.display_text := p6_a41;
790 ddp_attachment_rec.alternate_text := p6_a42;
791 ddp_attachment_rec.attachment_sub_type := p6_a43;
792 ddp_attachment_rec.secured_flag := p6_a44;
793
794 -- here's the delegated call to the old PL/SQL routine
795 ibe_attachment_grp.save_attachment(p_api_version,
796 p_init_msg_list,
797 p_commit,
798 x_return_status,
799 x_msg_count,
800 x_msg_data,
801 ddp_attachment_rec);
802
803 -- copy data back from the local variables to OUT or IN-OUT args, if any
804
805
806
807
808
809
810 p6_a0 := rosetta_g_miss_num_map(ddp_attachment_rec.attachment_id);
811 p6_a1 := rosetta_g_miss_num_map(ddp_attachment_rec.deliverable_id);
812 p6_a2 := ddp_attachment_rec.file_name;
813 p6_a3 := rosetta_g_miss_num_map(ddp_attachment_rec.object_version_number);
814 p6_a4 := ddp_attachment_rec.x_action_status;
815 p6_a5 := ddp_attachment_rec.attachment_used_by;
816 p6_a6 := ddp_attachment_rec.enabled_flag;
817 p6_a7 := ddp_attachment_rec.can_fulfill_electronic_flag;
818 p6_a8 := rosetta_g_miss_num_map(ddp_attachment_rec.file_id);
819 p6_a9 := ddp_attachment_rec.file_extension;
820 p6_a10 := ddp_attachment_rec.keywords;
821 p6_a11 := rosetta_g_miss_num_map(ddp_attachment_rec.display_width);
822 p6_a12 := rosetta_g_miss_num_map(ddp_attachment_rec.display_height);
823 p6_a13 := ddp_attachment_rec.display_location;
824 p6_a14 := ddp_attachment_rec.link_to;
825 p6_a15 := ddp_attachment_rec.link_url;
826 p6_a16 := ddp_attachment_rec.send_for_preview_flag;
827 p6_a17 := ddp_attachment_rec.attachment_type;
828 p6_a18 := ddp_attachment_rec.language_code;
829 p6_a19 := rosetta_g_miss_num_map(ddp_attachment_rec.application_id);
830 p6_a20 := ddp_attachment_rec.description;
831 p6_a21 := ddp_attachment_rec.default_style_sheet;
832 p6_a22 := ddp_attachment_rec.display_url;
833 p6_a23 := rosetta_g_miss_num_map(ddp_attachment_rec.display_rule_id);
834 p6_a24 := ddp_attachment_rec.display_program;
835 p6_a25 := ddp_attachment_rec.attribute_category;
836 p6_a26 := ddp_attachment_rec.attribute1;
837 p6_a27 := ddp_attachment_rec.attribute2;
838 p6_a28 := ddp_attachment_rec.attribute3;
839 p6_a29 := ddp_attachment_rec.attribute4;
840 p6_a30 := ddp_attachment_rec.attribute5;
841 p6_a31 := ddp_attachment_rec.attribute6;
842 p6_a32 := ddp_attachment_rec.attribute7;
843 p6_a33 := ddp_attachment_rec.attribute8;
844 p6_a34 := ddp_attachment_rec.attribute9;
845 p6_a35 := ddp_attachment_rec.attribute10;
846 p6_a36 := ddp_attachment_rec.attribute11;
847 p6_a37 := ddp_attachment_rec.attribute12;
848 p6_a38 := ddp_attachment_rec.attribute13;
849 p6_a39 := ddp_attachment_rec.attribute14;
850 p6_a40 := ddp_attachment_rec.attribute15;
851 p6_a41 := ddp_attachment_rec.display_text;
852 p6_a42 := ddp_attachment_rec.alternate_text;
853 p6_a43 := ddp_attachment_rec.attachment_sub_type;
854 p6_a44 := ddp_attachment_rec.secured_flag;
855 end;
856
857 procedure save_attachment(p_api_version NUMBER
858 , p_init_msg_list VARCHAR2
859 , p_commit VARCHAR2
860 , x_return_status out nocopy VARCHAR2
861 , x_msg_count out nocopy NUMBER
862 , x_msg_data out nocopy VARCHAR2
863 , p6_a0 in out nocopy JTF_NUMBER_TABLE
864 , p6_a1 in out nocopy JTF_NUMBER_TABLE
865 , p6_a2 in out nocopy JTF_VARCHAR2_TABLE_300
866 , p6_a3 in out nocopy JTF_NUMBER_TABLE
867 , p6_a4 in out nocopy JTF_VARCHAR2_TABLE_100
868 , p6_a5 in out nocopy JTF_VARCHAR2_TABLE_100
869 , p6_a6 in out nocopy JTF_VARCHAR2_TABLE_100
870 , p6_a7 in out nocopy JTF_VARCHAR2_TABLE_100
871 , p6_a8 in out nocopy JTF_NUMBER_TABLE
872 , p6_a9 in out nocopy JTF_VARCHAR2_TABLE_100
873 , p6_a10 in out nocopy JTF_VARCHAR2_TABLE_300
874 , p6_a11 in out nocopy JTF_NUMBER_TABLE
875 , p6_a12 in out nocopy JTF_NUMBER_TABLE
876 , p6_a13 in out nocopy JTF_VARCHAR2_TABLE_2000
877 , p6_a14 in out nocopy JTF_VARCHAR2_TABLE_2000
878 , p6_a15 in out nocopy JTF_VARCHAR2_TABLE_2000
879 , p6_a16 in out nocopy JTF_VARCHAR2_TABLE_100
880 , p6_a17 in out nocopy JTF_VARCHAR2_TABLE_100
881 , p6_a18 in out nocopy JTF_VARCHAR2_TABLE_100
882 , p6_a19 in out nocopy JTF_NUMBER_TABLE
883 , p6_a20 in out nocopy JTF_VARCHAR2_TABLE_2000
884 , p6_a21 in out nocopy JTF_VARCHAR2_TABLE_300
885 , p6_a22 in out nocopy JTF_VARCHAR2_TABLE_1100
886 , p6_a23 in out nocopy JTF_NUMBER_TABLE
887 , p6_a24 in out nocopy JTF_VARCHAR2_TABLE_300
888 , p6_a25 in out nocopy JTF_VARCHAR2_TABLE_100
889 , p6_a26 in out nocopy JTF_VARCHAR2_TABLE_200
890 , p6_a27 in out nocopy JTF_VARCHAR2_TABLE_200
891 , p6_a28 in out nocopy JTF_VARCHAR2_TABLE_200
892 , p6_a29 in out nocopy JTF_VARCHAR2_TABLE_200
893 , p6_a30 in out nocopy JTF_VARCHAR2_TABLE_200
894 , p6_a31 in out nocopy JTF_VARCHAR2_TABLE_200
895 , p6_a32 in out nocopy JTF_VARCHAR2_TABLE_200
896 , p6_a33 in out nocopy JTF_VARCHAR2_TABLE_200
897 , p6_a34 in out nocopy JTF_VARCHAR2_TABLE_200
898 , p6_a35 in out nocopy JTF_VARCHAR2_TABLE_200
899 , p6_a36 in out nocopy JTF_VARCHAR2_TABLE_200
900 , p6_a37 in out nocopy JTF_VARCHAR2_TABLE_200
901 , p6_a38 in out nocopy JTF_VARCHAR2_TABLE_200
902 , p6_a39 in out nocopy JTF_VARCHAR2_TABLE_200
903 , p6_a40 in out nocopy JTF_VARCHAR2_TABLE_200
904 , p6_a41 in out nocopy JTF_VARCHAR2_TABLE_2000
905 , p6_a42 in out nocopy JTF_VARCHAR2_TABLE_1000
906 , p6_a43 in out nocopy JTF_VARCHAR2_TABLE_100
907 , p6_a44 in out nocopy JTF_VARCHAR2_TABLE_100
908 )
909
910 as
911 ddp_attachment_tbl ibe_attachment_grp.attachment_tbl_type;
912 ddindx binary_integer; indx binary_integer;
913 begin
914
915 -- copy data to the local IN or IN-OUT args, if any
916
917
918
919
920
921
922 ibe_attachment_grp_w.rosetta_table_copy_in_p1(ddp_attachment_tbl, p6_a0
923 , p6_a1
924 , p6_a2
925 , p6_a3
926 , p6_a4
927 , p6_a5
928 , p6_a6
929 , p6_a7
930 , p6_a8
931 , p6_a9
932 , p6_a10
933 , p6_a11
934 , p6_a12
935 , p6_a13
936 , p6_a14
937 , p6_a15
938 , p6_a16
939 , p6_a17
940 , p6_a18
941 , p6_a19
942 , p6_a20
943 , p6_a21
944 , p6_a22
945 , p6_a23
946 , p6_a24
947 , p6_a25
948 , p6_a26
949 , p6_a27
950 , p6_a28
951 , p6_a29
952 , p6_a30
953 , p6_a31
954 , p6_a32
955 , p6_a33
956 , p6_a34
957 , p6_a35
958 , p6_a36
959 , p6_a37
960 , p6_a38
961 , p6_a39
962 , p6_a40
963 , p6_a41
964 , p6_a42
965 , p6_a43
966 , p6_a44
967 );
968
969 -- here's the delegated call to the old PL/SQL routine
970 ibe_attachment_grp.save_attachment(p_api_version,
971 p_init_msg_list,
972 p_commit,
973 x_return_status,
974 x_msg_count,
975 x_msg_data,
976 ddp_attachment_tbl);
977
978 -- copy data back from the local variables to OUT or IN-OUT args, if any
979
980
981
982
983
984
985 ibe_attachment_grp_w.rosetta_table_copy_out_p1(ddp_attachment_tbl, p6_a0
986 , p6_a1
987 , p6_a2
988 , p6_a3
989 , p6_a4
990 , p6_a5
991 , p6_a6
992 , p6_a7
993 , p6_a8
994 , p6_a9
995 , p6_a10
996 , p6_a11
997 , p6_a12
998 , p6_a13
999 , p6_a14
1000 , p6_a15
1001 , p6_a16
1002 , p6_a17
1003 , p6_a18
1004 , p6_a19
1005 , p6_a20
1006 , p6_a21
1007 , p6_a22
1008 , p6_a23
1009 , p6_a24
1010 , p6_a25
1011 , p6_a26
1012 , p6_a27
1013 , p6_a28
1014 , p6_a29
1015 , p6_a30
1016 , p6_a31
1017 , p6_a32
1018 , p6_a33
1019 , p6_a34
1020 , p6_a35
1021 , p6_a36
1022 , p6_a37
1023 , p6_a38
1024 , p6_a39
1025 , p6_a40
1026 , p6_a41
1027 , p6_a42
1028 , p6_a43
1029 , p6_a44
1030 );
1031 end;
1032
1033 procedure delete_attachment(p_api_version NUMBER
1034 , p_init_msg_list VARCHAR2
1035 , p_commit VARCHAR2
1036 , x_return_status out nocopy VARCHAR2
1037 , x_msg_count out nocopy NUMBER
1038 , x_msg_data out nocopy VARCHAR2
1039 , p6_a0 in out nocopy JTF_NUMBER_TABLE
1040 , p6_a1 in out nocopy JTF_VARCHAR2_TABLE_300
1041 , p6_a2 in out nocopy JTF_NUMBER_TABLE
1042 , p6_a3 in out nocopy JTF_VARCHAR2_TABLE_100
1043 )
1044
1045 as
1046 ddp_ath_id_ver_tbl ibe_attachment_grp.ath_id_ver_tbl_type;
1047 ddindx binary_integer; indx binary_integer;
1048 begin
1049
1050 -- copy data to the local IN or IN-OUT args, if any
1051
1052
1053
1054
1055
1056
1057 ibe_attachment_grp_w.rosetta_table_copy_in_p3(ddp_ath_id_ver_tbl, p6_a0
1058 , p6_a1
1059 , p6_a2
1060 , p6_a3
1061 );
1062
1063 -- here's the delegated call to the old PL/SQL routine
1064 ibe_attachment_grp.delete_attachment(p_api_version,
1065 p_init_msg_list,
1066 p_commit,
1067 x_return_status,
1068 x_msg_count,
1069 x_msg_data,
1070 ddp_ath_id_ver_tbl);
1071
1072 -- copy data back from the local variables to OUT or IN-OUT args, if any
1073
1074
1075
1076
1077
1078
1079 ibe_attachment_grp_w.rosetta_table_copy_out_p3(ddp_ath_id_ver_tbl, p6_a0
1080 , p6_a1
1081 , p6_a2
1082 , p6_a3
1083 );
1084 end;
1085
1086 end ibe_attachment_grp_w;