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