[Home] [Help]
PACKAGE BODY: APPS.OKL_SPLIT_ASSET_PUB_W
Source
1 package body okl_split_asset_pub_w as
2 /* $Header: OKLUSPAB.pls 115.9 2004/02/17 22:57:28 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_split_transaction(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 , p_cle_id NUMBER
28 , p_split_into_individuals_yn VARCHAR2
29 , p_split_into_units NUMBER
30 , p8_a0 JTF_NUMBER_TABLE
31 , p9_a0 out nocopy JTF_NUMBER_TABLE
32 , p9_a1 out nocopy JTF_NUMBER_TABLE
33 , p9_a2 out nocopy JTF_VARCHAR2_TABLE_100
34 , p9_a3 out nocopy JTF_NUMBER_TABLE
35 , p9_a4 out nocopy JTF_NUMBER_TABLE
36 , p9_a5 out nocopy JTF_NUMBER_TABLE
37 , p9_a6 out nocopy JTF_VARCHAR2_TABLE_100
38 , p9_a7 out nocopy JTF_VARCHAR2_TABLE_2000
39 , p9_a8 out nocopy JTF_NUMBER_TABLE
40 , p9_a9 out nocopy JTF_NUMBER_TABLE
41 , p9_a10 out nocopy JTF_VARCHAR2_TABLE_100
42 , p9_a11 out nocopy JTF_NUMBER_TABLE
43 , p9_a12 out nocopy JTF_VARCHAR2_TABLE_100
44 , p9_a13 out nocopy JTF_NUMBER_TABLE
45 , p9_a14 out nocopy JTF_NUMBER_TABLE
46 , p9_a15 out nocopy JTF_NUMBER_TABLE
47 , p9_a16 out nocopy JTF_NUMBER_TABLE
48 , p9_a17 out nocopy JTF_VARCHAR2_TABLE_100
49 , p9_a18 out nocopy JTF_VARCHAR2_TABLE_500
50 , p9_a19 out nocopy JTF_VARCHAR2_TABLE_500
51 , p9_a20 out nocopy JTF_VARCHAR2_TABLE_500
52 , p9_a21 out nocopy JTF_VARCHAR2_TABLE_500
53 , p9_a22 out nocopy JTF_VARCHAR2_TABLE_500
54 , p9_a23 out nocopy JTF_VARCHAR2_TABLE_500
55 , p9_a24 out nocopy JTF_VARCHAR2_TABLE_500
56 , p9_a25 out nocopy JTF_VARCHAR2_TABLE_500
57 , p9_a26 out nocopy JTF_VARCHAR2_TABLE_500
58 , p9_a27 out nocopy JTF_VARCHAR2_TABLE_500
59 , p9_a28 out nocopy JTF_VARCHAR2_TABLE_500
60 , p9_a29 out nocopy JTF_VARCHAR2_TABLE_500
61 , p9_a30 out nocopy JTF_VARCHAR2_TABLE_500
62 , p9_a31 out nocopy JTF_VARCHAR2_TABLE_500
63 , p9_a32 out nocopy JTF_VARCHAR2_TABLE_500
64 , p9_a33 out nocopy JTF_NUMBER_TABLE
65 , p9_a34 out nocopy JTF_DATE_TABLE
66 , p9_a35 out nocopy JTF_NUMBER_TABLE
67 , p9_a36 out nocopy JTF_DATE_TABLE
68 , p9_a37 out nocopy JTF_NUMBER_TABLE
69 , p9_a38 out nocopy JTF_VARCHAR2_TABLE_100
70 , p9_a39 out nocopy JTF_VARCHAR2_TABLE_100
71 , p9_a40 out nocopy JTF_NUMBER_TABLE
72 , p9_a41 out nocopy JTF_DATE_TABLE
73 , p10_a0 out nocopy NUMBER
74 , p10_a1 out nocopy NUMBER
75 , p10_a2 out nocopy VARCHAR2
76 , p10_a3 out nocopy NUMBER
77 , p10_a4 out nocopy NUMBER
78 , p10_a5 out nocopy NUMBER
79 , p10_a6 out nocopy NUMBER
80 , p10_a7 out nocopy NUMBER
81 , p10_a8 out nocopy NUMBER
82 , p10_a9 out nocopy NUMBER
83 , p10_a10 out nocopy NUMBER
84 , p10_a11 out nocopy NUMBER
85 , p10_a12 out nocopy VARCHAR2
86 , p10_a13 out nocopy VARCHAR2
87 , p10_a14 out nocopy VARCHAR2
88 , p10_a15 out nocopy NUMBER
89 , p10_a16 out nocopy NUMBER
90 , p10_a17 out nocopy NUMBER
91 , p10_a18 out nocopy VARCHAR2
92 , p10_a19 out nocopy NUMBER
93 , p10_a20 out nocopy NUMBER
94 , p10_a21 out nocopy VARCHAR2
95 , p10_a22 out nocopy VARCHAR2
96 , p10_a23 out nocopy VARCHAR2
97 , p10_a24 out nocopy VARCHAR2
98 , p10_a25 out nocopy DATE
99 , p10_a26 out nocopy DATE
100 , p10_a27 out nocopy DATE
101 , p10_a28 out nocopy NUMBER
102 , p10_a29 out nocopy NUMBER
103 , p10_a30 out nocopy NUMBER
104 , p10_a31 out nocopy VARCHAR2
105 , p10_a32 out nocopy NUMBER
106 , p10_a33 out nocopy NUMBER
107 , p10_a34 out nocopy NUMBER
108 , p10_a35 out nocopy VARCHAR2
109 , p10_a36 out nocopy VARCHAR2
110 , p10_a37 out nocopy VARCHAR2
111 , p10_a38 out nocopy VARCHAR2
112 , p10_a39 out nocopy VARCHAR2
113 , p10_a40 out nocopy VARCHAR2
114 , p10_a41 out nocopy VARCHAR2
115 , p10_a42 out nocopy VARCHAR2
116 , p10_a43 out nocopy VARCHAR2
117 , p10_a44 out nocopy VARCHAR2
118 , p10_a45 out nocopy VARCHAR2
119 , p10_a46 out nocopy VARCHAR2
120 , p10_a47 out nocopy VARCHAR2
121 , p10_a48 out nocopy VARCHAR2
122 , p10_a49 out nocopy VARCHAR2
123 , p10_a50 out nocopy VARCHAR2
124 , p10_a51 out nocopy NUMBER
125 , p10_a52 out nocopy DATE
126 , p10_a53 out nocopy NUMBER
127 , p10_a54 out nocopy DATE
128 , p10_a55 out nocopy NUMBER
129 , p10_a56 out nocopy VARCHAR2
130 , p10_a57 out nocopy NUMBER
131 , p10_a58 out nocopy NUMBER
132 , p10_a59 out nocopy NUMBER
133 , p10_a60 out nocopy NUMBER
134 , p10_a61 out nocopy NUMBER
135 , p10_a62 out nocopy NUMBER
136 , p10_a63 out nocopy NUMBER
137 , p10_a64 out nocopy NUMBER
138 , p10_a65 out nocopy NUMBER
139 , p10_a66 out nocopy DATE
140 , p10_a67 out nocopy NUMBER
141 , p10_a68 out nocopy NUMBER
142 , p10_a69 out nocopy NUMBER
143 , p10_a70 out nocopy VARCHAR2
144 , p10_a71 out nocopy NUMBER
145 , p10_a72 out nocopy VARCHAR2
146 , p10_a73 out nocopy VARCHAR2
147 , p10_a74 out nocopy NUMBER
148 , p10_a75 out nocopy DATE
149 , p11_a0 out nocopy NUMBER
150 , p11_a1 out nocopy NUMBER
151 , p11_a2 out nocopy NUMBER
152 , p11_a3 out nocopy VARCHAR2
153 , p11_a4 out nocopy VARCHAR2
154 , p11_a5 out nocopy VARCHAR2
155 , p11_a6 out nocopy VARCHAR2
156 , p11_a7 out nocopy VARCHAR2
157 , p11_a8 out nocopy VARCHAR2
158 , p11_a9 out nocopy VARCHAR2
159 , p11_a10 out nocopy VARCHAR2
160 , p11_a11 out nocopy VARCHAR2
161 , p11_a12 out nocopy VARCHAR2
162 , p11_a13 out nocopy VARCHAR2
163 , p11_a14 out nocopy VARCHAR2
164 , p11_a15 out nocopy VARCHAR2
165 , p11_a16 out nocopy VARCHAR2
166 , p11_a17 out nocopy VARCHAR2
167 , p11_a18 out nocopy VARCHAR2
168 , p11_a19 out nocopy VARCHAR2
169 , p11_a20 out nocopy NUMBER
170 , p11_a21 out nocopy DATE
171 , p11_a22 out nocopy NUMBER
172 , p11_a23 out nocopy DATE
173 , p11_a24 out nocopy NUMBER
174 , p11_a25 out nocopy VARCHAR2
175 , p11_a26 out nocopy NUMBER
176 , p11_a27 out nocopy DATE
177 , p11_a28 out nocopy NUMBER
178 , p11_a29 out nocopy VARCHAR2
179 , p11_a30 out nocopy NUMBER
180 , p11_a31 out nocopy NUMBER
181 , p11_a32 out nocopy NUMBER
182 )
183
184 as
185 ddp_ib_tbl okl_split_asset_pub.ib_tbl_type;
186 ddx_txdv_tbl okl_split_asset_pub.txdv_tbl_type;
187 ddx_txlv_rec okl_split_asset_pub.txlv_rec_type;
188 ddx_trxv_rec okl_split_asset_pub.trxv_rec_type;
189 ddindx binary_integer; indx binary_integer;
190 begin
191
192 -- copy data to the local IN or IN-OUT args, if any
193
194
195
196
197
198
199
200
201 okl_split_asset_pvt_w.rosetta_table_copy_in_p13(ddp_ib_tbl, p8_a0
202 );
203
204
205
206
207 -- here's the delegated call to the old PL/SQL routine
208 okl_split_asset_pub.create_split_transaction(p_api_version,
209 p_init_msg_list,
210 x_return_status,
211 x_msg_count,
212 x_msg_data,
213 p_cle_id,
214 p_split_into_individuals_yn,
215 p_split_into_units,
216 ddp_ib_tbl,
217 ddx_txdv_tbl,
218 ddx_txlv_rec,
219 ddx_trxv_rec);
220
221 -- copy data back from the local variables to OUT or IN-OUT args, if any
222
223
224
225
226
227
228
229
230
231 okl_asd_pvt_w.rosetta_table_copy_out_p8(ddx_txdv_tbl, p9_a0
232 , p9_a1
233 , p9_a2
234 , p9_a3
235 , p9_a4
236 , p9_a5
237 , p9_a6
238 , p9_a7
239 , p9_a8
240 , p9_a9
241 , p9_a10
242 , p9_a11
243 , p9_a12
244 , p9_a13
245 , p9_a14
246 , p9_a15
247 , p9_a16
248 , p9_a17
249 , p9_a18
250 , p9_a19
251 , p9_a20
252 , p9_a21
253 , p9_a22
254 , p9_a23
255 , p9_a24
256 , p9_a25
257 , p9_a26
258 , p9_a27
259 , p9_a28
260 , p9_a29
261 , p9_a30
262 , p9_a31
263 , p9_a32
264 , p9_a33
265 , p9_a34
266 , p9_a35
267 , p9_a36
268 , p9_a37
269 , p9_a38
270 , p9_a39
271 , p9_a40
272 , p9_a41
273 );
274
275 p10_a0 := rosetta_g_miss_num_map(ddx_txlv_rec.id);
276 p10_a1 := rosetta_g_miss_num_map(ddx_txlv_rec.object_version_number);
277 p10_a2 := ddx_txlv_rec.sfwt_flag;
278 p10_a3 := rosetta_g_miss_num_map(ddx_txlv_rec.tas_id);
279 p10_a4 := rosetta_g_miss_num_map(ddx_txlv_rec.ilo_id);
280 p10_a5 := rosetta_g_miss_num_map(ddx_txlv_rec.ilo_id_old);
281 p10_a6 := rosetta_g_miss_num_map(ddx_txlv_rec.iay_id);
282 p10_a7 := rosetta_g_miss_num_map(ddx_txlv_rec.iay_id_new);
283 p10_a8 := rosetta_g_miss_num_map(ddx_txlv_rec.kle_id);
284 p10_a9 := rosetta_g_miss_num_map(ddx_txlv_rec.dnz_khr_id);
285 p10_a10 := rosetta_g_miss_num_map(ddx_txlv_rec.line_number);
286 p10_a11 := rosetta_g_miss_num_map(ddx_txlv_rec.org_id);
287 p10_a12 := ddx_txlv_rec.tal_type;
288 p10_a13 := ddx_txlv_rec.asset_number;
289 p10_a14 := ddx_txlv_rec.description;
290 p10_a15 := rosetta_g_miss_num_map(ddx_txlv_rec.fa_location_id);
291 p10_a16 := rosetta_g_miss_num_map(ddx_txlv_rec.original_cost);
292 p10_a17 := rosetta_g_miss_num_map(ddx_txlv_rec.current_units);
293 p10_a18 := ddx_txlv_rec.manufacturer_name;
294 p10_a19 := rosetta_g_miss_num_map(ddx_txlv_rec.year_manufactured);
295 p10_a20 := rosetta_g_miss_num_map(ddx_txlv_rec.supplier_id);
296 p10_a21 := ddx_txlv_rec.used_asset_yn;
297 p10_a22 := ddx_txlv_rec.tag_number;
298 p10_a23 := ddx_txlv_rec.model_number;
299 p10_a24 := ddx_txlv_rec.corporate_book;
300 p10_a25 := ddx_txlv_rec.date_purchased;
301 p10_a26 := ddx_txlv_rec.date_delivery;
302 p10_a27 := ddx_txlv_rec.in_service_date;
303 p10_a28 := rosetta_g_miss_num_map(ddx_txlv_rec.life_in_months);
304 p10_a29 := rosetta_g_miss_num_map(ddx_txlv_rec.depreciation_id);
305 p10_a30 := rosetta_g_miss_num_map(ddx_txlv_rec.depreciation_cost);
306 p10_a31 := ddx_txlv_rec.deprn_method;
307 p10_a32 := rosetta_g_miss_num_map(ddx_txlv_rec.deprn_rate);
308 p10_a33 := rosetta_g_miss_num_map(ddx_txlv_rec.salvage_value);
309 p10_a34 := rosetta_g_miss_num_map(ddx_txlv_rec.percent_salvage_value);
310 p10_a35 := ddx_txlv_rec.attribute_category;
311 p10_a36 := ddx_txlv_rec.attribute1;
312 p10_a37 := ddx_txlv_rec.attribute2;
313 p10_a38 := ddx_txlv_rec.attribute3;
314 p10_a39 := ddx_txlv_rec.attribute4;
315 p10_a40 := ddx_txlv_rec.attribute5;
316 p10_a41 := ddx_txlv_rec.attribute6;
317 p10_a42 := ddx_txlv_rec.attribute7;
318 p10_a43 := ddx_txlv_rec.attribute8;
319 p10_a44 := ddx_txlv_rec.attribute9;
320 p10_a45 := ddx_txlv_rec.attribute10;
321 p10_a46 := ddx_txlv_rec.attribute11;
322 p10_a47 := ddx_txlv_rec.attribute12;
323 p10_a48 := ddx_txlv_rec.attribute13;
324 p10_a49 := ddx_txlv_rec.attribute14;
325 p10_a50 := ddx_txlv_rec.attribute15;
326 p10_a51 := rosetta_g_miss_num_map(ddx_txlv_rec.created_by);
327 p10_a52 := ddx_txlv_rec.creation_date;
328 p10_a53 := rosetta_g_miss_num_map(ddx_txlv_rec.last_updated_by);
329 p10_a54 := ddx_txlv_rec.last_update_date;
330 p10_a55 := rosetta_g_miss_num_map(ddx_txlv_rec.last_update_login);
331 p10_a56 := ddx_txlv_rec.depreciate_yn;
332 p10_a57 := rosetta_g_miss_num_map(ddx_txlv_rec.hold_period_days);
333 p10_a58 := rosetta_g_miss_num_map(ddx_txlv_rec.old_salvage_value);
334 p10_a59 := rosetta_g_miss_num_map(ddx_txlv_rec.new_residual_value);
335 p10_a60 := rosetta_g_miss_num_map(ddx_txlv_rec.old_residual_value);
336 p10_a61 := rosetta_g_miss_num_map(ddx_txlv_rec.units_retired);
337 p10_a62 := rosetta_g_miss_num_map(ddx_txlv_rec.cost_retired);
338 p10_a63 := rosetta_g_miss_num_map(ddx_txlv_rec.sale_proceeds);
339 p10_a64 := rosetta_g_miss_num_map(ddx_txlv_rec.removal_cost);
340 p10_a65 := rosetta_g_miss_num_map(ddx_txlv_rec.dnz_asset_id);
341 p10_a66 := ddx_txlv_rec.date_due;
342 p10_a67 := rosetta_g_miss_num_map(ddx_txlv_rec.rep_asset_id);
343 p10_a68 := rosetta_g_miss_num_map(ddx_txlv_rec.lke_asset_id);
344 p10_a69 := rosetta_g_miss_num_map(ddx_txlv_rec.match_amount);
345 p10_a70 := ddx_txlv_rec.split_into_singles_flag;
346 p10_a71 := rosetta_g_miss_num_map(ddx_txlv_rec.split_into_units);
347 p10_a72 := ddx_txlv_rec.currency_code;
348 p10_a73 := ddx_txlv_rec.currency_conversion_type;
349 p10_a74 := rosetta_g_miss_num_map(ddx_txlv_rec.currency_conversion_rate);
350 p10_a75 := ddx_txlv_rec.currency_conversion_date;
351
352 p11_a0 := rosetta_g_miss_num_map(ddx_trxv_rec.id);
353 p11_a1 := rosetta_g_miss_num_map(ddx_trxv_rec.object_version_number);
354 p11_a2 := rosetta_g_miss_num_map(ddx_trxv_rec.ica_id);
355 p11_a3 := ddx_trxv_rec.attribute_category;
356 p11_a4 := ddx_trxv_rec.attribute1;
357 p11_a5 := ddx_trxv_rec.attribute2;
358 p11_a6 := ddx_trxv_rec.attribute3;
359 p11_a7 := ddx_trxv_rec.attribute4;
360 p11_a8 := ddx_trxv_rec.attribute5;
361 p11_a9 := ddx_trxv_rec.attribute6;
362 p11_a10 := ddx_trxv_rec.attribute7;
363 p11_a11 := ddx_trxv_rec.attribute8;
364 p11_a12 := ddx_trxv_rec.attribute9;
365 p11_a13 := ddx_trxv_rec.attribute10;
366 p11_a14 := ddx_trxv_rec.attribute11;
367 p11_a15 := ddx_trxv_rec.attribute12;
368 p11_a16 := ddx_trxv_rec.attribute13;
369 p11_a17 := ddx_trxv_rec.attribute14;
370 p11_a18 := ddx_trxv_rec.attribute15;
371 p11_a19 := ddx_trxv_rec.tas_type;
372 p11_a20 := rosetta_g_miss_num_map(ddx_trxv_rec.created_by);
373 p11_a21 := ddx_trxv_rec.creation_date;
374 p11_a22 := rosetta_g_miss_num_map(ddx_trxv_rec.last_updated_by);
375 p11_a23 := ddx_trxv_rec.last_update_date;
376 p11_a24 := rosetta_g_miss_num_map(ddx_trxv_rec.last_update_login);
377 p11_a25 := ddx_trxv_rec.tsu_code;
378 p11_a26 := rosetta_g_miss_num_map(ddx_trxv_rec.try_id);
379 p11_a27 := ddx_trxv_rec.date_trans_occurred;
380 p11_a28 := rosetta_g_miss_num_map(ddx_trxv_rec.trans_number);
381 p11_a29 := ddx_trxv_rec.comments;
382 p11_a30 := rosetta_g_miss_num_map(ddx_trxv_rec.req_asset_id);
383 p11_a31 := rosetta_g_miss_num_map(ddx_trxv_rec.total_match_amount);
384 p11_a32 := rosetta_g_miss_num_map(ddx_trxv_rec.org_id);
385 end;
386
387 procedure create_split_transaction(p_api_version NUMBER
388 , p_init_msg_list VARCHAR2
389 , x_return_status out nocopy VARCHAR2
390 , x_msg_count out nocopy NUMBER
391 , x_msg_data out nocopy VARCHAR2
392 , p_cle_id NUMBER
393 , p_split_into_individuals_yn VARCHAR2
394 , p_split_into_units NUMBER
395 , p8_a0 out nocopy JTF_NUMBER_TABLE
396 , p8_a1 out nocopy JTF_NUMBER_TABLE
397 , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
398 , p8_a3 out nocopy JTF_NUMBER_TABLE
399 , p8_a4 out nocopy JTF_NUMBER_TABLE
400 , p8_a5 out nocopy JTF_NUMBER_TABLE
401 , p8_a6 out nocopy JTF_VARCHAR2_TABLE_100
402 , p8_a7 out nocopy JTF_VARCHAR2_TABLE_2000
403 , p8_a8 out nocopy JTF_NUMBER_TABLE
404 , p8_a9 out nocopy JTF_NUMBER_TABLE
405 , p8_a10 out nocopy JTF_VARCHAR2_TABLE_100
406 , p8_a11 out nocopy JTF_NUMBER_TABLE
407 , p8_a12 out nocopy JTF_VARCHAR2_TABLE_100
408 , p8_a13 out nocopy JTF_NUMBER_TABLE
409 , p8_a14 out nocopy JTF_NUMBER_TABLE
410 , p8_a15 out nocopy JTF_NUMBER_TABLE
411 , p8_a16 out nocopy JTF_NUMBER_TABLE
412 , p8_a17 out nocopy JTF_VARCHAR2_TABLE_100
413 , p8_a18 out nocopy JTF_VARCHAR2_TABLE_500
414 , p8_a19 out nocopy JTF_VARCHAR2_TABLE_500
415 , p8_a20 out nocopy JTF_VARCHAR2_TABLE_500
416 , p8_a21 out nocopy JTF_VARCHAR2_TABLE_500
417 , p8_a22 out nocopy JTF_VARCHAR2_TABLE_500
418 , p8_a23 out nocopy JTF_VARCHAR2_TABLE_500
419 , p8_a24 out nocopy JTF_VARCHAR2_TABLE_500
420 , p8_a25 out nocopy JTF_VARCHAR2_TABLE_500
421 , p8_a26 out nocopy JTF_VARCHAR2_TABLE_500
422 , p8_a27 out nocopy JTF_VARCHAR2_TABLE_500
423 , p8_a28 out nocopy JTF_VARCHAR2_TABLE_500
424 , p8_a29 out nocopy JTF_VARCHAR2_TABLE_500
425 , p8_a30 out nocopy JTF_VARCHAR2_TABLE_500
426 , p8_a31 out nocopy JTF_VARCHAR2_TABLE_500
427 , p8_a32 out nocopy JTF_VARCHAR2_TABLE_500
428 , p8_a33 out nocopy JTF_NUMBER_TABLE
429 , p8_a34 out nocopy JTF_DATE_TABLE
430 , p8_a35 out nocopy JTF_NUMBER_TABLE
431 , p8_a36 out nocopy JTF_DATE_TABLE
432 , p8_a37 out nocopy JTF_NUMBER_TABLE
433 , p8_a38 out nocopy JTF_VARCHAR2_TABLE_100
434 , p8_a39 out nocopy JTF_VARCHAR2_TABLE_100
435 , p8_a40 out nocopy JTF_NUMBER_TABLE
436 , p8_a41 out nocopy JTF_DATE_TABLE
437 , p9_a0 out nocopy NUMBER
438 , p9_a1 out nocopy NUMBER
439 , p9_a2 out nocopy VARCHAR2
440 , p9_a3 out nocopy NUMBER
441 , p9_a4 out nocopy NUMBER
442 , p9_a5 out nocopy NUMBER
443 , p9_a6 out nocopy NUMBER
444 , p9_a7 out nocopy NUMBER
445 , p9_a8 out nocopy NUMBER
446 , p9_a9 out nocopy NUMBER
447 , p9_a10 out nocopy NUMBER
448 , p9_a11 out nocopy NUMBER
449 , p9_a12 out nocopy VARCHAR2
450 , p9_a13 out nocopy VARCHAR2
451 , p9_a14 out nocopy VARCHAR2
452 , p9_a15 out nocopy NUMBER
453 , p9_a16 out nocopy NUMBER
454 , p9_a17 out nocopy NUMBER
455 , p9_a18 out nocopy VARCHAR2
456 , p9_a19 out nocopy NUMBER
457 , p9_a20 out nocopy NUMBER
458 , p9_a21 out nocopy VARCHAR2
459 , p9_a22 out nocopy VARCHAR2
460 , p9_a23 out nocopy VARCHAR2
461 , p9_a24 out nocopy VARCHAR2
462 , p9_a25 out nocopy DATE
463 , p9_a26 out nocopy DATE
464 , p9_a27 out nocopy DATE
465 , p9_a28 out nocopy NUMBER
466 , p9_a29 out nocopy NUMBER
467 , p9_a30 out nocopy NUMBER
468 , p9_a31 out nocopy VARCHAR2
469 , p9_a32 out nocopy NUMBER
470 , p9_a33 out nocopy NUMBER
471 , p9_a34 out nocopy NUMBER
472 , p9_a35 out nocopy VARCHAR2
473 , p9_a36 out nocopy VARCHAR2
474 , p9_a37 out nocopy VARCHAR2
475 , p9_a38 out nocopy VARCHAR2
476 , p9_a39 out nocopy VARCHAR2
477 , p9_a40 out nocopy VARCHAR2
478 , p9_a41 out nocopy VARCHAR2
479 , p9_a42 out nocopy VARCHAR2
480 , p9_a43 out nocopy VARCHAR2
481 , p9_a44 out nocopy VARCHAR2
482 , p9_a45 out nocopy VARCHAR2
483 , p9_a46 out nocopy VARCHAR2
484 , p9_a47 out nocopy VARCHAR2
485 , p9_a48 out nocopy VARCHAR2
486 , p9_a49 out nocopy VARCHAR2
487 , p9_a50 out nocopy VARCHAR2
488 , p9_a51 out nocopy NUMBER
489 , p9_a52 out nocopy DATE
490 , p9_a53 out nocopy NUMBER
491 , p9_a54 out nocopy DATE
492 , p9_a55 out nocopy NUMBER
493 , p9_a56 out nocopy VARCHAR2
494 , p9_a57 out nocopy NUMBER
495 , p9_a58 out nocopy NUMBER
496 , p9_a59 out nocopy NUMBER
497 , p9_a60 out nocopy NUMBER
498 , p9_a61 out nocopy NUMBER
499 , p9_a62 out nocopy NUMBER
500 , p9_a63 out nocopy NUMBER
501 , p9_a64 out nocopy NUMBER
502 , p9_a65 out nocopy NUMBER
503 , p9_a66 out nocopy DATE
504 , p9_a67 out nocopy NUMBER
505 , p9_a68 out nocopy NUMBER
506 , p9_a69 out nocopy NUMBER
507 , p9_a70 out nocopy VARCHAR2
508 , p9_a71 out nocopy NUMBER
509 , p9_a72 out nocopy VARCHAR2
510 , p9_a73 out nocopy VARCHAR2
511 , p9_a74 out nocopy NUMBER
512 , p9_a75 out nocopy DATE
513 , p10_a0 out nocopy NUMBER
514 , p10_a1 out nocopy NUMBER
515 , p10_a2 out nocopy NUMBER
516 , p10_a3 out nocopy VARCHAR2
517 , p10_a4 out nocopy VARCHAR2
518 , p10_a5 out nocopy VARCHAR2
519 , p10_a6 out nocopy VARCHAR2
520 , p10_a7 out nocopy VARCHAR2
521 , p10_a8 out nocopy VARCHAR2
522 , p10_a9 out nocopy VARCHAR2
523 , p10_a10 out nocopy VARCHAR2
524 , p10_a11 out nocopy VARCHAR2
525 , p10_a12 out nocopy VARCHAR2
526 , p10_a13 out nocopy VARCHAR2
527 , p10_a14 out nocopy VARCHAR2
528 , p10_a15 out nocopy VARCHAR2
529 , p10_a16 out nocopy VARCHAR2
530 , p10_a17 out nocopy VARCHAR2
531 , p10_a18 out nocopy VARCHAR2
532 , p10_a19 out nocopy VARCHAR2
533 , p10_a20 out nocopy NUMBER
534 , p10_a21 out nocopy DATE
535 , p10_a22 out nocopy NUMBER
536 , p10_a23 out nocopy DATE
537 , p10_a24 out nocopy NUMBER
538 , p10_a25 out nocopy VARCHAR2
539 , p10_a26 out nocopy NUMBER
540 , p10_a27 out nocopy DATE
541 , p10_a28 out nocopy NUMBER
542 , p10_a29 out nocopy VARCHAR2
543 , p10_a30 out nocopy NUMBER
544 , p10_a31 out nocopy NUMBER
545 , p10_a32 out nocopy NUMBER
546 )
547
548 as
549 ddx_txdv_tbl okl_split_asset_pub.txdv_tbl_type;
550 ddx_txlv_rec okl_split_asset_pub.txlv_rec_type;
551 ddx_trxv_rec okl_split_asset_pub.trxv_rec_type;
552 ddindx binary_integer; indx binary_integer;
553 begin
554
555 -- copy data to the local IN or IN-OUT args, if any
556
557
558
559
560
561
562
563
564
565
566
567 -- here's the delegated call to the old PL/SQL routine
568 okl_split_asset_pub.create_split_transaction(p_api_version,
569 p_init_msg_list,
570 x_return_status,
571 x_msg_count,
572 x_msg_data,
573 p_cle_id,
574 p_split_into_individuals_yn,
575 p_split_into_units,
576 ddx_txdv_tbl,
577 ddx_txlv_rec,
578 ddx_trxv_rec);
579
580 -- copy data back from the local variables to OUT or IN-OUT args, if any
581
582
583
584
585
586
587
588
589 okl_asd_pvt_w.rosetta_table_copy_out_p8(ddx_txdv_tbl, p8_a0
590 , p8_a1
591 , p8_a2
592 , p8_a3
593 , p8_a4
594 , p8_a5
595 , p8_a6
596 , p8_a7
597 , p8_a8
598 , p8_a9
599 , p8_a10
600 , p8_a11
601 , p8_a12
602 , p8_a13
603 , p8_a14
604 , p8_a15
605 , p8_a16
606 , p8_a17
607 , p8_a18
608 , p8_a19
609 , p8_a20
610 , p8_a21
611 , p8_a22
612 , p8_a23
613 , p8_a24
614 , p8_a25
615 , p8_a26
616 , p8_a27
617 , p8_a28
618 , p8_a29
619 , p8_a30
620 , p8_a31
621 , p8_a32
622 , p8_a33
623 , p8_a34
624 , p8_a35
625 , p8_a36
626 , p8_a37
627 , p8_a38
628 , p8_a39
629 , p8_a40
630 , p8_a41
631 );
632
633 p9_a0 := rosetta_g_miss_num_map(ddx_txlv_rec.id);
634 p9_a1 := rosetta_g_miss_num_map(ddx_txlv_rec.object_version_number);
635 p9_a2 := ddx_txlv_rec.sfwt_flag;
636 p9_a3 := rosetta_g_miss_num_map(ddx_txlv_rec.tas_id);
637 p9_a4 := rosetta_g_miss_num_map(ddx_txlv_rec.ilo_id);
638 p9_a5 := rosetta_g_miss_num_map(ddx_txlv_rec.ilo_id_old);
639 p9_a6 := rosetta_g_miss_num_map(ddx_txlv_rec.iay_id);
640 p9_a7 := rosetta_g_miss_num_map(ddx_txlv_rec.iay_id_new);
641 p9_a8 := rosetta_g_miss_num_map(ddx_txlv_rec.kle_id);
642 p9_a9 := rosetta_g_miss_num_map(ddx_txlv_rec.dnz_khr_id);
643 p9_a10 := rosetta_g_miss_num_map(ddx_txlv_rec.line_number);
644 p9_a11 := rosetta_g_miss_num_map(ddx_txlv_rec.org_id);
645 p9_a12 := ddx_txlv_rec.tal_type;
646 p9_a13 := ddx_txlv_rec.asset_number;
647 p9_a14 := ddx_txlv_rec.description;
648 p9_a15 := rosetta_g_miss_num_map(ddx_txlv_rec.fa_location_id);
649 p9_a16 := rosetta_g_miss_num_map(ddx_txlv_rec.original_cost);
650 p9_a17 := rosetta_g_miss_num_map(ddx_txlv_rec.current_units);
651 p9_a18 := ddx_txlv_rec.manufacturer_name;
652 p9_a19 := rosetta_g_miss_num_map(ddx_txlv_rec.year_manufactured);
653 p9_a20 := rosetta_g_miss_num_map(ddx_txlv_rec.supplier_id);
654 p9_a21 := ddx_txlv_rec.used_asset_yn;
655 p9_a22 := ddx_txlv_rec.tag_number;
656 p9_a23 := ddx_txlv_rec.model_number;
657 p9_a24 := ddx_txlv_rec.corporate_book;
658 p9_a25 := ddx_txlv_rec.date_purchased;
659 p9_a26 := ddx_txlv_rec.date_delivery;
660 p9_a27 := ddx_txlv_rec.in_service_date;
661 p9_a28 := rosetta_g_miss_num_map(ddx_txlv_rec.life_in_months);
662 p9_a29 := rosetta_g_miss_num_map(ddx_txlv_rec.depreciation_id);
663 p9_a30 := rosetta_g_miss_num_map(ddx_txlv_rec.depreciation_cost);
664 p9_a31 := ddx_txlv_rec.deprn_method;
665 p9_a32 := rosetta_g_miss_num_map(ddx_txlv_rec.deprn_rate);
666 p9_a33 := rosetta_g_miss_num_map(ddx_txlv_rec.salvage_value);
667 p9_a34 := rosetta_g_miss_num_map(ddx_txlv_rec.percent_salvage_value);
668 p9_a35 := ddx_txlv_rec.attribute_category;
669 p9_a36 := ddx_txlv_rec.attribute1;
670 p9_a37 := ddx_txlv_rec.attribute2;
671 p9_a38 := ddx_txlv_rec.attribute3;
672 p9_a39 := ddx_txlv_rec.attribute4;
673 p9_a40 := ddx_txlv_rec.attribute5;
674 p9_a41 := ddx_txlv_rec.attribute6;
675 p9_a42 := ddx_txlv_rec.attribute7;
676 p9_a43 := ddx_txlv_rec.attribute8;
677 p9_a44 := ddx_txlv_rec.attribute9;
678 p9_a45 := ddx_txlv_rec.attribute10;
679 p9_a46 := ddx_txlv_rec.attribute11;
680 p9_a47 := ddx_txlv_rec.attribute12;
681 p9_a48 := ddx_txlv_rec.attribute13;
682 p9_a49 := ddx_txlv_rec.attribute14;
683 p9_a50 := ddx_txlv_rec.attribute15;
684 p9_a51 := rosetta_g_miss_num_map(ddx_txlv_rec.created_by);
685 p9_a52 := ddx_txlv_rec.creation_date;
686 p9_a53 := rosetta_g_miss_num_map(ddx_txlv_rec.last_updated_by);
687 p9_a54 := ddx_txlv_rec.last_update_date;
688 p9_a55 := rosetta_g_miss_num_map(ddx_txlv_rec.last_update_login);
689 p9_a56 := ddx_txlv_rec.depreciate_yn;
690 p9_a57 := rosetta_g_miss_num_map(ddx_txlv_rec.hold_period_days);
691 p9_a58 := rosetta_g_miss_num_map(ddx_txlv_rec.old_salvage_value);
692 p9_a59 := rosetta_g_miss_num_map(ddx_txlv_rec.new_residual_value);
693 p9_a60 := rosetta_g_miss_num_map(ddx_txlv_rec.old_residual_value);
694 p9_a61 := rosetta_g_miss_num_map(ddx_txlv_rec.units_retired);
695 p9_a62 := rosetta_g_miss_num_map(ddx_txlv_rec.cost_retired);
696 p9_a63 := rosetta_g_miss_num_map(ddx_txlv_rec.sale_proceeds);
697 p9_a64 := rosetta_g_miss_num_map(ddx_txlv_rec.removal_cost);
698 p9_a65 := rosetta_g_miss_num_map(ddx_txlv_rec.dnz_asset_id);
699 p9_a66 := ddx_txlv_rec.date_due;
700 p9_a67 := rosetta_g_miss_num_map(ddx_txlv_rec.rep_asset_id);
701 p9_a68 := rosetta_g_miss_num_map(ddx_txlv_rec.lke_asset_id);
702 p9_a69 := rosetta_g_miss_num_map(ddx_txlv_rec.match_amount);
703 p9_a70 := ddx_txlv_rec.split_into_singles_flag;
704 p9_a71 := rosetta_g_miss_num_map(ddx_txlv_rec.split_into_units);
705 p9_a72 := ddx_txlv_rec.currency_code;
706 p9_a73 := ddx_txlv_rec.currency_conversion_type;
707 p9_a74 := rosetta_g_miss_num_map(ddx_txlv_rec.currency_conversion_rate);
708 p9_a75 := ddx_txlv_rec.currency_conversion_date;
709
710 p10_a0 := rosetta_g_miss_num_map(ddx_trxv_rec.id);
711 p10_a1 := rosetta_g_miss_num_map(ddx_trxv_rec.object_version_number);
712 p10_a2 := rosetta_g_miss_num_map(ddx_trxv_rec.ica_id);
713 p10_a3 := ddx_trxv_rec.attribute_category;
714 p10_a4 := ddx_trxv_rec.attribute1;
715 p10_a5 := ddx_trxv_rec.attribute2;
716 p10_a6 := ddx_trxv_rec.attribute3;
717 p10_a7 := ddx_trxv_rec.attribute4;
718 p10_a8 := ddx_trxv_rec.attribute5;
719 p10_a9 := ddx_trxv_rec.attribute6;
720 p10_a10 := ddx_trxv_rec.attribute7;
721 p10_a11 := ddx_trxv_rec.attribute8;
722 p10_a12 := ddx_trxv_rec.attribute9;
723 p10_a13 := ddx_trxv_rec.attribute10;
724 p10_a14 := ddx_trxv_rec.attribute11;
725 p10_a15 := ddx_trxv_rec.attribute12;
726 p10_a16 := ddx_trxv_rec.attribute13;
727 p10_a17 := ddx_trxv_rec.attribute14;
728 p10_a18 := ddx_trxv_rec.attribute15;
729 p10_a19 := ddx_trxv_rec.tas_type;
730 p10_a20 := rosetta_g_miss_num_map(ddx_trxv_rec.created_by);
731 p10_a21 := ddx_trxv_rec.creation_date;
732 p10_a22 := rosetta_g_miss_num_map(ddx_trxv_rec.last_updated_by);
733 p10_a23 := ddx_trxv_rec.last_update_date;
734 p10_a24 := rosetta_g_miss_num_map(ddx_trxv_rec.last_update_login);
735 p10_a25 := ddx_trxv_rec.tsu_code;
736 p10_a26 := rosetta_g_miss_num_map(ddx_trxv_rec.try_id);
737 p10_a27 := ddx_trxv_rec.date_trans_occurred;
738 p10_a28 := rosetta_g_miss_num_map(ddx_trxv_rec.trans_number);
739 p10_a29 := ddx_trxv_rec.comments;
740 p10_a30 := rosetta_g_miss_num_map(ddx_trxv_rec.req_asset_id);
741 p10_a31 := rosetta_g_miss_num_map(ddx_trxv_rec.total_match_amount);
742 p10_a32 := rosetta_g_miss_num_map(ddx_trxv_rec.org_id);
743 end;
744
745 procedure create_split_transaction(p_api_version NUMBER
746 , p_init_msg_list VARCHAR2
747 , x_return_status out nocopy VARCHAR2
748 , x_msg_count out nocopy NUMBER
749 , x_msg_data out nocopy VARCHAR2
750 , p_cle_id NUMBER
751 , p_split_into_individuals_yn VARCHAR2
752 , p_split_into_units NUMBER
753 , p8_a0 JTF_NUMBER_TABLE
754 , p_trx_date date
755 , p10_a0 out nocopy JTF_NUMBER_TABLE
756 , p10_a1 out nocopy JTF_NUMBER_TABLE
757 , p10_a2 out nocopy JTF_VARCHAR2_TABLE_100
758 , p10_a3 out nocopy JTF_NUMBER_TABLE
759 , p10_a4 out nocopy JTF_NUMBER_TABLE
760 , p10_a5 out nocopy JTF_NUMBER_TABLE
761 , p10_a6 out nocopy JTF_VARCHAR2_TABLE_100
762 , p10_a7 out nocopy JTF_VARCHAR2_TABLE_2000
763 , p10_a8 out nocopy JTF_NUMBER_TABLE
764 , p10_a9 out nocopy JTF_NUMBER_TABLE
765 , p10_a10 out nocopy JTF_VARCHAR2_TABLE_100
766 , p10_a11 out nocopy JTF_NUMBER_TABLE
767 , p10_a12 out nocopy JTF_VARCHAR2_TABLE_100
768 , p10_a13 out nocopy JTF_NUMBER_TABLE
769 , p10_a14 out nocopy JTF_NUMBER_TABLE
770 , p10_a15 out nocopy JTF_NUMBER_TABLE
771 , p10_a16 out nocopy JTF_NUMBER_TABLE
772 , p10_a17 out nocopy JTF_VARCHAR2_TABLE_100
773 , p10_a18 out nocopy JTF_VARCHAR2_TABLE_500
774 , p10_a19 out nocopy JTF_VARCHAR2_TABLE_500
775 , p10_a20 out nocopy JTF_VARCHAR2_TABLE_500
776 , p10_a21 out nocopy JTF_VARCHAR2_TABLE_500
777 , p10_a22 out nocopy JTF_VARCHAR2_TABLE_500
778 , p10_a23 out nocopy JTF_VARCHAR2_TABLE_500
779 , p10_a24 out nocopy JTF_VARCHAR2_TABLE_500
780 , p10_a25 out nocopy JTF_VARCHAR2_TABLE_500
781 , p10_a26 out nocopy JTF_VARCHAR2_TABLE_500
782 , p10_a27 out nocopy JTF_VARCHAR2_TABLE_500
783 , p10_a28 out nocopy JTF_VARCHAR2_TABLE_500
784 , p10_a29 out nocopy JTF_VARCHAR2_TABLE_500
785 , p10_a30 out nocopy JTF_VARCHAR2_TABLE_500
786 , p10_a31 out nocopy JTF_VARCHAR2_TABLE_500
787 , p10_a32 out nocopy JTF_VARCHAR2_TABLE_500
788 , p10_a33 out nocopy JTF_NUMBER_TABLE
789 , p10_a34 out nocopy JTF_DATE_TABLE
790 , p10_a35 out nocopy JTF_NUMBER_TABLE
791 , p10_a36 out nocopy JTF_DATE_TABLE
792 , p10_a37 out nocopy JTF_NUMBER_TABLE
793 , p10_a38 out nocopy JTF_VARCHAR2_TABLE_100
794 , p10_a39 out nocopy JTF_VARCHAR2_TABLE_100
795 , p10_a40 out nocopy JTF_NUMBER_TABLE
796 , p10_a41 out nocopy JTF_DATE_TABLE
797 , p11_a0 out nocopy NUMBER
798 , p11_a1 out nocopy NUMBER
799 , p11_a2 out nocopy VARCHAR2
800 , p11_a3 out nocopy NUMBER
801 , p11_a4 out nocopy NUMBER
802 , p11_a5 out nocopy NUMBER
803 , p11_a6 out nocopy NUMBER
804 , p11_a7 out nocopy NUMBER
805 , p11_a8 out nocopy NUMBER
806 , p11_a9 out nocopy NUMBER
807 , p11_a10 out nocopy NUMBER
808 , p11_a11 out nocopy NUMBER
809 , p11_a12 out nocopy VARCHAR2
810 , p11_a13 out nocopy VARCHAR2
811 , p11_a14 out nocopy VARCHAR2
812 , p11_a15 out nocopy NUMBER
813 , p11_a16 out nocopy NUMBER
814 , p11_a17 out nocopy NUMBER
815 , p11_a18 out nocopy VARCHAR2
816 , p11_a19 out nocopy NUMBER
817 , p11_a20 out nocopy NUMBER
818 , p11_a21 out nocopy VARCHAR2
819 , p11_a22 out nocopy VARCHAR2
820 , p11_a23 out nocopy VARCHAR2
821 , p11_a24 out nocopy VARCHAR2
822 , p11_a25 out nocopy DATE
823 , p11_a26 out nocopy DATE
824 , p11_a27 out nocopy DATE
825 , p11_a28 out nocopy NUMBER
826 , p11_a29 out nocopy NUMBER
827 , p11_a30 out nocopy NUMBER
828 , p11_a31 out nocopy VARCHAR2
829 , p11_a32 out nocopy NUMBER
830 , p11_a33 out nocopy NUMBER
831 , p11_a34 out nocopy NUMBER
832 , p11_a35 out nocopy VARCHAR2
833 , p11_a36 out nocopy VARCHAR2
834 , p11_a37 out nocopy VARCHAR2
835 , p11_a38 out nocopy VARCHAR2
836 , p11_a39 out nocopy VARCHAR2
837 , p11_a40 out nocopy VARCHAR2
838 , p11_a41 out nocopy VARCHAR2
839 , p11_a42 out nocopy VARCHAR2
840 , p11_a43 out nocopy VARCHAR2
841 , p11_a44 out nocopy VARCHAR2
842 , p11_a45 out nocopy VARCHAR2
843 , p11_a46 out nocopy VARCHAR2
844 , p11_a47 out nocopy VARCHAR2
845 , p11_a48 out nocopy VARCHAR2
846 , p11_a49 out nocopy VARCHAR2
847 , p11_a50 out nocopy VARCHAR2
848 , p11_a51 out nocopy NUMBER
849 , p11_a52 out nocopy DATE
850 , p11_a53 out nocopy NUMBER
851 , p11_a54 out nocopy DATE
852 , p11_a55 out nocopy NUMBER
853 , p11_a56 out nocopy VARCHAR2
854 , p11_a57 out nocopy NUMBER
855 , p11_a58 out nocopy NUMBER
856 , p11_a59 out nocopy NUMBER
857 , p11_a60 out nocopy NUMBER
858 , p11_a61 out nocopy NUMBER
859 , p11_a62 out nocopy NUMBER
860 , p11_a63 out nocopy NUMBER
861 , p11_a64 out nocopy NUMBER
862 , p11_a65 out nocopy NUMBER
863 , p11_a66 out nocopy DATE
864 , p11_a67 out nocopy NUMBER
865 , p11_a68 out nocopy NUMBER
866 , p11_a69 out nocopy NUMBER
867 , p11_a70 out nocopy VARCHAR2
868 , p11_a71 out nocopy NUMBER
869 , p11_a72 out nocopy VARCHAR2
870 , p11_a73 out nocopy VARCHAR2
871 , p11_a74 out nocopy NUMBER
872 , p11_a75 out nocopy DATE
873 , p12_a0 out nocopy NUMBER
874 , p12_a1 out nocopy NUMBER
875 , p12_a2 out nocopy NUMBER
876 , p12_a3 out nocopy VARCHAR2
877 , p12_a4 out nocopy VARCHAR2
878 , p12_a5 out nocopy VARCHAR2
879 , p12_a6 out nocopy VARCHAR2
880 , p12_a7 out nocopy VARCHAR2
881 , p12_a8 out nocopy VARCHAR2
882 , p12_a9 out nocopy VARCHAR2
883 , p12_a10 out nocopy VARCHAR2
884 , p12_a11 out nocopy VARCHAR2
885 , p12_a12 out nocopy VARCHAR2
886 , p12_a13 out nocopy VARCHAR2
887 , p12_a14 out nocopy VARCHAR2
888 , p12_a15 out nocopy VARCHAR2
889 , p12_a16 out nocopy VARCHAR2
890 , p12_a17 out nocopy VARCHAR2
891 , p12_a18 out nocopy VARCHAR2
892 , p12_a19 out nocopy VARCHAR2
893 , p12_a20 out nocopy NUMBER
894 , p12_a21 out nocopy DATE
895 , p12_a22 out nocopy NUMBER
896 , p12_a23 out nocopy DATE
897 , p12_a24 out nocopy NUMBER
898 , p12_a25 out nocopy VARCHAR2
899 , p12_a26 out nocopy NUMBER
900 , p12_a27 out nocopy DATE
901 , p12_a28 out nocopy NUMBER
902 , p12_a29 out nocopy VARCHAR2
903 , p12_a30 out nocopy NUMBER
904 , p12_a31 out nocopy NUMBER
905 , p12_a32 out nocopy NUMBER
906 )
907
908 as
909 ddp_ib_tbl okl_split_asset_pub.ib_tbl_type;
910 ddp_trx_date date;
911 ddx_txdv_tbl okl_split_asset_pub.txdv_tbl_type;
912 ddx_txlv_rec okl_split_asset_pub.txlv_rec_type;
913 ddx_trxv_rec okl_split_asset_pub.trxv_rec_type;
914 ddindx binary_integer; indx binary_integer;
915 begin
916
917 -- copy data to the local IN or IN-OUT args, if any
918
919
920
921
922
923
924
925
926 okl_split_asset_pvt_w.rosetta_table_copy_in_p13(ddp_ib_tbl, p8_a0
927 );
928
929 ddp_trx_date := rosetta_g_miss_date_in_map(p_trx_date);
930
931
932
933
934 -- here's the delegated call to the old PL/SQL routine
935 okl_split_asset_pub.create_split_transaction(p_api_version,
936 p_init_msg_list,
937 x_return_status,
938 x_msg_count,
939 x_msg_data,
940 p_cle_id,
941 p_split_into_individuals_yn,
942 p_split_into_units,
943 ddp_ib_tbl,
944 ddp_trx_date,
945 ddx_txdv_tbl,
946 ddx_txlv_rec,
947 ddx_trxv_rec);
948
949 -- copy data back from the local variables to OUT or IN-OUT args, if any
950
951
952
953
954
955
956
957
958
959
960 okl_asd_pvt_w.rosetta_table_copy_out_p8(ddx_txdv_tbl, p10_a0
961 , p10_a1
962 , p10_a2
963 , p10_a3
964 , p10_a4
965 , p10_a5
966 , p10_a6
967 , p10_a7
968 , p10_a8
969 , p10_a9
970 , p10_a10
971 , p10_a11
972 , p10_a12
973 , p10_a13
974 , p10_a14
975 , p10_a15
976 , p10_a16
977 , p10_a17
978 , p10_a18
979 , p10_a19
980 , p10_a20
981 , p10_a21
982 , p10_a22
983 , p10_a23
984 , p10_a24
985 , p10_a25
986 , p10_a26
987 , p10_a27
988 , p10_a28
989 , p10_a29
990 , p10_a30
991 , p10_a31
992 , p10_a32
993 , p10_a33
994 , p10_a34
995 , p10_a35
996 , p10_a36
997 , p10_a37
998 , p10_a38
999 , p10_a39
1000 , p10_a40
1001 , p10_a41
1002 );
1003
1004 p11_a0 := rosetta_g_miss_num_map(ddx_txlv_rec.id);
1005 p11_a1 := rosetta_g_miss_num_map(ddx_txlv_rec.object_version_number);
1006 p11_a2 := ddx_txlv_rec.sfwt_flag;
1007 p11_a3 := rosetta_g_miss_num_map(ddx_txlv_rec.tas_id);
1008 p11_a4 := rosetta_g_miss_num_map(ddx_txlv_rec.ilo_id);
1009 p11_a5 := rosetta_g_miss_num_map(ddx_txlv_rec.ilo_id_old);
1010 p11_a6 := rosetta_g_miss_num_map(ddx_txlv_rec.iay_id);
1011 p11_a7 := rosetta_g_miss_num_map(ddx_txlv_rec.iay_id_new);
1012 p11_a8 := rosetta_g_miss_num_map(ddx_txlv_rec.kle_id);
1013 p11_a9 := rosetta_g_miss_num_map(ddx_txlv_rec.dnz_khr_id);
1014 p11_a10 := rosetta_g_miss_num_map(ddx_txlv_rec.line_number);
1015 p11_a11 := rosetta_g_miss_num_map(ddx_txlv_rec.org_id);
1016 p11_a12 := ddx_txlv_rec.tal_type;
1017 p11_a13 := ddx_txlv_rec.asset_number;
1018 p11_a14 := ddx_txlv_rec.description;
1019 p11_a15 := rosetta_g_miss_num_map(ddx_txlv_rec.fa_location_id);
1020 p11_a16 := rosetta_g_miss_num_map(ddx_txlv_rec.original_cost);
1021 p11_a17 := rosetta_g_miss_num_map(ddx_txlv_rec.current_units);
1022 p11_a18 := ddx_txlv_rec.manufacturer_name;
1023 p11_a19 := rosetta_g_miss_num_map(ddx_txlv_rec.year_manufactured);
1024 p11_a20 := rosetta_g_miss_num_map(ddx_txlv_rec.supplier_id);
1025 p11_a21 := ddx_txlv_rec.used_asset_yn;
1026 p11_a22 := ddx_txlv_rec.tag_number;
1027 p11_a23 := ddx_txlv_rec.model_number;
1028 p11_a24 := ddx_txlv_rec.corporate_book;
1029 p11_a25 := ddx_txlv_rec.date_purchased;
1030 p11_a26 := ddx_txlv_rec.date_delivery;
1031 p11_a27 := ddx_txlv_rec.in_service_date;
1032 p11_a28 := rosetta_g_miss_num_map(ddx_txlv_rec.life_in_months);
1033 p11_a29 := rosetta_g_miss_num_map(ddx_txlv_rec.depreciation_id);
1034 p11_a30 := rosetta_g_miss_num_map(ddx_txlv_rec.depreciation_cost);
1035 p11_a31 := ddx_txlv_rec.deprn_method;
1036 p11_a32 := rosetta_g_miss_num_map(ddx_txlv_rec.deprn_rate);
1037 p11_a33 := rosetta_g_miss_num_map(ddx_txlv_rec.salvage_value);
1038 p11_a34 := rosetta_g_miss_num_map(ddx_txlv_rec.percent_salvage_value);
1039 p11_a35 := ddx_txlv_rec.attribute_category;
1040 p11_a36 := ddx_txlv_rec.attribute1;
1041 p11_a37 := ddx_txlv_rec.attribute2;
1042 p11_a38 := ddx_txlv_rec.attribute3;
1043 p11_a39 := ddx_txlv_rec.attribute4;
1044 p11_a40 := ddx_txlv_rec.attribute5;
1045 p11_a41 := ddx_txlv_rec.attribute6;
1046 p11_a42 := ddx_txlv_rec.attribute7;
1047 p11_a43 := ddx_txlv_rec.attribute8;
1048 p11_a44 := ddx_txlv_rec.attribute9;
1049 p11_a45 := ddx_txlv_rec.attribute10;
1050 p11_a46 := ddx_txlv_rec.attribute11;
1051 p11_a47 := ddx_txlv_rec.attribute12;
1052 p11_a48 := ddx_txlv_rec.attribute13;
1053 p11_a49 := ddx_txlv_rec.attribute14;
1054 p11_a50 := ddx_txlv_rec.attribute15;
1055 p11_a51 := rosetta_g_miss_num_map(ddx_txlv_rec.created_by);
1056 p11_a52 := ddx_txlv_rec.creation_date;
1057 p11_a53 := rosetta_g_miss_num_map(ddx_txlv_rec.last_updated_by);
1058 p11_a54 := ddx_txlv_rec.last_update_date;
1059 p11_a55 := rosetta_g_miss_num_map(ddx_txlv_rec.last_update_login);
1060 p11_a56 := ddx_txlv_rec.depreciate_yn;
1061 p11_a57 := rosetta_g_miss_num_map(ddx_txlv_rec.hold_period_days);
1062 p11_a58 := rosetta_g_miss_num_map(ddx_txlv_rec.old_salvage_value);
1063 p11_a59 := rosetta_g_miss_num_map(ddx_txlv_rec.new_residual_value);
1064 p11_a60 := rosetta_g_miss_num_map(ddx_txlv_rec.old_residual_value);
1065 p11_a61 := rosetta_g_miss_num_map(ddx_txlv_rec.units_retired);
1066 p11_a62 := rosetta_g_miss_num_map(ddx_txlv_rec.cost_retired);
1067 p11_a63 := rosetta_g_miss_num_map(ddx_txlv_rec.sale_proceeds);
1068 p11_a64 := rosetta_g_miss_num_map(ddx_txlv_rec.removal_cost);
1069 p11_a65 := rosetta_g_miss_num_map(ddx_txlv_rec.dnz_asset_id);
1070 p11_a66 := ddx_txlv_rec.date_due;
1071 p11_a67 := rosetta_g_miss_num_map(ddx_txlv_rec.rep_asset_id);
1072 p11_a68 := rosetta_g_miss_num_map(ddx_txlv_rec.lke_asset_id);
1073 p11_a69 := rosetta_g_miss_num_map(ddx_txlv_rec.match_amount);
1074 p11_a70 := ddx_txlv_rec.split_into_singles_flag;
1075 p11_a71 := rosetta_g_miss_num_map(ddx_txlv_rec.split_into_units);
1076 p11_a72 := ddx_txlv_rec.currency_code;
1077 p11_a73 := ddx_txlv_rec.currency_conversion_type;
1078 p11_a74 := rosetta_g_miss_num_map(ddx_txlv_rec.currency_conversion_rate);
1079 p11_a75 := ddx_txlv_rec.currency_conversion_date;
1080
1081 p12_a0 := rosetta_g_miss_num_map(ddx_trxv_rec.id);
1082 p12_a1 := rosetta_g_miss_num_map(ddx_trxv_rec.object_version_number);
1083 p12_a2 := rosetta_g_miss_num_map(ddx_trxv_rec.ica_id);
1084 p12_a3 := ddx_trxv_rec.attribute_category;
1085 p12_a4 := ddx_trxv_rec.attribute1;
1086 p12_a5 := ddx_trxv_rec.attribute2;
1087 p12_a6 := ddx_trxv_rec.attribute3;
1088 p12_a7 := ddx_trxv_rec.attribute4;
1089 p12_a8 := ddx_trxv_rec.attribute5;
1090 p12_a9 := ddx_trxv_rec.attribute6;
1091 p12_a10 := ddx_trxv_rec.attribute7;
1092 p12_a11 := ddx_trxv_rec.attribute8;
1093 p12_a12 := ddx_trxv_rec.attribute9;
1094 p12_a13 := ddx_trxv_rec.attribute10;
1095 p12_a14 := ddx_trxv_rec.attribute11;
1096 p12_a15 := ddx_trxv_rec.attribute12;
1097 p12_a16 := ddx_trxv_rec.attribute13;
1098 p12_a17 := ddx_trxv_rec.attribute14;
1099 p12_a18 := ddx_trxv_rec.attribute15;
1100 p12_a19 := ddx_trxv_rec.tas_type;
1101 p12_a20 := rosetta_g_miss_num_map(ddx_trxv_rec.created_by);
1102 p12_a21 := ddx_trxv_rec.creation_date;
1103 p12_a22 := rosetta_g_miss_num_map(ddx_trxv_rec.last_updated_by);
1104 p12_a23 := ddx_trxv_rec.last_update_date;
1105 p12_a24 := rosetta_g_miss_num_map(ddx_trxv_rec.last_update_login);
1106 p12_a25 := ddx_trxv_rec.tsu_code;
1107 p12_a26 := rosetta_g_miss_num_map(ddx_trxv_rec.try_id);
1108 p12_a27 := ddx_trxv_rec.date_trans_occurred;
1109 p12_a28 := rosetta_g_miss_num_map(ddx_trxv_rec.trans_number);
1110 p12_a29 := ddx_trxv_rec.comments;
1111 p12_a30 := rosetta_g_miss_num_map(ddx_trxv_rec.req_asset_id);
1112 p12_a31 := rosetta_g_miss_num_map(ddx_trxv_rec.total_match_amount);
1113 p12_a32 := rosetta_g_miss_num_map(ddx_trxv_rec.org_id);
1114 end;
1115
1116 procedure create_split_transaction(p_api_version NUMBER
1117 , p_init_msg_list VARCHAR2
1118 , x_return_status out nocopy VARCHAR2
1119 , x_msg_count out nocopy NUMBER
1120 , x_msg_data out nocopy VARCHAR2
1121 , p_cle_id NUMBER
1122 , p_split_into_individuals_yn VARCHAR2
1123 , p_split_into_units NUMBER
1124 , p_trx_date date
1125 , p9_a0 out nocopy JTF_NUMBER_TABLE
1126 , p9_a1 out nocopy JTF_NUMBER_TABLE
1127 , p9_a2 out nocopy JTF_VARCHAR2_TABLE_100
1128 , p9_a3 out nocopy JTF_NUMBER_TABLE
1129 , p9_a4 out nocopy JTF_NUMBER_TABLE
1130 , p9_a5 out nocopy JTF_NUMBER_TABLE
1131 , p9_a6 out nocopy JTF_VARCHAR2_TABLE_100
1132 , p9_a7 out nocopy JTF_VARCHAR2_TABLE_2000
1133 , p9_a8 out nocopy JTF_NUMBER_TABLE
1134 , p9_a9 out nocopy JTF_NUMBER_TABLE
1135 , p9_a10 out nocopy JTF_VARCHAR2_TABLE_100
1136 , p9_a11 out nocopy JTF_NUMBER_TABLE
1137 , p9_a12 out nocopy JTF_VARCHAR2_TABLE_100
1138 , p9_a13 out nocopy JTF_NUMBER_TABLE
1139 , p9_a14 out nocopy JTF_NUMBER_TABLE
1140 , p9_a15 out nocopy JTF_NUMBER_TABLE
1141 , p9_a16 out nocopy JTF_NUMBER_TABLE
1142 , p9_a17 out nocopy JTF_VARCHAR2_TABLE_100
1143 , p9_a18 out nocopy JTF_VARCHAR2_TABLE_500
1144 , p9_a19 out nocopy JTF_VARCHAR2_TABLE_500
1145 , p9_a20 out nocopy JTF_VARCHAR2_TABLE_500
1146 , p9_a21 out nocopy JTF_VARCHAR2_TABLE_500
1147 , p9_a22 out nocopy JTF_VARCHAR2_TABLE_500
1148 , p9_a23 out nocopy JTF_VARCHAR2_TABLE_500
1149 , p9_a24 out nocopy JTF_VARCHAR2_TABLE_500
1150 , p9_a25 out nocopy JTF_VARCHAR2_TABLE_500
1151 , p9_a26 out nocopy JTF_VARCHAR2_TABLE_500
1152 , p9_a27 out nocopy JTF_VARCHAR2_TABLE_500
1153 , p9_a28 out nocopy JTF_VARCHAR2_TABLE_500
1154 , p9_a29 out nocopy JTF_VARCHAR2_TABLE_500
1155 , p9_a30 out nocopy JTF_VARCHAR2_TABLE_500
1156 , p9_a31 out nocopy JTF_VARCHAR2_TABLE_500
1157 , p9_a32 out nocopy JTF_VARCHAR2_TABLE_500
1158 , p9_a33 out nocopy JTF_NUMBER_TABLE
1159 , p9_a34 out nocopy JTF_DATE_TABLE
1160 , p9_a35 out nocopy JTF_NUMBER_TABLE
1161 , p9_a36 out nocopy JTF_DATE_TABLE
1162 , p9_a37 out nocopy JTF_NUMBER_TABLE
1163 , p9_a38 out nocopy JTF_VARCHAR2_TABLE_100
1164 , p9_a39 out nocopy JTF_VARCHAR2_TABLE_100
1165 , p9_a40 out nocopy JTF_NUMBER_TABLE
1166 , p9_a41 out nocopy JTF_DATE_TABLE
1167 , p10_a0 out nocopy NUMBER
1168 , p10_a1 out nocopy NUMBER
1169 , p10_a2 out nocopy VARCHAR2
1170 , p10_a3 out nocopy NUMBER
1171 , p10_a4 out nocopy NUMBER
1172 , p10_a5 out nocopy NUMBER
1173 , p10_a6 out nocopy NUMBER
1174 , p10_a7 out nocopy NUMBER
1175 , p10_a8 out nocopy NUMBER
1176 , p10_a9 out nocopy NUMBER
1177 , p10_a10 out nocopy NUMBER
1178 , p10_a11 out nocopy NUMBER
1179 , p10_a12 out nocopy VARCHAR2
1180 , p10_a13 out nocopy VARCHAR2
1181 , p10_a14 out nocopy VARCHAR2
1182 , p10_a15 out nocopy NUMBER
1183 , p10_a16 out nocopy NUMBER
1184 , p10_a17 out nocopy NUMBER
1185 , p10_a18 out nocopy VARCHAR2
1186 , p10_a19 out nocopy NUMBER
1187 , p10_a20 out nocopy NUMBER
1188 , p10_a21 out nocopy VARCHAR2
1189 , p10_a22 out nocopy VARCHAR2
1190 , p10_a23 out nocopy VARCHAR2
1191 , p10_a24 out nocopy VARCHAR2
1192 , p10_a25 out nocopy DATE
1193 , p10_a26 out nocopy DATE
1194 , p10_a27 out nocopy DATE
1195 , p10_a28 out nocopy NUMBER
1196 , p10_a29 out nocopy NUMBER
1197 , p10_a30 out nocopy NUMBER
1198 , p10_a31 out nocopy VARCHAR2
1199 , p10_a32 out nocopy NUMBER
1200 , p10_a33 out nocopy NUMBER
1201 , p10_a34 out nocopy NUMBER
1202 , p10_a35 out nocopy VARCHAR2
1203 , p10_a36 out nocopy VARCHAR2
1204 , p10_a37 out nocopy VARCHAR2
1205 , p10_a38 out nocopy VARCHAR2
1206 , p10_a39 out nocopy VARCHAR2
1207 , p10_a40 out nocopy VARCHAR2
1208 , p10_a41 out nocopy VARCHAR2
1209 , p10_a42 out nocopy VARCHAR2
1210 , p10_a43 out nocopy VARCHAR2
1211 , p10_a44 out nocopy VARCHAR2
1212 , p10_a45 out nocopy VARCHAR2
1213 , p10_a46 out nocopy VARCHAR2
1214 , p10_a47 out nocopy VARCHAR2
1215 , p10_a48 out nocopy VARCHAR2
1216 , p10_a49 out nocopy VARCHAR2
1217 , p10_a50 out nocopy VARCHAR2
1218 , p10_a51 out nocopy NUMBER
1219 , p10_a52 out nocopy DATE
1220 , p10_a53 out nocopy NUMBER
1221 , p10_a54 out nocopy DATE
1222 , p10_a55 out nocopy NUMBER
1223 , p10_a56 out nocopy VARCHAR2
1224 , p10_a57 out nocopy NUMBER
1225 , p10_a58 out nocopy NUMBER
1226 , p10_a59 out nocopy NUMBER
1227 , p10_a60 out nocopy NUMBER
1228 , p10_a61 out nocopy NUMBER
1229 , p10_a62 out nocopy NUMBER
1230 , p10_a63 out nocopy NUMBER
1231 , p10_a64 out nocopy NUMBER
1232 , p10_a65 out nocopy NUMBER
1233 , p10_a66 out nocopy DATE
1234 , p10_a67 out nocopy NUMBER
1235 , p10_a68 out nocopy NUMBER
1236 , p10_a69 out nocopy NUMBER
1237 , p10_a70 out nocopy VARCHAR2
1238 , p10_a71 out nocopy NUMBER
1239 , p10_a72 out nocopy VARCHAR2
1240 , p10_a73 out nocopy VARCHAR2
1241 , p10_a74 out nocopy NUMBER
1242 , p10_a75 out nocopy DATE
1243 , p11_a0 out nocopy NUMBER
1244 , p11_a1 out nocopy NUMBER
1245 , p11_a2 out nocopy NUMBER
1246 , p11_a3 out nocopy VARCHAR2
1247 , p11_a4 out nocopy VARCHAR2
1248 , p11_a5 out nocopy VARCHAR2
1249 , p11_a6 out nocopy VARCHAR2
1250 , p11_a7 out nocopy VARCHAR2
1251 , p11_a8 out nocopy VARCHAR2
1252 , p11_a9 out nocopy VARCHAR2
1253 , p11_a10 out nocopy VARCHAR2
1254 , p11_a11 out nocopy VARCHAR2
1255 , p11_a12 out nocopy VARCHAR2
1256 , p11_a13 out nocopy VARCHAR2
1257 , p11_a14 out nocopy VARCHAR2
1258 , p11_a15 out nocopy VARCHAR2
1259 , p11_a16 out nocopy VARCHAR2
1260 , p11_a17 out nocopy VARCHAR2
1261 , p11_a18 out nocopy VARCHAR2
1262 , p11_a19 out nocopy VARCHAR2
1263 , p11_a20 out nocopy NUMBER
1264 , p11_a21 out nocopy DATE
1265 , p11_a22 out nocopy NUMBER
1266 , p11_a23 out nocopy DATE
1267 , p11_a24 out nocopy NUMBER
1268 , p11_a25 out nocopy VARCHAR2
1269 , p11_a26 out nocopy NUMBER
1270 , p11_a27 out nocopy DATE
1271 , p11_a28 out nocopy NUMBER
1272 , p11_a29 out nocopy VARCHAR2
1273 , p11_a30 out nocopy NUMBER
1274 , p11_a31 out nocopy NUMBER
1275 , p11_a32 out nocopy NUMBER
1276 )
1277
1278 as
1279 ddp_trx_date date;
1280 ddx_txdv_tbl okl_split_asset_pub.txdv_tbl_type;
1281 ddx_txlv_rec okl_split_asset_pub.txlv_rec_type;
1282 ddx_trxv_rec okl_split_asset_pub.trxv_rec_type;
1283 ddindx binary_integer; indx binary_integer;
1284 begin
1285
1286 -- copy data to the local IN or IN-OUT args, if any
1287
1288
1289
1290
1291
1292
1293
1294
1295 ddp_trx_date := rosetta_g_miss_date_in_map(p_trx_date);
1296
1297
1298
1299
1300 -- here's the delegated call to the old PL/SQL routine
1301 okl_split_asset_pub.create_split_transaction(p_api_version,
1302 p_init_msg_list,
1303 x_return_status,
1304 x_msg_count,
1305 x_msg_data,
1306 p_cle_id,
1307 p_split_into_individuals_yn,
1308 p_split_into_units,
1309 ddp_trx_date,
1310 ddx_txdv_tbl,
1311 ddx_txlv_rec,
1312 ddx_trxv_rec);
1313
1314 -- copy data back from the local variables to OUT or IN-OUT args, if any
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324 okl_asd_pvt_w.rosetta_table_copy_out_p8(ddx_txdv_tbl, p9_a0
1325 , p9_a1
1326 , p9_a2
1327 , p9_a3
1328 , p9_a4
1329 , p9_a5
1330 , p9_a6
1331 , p9_a7
1332 , p9_a8
1333 , p9_a9
1334 , p9_a10
1335 , p9_a11
1336 , p9_a12
1337 , p9_a13
1338 , p9_a14
1339 , p9_a15
1340 , p9_a16
1341 , p9_a17
1342 , p9_a18
1343 , p9_a19
1344 , p9_a20
1345 , p9_a21
1346 , p9_a22
1347 , p9_a23
1348 , p9_a24
1349 , p9_a25
1350 , p9_a26
1351 , p9_a27
1352 , p9_a28
1353 , p9_a29
1354 , p9_a30
1355 , p9_a31
1356 , p9_a32
1357 , p9_a33
1358 , p9_a34
1359 , p9_a35
1360 , p9_a36
1361 , p9_a37
1362 , p9_a38
1363 , p9_a39
1364 , p9_a40
1365 , p9_a41
1366 );
1367
1368 p10_a0 := rosetta_g_miss_num_map(ddx_txlv_rec.id);
1369 p10_a1 := rosetta_g_miss_num_map(ddx_txlv_rec.object_version_number);
1370 p10_a2 := ddx_txlv_rec.sfwt_flag;
1371 p10_a3 := rosetta_g_miss_num_map(ddx_txlv_rec.tas_id);
1372 p10_a4 := rosetta_g_miss_num_map(ddx_txlv_rec.ilo_id);
1373 p10_a5 := rosetta_g_miss_num_map(ddx_txlv_rec.ilo_id_old);
1374 p10_a6 := rosetta_g_miss_num_map(ddx_txlv_rec.iay_id);
1375 p10_a7 := rosetta_g_miss_num_map(ddx_txlv_rec.iay_id_new);
1376 p10_a8 := rosetta_g_miss_num_map(ddx_txlv_rec.kle_id);
1377 p10_a9 := rosetta_g_miss_num_map(ddx_txlv_rec.dnz_khr_id);
1378 p10_a10 := rosetta_g_miss_num_map(ddx_txlv_rec.line_number);
1379 p10_a11 := rosetta_g_miss_num_map(ddx_txlv_rec.org_id);
1380 p10_a12 := ddx_txlv_rec.tal_type;
1381 p10_a13 := ddx_txlv_rec.asset_number;
1382 p10_a14 := ddx_txlv_rec.description;
1383 p10_a15 := rosetta_g_miss_num_map(ddx_txlv_rec.fa_location_id);
1384 p10_a16 := rosetta_g_miss_num_map(ddx_txlv_rec.original_cost);
1385 p10_a17 := rosetta_g_miss_num_map(ddx_txlv_rec.current_units);
1386 p10_a18 := ddx_txlv_rec.manufacturer_name;
1387 p10_a19 := rosetta_g_miss_num_map(ddx_txlv_rec.year_manufactured);
1388 p10_a20 := rosetta_g_miss_num_map(ddx_txlv_rec.supplier_id);
1389 p10_a21 := ddx_txlv_rec.used_asset_yn;
1390 p10_a22 := ddx_txlv_rec.tag_number;
1391 p10_a23 := ddx_txlv_rec.model_number;
1392 p10_a24 := ddx_txlv_rec.corporate_book;
1393 p10_a25 := ddx_txlv_rec.date_purchased;
1394 p10_a26 := ddx_txlv_rec.date_delivery;
1395 p10_a27 := ddx_txlv_rec.in_service_date;
1396 p10_a28 := rosetta_g_miss_num_map(ddx_txlv_rec.life_in_months);
1397 p10_a29 := rosetta_g_miss_num_map(ddx_txlv_rec.depreciation_id);
1398 p10_a30 := rosetta_g_miss_num_map(ddx_txlv_rec.depreciation_cost);
1399 p10_a31 := ddx_txlv_rec.deprn_method;
1400 p10_a32 := rosetta_g_miss_num_map(ddx_txlv_rec.deprn_rate);
1401 p10_a33 := rosetta_g_miss_num_map(ddx_txlv_rec.salvage_value);
1402 p10_a34 := rosetta_g_miss_num_map(ddx_txlv_rec.percent_salvage_value);
1403 p10_a35 := ddx_txlv_rec.attribute_category;
1404 p10_a36 := ddx_txlv_rec.attribute1;
1405 p10_a37 := ddx_txlv_rec.attribute2;
1406 p10_a38 := ddx_txlv_rec.attribute3;
1407 p10_a39 := ddx_txlv_rec.attribute4;
1408 p10_a40 := ddx_txlv_rec.attribute5;
1409 p10_a41 := ddx_txlv_rec.attribute6;
1410 p10_a42 := ddx_txlv_rec.attribute7;
1411 p10_a43 := ddx_txlv_rec.attribute8;
1412 p10_a44 := ddx_txlv_rec.attribute9;
1413 p10_a45 := ddx_txlv_rec.attribute10;
1414 p10_a46 := ddx_txlv_rec.attribute11;
1415 p10_a47 := ddx_txlv_rec.attribute12;
1416 p10_a48 := ddx_txlv_rec.attribute13;
1417 p10_a49 := ddx_txlv_rec.attribute14;
1418 p10_a50 := ddx_txlv_rec.attribute15;
1419 p10_a51 := rosetta_g_miss_num_map(ddx_txlv_rec.created_by);
1420 p10_a52 := ddx_txlv_rec.creation_date;
1421 p10_a53 := rosetta_g_miss_num_map(ddx_txlv_rec.last_updated_by);
1422 p10_a54 := ddx_txlv_rec.last_update_date;
1423 p10_a55 := rosetta_g_miss_num_map(ddx_txlv_rec.last_update_login);
1424 p10_a56 := ddx_txlv_rec.depreciate_yn;
1425 p10_a57 := rosetta_g_miss_num_map(ddx_txlv_rec.hold_period_days);
1426 p10_a58 := rosetta_g_miss_num_map(ddx_txlv_rec.old_salvage_value);
1427 p10_a59 := rosetta_g_miss_num_map(ddx_txlv_rec.new_residual_value);
1428 p10_a60 := rosetta_g_miss_num_map(ddx_txlv_rec.old_residual_value);
1429 p10_a61 := rosetta_g_miss_num_map(ddx_txlv_rec.units_retired);
1430 p10_a62 := rosetta_g_miss_num_map(ddx_txlv_rec.cost_retired);
1431 p10_a63 := rosetta_g_miss_num_map(ddx_txlv_rec.sale_proceeds);
1432 p10_a64 := rosetta_g_miss_num_map(ddx_txlv_rec.removal_cost);
1433 p10_a65 := rosetta_g_miss_num_map(ddx_txlv_rec.dnz_asset_id);
1434 p10_a66 := ddx_txlv_rec.date_due;
1435 p10_a67 := rosetta_g_miss_num_map(ddx_txlv_rec.rep_asset_id);
1436 p10_a68 := rosetta_g_miss_num_map(ddx_txlv_rec.lke_asset_id);
1437 p10_a69 := rosetta_g_miss_num_map(ddx_txlv_rec.match_amount);
1438 p10_a70 := ddx_txlv_rec.split_into_singles_flag;
1439 p10_a71 := rosetta_g_miss_num_map(ddx_txlv_rec.split_into_units);
1440 p10_a72 := ddx_txlv_rec.currency_code;
1441 p10_a73 := ddx_txlv_rec.currency_conversion_type;
1442 p10_a74 := rosetta_g_miss_num_map(ddx_txlv_rec.currency_conversion_rate);
1443 p10_a75 := ddx_txlv_rec.currency_conversion_date;
1444
1445 p11_a0 := rosetta_g_miss_num_map(ddx_trxv_rec.id);
1446 p11_a1 := rosetta_g_miss_num_map(ddx_trxv_rec.object_version_number);
1447 p11_a2 := rosetta_g_miss_num_map(ddx_trxv_rec.ica_id);
1448 p11_a3 := ddx_trxv_rec.attribute_category;
1449 p11_a4 := ddx_trxv_rec.attribute1;
1450 p11_a5 := ddx_trxv_rec.attribute2;
1451 p11_a6 := ddx_trxv_rec.attribute3;
1452 p11_a7 := ddx_trxv_rec.attribute4;
1453 p11_a8 := ddx_trxv_rec.attribute5;
1454 p11_a9 := ddx_trxv_rec.attribute6;
1455 p11_a10 := ddx_trxv_rec.attribute7;
1456 p11_a11 := ddx_trxv_rec.attribute8;
1457 p11_a12 := ddx_trxv_rec.attribute9;
1458 p11_a13 := ddx_trxv_rec.attribute10;
1459 p11_a14 := ddx_trxv_rec.attribute11;
1460 p11_a15 := ddx_trxv_rec.attribute12;
1461 p11_a16 := ddx_trxv_rec.attribute13;
1462 p11_a17 := ddx_trxv_rec.attribute14;
1463 p11_a18 := ddx_trxv_rec.attribute15;
1464 p11_a19 := ddx_trxv_rec.tas_type;
1465 p11_a20 := rosetta_g_miss_num_map(ddx_trxv_rec.created_by);
1466 p11_a21 := ddx_trxv_rec.creation_date;
1467 p11_a22 := rosetta_g_miss_num_map(ddx_trxv_rec.last_updated_by);
1468 p11_a23 := ddx_trxv_rec.last_update_date;
1469 p11_a24 := rosetta_g_miss_num_map(ddx_trxv_rec.last_update_login);
1470 p11_a25 := ddx_trxv_rec.tsu_code;
1471 p11_a26 := rosetta_g_miss_num_map(ddx_trxv_rec.try_id);
1472 p11_a27 := ddx_trxv_rec.date_trans_occurred;
1473 p11_a28 := rosetta_g_miss_num_map(ddx_trxv_rec.trans_number);
1474 p11_a29 := ddx_trxv_rec.comments;
1475 p11_a30 := rosetta_g_miss_num_map(ddx_trxv_rec.req_asset_id);
1476 p11_a31 := rosetta_g_miss_num_map(ddx_trxv_rec.total_match_amount);
1477 p11_a32 := rosetta_g_miss_num_map(ddx_trxv_rec.org_id);
1478 end;
1479
1480 procedure update_split_transaction(p_api_version NUMBER
1481 , p_init_msg_list VARCHAR2
1482 , x_return_status out nocopy VARCHAR2
1483 , x_msg_count out nocopy NUMBER
1484 , x_msg_data out nocopy VARCHAR2
1485 , p_cle_id NUMBER
1486 , p6_a0 JTF_NUMBER_TABLE
1487 , p6_a1 JTF_NUMBER_TABLE
1488 , p6_a2 JTF_VARCHAR2_TABLE_100
1489 , p6_a3 JTF_NUMBER_TABLE
1490 , p6_a4 JTF_NUMBER_TABLE
1491 , p6_a5 JTF_NUMBER_TABLE
1492 , p6_a6 JTF_VARCHAR2_TABLE_100
1493 , p6_a7 JTF_VARCHAR2_TABLE_2000
1494 , p6_a8 JTF_NUMBER_TABLE
1495 , p6_a9 JTF_NUMBER_TABLE
1496 , p6_a10 JTF_VARCHAR2_TABLE_100
1497 , p6_a11 JTF_NUMBER_TABLE
1498 , p6_a12 JTF_VARCHAR2_TABLE_100
1499 , p6_a13 JTF_NUMBER_TABLE
1500 , p6_a14 JTF_NUMBER_TABLE
1501 , p6_a15 JTF_NUMBER_TABLE
1502 , p6_a16 JTF_NUMBER_TABLE
1503 , p6_a17 JTF_VARCHAR2_TABLE_100
1504 , p6_a18 JTF_VARCHAR2_TABLE_500
1505 , p6_a19 JTF_VARCHAR2_TABLE_500
1506 , p6_a20 JTF_VARCHAR2_TABLE_500
1507 , p6_a21 JTF_VARCHAR2_TABLE_500
1508 , p6_a22 JTF_VARCHAR2_TABLE_500
1509 , p6_a23 JTF_VARCHAR2_TABLE_500
1510 , p6_a24 JTF_VARCHAR2_TABLE_500
1511 , p6_a25 JTF_VARCHAR2_TABLE_500
1512 , p6_a26 JTF_VARCHAR2_TABLE_500
1513 , p6_a27 JTF_VARCHAR2_TABLE_500
1514 , p6_a28 JTF_VARCHAR2_TABLE_500
1515 , p6_a29 JTF_VARCHAR2_TABLE_500
1516 , p6_a30 JTF_VARCHAR2_TABLE_500
1517 , p6_a31 JTF_VARCHAR2_TABLE_500
1518 , p6_a32 JTF_VARCHAR2_TABLE_500
1519 , p6_a33 JTF_NUMBER_TABLE
1520 , p6_a34 JTF_DATE_TABLE
1521 , p6_a35 JTF_NUMBER_TABLE
1522 , p6_a36 JTF_DATE_TABLE
1523 , p6_a37 JTF_NUMBER_TABLE
1524 , p6_a38 JTF_VARCHAR2_TABLE_100
1525 , p6_a39 JTF_VARCHAR2_TABLE_100
1526 , p6_a40 JTF_NUMBER_TABLE
1527 , p6_a41 JTF_DATE_TABLE
1528 , p7_a0 out nocopy JTF_NUMBER_TABLE
1529 , p7_a1 out nocopy JTF_NUMBER_TABLE
1530 , p7_a2 out nocopy JTF_VARCHAR2_TABLE_100
1531 , p7_a3 out nocopy JTF_NUMBER_TABLE
1532 , p7_a4 out nocopy JTF_NUMBER_TABLE
1533 , p7_a5 out nocopy JTF_NUMBER_TABLE
1534 , p7_a6 out nocopy JTF_VARCHAR2_TABLE_100
1535 , p7_a7 out nocopy JTF_VARCHAR2_TABLE_2000
1536 , p7_a8 out nocopy JTF_NUMBER_TABLE
1537 , p7_a9 out nocopy JTF_NUMBER_TABLE
1538 , p7_a10 out nocopy JTF_VARCHAR2_TABLE_100
1539 , p7_a11 out nocopy JTF_NUMBER_TABLE
1540 , p7_a12 out nocopy JTF_VARCHAR2_TABLE_100
1541 , p7_a13 out nocopy JTF_NUMBER_TABLE
1542 , p7_a14 out nocopy JTF_NUMBER_TABLE
1543 , p7_a15 out nocopy JTF_NUMBER_TABLE
1544 , p7_a16 out nocopy JTF_NUMBER_TABLE
1545 , p7_a17 out nocopy JTF_VARCHAR2_TABLE_100
1546 , p7_a18 out nocopy JTF_VARCHAR2_TABLE_500
1547 , p7_a19 out nocopy JTF_VARCHAR2_TABLE_500
1548 , p7_a20 out nocopy JTF_VARCHAR2_TABLE_500
1549 , p7_a21 out nocopy JTF_VARCHAR2_TABLE_500
1550 , p7_a22 out nocopy JTF_VARCHAR2_TABLE_500
1551 , p7_a23 out nocopy JTF_VARCHAR2_TABLE_500
1552 , p7_a24 out nocopy JTF_VARCHAR2_TABLE_500
1553 , p7_a25 out nocopy JTF_VARCHAR2_TABLE_500
1554 , p7_a26 out nocopy JTF_VARCHAR2_TABLE_500
1555 , p7_a27 out nocopy JTF_VARCHAR2_TABLE_500
1556 , p7_a28 out nocopy JTF_VARCHAR2_TABLE_500
1557 , p7_a29 out nocopy JTF_VARCHAR2_TABLE_500
1558 , p7_a30 out nocopy JTF_VARCHAR2_TABLE_500
1559 , p7_a31 out nocopy JTF_VARCHAR2_TABLE_500
1560 , p7_a32 out nocopy JTF_VARCHAR2_TABLE_500
1561 , p7_a33 out nocopy JTF_NUMBER_TABLE
1562 , p7_a34 out nocopy JTF_DATE_TABLE
1563 , p7_a35 out nocopy JTF_NUMBER_TABLE
1564 , p7_a36 out nocopy JTF_DATE_TABLE
1565 , p7_a37 out nocopy JTF_NUMBER_TABLE
1566 , p7_a38 out nocopy JTF_VARCHAR2_TABLE_100
1567 , p7_a39 out nocopy JTF_VARCHAR2_TABLE_100
1568 , p7_a40 out nocopy JTF_NUMBER_TABLE
1569 , p7_a41 out nocopy JTF_DATE_TABLE
1570 )
1571
1572 as
1573 ddp_txdv_tbl okl_split_asset_pub.txdv_tbl_type;
1574 ddx_txdv_tbl okl_split_asset_pub.txdv_tbl_type;
1575 ddindx binary_integer; indx binary_integer;
1576 begin
1577
1578 -- copy data to the local IN or IN-OUT args, if any
1579
1580
1581
1582
1583
1584
1585 okl_asd_pvt_w.rosetta_table_copy_in_p8(ddp_txdv_tbl, p6_a0
1586 , p6_a1
1587 , p6_a2
1588 , p6_a3
1589 , p6_a4
1590 , p6_a5
1591 , p6_a6
1592 , p6_a7
1593 , p6_a8
1594 , p6_a9
1595 , p6_a10
1596 , p6_a11
1597 , p6_a12
1598 , p6_a13
1599 , p6_a14
1600 , p6_a15
1601 , p6_a16
1602 , p6_a17
1603 , p6_a18
1604 , p6_a19
1605 , p6_a20
1606 , p6_a21
1607 , p6_a22
1608 , p6_a23
1609 , p6_a24
1610 , p6_a25
1611 , p6_a26
1612 , p6_a27
1613 , p6_a28
1614 , p6_a29
1615 , p6_a30
1616 , p6_a31
1617 , p6_a32
1618 , p6_a33
1619 , p6_a34
1620 , p6_a35
1621 , p6_a36
1622 , p6_a37
1623 , p6_a38
1624 , p6_a39
1625 , p6_a40
1626 , p6_a41
1627 );
1628
1629
1630 -- here's the delegated call to the old PL/SQL routine
1631 okl_split_asset_pub.update_split_transaction(p_api_version,
1632 p_init_msg_list,
1633 x_return_status,
1634 x_msg_count,
1635 x_msg_data,
1636 p_cle_id,
1637 ddp_txdv_tbl,
1638 ddx_txdv_tbl);
1639
1640 -- copy data back from the local variables to OUT or IN-OUT args, if any
1641
1642
1643
1644
1645
1646
1647
1648 okl_asd_pvt_w.rosetta_table_copy_out_p8(ddx_txdv_tbl, p7_a0
1649 , p7_a1
1650 , p7_a2
1651 , p7_a3
1652 , p7_a4
1653 , p7_a5
1654 , p7_a6
1655 , p7_a7
1656 , p7_a8
1657 , p7_a9
1658 , p7_a10
1659 , p7_a11
1660 , p7_a12
1661 , p7_a13
1662 , p7_a14
1663 , p7_a15
1664 , p7_a16
1665 , p7_a17
1666 , p7_a18
1667 , p7_a19
1668 , p7_a20
1669 , p7_a21
1670 , p7_a22
1671 , p7_a23
1672 , p7_a24
1673 , p7_a25
1674 , p7_a26
1675 , p7_a27
1676 , p7_a28
1677 , p7_a29
1678 , p7_a30
1679 , p7_a31
1680 , p7_a32
1681 , p7_a33
1682 , p7_a34
1683 , p7_a35
1684 , p7_a36
1685 , p7_a37
1686 , p7_a38
1687 , p7_a39
1688 , p7_a40
1689 , p7_a41
1690 );
1691 end;
1692
1693 procedure split_fixed_asset(p_api_version NUMBER
1694 , p_init_msg_list VARCHAR2
1695 , x_return_status out nocopy VARCHAR2
1696 , x_msg_count out nocopy NUMBER
1697 , x_msg_data out nocopy VARCHAR2
1698 , p5_a0 JTF_NUMBER_TABLE
1699 , p5_a1 JTF_NUMBER_TABLE
1700 , p5_a2 JTF_VARCHAR2_TABLE_100
1701 , p5_a3 JTF_NUMBER_TABLE
1702 , p5_a4 JTF_NUMBER_TABLE
1703 , p5_a5 JTF_NUMBER_TABLE
1704 , p5_a6 JTF_VARCHAR2_TABLE_100
1705 , p5_a7 JTF_VARCHAR2_TABLE_2000
1706 , p5_a8 JTF_NUMBER_TABLE
1707 , p5_a9 JTF_NUMBER_TABLE
1708 , p5_a10 JTF_VARCHAR2_TABLE_100
1709 , p5_a11 JTF_NUMBER_TABLE
1710 , p5_a12 JTF_VARCHAR2_TABLE_100
1711 , p5_a13 JTF_NUMBER_TABLE
1712 , p5_a14 JTF_NUMBER_TABLE
1713 , p5_a15 JTF_NUMBER_TABLE
1714 , p5_a16 JTF_NUMBER_TABLE
1715 , p5_a17 JTF_VARCHAR2_TABLE_100
1716 , p5_a18 JTF_VARCHAR2_TABLE_500
1717 , p5_a19 JTF_VARCHAR2_TABLE_500
1718 , p5_a20 JTF_VARCHAR2_TABLE_500
1719 , p5_a21 JTF_VARCHAR2_TABLE_500
1720 , p5_a22 JTF_VARCHAR2_TABLE_500
1721 , p5_a23 JTF_VARCHAR2_TABLE_500
1722 , p5_a24 JTF_VARCHAR2_TABLE_500
1723 , p5_a25 JTF_VARCHAR2_TABLE_500
1724 , p5_a26 JTF_VARCHAR2_TABLE_500
1725 , p5_a27 JTF_VARCHAR2_TABLE_500
1726 , p5_a28 JTF_VARCHAR2_TABLE_500
1727 , p5_a29 JTF_VARCHAR2_TABLE_500
1728 , p5_a30 JTF_VARCHAR2_TABLE_500
1729 , p5_a31 JTF_VARCHAR2_TABLE_500
1730 , p5_a32 JTF_VARCHAR2_TABLE_500
1731 , p5_a33 JTF_NUMBER_TABLE
1732 , p5_a34 JTF_DATE_TABLE
1733 , p5_a35 JTF_NUMBER_TABLE
1734 , p5_a36 JTF_DATE_TABLE
1735 , p5_a37 JTF_NUMBER_TABLE
1736 , p5_a38 JTF_VARCHAR2_TABLE_100
1737 , p5_a39 JTF_VARCHAR2_TABLE_100
1738 , p5_a40 JTF_NUMBER_TABLE
1739 , p5_a41 JTF_DATE_TABLE
1740 , p7_a0 out nocopy JTF_NUMBER_TABLE
1741 , p6_a0 NUMBER := 0-1962.0724
1742 , p6_a1 NUMBER := 0-1962.0724
1743 , p6_a2 VARCHAR2 := fnd_api.g_miss_char
1744 , p6_a3 NUMBER := 0-1962.0724
1745 , p6_a4 NUMBER := 0-1962.0724
1746 , p6_a5 NUMBER := 0-1962.0724
1747 , p6_a6 NUMBER := 0-1962.0724
1748 , p6_a7 NUMBER := 0-1962.0724
1749 , p6_a8 NUMBER := 0-1962.0724
1750 , p6_a9 NUMBER := 0-1962.0724
1751 , p6_a10 NUMBER := 0-1962.0724
1752 , p6_a11 NUMBER := 0-1962.0724
1753 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
1754 , p6_a13 VARCHAR2 := fnd_api.g_miss_char
1755 , p6_a14 VARCHAR2 := fnd_api.g_miss_char
1756 , p6_a15 NUMBER := 0-1962.0724
1757 , p6_a16 NUMBER := 0-1962.0724
1758 , p6_a17 NUMBER := 0-1962.0724
1759 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
1760 , p6_a19 NUMBER := 0-1962.0724
1761 , p6_a20 NUMBER := 0-1962.0724
1762 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
1763 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
1764 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
1765 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
1766 , p6_a25 DATE := fnd_api.g_miss_date
1767 , p6_a26 DATE := fnd_api.g_miss_date
1768 , p6_a27 DATE := fnd_api.g_miss_date
1769 , p6_a28 NUMBER := 0-1962.0724
1770 , p6_a29 NUMBER := 0-1962.0724
1771 , p6_a30 NUMBER := 0-1962.0724
1772 , p6_a31 VARCHAR2 := fnd_api.g_miss_char
1773 , p6_a32 NUMBER := 0-1962.0724
1774 , p6_a33 NUMBER := 0-1962.0724
1775 , p6_a34 NUMBER := 0-1962.0724
1776 , p6_a35 VARCHAR2 := fnd_api.g_miss_char
1777 , p6_a36 VARCHAR2 := fnd_api.g_miss_char
1778 , p6_a37 VARCHAR2 := fnd_api.g_miss_char
1779 , p6_a38 VARCHAR2 := fnd_api.g_miss_char
1780 , p6_a39 VARCHAR2 := fnd_api.g_miss_char
1781 , p6_a40 VARCHAR2 := fnd_api.g_miss_char
1782 , p6_a41 VARCHAR2 := fnd_api.g_miss_char
1783 , p6_a42 VARCHAR2 := fnd_api.g_miss_char
1784 , p6_a43 VARCHAR2 := fnd_api.g_miss_char
1785 , p6_a44 VARCHAR2 := fnd_api.g_miss_char
1786 , p6_a45 VARCHAR2 := fnd_api.g_miss_char
1787 , p6_a46 VARCHAR2 := fnd_api.g_miss_char
1788 , p6_a47 VARCHAR2 := fnd_api.g_miss_char
1789 , p6_a48 VARCHAR2 := fnd_api.g_miss_char
1790 , p6_a49 VARCHAR2 := fnd_api.g_miss_char
1791 , p6_a50 VARCHAR2 := fnd_api.g_miss_char
1792 , p6_a51 NUMBER := 0-1962.0724
1793 , p6_a52 DATE := fnd_api.g_miss_date
1794 , p6_a53 NUMBER := 0-1962.0724
1795 , p6_a54 DATE := fnd_api.g_miss_date
1796 , p6_a55 NUMBER := 0-1962.0724
1797 , p6_a56 VARCHAR2 := fnd_api.g_miss_char
1798 , p6_a57 NUMBER := 0-1962.0724
1799 , p6_a58 NUMBER := 0-1962.0724
1800 , p6_a59 NUMBER := 0-1962.0724
1801 , p6_a60 NUMBER := 0-1962.0724
1802 , p6_a61 NUMBER := 0-1962.0724
1803 , p6_a62 NUMBER := 0-1962.0724
1804 , p6_a63 NUMBER := 0-1962.0724
1805 , p6_a64 NUMBER := 0-1962.0724
1806 , p6_a65 NUMBER := 0-1962.0724
1807 , p6_a66 DATE := fnd_api.g_miss_date
1808 , p6_a67 NUMBER := 0-1962.0724
1809 , p6_a68 NUMBER := 0-1962.0724
1810 , p6_a69 NUMBER := 0-1962.0724
1811 , p6_a70 VARCHAR2 := fnd_api.g_miss_char
1812 , p6_a71 NUMBER := 0-1962.0724
1813 , p6_a72 VARCHAR2 := fnd_api.g_miss_char
1814 , p6_a73 VARCHAR2 := fnd_api.g_miss_char
1815 , p6_a74 NUMBER := 0-1962.0724
1816 , p6_a75 DATE := fnd_api.g_miss_date
1817 )
1818
1819 as
1820 ddp_txdv_tbl okl_split_asset_pub.txdv_tbl_type;
1821 ddp_txlv_rec okl_split_asset_pub.txlv_rec_type;
1822 ddx_cle_tbl okl_split_asset_pub.cle_tbl_type;
1823 ddindx binary_integer; indx binary_integer;
1824 begin
1825
1826 -- copy data to the local IN or IN-OUT args, if any
1827
1828
1829
1830
1831
1832 okl_asd_pvt_w.rosetta_table_copy_in_p8(ddp_txdv_tbl, p5_a0
1833 , p5_a1
1834 , p5_a2
1835 , p5_a3
1836 , p5_a4
1837 , p5_a5
1838 , p5_a6
1839 , p5_a7
1840 , p5_a8
1841 , p5_a9
1842 , p5_a10
1843 , p5_a11
1844 , p5_a12
1845 , p5_a13
1846 , p5_a14
1847 , p5_a15
1848 , p5_a16
1849 , p5_a17
1850 , p5_a18
1851 , p5_a19
1852 , p5_a20
1853 , p5_a21
1854 , p5_a22
1855 , p5_a23
1856 , p5_a24
1857 , p5_a25
1858 , p5_a26
1859 , p5_a27
1860 , p5_a28
1861 , p5_a29
1862 , p5_a30
1863 , p5_a31
1864 , p5_a32
1865 , p5_a33
1866 , p5_a34
1867 , p5_a35
1868 , p5_a36
1869 , p5_a37
1870 , p5_a38
1871 , p5_a39
1872 , p5_a40
1873 , p5_a41
1874 );
1875
1876 ddp_txlv_rec.id := rosetta_g_miss_num_map(p6_a0);
1877 ddp_txlv_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
1878 ddp_txlv_rec.sfwt_flag := p6_a2;
1879 ddp_txlv_rec.tas_id := rosetta_g_miss_num_map(p6_a3);
1880 ddp_txlv_rec.ilo_id := rosetta_g_miss_num_map(p6_a4);
1881 ddp_txlv_rec.ilo_id_old := rosetta_g_miss_num_map(p6_a5);
1882 ddp_txlv_rec.iay_id := rosetta_g_miss_num_map(p6_a6);
1883 ddp_txlv_rec.iay_id_new := rosetta_g_miss_num_map(p6_a7);
1884 ddp_txlv_rec.kle_id := rosetta_g_miss_num_map(p6_a8);
1885 ddp_txlv_rec.dnz_khr_id := rosetta_g_miss_num_map(p6_a9);
1886 ddp_txlv_rec.line_number := rosetta_g_miss_num_map(p6_a10);
1887 ddp_txlv_rec.org_id := rosetta_g_miss_num_map(p6_a11);
1888 ddp_txlv_rec.tal_type := p6_a12;
1889 ddp_txlv_rec.asset_number := p6_a13;
1890 ddp_txlv_rec.description := p6_a14;
1891 ddp_txlv_rec.fa_location_id := rosetta_g_miss_num_map(p6_a15);
1892 ddp_txlv_rec.original_cost := rosetta_g_miss_num_map(p6_a16);
1893 ddp_txlv_rec.current_units := rosetta_g_miss_num_map(p6_a17);
1894 ddp_txlv_rec.manufacturer_name := p6_a18;
1895 ddp_txlv_rec.year_manufactured := rosetta_g_miss_num_map(p6_a19);
1896 ddp_txlv_rec.supplier_id := rosetta_g_miss_num_map(p6_a20);
1897 ddp_txlv_rec.used_asset_yn := p6_a21;
1898 ddp_txlv_rec.tag_number := p6_a22;
1899 ddp_txlv_rec.model_number := p6_a23;
1900 ddp_txlv_rec.corporate_book := p6_a24;
1901 ddp_txlv_rec.date_purchased := rosetta_g_miss_date_in_map(p6_a25);
1902 ddp_txlv_rec.date_delivery := rosetta_g_miss_date_in_map(p6_a26);
1903 ddp_txlv_rec.in_service_date := rosetta_g_miss_date_in_map(p6_a27);
1904 ddp_txlv_rec.life_in_months := rosetta_g_miss_num_map(p6_a28);
1905 ddp_txlv_rec.depreciation_id := rosetta_g_miss_num_map(p6_a29);
1906 ddp_txlv_rec.depreciation_cost := rosetta_g_miss_num_map(p6_a30);
1907 ddp_txlv_rec.deprn_method := p6_a31;
1908 ddp_txlv_rec.deprn_rate := rosetta_g_miss_num_map(p6_a32);
1909 ddp_txlv_rec.salvage_value := rosetta_g_miss_num_map(p6_a33);
1910 ddp_txlv_rec.percent_salvage_value := rosetta_g_miss_num_map(p6_a34);
1911 ddp_txlv_rec.attribute_category := p6_a35;
1912 ddp_txlv_rec.attribute1 := p6_a36;
1913 ddp_txlv_rec.attribute2 := p6_a37;
1914 ddp_txlv_rec.attribute3 := p6_a38;
1915 ddp_txlv_rec.attribute4 := p6_a39;
1916 ddp_txlv_rec.attribute5 := p6_a40;
1917 ddp_txlv_rec.attribute6 := p6_a41;
1918 ddp_txlv_rec.attribute7 := p6_a42;
1919 ddp_txlv_rec.attribute8 := p6_a43;
1920 ddp_txlv_rec.attribute9 := p6_a44;
1921 ddp_txlv_rec.attribute10 := p6_a45;
1922 ddp_txlv_rec.attribute11 := p6_a46;
1923 ddp_txlv_rec.attribute12 := p6_a47;
1924 ddp_txlv_rec.attribute13 := p6_a48;
1925 ddp_txlv_rec.attribute14 := p6_a49;
1926 ddp_txlv_rec.attribute15 := p6_a50;
1927 ddp_txlv_rec.created_by := rosetta_g_miss_num_map(p6_a51);
1928 ddp_txlv_rec.creation_date := rosetta_g_miss_date_in_map(p6_a52);
1929 ddp_txlv_rec.last_updated_by := rosetta_g_miss_num_map(p6_a53);
1930 ddp_txlv_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a54);
1931 ddp_txlv_rec.last_update_login := rosetta_g_miss_num_map(p6_a55);
1932 ddp_txlv_rec.depreciate_yn := p6_a56;
1933 ddp_txlv_rec.hold_period_days := rosetta_g_miss_num_map(p6_a57);
1934 ddp_txlv_rec.old_salvage_value := rosetta_g_miss_num_map(p6_a58);
1935 ddp_txlv_rec.new_residual_value := rosetta_g_miss_num_map(p6_a59);
1936 ddp_txlv_rec.old_residual_value := rosetta_g_miss_num_map(p6_a60);
1937 ddp_txlv_rec.units_retired := rosetta_g_miss_num_map(p6_a61);
1938 ddp_txlv_rec.cost_retired := rosetta_g_miss_num_map(p6_a62);
1939 ddp_txlv_rec.sale_proceeds := rosetta_g_miss_num_map(p6_a63);
1940 ddp_txlv_rec.removal_cost := rosetta_g_miss_num_map(p6_a64);
1941 ddp_txlv_rec.dnz_asset_id := rosetta_g_miss_num_map(p6_a65);
1942 ddp_txlv_rec.date_due := rosetta_g_miss_date_in_map(p6_a66);
1943 ddp_txlv_rec.rep_asset_id := rosetta_g_miss_num_map(p6_a67);
1944 ddp_txlv_rec.lke_asset_id := rosetta_g_miss_num_map(p6_a68);
1945 ddp_txlv_rec.match_amount := rosetta_g_miss_num_map(p6_a69);
1946 ddp_txlv_rec.split_into_singles_flag := p6_a70;
1947 ddp_txlv_rec.split_into_units := rosetta_g_miss_num_map(p6_a71);
1948 ddp_txlv_rec.currency_code := p6_a72;
1949 ddp_txlv_rec.currency_conversion_type := p6_a73;
1950 ddp_txlv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p6_a74);
1951 ddp_txlv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p6_a75);
1952
1953
1954 -- here's the delegated call to the old PL/SQL routine
1955 okl_split_asset_pub.split_fixed_asset(p_api_version,
1956 p_init_msg_list,
1957 x_return_status,
1958 x_msg_count,
1959 x_msg_data,
1960 ddp_txdv_tbl,
1961 ddp_txlv_rec,
1962 ddx_cle_tbl);
1963
1964 -- copy data back from the local variables to OUT or IN-OUT args, if any
1965
1966
1967
1968
1969
1970
1971
1972 okl_split_asset_pvt_w.rosetta_table_copy_out_p10(ddx_cle_tbl, p7_a0
1973 );
1974 end;
1975
1976 procedure split_fixed_asset(p_api_version NUMBER
1977 , p_init_msg_list VARCHAR2
1978 , x_return_status out nocopy VARCHAR2
1979 , x_msg_count out nocopy NUMBER
1980 , x_msg_data out nocopy VARCHAR2
1981 , p_cle_id NUMBER
1982 , p6_a0 out nocopy JTF_NUMBER_TABLE
1983 )
1984
1985 as
1986 ddx_cle_tbl okl_split_asset_pub.cle_tbl_type;
1987 ddindx binary_integer; indx binary_integer;
1988 begin
1989
1990 -- copy data to the local IN or IN-OUT args, if any
1991
1992
1993
1994
1995
1996
1997
1998 -- here's the delegated call to the old PL/SQL routine
1999 okl_split_asset_pub.split_fixed_asset(p_api_version,
2000 p_init_msg_list,
2001 x_return_status,
2002 x_msg_count,
2003 x_msg_data,
2004 p_cle_id,
2005 ddx_cle_tbl);
2006
2007 -- copy data back from the local variables to OUT or IN-OUT args, if any
2008
2009
2010
2011
2012
2013
2014 okl_split_asset_pvt_w.rosetta_table_copy_out_p10(ddx_cle_tbl, p6_a0
2015 );
2016 end;
2017
2018 procedure create_split_comp_srl_num(p_api_version NUMBER
2019 , p_init_msg_list VARCHAR2
2020 , x_return_status out nocopy VARCHAR2
2021 , x_msg_count out nocopy NUMBER
2022 , x_msg_data out nocopy VARCHAR2
2023 , p5_a0 JTF_NUMBER_TABLE
2024 , p5_a1 JTF_NUMBER_TABLE
2025 , p5_a2 JTF_NUMBER_TABLE
2026 , p5_a3 JTF_NUMBER_TABLE
2027 , p5_a4 JTF_NUMBER_TABLE
2028 , p5_a5 JTF_VARCHAR2_TABLE_100
2029 , p5_a6 JTF_NUMBER_TABLE
2030 , p5_a7 JTF_VARCHAR2_TABLE_100
2031 , p5_a8 JTF_VARCHAR2_TABLE_100
2032 , p5_a9 JTF_VARCHAR2_TABLE_200
2033 , p5_a10 JTF_VARCHAR2_TABLE_100
2034 , p5_a11 JTF_VARCHAR2_TABLE_100
2035 , p5_a12 JTF_VARCHAR2_TABLE_200
2036 , p5_a13 JTF_VARCHAR2_TABLE_100
2037 , p5_a14 JTF_NUMBER_TABLE
2038 , p5_a15 JTF_VARCHAR2_TABLE_100
2039 , p5_a16 JTF_VARCHAR2_TABLE_100
2040 , p5_a17 JTF_NUMBER_TABLE
2041 , p5_a18 JTF_NUMBER_TABLE
2042 , p5_a19 JTF_VARCHAR2_TABLE_100
2043 , p5_a20 JTF_VARCHAR2_TABLE_500
2044 , p5_a21 JTF_VARCHAR2_TABLE_500
2045 , p5_a22 JTF_VARCHAR2_TABLE_500
2046 , p5_a23 JTF_VARCHAR2_TABLE_500
2047 , p5_a24 JTF_VARCHAR2_TABLE_500
2048 , p5_a25 JTF_VARCHAR2_TABLE_500
2049 , p5_a26 JTF_VARCHAR2_TABLE_500
2050 , p5_a27 JTF_VARCHAR2_TABLE_500
2051 , p5_a28 JTF_VARCHAR2_TABLE_500
2052 , p5_a29 JTF_VARCHAR2_TABLE_500
2053 , p5_a30 JTF_VARCHAR2_TABLE_500
2054 , p5_a31 JTF_VARCHAR2_TABLE_500
2055 , p5_a32 JTF_VARCHAR2_TABLE_500
2056 , p5_a33 JTF_VARCHAR2_TABLE_500
2057 , p5_a34 JTF_VARCHAR2_TABLE_500
2058 , p5_a35 JTF_NUMBER_TABLE
2059 , p5_a36 JTF_DATE_TABLE
2060 , p5_a37 JTF_NUMBER_TABLE
2061 , p5_a38 JTF_DATE_TABLE
2062 , p5_a39 JTF_NUMBER_TABLE
2063 , p5_a40 JTF_NUMBER_TABLE
2064 , p5_a41 JTF_NUMBER_TABLE
2065 , p5_a42 JTF_VARCHAR2_TABLE_100
2066 , p5_a43 JTF_NUMBER_TABLE
2067 , p6_a0 out nocopy JTF_NUMBER_TABLE
2068 , p6_a1 out nocopy JTF_NUMBER_TABLE
2069 , p6_a2 out nocopy JTF_NUMBER_TABLE
2070 , p6_a3 out nocopy JTF_NUMBER_TABLE
2071 , p6_a4 out nocopy JTF_NUMBER_TABLE
2072 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
2073 , p6_a6 out nocopy JTF_NUMBER_TABLE
2074 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
2075 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
2076 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_200
2077 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
2078 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_100
2079 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_200
2080 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
2081 , p6_a14 out nocopy JTF_NUMBER_TABLE
2082 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
2083 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_100
2084 , p6_a17 out nocopy JTF_NUMBER_TABLE
2085 , p6_a18 out nocopy JTF_NUMBER_TABLE
2086 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_100
2087 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
2088 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
2089 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
2090 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
2091 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
2092 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
2093 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
2094 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
2095 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
2096 , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
2097 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
2098 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
2099 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
2100 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
2101 , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
2102 , p6_a35 out nocopy JTF_NUMBER_TABLE
2103 , p6_a36 out nocopy JTF_DATE_TABLE
2104 , p6_a37 out nocopy JTF_NUMBER_TABLE
2105 , p6_a38 out nocopy JTF_DATE_TABLE
2106 , p6_a39 out nocopy JTF_NUMBER_TABLE
2107 , p6_a40 out nocopy JTF_NUMBER_TABLE
2108 , p6_a41 out nocopy JTF_NUMBER_TABLE
2109 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_100
2110 , p6_a43 out nocopy JTF_NUMBER_TABLE
2111 )
2112
2113 as
2114 ddp_itiv_tbl okl_split_asset_pub.itiv_tbl_type;
2115 ddx_itiv_tbl okl_split_asset_pub.itiv_tbl_type;
2116 ddindx binary_integer; indx binary_integer;
2117 begin
2118
2119 -- copy data to the local IN or IN-OUT args, if any
2120
2121
2122
2123
2124
2125 okl_iti_pvt_w.rosetta_table_copy_in_p5(ddp_itiv_tbl, p5_a0
2126 , p5_a1
2127 , p5_a2
2128 , p5_a3
2129 , p5_a4
2130 , p5_a5
2131 , p5_a6
2132 , p5_a7
2133 , p5_a8
2134 , p5_a9
2135 , p5_a10
2136 , p5_a11
2137 , p5_a12
2138 , p5_a13
2139 , p5_a14
2140 , p5_a15
2141 , p5_a16
2142 , p5_a17
2143 , p5_a18
2144 , p5_a19
2145 , p5_a20
2146 , p5_a21
2147 , p5_a22
2148 , p5_a23
2149 , p5_a24
2150 , p5_a25
2151 , p5_a26
2152 , p5_a27
2153 , p5_a28
2154 , p5_a29
2155 , p5_a30
2156 , p5_a31
2157 , p5_a32
2158 , p5_a33
2159 , p5_a34
2160 , p5_a35
2161 , p5_a36
2162 , p5_a37
2163 , p5_a38
2164 , p5_a39
2165 , p5_a40
2166 , p5_a41
2167 , p5_a42
2168 , p5_a43
2169 );
2170
2171
2172 -- here's the delegated call to the old PL/SQL routine
2173 okl_split_asset_pub.create_split_comp_srl_num(p_api_version,
2174 p_init_msg_list,
2175 x_return_status,
2176 x_msg_count,
2177 x_msg_data,
2178 ddp_itiv_tbl,
2179 ddx_itiv_tbl);
2180
2181 -- copy data back from the local variables to OUT or IN-OUT args, if any
2182
2183
2184
2185
2186
2187
2188 okl_iti_pvt_w.rosetta_table_copy_out_p5(ddx_itiv_tbl, p6_a0
2189 , p6_a1
2190 , p6_a2
2191 , p6_a3
2192 , p6_a4
2193 , p6_a5
2194 , p6_a6
2195 , p6_a7
2196 , p6_a8
2197 , p6_a9
2198 , p6_a10
2199 , p6_a11
2200 , p6_a12
2201 , p6_a13
2202 , p6_a14
2203 , p6_a15
2204 , p6_a16
2205 , p6_a17
2206 , p6_a18
2207 , p6_a19
2208 , p6_a20
2209 , p6_a21
2210 , p6_a22
2211 , p6_a23
2212 , p6_a24
2213 , p6_a25
2214 , p6_a26
2215 , p6_a27
2216 , p6_a28
2217 , p6_a29
2218 , p6_a30
2219 , p6_a31
2220 , p6_a32
2221 , p6_a33
2222 , p6_a34
2223 , p6_a35
2224 , p6_a36
2225 , p6_a37
2226 , p6_a38
2227 , p6_a39
2228 , p6_a40
2229 , p6_a41
2230 , p6_a42
2231 , p6_a43
2232 );
2233 end;
2234
2235 end okl_split_asset_pub_w;