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