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