[Home] [Help]
PACKAGE BODY: APPS.OKL_TRANSACTION_PVT_W
Source
1 package body okl_transaction_pvt_w as
2 /* $Header: OKLETXNB.pls 120.1 2005/07/12 09:11:53 dkagrawa 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 rosetta_table_copy_in_p11(t out nocopy okl_transaction_pvt.rev_tbl_type, a0 JTF_NUMBER_TABLE
23 ) as
24 ddindx binary_integer; indx binary_integer;
25 begin
26 if a0 is not null and a0.count > 0 then
27 if a0.count > 0 then
28 indx := a0.first;
29 ddindx := 1;
30 while true loop
31 t(ddindx).chr_id := rosetta_g_miss_num_map(a0(indx));
32 ddindx := ddindx+1;
33 if a0.last =indx
34 then exit;
35 end if;
36 indx := a0.next(indx);
37 end loop;
38 end if;
39 end if;
40 end rosetta_table_copy_in_p11;
41 procedure rosetta_table_copy_out_p11(t okl_transaction_pvt.rev_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
42 ) as
43 ddindx binary_integer; indx binary_integer;
44 begin
45 if t is null or t.count = 0 then
46 a0 := JTF_NUMBER_TABLE();
47 else
48 a0 := JTF_NUMBER_TABLE();
49 if t.count > 0 then
50 a0.extend(t.count);
51 ddindx := t.first;
52 indx := 1;
53 while true loop
54 a0(indx) := rosetta_g_miss_num_map(t(ddindx).chr_id);
55 indx := indx+1;
56 if t.last =ddindx
57 then exit;
58 end if;
59 ddindx := t.next(ddindx);
60 end loop;
61 end if;
62 end if;
63 end rosetta_table_copy_out_p11;
64
65 procedure create_transaction(p_api_version NUMBER
66 , p_init_msg_list VARCHAR2
67 , x_return_status out nocopy VARCHAR2
68 , x_msg_count out nocopy NUMBER
69 , x_msg_data out nocopy VARCHAR2
70 , p_chr_id NUMBER
71 , p_new_chr_id NUMBER
72 , p_reason_code VARCHAR2
73 , p_description VARCHAR2
74 , p_trx_date date
75 , p_trx_type VARCHAR2
76 , p11_a0 out nocopy NUMBER
77 , p11_a1 out nocopy NUMBER
78 , p11_a2 out nocopy VARCHAR2
79 , p11_a3 out nocopy VARCHAR2
80 , p11_a4 out nocopy VARCHAR2
81 , p11_a5 out nocopy VARCHAR2
82 , p11_a6 out nocopy NUMBER
83 , p11_a7 out nocopy NUMBER
84 , p11_a8 out nocopy NUMBER
85 , p11_a9 out nocopy NUMBER
86 , p11_a10 out nocopy NUMBER
87 , p11_a11 out nocopy NUMBER
88 , p11_a12 out nocopy VARCHAR2
89 , p11_a13 out nocopy VARCHAR2
90 , p11_a14 out nocopy DATE
91 , p11_a15 out nocopy VARCHAR2
92 , p11_a16 out nocopy VARCHAR2
93 , p11_a17 out nocopy NUMBER
94 , p11_a18 out nocopy VARCHAR2
95 , p11_a19 out nocopy VARCHAR2
96 , p11_a20 out nocopy VARCHAR2
97 , p11_a21 out nocopy VARCHAR2
98 , p11_a22 out nocopy VARCHAR2
99 , p11_a23 out nocopy VARCHAR2
100 , p11_a24 out nocopy VARCHAR2
101 , p11_a25 out nocopy VARCHAR2
102 , p11_a26 out nocopy VARCHAR2
103 , p11_a27 out nocopy VARCHAR2
104 , p11_a28 out nocopy VARCHAR2
105 , p11_a29 out nocopy VARCHAR2
106 , p11_a30 out nocopy VARCHAR2
107 , p11_a31 out nocopy VARCHAR2
108 , p11_a32 out nocopy VARCHAR2
109 , p11_a33 out nocopy VARCHAR2
110 , p11_a34 out nocopy VARCHAR2
111 , p11_a35 out nocopy VARCHAR2
112 , p11_a36 out nocopy VARCHAR2
113 , p11_a37 out nocopy NUMBER
114 , p11_a38 out nocopy VARCHAR2
115 , p11_a39 out nocopy NUMBER
116 , p11_a40 out nocopy VARCHAR2
117 , p11_a41 out nocopy VARCHAR2
118 , p11_a42 out nocopy NUMBER
119 , p11_a43 out nocopy NUMBER
120 , p11_a44 out nocopy NUMBER
121 , p11_a45 out nocopy NUMBER
122 , p11_a46 out nocopy NUMBER
123 , p11_a47 out nocopy NUMBER
124 , p11_a48 out nocopy DATE
125 , p11_a49 out nocopy NUMBER
126 , p11_a50 out nocopy DATE
127 , p11_a51 out nocopy NUMBER
128 , p11_a52 out nocopy DATE
129 , p11_a53 out nocopy NUMBER
130 , p11_a54 out nocopy NUMBER
131 , p11_a55 out nocopy VARCHAR2
132 , p11_a56 out nocopy NUMBER
133 , p11_a57 out nocopy VARCHAR2
134 , p11_a58 out nocopy DATE
135 , p11_a59 out nocopy VARCHAR2
136 , p11_a60 out nocopy VARCHAR2
137 , p11_a61 out nocopy VARCHAR2
138 , p11_a62 out nocopy VARCHAR2
139 , p11_a63 out nocopy VARCHAR2
140 , p11_a64 out nocopy VARCHAR2
141 , p11_a65 out nocopy VARCHAR2
142 , p11_a66 out nocopy VARCHAR2
143 , p11_a67 out nocopy VARCHAR2
144 , p11_a68 out nocopy VARCHAR2
145 , p11_a69 out nocopy VARCHAR2
146 , p11_a70 out nocopy VARCHAR2
147 , p11_a71 out nocopy VARCHAR2
148 , p11_a72 out nocopy VARCHAR2
149 , p11_a73 out nocopy VARCHAR2
150 , p11_a74 out nocopy VARCHAR2
151 , p11_a75 out nocopy VARCHAR2
152 , p11_a76 out nocopy VARCHAR2
153 , p11_a77 out nocopy NUMBER
154 , p11_a78 out nocopy DATE
155 , p11_a79 out nocopy NUMBER
156 , p11_a80 out nocopy NUMBER
157 , p11_a81 out nocopy VARCHAR2
158 , p11_a82 out nocopy DATE
159 )
160
161 as
162 ddp_trx_date date;
163 ddx_tcnv_rec okl_transaction_pvt.tcnv_rec_type;
164 ddindx binary_integer; indx binary_integer;
165 begin
166
167 -- copy data to the local IN or IN-OUT args, if any
168
169
170
171
172
173
174
175
176
177 ddp_trx_date := rosetta_g_miss_date_in_map(p_trx_date);
178
179
180
181 -- here's the delegated call to the old PL/SQL routine
182 okl_transaction_pvt.create_transaction(p_api_version,
183 p_init_msg_list,
184 x_return_status,
185 x_msg_count,
186 x_msg_data,
187 p_chr_id,
188 p_new_chr_id,
189 p_reason_code,
190 p_description,
191 ddp_trx_date,
192 p_trx_type,
193 ddx_tcnv_rec);
194
195 -- copy data back from the local variables to OUT or IN-OUT args, if any
196
197
198
199
200
201
202
203
204
205
206
207 p11_a0 := rosetta_g_miss_num_map(ddx_tcnv_rec.id);
208 p11_a1 := rosetta_g_miss_num_map(ddx_tcnv_rec.object_version_number);
209 p11_a2 := ddx_tcnv_rec.rbr_code;
210 p11_a3 := ddx_tcnv_rec.rpy_code;
211 p11_a4 := ddx_tcnv_rec.rvn_code;
212 p11_a5 := ddx_tcnv_rec.trn_code;
213 p11_a6 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_new);
214 p11_a7 := rosetta_g_miss_num_map(ddx_tcnv_rec.pvn_id);
215 p11_a8 := rosetta_g_miss_num_map(ddx_tcnv_rec.pdt_id);
216 p11_a9 := rosetta_g_miss_num_map(ddx_tcnv_rec.qte_id);
217 p11_a10 := rosetta_g_miss_num_map(ddx_tcnv_rec.aes_id);
218 p11_a11 := rosetta_g_miss_num_map(ddx_tcnv_rec.code_combination_id);
219 p11_a12 := ddx_tcnv_rec.tax_deductible_local;
220 p11_a13 := ddx_tcnv_rec.tax_deductible_corporate;
221 p11_a14 := ddx_tcnv_rec.date_accrual;
222 p11_a15 := ddx_tcnv_rec.accrual_status_yn;
223 p11_a16 := ddx_tcnv_rec.update_status_yn;
224 p11_a17 := rosetta_g_miss_num_map(ddx_tcnv_rec.amount);
225 p11_a18 := ddx_tcnv_rec.currency_code;
226 p11_a19 := ddx_tcnv_rec.attribute_category;
227 p11_a20 := ddx_tcnv_rec.attribute1;
228 p11_a21 := ddx_tcnv_rec.attribute2;
229 p11_a22 := ddx_tcnv_rec.attribute3;
230 p11_a23 := ddx_tcnv_rec.attribute4;
231 p11_a24 := ddx_tcnv_rec.attribute5;
232 p11_a25 := ddx_tcnv_rec.attribute6;
233 p11_a26 := ddx_tcnv_rec.attribute7;
234 p11_a27 := ddx_tcnv_rec.attribute8;
235 p11_a28 := ddx_tcnv_rec.attribute9;
236 p11_a29 := ddx_tcnv_rec.attribute10;
237 p11_a30 := ddx_tcnv_rec.attribute11;
238 p11_a31 := ddx_tcnv_rec.attribute12;
239 p11_a32 := ddx_tcnv_rec.attribute13;
240 p11_a33 := ddx_tcnv_rec.attribute14;
241 p11_a34 := ddx_tcnv_rec.attribute15;
242 p11_a35 := ddx_tcnv_rec.tcn_type;
243 p11_a36 := ddx_tcnv_rec.rjn_code;
244 p11_a37 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_old);
245 p11_a38 := ddx_tcnv_rec.party_rel_id2_old;
246 p11_a39 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_new);
247 p11_a40 := ddx_tcnv_rec.party_rel_id2_new;
248 p11_a41 := ddx_tcnv_rec.complete_transfer_yn;
249 p11_a42 := rosetta_g_miss_num_map(ddx_tcnv_rec.org_id);
250 p11_a43 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id);
251 p11_a44 := rosetta_g_miss_num_map(ddx_tcnv_rec.request_id);
252 p11_a45 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_application_id);
253 p11_a46 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_old);
254 p11_a47 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_id);
255 p11_a48 := ddx_tcnv_rec.program_update_date;
256 p11_a49 := rosetta_g_miss_num_map(ddx_tcnv_rec.created_by);
257 p11_a50 := ddx_tcnv_rec.creation_date;
258 p11_a51 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_updated_by);
259 p11_a52 := ddx_tcnv_rec.last_update_date;
260 p11_a53 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_update_login);
261 p11_a54 := rosetta_g_miss_num_map(ddx_tcnv_rec.try_id);
262 p11_a55 := ddx_tcnv_rec.tsu_code;
263 p11_a56 := rosetta_g_miss_num_map(ddx_tcnv_rec.set_of_books_id);
264 p11_a57 := ddx_tcnv_rec.description;
265 p11_a58 := ddx_tcnv_rec.date_transaction_occurred;
266 p11_a59 := ddx_tcnv_rec.trx_number;
267 p11_a60 := ddx_tcnv_rec.tmt_evergreen_yn;
268 p11_a61 := ddx_tcnv_rec.tmt_close_balances_yn;
269 p11_a62 := ddx_tcnv_rec.tmt_accounting_entries_yn;
270 p11_a63 := ddx_tcnv_rec.tmt_cancel_insurance_yn;
271 p11_a64 := ddx_tcnv_rec.tmt_asset_disposition_yn;
272 p11_a65 := ddx_tcnv_rec.tmt_amortization_yn;
273 p11_a66 := ddx_tcnv_rec.tmt_asset_return_yn;
274 p11_a67 := ddx_tcnv_rec.tmt_contract_updated_yn;
275 p11_a68 := ddx_tcnv_rec.tmt_recycle_yn;
276 p11_a69 := ddx_tcnv_rec.tmt_validated_yn;
277 p11_a70 := ddx_tcnv_rec.tmt_streams_updated_yn;
278 p11_a71 := ddx_tcnv_rec.accrual_activity;
279 p11_a72 := ddx_tcnv_rec.tmt_split_asset_yn;
280 p11_a73 := ddx_tcnv_rec.tmt_generic_flag1_yn;
281 p11_a74 := ddx_tcnv_rec.tmt_generic_flag2_yn;
282 p11_a75 := ddx_tcnv_rec.tmt_generic_flag3_yn;
283 p11_a76 := ddx_tcnv_rec.currency_conversion_type;
284 p11_a77 := rosetta_g_miss_num_map(ddx_tcnv_rec.currency_conversion_rate);
285 p11_a78 := ddx_tcnv_rec.currency_conversion_date;
286 p11_a79 := rosetta_g_miss_num_map(ddx_tcnv_rec.chr_id);
287 p11_a80 := rosetta_g_miss_num_map(ddx_tcnv_rec.source_trx_id);
288 p11_a81 := ddx_tcnv_rec.source_trx_type;
289 p11_a82 := ddx_tcnv_rec.canceled_date;
290 end;
291
292 procedure update_trx_status(p_api_version NUMBER
293 , p_init_msg_list VARCHAR2
294 , x_return_status out nocopy VARCHAR2
295 , x_msg_count out nocopy NUMBER
296 , x_msg_data out nocopy VARCHAR2
297 , p_chr_id NUMBER
298 , p_status VARCHAR2
299 , p7_a0 out nocopy NUMBER
300 , p7_a1 out nocopy NUMBER
301 , p7_a2 out nocopy VARCHAR2
302 , p7_a3 out nocopy VARCHAR2
303 , p7_a4 out nocopy VARCHAR2
304 , p7_a5 out nocopy VARCHAR2
305 , p7_a6 out nocopy NUMBER
306 , p7_a7 out nocopy NUMBER
307 , p7_a8 out nocopy NUMBER
308 , p7_a9 out nocopy NUMBER
309 , p7_a10 out nocopy NUMBER
310 , p7_a11 out nocopy NUMBER
311 , p7_a12 out nocopy VARCHAR2
312 , p7_a13 out nocopy VARCHAR2
313 , p7_a14 out nocopy DATE
314 , p7_a15 out nocopy VARCHAR2
315 , p7_a16 out nocopy VARCHAR2
316 , p7_a17 out nocopy NUMBER
317 , p7_a18 out nocopy VARCHAR2
318 , p7_a19 out nocopy VARCHAR2
319 , p7_a20 out nocopy VARCHAR2
320 , p7_a21 out nocopy VARCHAR2
321 , p7_a22 out nocopy VARCHAR2
322 , p7_a23 out nocopy VARCHAR2
323 , p7_a24 out nocopy VARCHAR2
324 , p7_a25 out nocopy VARCHAR2
325 , p7_a26 out nocopy VARCHAR2
326 , p7_a27 out nocopy VARCHAR2
327 , p7_a28 out nocopy VARCHAR2
328 , p7_a29 out nocopy VARCHAR2
329 , p7_a30 out nocopy VARCHAR2
330 , p7_a31 out nocopy VARCHAR2
331 , p7_a32 out nocopy VARCHAR2
332 , p7_a33 out nocopy VARCHAR2
333 , p7_a34 out nocopy VARCHAR2
334 , p7_a35 out nocopy VARCHAR2
335 , p7_a36 out nocopy VARCHAR2
336 , p7_a37 out nocopy NUMBER
337 , p7_a38 out nocopy VARCHAR2
338 , p7_a39 out nocopy NUMBER
339 , p7_a40 out nocopy VARCHAR2
340 , p7_a41 out nocopy VARCHAR2
341 , p7_a42 out nocopy NUMBER
342 , p7_a43 out nocopy NUMBER
343 , p7_a44 out nocopy NUMBER
344 , p7_a45 out nocopy NUMBER
345 , p7_a46 out nocopy NUMBER
346 , p7_a47 out nocopy NUMBER
347 , p7_a48 out nocopy DATE
348 , p7_a49 out nocopy NUMBER
349 , p7_a50 out nocopy DATE
350 , p7_a51 out nocopy NUMBER
351 , p7_a52 out nocopy DATE
352 , p7_a53 out nocopy NUMBER
353 , p7_a54 out nocopy NUMBER
354 , p7_a55 out nocopy VARCHAR2
355 , p7_a56 out nocopy NUMBER
356 , p7_a57 out nocopy VARCHAR2
357 , p7_a58 out nocopy DATE
358 , p7_a59 out nocopy VARCHAR2
359 , p7_a60 out nocopy VARCHAR2
360 , p7_a61 out nocopy VARCHAR2
361 , p7_a62 out nocopy VARCHAR2
362 , p7_a63 out nocopy VARCHAR2
363 , p7_a64 out nocopy VARCHAR2
364 , p7_a65 out nocopy VARCHAR2
365 , p7_a66 out nocopy VARCHAR2
366 , p7_a67 out nocopy VARCHAR2
367 , p7_a68 out nocopy VARCHAR2
368 , p7_a69 out nocopy VARCHAR2
369 , p7_a70 out nocopy VARCHAR2
370 , p7_a71 out nocopy VARCHAR2
371 , p7_a72 out nocopy VARCHAR2
372 , p7_a73 out nocopy VARCHAR2
373 , p7_a74 out nocopy VARCHAR2
374 , p7_a75 out nocopy VARCHAR2
375 , p7_a76 out nocopy VARCHAR2
376 , p7_a77 out nocopy NUMBER
377 , p7_a78 out nocopy DATE
378 , p7_a79 out nocopy NUMBER
379 , p7_a80 out nocopy NUMBER
380 , p7_a81 out nocopy VARCHAR2
381 , p7_a82 out nocopy DATE
382 )
383
384 as
385 ddx_tcnv_rec okl_transaction_pvt.tcnv_rec_type;
386 ddindx binary_integer; indx binary_integer;
387 begin
388
389 -- copy data to the local IN or IN-OUT args, if any
390
391
392
393
394
395
396
397
398 -- here's the delegated call to the old PL/SQL routine
399 okl_transaction_pvt.update_trx_status(p_api_version,
400 p_init_msg_list,
401 x_return_status,
402 x_msg_count,
403 x_msg_data,
404 p_chr_id,
405 p_status,
406 ddx_tcnv_rec);
407
408 -- copy data back from the local variables to OUT or IN-OUT args, if any
409
410
411
412
413
414
415
416 p7_a0 := rosetta_g_miss_num_map(ddx_tcnv_rec.id);
417 p7_a1 := rosetta_g_miss_num_map(ddx_tcnv_rec.object_version_number);
418 p7_a2 := ddx_tcnv_rec.rbr_code;
419 p7_a3 := ddx_tcnv_rec.rpy_code;
420 p7_a4 := ddx_tcnv_rec.rvn_code;
421 p7_a5 := ddx_tcnv_rec.trn_code;
422 p7_a6 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_new);
423 p7_a7 := rosetta_g_miss_num_map(ddx_tcnv_rec.pvn_id);
424 p7_a8 := rosetta_g_miss_num_map(ddx_tcnv_rec.pdt_id);
425 p7_a9 := rosetta_g_miss_num_map(ddx_tcnv_rec.qte_id);
426 p7_a10 := rosetta_g_miss_num_map(ddx_tcnv_rec.aes_id);
427 p7_a11 := rosetta_g_miss_num_map(ddx_tcnv_rec.code_combination_id);
428 p7_a12 := ddx_tcnv_rec.tax_deductible_local;
429 p7_a13 := ddx_tcnv_rec.tax_deductible_corporate;
430 p7_a14 := ddx_tcnv_rec.date_accrual;
431 p7_a15 := ddx_tcnv_rec.accrual_status_yn;
432 p7_a16 := ddx_tcnv_rec.update_status_yn;
433 p7_a17 := rosetta_g_miss_num_map(ddx_tcnv_rec.amount);
434 p7_a18 := ddx_tcnv_rec.currency_code;
435 p7_a19 := ddx_tcnv_rec.attribute_category;
436 p7_a20 := ddx_tcnv_rec.attribute1;
437 p7_a21 := ddx_tcnv_rec.attribute2;
438 p7_a22 := ddx_tcnv_rec.attribute3;
439 p7_a23 := ddx_tcnv_rec.attribute4;
440 p7_a24 := ddx_tcnv_rec.attribute5;
441 p7_a25 := ddx_tcnv_rec.attribute6;
442 p7_a26 := ddx_tcnv_rec.attribute7;
443 p7_a27 := ddx_tcnv_rec.attribute8;
444 p7_a28 := ddx_tcnv_rec.attribute9;
445 p7_a29 := ddx_tcnv_rec.attribute10;
446 p7_a30 := ddx_tcnv_rec.attribute11;
447 p7_a31 := ddx_tcnv_rec.attribute12;
448 p7_a32 := ddx_tcnv_rec.attribute13;
449 p7_a33 := ddx_tcnv_rec.attribute14;
450 p7_a34 := ddx_tcnv_rec.attribute15;
451 p7_a35 := ddx_tcnv_rec.tcn_type;
452 p7_a36 := ddx_tcnv_rec.rjn_code;
453 p7_a37 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_old);
454 p7_a38 := ddx_tcnv_rec.party_rel_id2_old;
455 p7_a39 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_new);
456 p7_a40 := ddx_tcnv_rec.party_rel_id2_new;
457 p7_a41 := ddx_tcnv_rec.complete_transfer_yn;
458 p7_a42 := rosetta_g_miss_num_map(ddx_tcnv_rec.org_id);
459 p7_a43 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id);
460 p7_a44 := rosetta_g_miss_num_map(ddx_tcnv_rec.request_id);
461 p7_a45 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_application_id);
462 p7_a46 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_old);
463 p7_a47 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_id);
464 p7_a48 := ddx_tcnv_rec.program_update_date;
465 p7_a49 := rosetta_g_miss_num_map(ddx_tcnv_rec.created_by);
466 p7_a50 := ddx_tcnv_rec.creation_date;
467 p7_a51 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_updated_by);
468 p7_a52 := ddx_tcnv_rec.last_update_date;
469 p7_a53 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_update_login);
470 p7_a54 := rosetta_g_miss_num_map(ddx_tcnv_rec.try_id);
471 p7_a55 := ddx_tcnv_rec.tsu_code;
472 p7_a56 := rosetta_g_miss_num_map(ddx_tcnv_rec.set_of_books_id);
473 p7_a57 := ddx_tcnv_rec.description;
474 p7_a58 := ddx_tcnv_rec.date_transaction_occurred;
475 p7_a59 := ddx_tcnv_rec.trx_number;
476 p7_a60 := ddx_tcnv_rec.tmt_evergreen_yn;
477 p7_a61 := ddx_tcnv_rec.tmt_close_balances_yn;
478 p7_a62 := ddx_tcnv_rec.tmt_accounting_entries_yn;
479 p7_a63 := ddx_tcnv_rec.tmt_cancel_insurance_yn;
480 p7_a64 := ddx_tcnv_rec.tmt_asset_disposition_yn;
481 p7_a65 := ddx_tcnv_rec.tmt_amortization_yn;
482 p7_a66 := ddx_tcnv_rec.tmt_asset_return_yn;
483 p7_a67 := ddx_tcnv_rec.tmt_contract_updated_yn;
484 p7_a68 := ddx_tcnv_rec.tmt_recycle_yn;
485 p7_a69 := ddx_tcnv_rec.tmt_validated_yn;
486 p7_a70 := ddx_tcnv_rec.tmt_streams_updated_yn;
487 p7_a71 := ddx_tcnv_rec.accrual_activity;
488 p7_a72 := ddx_tcnv_rec.tmt_split_asset_yn;
489 p7_a73 := ddx_tcnv_rec.tmt_generic_flag1_yn;
490 p7_a74 := ddx_tcnv_rec.tmt_generic_flag2_yn;
491 p7_a75 := ddx_tcnv_rec.tmt_generic_flag3_yn;
492 p7_a76 := ddx_tcnv_rec.currency_conversion_type;
493 p7_a77 := rosetta_g_miss_num_map(ddx_tcnv_rec.currency_conversion_rate);
494 p7_a78 := ddx_tcnv_rec.currency_conversion_date;
495 p7_a79 := rosetta_g_miss_num_map(ddx_tcnv_rec.chr_id);
496 p7_a80 := rosetta_g_miss_num_map(ddx_tcnv_rec.source_trx_id);
497 p7_a81 := ddx_tcnv_rec.source_trx_type;
498 p7_a82 := ddx_tcnv_rec.canceled_date;
499 end;
500
501 procedure abandon_revisions(p_api_version NUMBER
502 , p_init_msg_list VARCHAR2
503 , x_return_status out nocopy VARCHAR2
504 , x_msg_count out nocopy NUMBER
505 , x_msg_data out nocopy VARCHAR2
506 , p5_a0 JTF_NUMBER_TABLE
507 , p_contract_status VARCHAR2
508 , p_tsu_code VARCHAR2
509 )
510
511 as
512 ddp_rev_tbl okl_transaction_pvt.rev_tbl_type;
513 ddindx binary_integer; indx binary_integer;
514 begin
515
516 -- copy data to the local IN or IN-OUT args, if any
517
518
519
520
521
522 okl_transaction_pvt_w.rosetta_table_copy_in_p11(ddp_rev_tbl, p5_a0
523 );
524
525
526
527 -- here's the delegated call to the old PL/SQL routine
528 okl_transaction_pvt.abandon_revisions(p_api_version,
529 p_init_msg_list,
530 x_return_status,
531 x_msg_count,
532 x_msg_data,
533 ddp_rev_tbl,
534 p_contract_status,
535 p_tsu_code);
536
537 -- copy data back from the local variables to OUT or IN-OUT args, if any
538
539
540
541
542
543
544
545 end;
546
547 procedure check_contract_securitized(p_api_version NUMBER
548 , p_init_msg_list VARCHAR2
549 , x_return_status out nocopy VARCHAR2
550 , x_msg_count out nocopy NUMBER
551 , x_msg_data out nocopy VARCHAR2
552 , p_chr_id NUMBER
553 , p_trx_date date
554 )
555
556 as
557 ddp_trx_date date;
558 ddindx binary_integer; indx binary_integer;
559 begin
560
561 -- copy data to the local IN or IN-OUT args, if any
562
563
564
565
566
567
568 ddp_trx_date := rosetta_g_miss_date_in_map(p_trx_date);
569
570 -- here's the delegated call to the old PL/SQL routine
571 okl_transaction_pvt.check_contract_securitized(p_api_version,
572 p_init_msg_list,
573 x_return_status,
574 x_msg_count,
575 x_msg_data,
576 p_chr_id,
577 ddp_trx_date);
578
579 -- copy data back from the local variables to OUT or IN-OUT args, if any
580
581
582
583
584
585
586 end;
587
588 procedure check_contract_securitized(p_api_version NUMBER
589 , p_init_msg_list VARCHAR2
590 , x_return_status out nocopy VARCHAR2
591 , x_msg_count out nocopy NUMBER
592 , x_msg_data out nocopy VARCHAR2
593 , p_chr_id NUMBER
594 , p_cle_id NUMBER
595 , p_stream_type_class VARCHAR2
596 , p_trx_date date
597 )
598
599 as
600 ddp_trx_date date;
601 ddindx binary_integer; indx binary_integer;
602 begin
603
604 -- copy data to the local IN or IN-OUT args, if any
605
606
607
608
609
610
611
612
613 ddp_trx_date := rosetta_g_miss_date_in_map(p_trx_date);
614
615 -- here's the delegated call to the old PL/SQL routine
616 okl_transaction_pvt.check_contract_securitized(p_api_version,
617 p_init_msg_list,
618 x_return_status,
619 x_msg_count,
620 x_msg_data,
621 p_chr_id,
622 p_cle_id,
623 p_stream_type_class,
624 ddp_trx_date);
625
626 -- copy data back from the local variables to OUT or IN-OUT args, if any
627
628
629
630
631
632
633
634
635 end;
636
637 procedure create_service_transaction(p_api_version NUMBER
638 , p_init_msg_list VARCHAR2
639 , x_return_status out nocopy VARCHAR2
640 , x_msg_count out nocopy NUMBER
641 , x_msg_data out nocopy VARCHAR2
642 , p_lease_id NUMBER
643 , p_service_id NUMBER
644 , p_description VARCHAR2
645 , p_trx_date date
646 , p_status VARCHAR2
647 , p10_a0 out nocopy NUMBER
648 , p10_a1 out nocopy NUMBER
649 , p10_a2 out nocopy VARCHAR2
650 , p10_a3 out nocopy VARCHAR2
651 , p10_a4 out nocopy VARCHAR2
652 , p10_a5 out nocopy VARCHAR2
653 , p10_a6 out nocopy NUMBER
654 , p10_a7 out nocopy NUMBER
655 , p10_a8 out nocopy NUMBER
656 , p10_a9 out nocopy NUMBER
657 , p10_a10 out nocopy NUMBER
658 , p10_a11 out nocopy NUMBER
659 , p10_a12 out nocopy VARCHAR2
660 , p10_a13 out nocopy VARCHAR2
661 , p10_a14 out nocopy DATE
662 , p10_a15 out nocopy VARCHAR2
663 , p10_a16 out nocopy VARCHAR2
664 , p10_a17 out nocopy NUMBER
665 , p10_a18 out nocopy VARCHAR2
666 , p10_a19 out nocopy VARCHAR2
667 , p10_a20 out nocopy VARCHAR2
668 , p10_a21 out nocopy VARCHAR2
669 , p10_a22 out nocopy VARCHAR2
670 , p10_a23 out nocopy VARCHAR2
671 , p10_a24 out nocopy VARCHAR2
672 , p10_a25 out nocopy VARCHAR2
673 , p10_a26 out nocopy VARCHAR2
674 , p10_a27 out nocopy VARCHAR2
675 , p10_a28 out nocopy VARCHAR2
676 , p10_a29 out nocopy VARCHAR2
677 , p10_a30 out nocopy VARCHAR2
678 , p10_a31 out nocopy VARCHAR2
679 , p10_a32 out nocopy VARCHAR2
680 , p10_a33 out nocopy VARCHAR2
681 , p10_a34 out nocopy VARCHAR2
682 , p10_a35 out nocopy VARCHAR2
683 , p10_a36 out nocopy VARCHAR2
684 , p10_a37 out nocopy NUMBER
685 , p10_a38 out nocopy VARCHAR2
686 , p10_a39 out nocopy NUMBER
687 , p10_a40 out nocopy VARCHAR2
688 , p10_a41 out nocopy VARCHAR2
689 , p10_a42 out nocopy NUMBER
690 , p10_a43 out nocopy NUMBER
691 , p10_a44 out nocopy NUMBER
692 , p10_a45 out nocopy NUMBER
693 , p10_a46 out nocopy NUMBER
694 , p10_a47 out nocopy NUMBER
695 , p10_a48 out nocopy DATE
696 , p10_a49 out nocopy NUMBER
697 , p10_a50 out nocopy DATE
698 , p10_a51 out nocopy NUMBER
699 , p10_a52 out nocopy DATE
700 , p10_a53 out nocopy NUMBER
701 , p10_a54 out nocopy NUMBER
702 , p10_a55 out nocopy VARCHAR2
703 , p10_a56 out nocopy NUMBER
704 , p10_a57 out nocopy VARCHAR2
705 , p10_a58 out nocopy DATE
706 , p10_a59 out nocopy VARCHAR2
707 , p10_a60 out nocopy VARCHAR2
708 , p10_a61 out nocopy VARCHAR2
709 , p10_a62 out nocopy VARCHAR2
710 , p10_a63 out nocopy VARCHAR2
711 , p10_a64 out nocopy VARCHAR2
712 , p10_a65 out nocopy VARCHAR2
713 , p10_a66 out nocopy VARCHAR2
714 , p10_a67 out nocopy VARCHAR2
715 , p10_a68 out nocopy VARCHAR2
716 , p10_a69 out nocopy VARCHAR2
717 , p10_a70 out nocopy VARCHAR2
718 , p10_a71 out nocopy VARCHAR2
719 , p10_a72 out nocopy VARCHAR2
720 , p10_a73 out nocopy VARCHAR2
721 , p10_a74 out nocopy VARCHAR2
722 , p10_a75 out nocopy VARCHAR2
723 , p10_a76 out nocopy VARCHAR2
724 , p10_a77 out nocopy NUMBER
725 , p10_a78 out nocopy DATE
726 , p10_a79 out nocopy NUMBER
727 , p10_a80 out nocopy NUMBER
728 , p10_a81 out nocopy VARCHAR2
729 , p10_a82 out nocopy DATE
730 )
731
732 as
733 ddp_trx_date date;
734 ddx_tcnv_rec okl_transaction_pvt.tcnv_rec_type;
735 ddindx binary_integer; indx binary_integer;
736 begin
737
738 -- copy data to the local IN or IN-OUT args, if any
739
740
741
742
743
744
745
746
747 ddp_trx_date := rosetta_g_miss_date_in_map(p_trx_date);
748
749
750
751 -- here's the delegated call to the old PL/SQL routine
752 okl_transaction_pvt.create_service_transaction(p_api_version,
753 p_init_msg_list,
754 x_return_status,
755 x_msg_count,
756 x_msg_data,
757 p_lease_id,
758 p_service_id,
759 p_description,
760 ddp_trx_date,
761 p_status,
762 ddx_tcnv_rec);
763
764 -- copy data back from the local variables to OUT or IN-OUT args, if any
765
766
767
768
769
770
771
772
773
774
775 p10_a0 := rosetta_g_miss_num_map(ddx_tcnv_rec.id);
776 p10_a1 := rosetta_g_miss_num_map(ddx_tcnv_rec.object_version_number);
777 p10_a2 := ddx_tcnv_rec.rbr_code;
778 p10_a3 := ddx_tcnv_rec.rpy_code;
779 p10_a4 := ddx_tcnv_rec.rvn_code;
780 p10_a5 := ddx_tcnv_rec.trn_code;
781 p10_a6 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_new);
782 p10_a7 := rosetta_g_miss_num_map(ddx_tcnv_rec.pvn_id);
783 p10_a8 := rosetta_g_miss_num_map(ddx_tcnv_rec.pdt_id);
784 p10_a9 := rosetta_g_miss_num_map(ddx_tcnv_rec.qte_id);
785 p10_a10 := rosetta_g_miss_num_map(ddx_tcnv_rec.aes_id);
786 p10_a11 := rosetta_g_miss_num_map(ddx_tcnv_rec.code_combination_id);
787 p10_a12 := ddx_tcnv_rec.tax_deductible_local;
788 p10_a13 := ddx_tcnv_rec.tax_deductible_corporate;
789 p10_a14 := ddx_tcnv_rec.date_accrual;
790 p10_a15 := ddx_tcnv_rec.accrual_status_yn;
791 p10_a16 := ddx_tcnv_rec.update_status_yn;
792 p10_a17 := rosetta_g_miss_num_map(ddx_tcnv_rec.amount);
793 p10_a18 := ddx_tcnv_rec.currency_code;
794 p10_a19 := ddx_tcnv_rec.attribute_category;
795 p10_a20 := ddx_tcnv_rec.attribute1;
796 p10_a21 := ddx_tcnv_rec.attribute2;
797 p10_a22 := ddx_tcnv_rec.attribute3;
798 p10_a23 := ddx_tcnv_rec.attribute4;
799 p10_a24 := ddx_tcnv_rec.attribute5;
800 p10_a25 := ddx_tcnv_rec.attribute6;
801 p10_a26 := ddx_tcnv_rec.attribute7;
802 p10_a27 := ddx_tcnv_rec.attribute8;
803 p10_a28 := ddx_tcnv_rec.attribute9;
804 p10_a29 := ddx_tcnv_rec.attribute10;
805 p10_a30 := ddx_tcnv_rec.attribute11;
806 p10_a31 := ddx_tcnv_rec.attribute12;
807 p10_a32 := ddx_tcnv_rec.attribute13;
808 p10_a33 := ddx_tcnv_rec.attribute14;
809 p10_a34 := ddx_tcnv_rec.attribute15;
810 p10_a35 := ddx_tcnv_rec.tcn_type;
811 p10_a36 := ddx_tcnv_rec.rjn_code;
812 p10_a37 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_old);
813 p10_a38 := ddx_tcnv_rec.party_rel_id2_old;
814 p10_a39 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_new);
815 p10_a40 := ddx_tcnv_rec.party_rel_id2_new;
816 p10_a41 := ddx_tcnv_rec.complete_transfer_yn;
817 p10_a42 := rosetta_g_miss_num_map(ddx_tcnv_rec.org_id);
818 p10_a43 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id);
819 p10_a44 := rosetta_g_miss_num_map(ddx_tcnv_rec.request_id);
820 p10_a45 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_application_id);
821 p10_a46 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_old);
822 p10_a47 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_id);
823 p10_a48 := ddx_tcnv_rec.program_update_date;
824 p10_a49 := rosetta_g_miss_num_map(ddx_tcnv_rec.created_by);
825 p10_a50 := ddx_tcnv_rec.creation_date;
826 p10_a51 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_updated_by);
827 p10_a52 := ddx_tcnv_rec.last_update_date;
828 p10_a53 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_update_login);
829 p10_a54 := rosetta_g_miss_num_map(ddx_tcnv_rec.try_id);
830 p10_a55 := ddx_tcnv_rec.tsu_code;
831 p10_a56 := rosetta_g_miss_num_map(ddx_tcnv_rec.set_of_books_id);
832 p10_a57 := ddx_tcnv_rec.description;
833 p10_a58 := ddx_tcnv_rec.date_transaction_occurred;
834 p10_a59 := ddx_tcnv_rec.trx_number;
835 p10_a60 := ddx_tcnv_rec.tmt_evergreen_yn;
836 p10_a61 := ddx_tcnv_rec.tmt_close_balances_yn;
837 p10_a62 := ddx_tcnv_rec.tmt_accounting_entries_yn;
838 p10_a63 := ddx_tcnv_rec.tmt_cancel_insurance_yn;
839 p10_a64 := ddx_tcnv_rec.tmt_asset_disposition_yn;
840 p10_a65 := ddx_tcnv_rec.tmt_amortization_yn;
841 p10_a66 := ddx_tcnv_rec.tmt_asset_return_yn;
842 p10_a67 := ddx_tcnv_rec.tmt_contract_updated_yn;
843 p10_a68 := ddx_tcnv_rec.tmt_recycle_yn;
844 p10_a69 := ddx_tcnv_rec.tmt_validated_yn;
845 p10_a70 := ddx_tcnv_rec.tmt_streams_updated_yn;
846 p10_a71 := ddx_tcnv_rec.accrual_activity;
847 p10_a72 := ddx_tcnv_rec.tmt_split_asset_yn;
848 p10_a73 := ddx_tcnv_rec.tmt_generic_flag1_yn;
849 p10_a74 := ddx_tcnv_rec.tmt_generic_flag2_yn;
850 p10_a75 := ddx_tcnv_rec.tmt_generic_flag3_yn;
851 p10_a76 := ddx_tcnv_rec.currency_conversion_type;
852 p10_a77 := rosetta_g_miss_num_map(ddx_tcnv_rec.currency_conversion_rate);
853 p10_a78 := ddx_tcnv_rec.currency_conversion_date;
854 p10_a79 := rosetta_g_miss_num_map(ddx_tcnv_rec.chr_id);
855 p10_a80 := rosetta_g_miss_num_map(ddx_tcnv_rec.source_trx_id);
856 p10_a81 := ddx_tcnv_rec.source_trx_type;
857 p10_a82 := ddx_tcnv_rec.canceled_date;
858 end;
859
860 procedure create_ppd_transaction(p_api_version NUMBER
861 , p_init_msg_list VARCHAR2
862 , x_return_status out nocopy VARCHAR2
863 , x_msg_count out nocopy NUMBER
864 , x_msg_data out nocopy VARCHAR2
865 , p_chr_id NUMBER
866 , p_trx_date date
867 , p_trx_type VARCHAR2
868 , p_reason_code VARCHAR2
869 , p9_a0 out nocopy NUMBER
870 , p9_a1 out nocopy NUMBER
871 , p9_a2 out nocopy VARCHAR2
872 , p9_a3 out nocopy VARCHAR2
873 , p9_a4 out nocopy VARCHAR2
874 , p9_a5 out nocopy VARCHAR2
875 , p9_a6 out nocopy NUMBER
876 , p9_a7 out nocopy NUMBER
877 , p9_a8 out nocopy NUMBER
878 , p9_a9 out nocopy NUMBER
879 , p9_a10 out nocopy NUMBER
880 , p9_a11 out nocopy NUMBER
881 , p9_a12 out nocopy VARCHAR2
882 , p9_a13 out nocopy VARCHAR2
883 , p9_a14 out nocopy DATE
884 , p9_a15 out nocopy VARCHAR2
885 , p9_a16 out nocopy VARCHAR2
886 , p9_a17 out nocopy NUMBER
887 , p9_a18 out nocopy VARCHAR2
888 , p9_a19 out nocopy VARCHAR2
889 , p9_a20 out nocopy VARCHAR2
890 , p9_a21 out nocopy VARCHAR2
891 , p9_a22 out nocopy VARCHAR2
892 , p9_a23 out nocopy VARCHAR2
893 , p9_a24 out nocopy VARCHAR2
894 , p9_a25 out nocopy VARCHAR2
895 , p9_a26 out nocopy VARCHAR2
896 , p9_a27 out nocopy VARCHAR2
897 , p9_a28 out nocopy VARCHAR2
898 , p9_a29 out nocopy VARCHAR2
899 , p9_a30 out nocopy VARCHAR2
900 , p9_a31 out nocopy VARCHAR2
901 , p9_a32 out nocopy VARCHAR2
902 , p9_a33 out nocopy VARCHAR2
903 , p9_a34 out nocopy VARCHAR2
904 , p9_a35 out nocopy VARCHAR2
905 , p9_a36 out nocopy VARCHAR2
906 , p9_a37 out nocopy NUMBER
907 , p9_a38 out nocopy VARCHAR2
908 , p9_a39 out nocopy NUMBER
909 , p9_a40 out nocopy VARCHAR2
910 , p9_a41 out nocopy VARCHAR2
911 , p9_a42 out nocopy NUMBER
912 , p9_a43 out nocopy NUMBER
913 , p9_a44 out nocopy NUMBER
914 , p9_a45 out nocopy NUMBER
915 , p9_a46 out nocopy NUMBER
916 , p9_a47 out nocopy NUMBER
917 , p9_a48 out nocopy DATE
918 , p9_a49 out nocopy NUMBER
919 , p9_a50 out nocopy DATE
920 , p9_a51 out nocopy NUMBER
921 , p9_a52 out nocopy DATE
922 , p9_a53 out nocopy NUMBER
923 , p9_a54 out nocopy NUMBER
924 , p9_a55 out nocopy VARCHAR2
925 , p9_a56 out nocopy NUMBER
926 , p9_a57 out nocopy VARCHAR2
927 , p9_a58 out nocopy DATE
928 , p9_a59 out nocopy VARCHAR2
929 , p9_a60 out nocopy VARCHAR2
930 , p9_a61 out nocopy VARCHAR2
931 , p9_a62 out nocopy VARCHAR2
932 , p9_a63 out nocopy VARCHAR2
933 , p9_a64 out nocopy VARCHAR2
934 , p9_a65 out nocopy VARCHAR2
935 , p9_a66 out nocopy VARCHAR2
936 , p9_a67 out nocopy VARCHAR2
937 , p9_a68 out nocopy VARCHAR2
938 , p9_a69 out nocopy VARCHAR2
939 , p9_a70 out nocopy VARCHAR2
940 , p9_a71 out nocopy VARCHAR2
941 , p9_a72 out nocopy VARCHAR2
942 , p9_a73 out nocopy VARCHAR2
943 , p9_a74 out nocopy VARCHAR2
944 , p9_a75 out nocopy VARCHAR2
945 , p9_a76 out nocopy VARCHAR2
946 , p9_a77 out nocopy NUMBER
947 , p9_a78 out nocopy DATE
948 , p9_a79 out nocopy NUMBER
949 , p9_a80 out nocopy NUMBER
950 , p9_a81 out nocopy VARCHAR2
951 , p9_a82 out nocopy DATE
952 )
953
954 as
955 ddp_trx_date date;
956 ddx_tcnv_rec okl_transaction_pvt.tcnv_rec_type;
957 ddindx binary_integer; indx binary_integer;
958 begin
959
960 -- copy data to the local IN or IN-OUT args, if any
961
962
963
964
965
966
967 ddp_trx_date := rosetta_g_miss_date_in_map(p_trx_date);
968
969
970
971
972 -- here's the delegated call to the old PL/SQL routine
973 okl_transaction_pvt.create_ppd_transaction(p_api_version,
974 p_init_msg_list,
975 x_return_status,
976 x_msg_count,
977 x_msg_data,
978 p_chr_id,
979 ddp_trx_date,
980 p_trx_type,
981 p_reason_code,
982 ddx_tcnv_rec);
983
984 -- copy data back from the local variables to OUT or IN-OUT args, if any
985
986
987
988
989
990
991
992
993
994 p9_a0 := rosetta_g_miss_num_map(ddx_tcnv_rec.id);
995 p9_a1 := rosetta_g_miss_num_map(ddx_tcnv_rec.object_version_number);
996 p9_a2 := ddx_tcnv_rec.rbr_code;
997 p9_a3 := ddx_tcnv_rec.rpy_code;
998 p9_a4 := ddx_tcnv_rec.rvn_code;
999 p9_a5 := ddx_tcnv_rec.trn_code;
1000 p9_a6 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_new);
1001 p9_a7 := rosetta_g_miss_num_map(ddx_tcnv_rec.pvn_id);
1002 p9_a8 := rosetta_g_miss_num_map(ddx_tcnv_rec.pdt_id);
1003 p9_a9 := rosetta_g_miss_num_map(ddx_tcnv_rec.qte_id);
1004 p9_a10 := rosetta_g_miss_num_map(ddx_tcnv_rec.aes_id);
1005 p9_a11 := rosetta_g_miss_num_map(ddx_tcnv_rec.code_combination_id);
1006 p9_a12 := ddx_tcnv_rec.tax_deductible_local;
1007 p9_a13 := ddx_tcnv_rec.tax_deductible_corporate;
1008 p9_a14 := ddx_tcnv_rec.date_accrual;
1009 p9_a15 := ddx_tcnv_rec.accrual_status_yn;
1010 p9_a16 := ddx_tcnv_rec.update_status_yn;
1011 p9_a17 := rosetta_g_miss_num_map(ddx_tcnv_rec.amount);
1012 p9_a18 := ddx_tcnv_rec.currency_code;
1013 p9_a19 := ddx_tcnv_rec.attribute_category;
1014 p9_a20 := ddx_tcnv_rec.attribute1;
1015 p9_a21 := ddx_tcnv_rec.attribute2;
1016 p9_a22 := ddx_tcnv_rec.attribute3;
1017 p9_a23 := ddx_tcnv_rec.attribute4;
1018 p9_a24 := ddx_tcnv_rec.attribute5;
1019 p9_a25 := ddx_tcnv_rec.attribute6;
1020 p9_a26 := ddx_tcnv_rec.attribute7;
1021 p9_a27 := ddx_tcnv_rec.attribute8;
1022 p9_a28 := ddx_tcnv_rec.attribute9;
1023 p9_a29 := ddx_tcnv_rec.attribute10;
1024 p9_a30 := ddx_tcnv_rec.attribute11;
1025 p9_a31 := ddx_tcnv_rec.attribute12;
1026 p9_a32 := ddx_tcnv_rec.attribute13;
1027 p9_a33 := ddx_tcnv_rec.attribute14;
1028 p9_a34 := ddx_tcnv_rec.attribute15;
1029 p9_a35 := ddx_tcnv_rec.tcn_type;
1030 p9_a36 := ddx_tcnv_rec.rjn_code;
1031 p9_a37 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_old);
1032 p9_a38 := ddx_tcnv_rec.party_rel_id2_old;
1033 p9_a39 := rosetta_g_miss_num_map(ddx_tcnv_rec.party_rel_id1_new);
1034 p9_a40 := ddx_tcnv_rec.party_rel_id2_new;
1035 p9_a41 := ddx_tcnv_rec.complete_transfer_yn;
1036 p9_a42 := rosetta_g_miss_num_map(ddx_tcnv_rec.org_id);
1037 p9_a43 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id);
1038 p9_a44 := rosetta_g_miss_num_map(ddx_tcnv_rec.request_id);
1039 p9_a45 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_application_id);
1040 p9_a46 := rosetta_g_miss_num_map(ddx_tcnv_rec.khr_id_old);
1041 p9_a47 := rosetta_g_miss_num_map(ddx_tcnv_rec.program_id);
1042 p9_a48 := ddx_tcnv_rec.program_update_date;
1043 p9_a49 := rosetta_g_miss_num_map(ddx_tcnv_rec.created_by);
1044 p9_a50 := ddx_tcnv_rec.creation_date;
1045 p9_a51 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_updated_by);
1046 p9_a52 := ddx_tcnv_rec.last_update_date;
1047 p9_a53 := rosetta_g_miss_num_map(ddx_tcnv_rec.last_update_login);
1048 p9_a54 := rosetta_g_miss_num_map(ddx_tcnv_rec.try_id);
1049 p9_a55 := ddx_tcnv_rec.tsu_code;
1050 p9_a56 := rosetta_g_miss_num_map(ddx_tcnv_rec.set_of_books_id);
1051 p9_a57 := ddx_tcnv_rec.description;
1052 p9_a58 := ddx_tcnv_rec.date_transaction_occurred;
1053 p9_a59 := ddx_tcnv_rec.trx_number;
1054 p9_a60 := ddx_tcnv_rec.tmt_evergreen_yn;
1055 p9_a61 := ddx_tcnv_rec.tmt_close_balances_yn;
1056 p9_a62 := ddx_tcnv_rec.tmt_accounting_entries_yn;
1057 p9_a63 := ddx_tcnv_rec.tmt_cancel_insurance_yn;
1058 p9_a64 := ddx_tcnv_rec.tmt_asset_disposition_yn;
1059 p9_a65 := ddx_tcnv_rec.tmt_amortization_yn;
1060 p9_a66 := ddx_tcnv_rec.tmt_asset_return_yn;
1061 p9_a67 := ddx_tcnv_rec.tmt_contract_updated_yn;
1062 p9_a68 := ddx_tcnv_rec.tmt_recycle_yn;
1063 p9_a69 := ddx_tcnv_rec.tmt_validated_yn;
1064 p9_a70 := ddx_tcnv_rec.tmt_streams_updated_yn;
1065 p9_a71 := ddx_tcnv_rec.accrual_activity;
1066 p9_a72 := ddx_tcnv_rec.tmt_split_asset_yn;
1067 p9_a73 := ddx_tcnv_rec.tmt_generic_flag1_yn;
1068 p9_a74 := ddx_tcnv_rec.tmt_generic_flag2_yn;
1069 p9_a75 := ddx_tcnv_rec.tmt_generic_flag3_yn;
1070 p9_a76 := ddx_tcnv_rec.currency_conversion_type;
1071 p9_a77 := rosetta_g_miss_num_map(ddx_tcnv_rec.currency_conversion_rate);
1072 p9_a78 := ddx_tcnv_rec.currency_conversion_date;
1073 p9_a79 := rosetta_g_miss_num_map(ddx_tcnv_rec.chr_id);
1074 p9_a80 := rosetta_g_miss_num_map(ddx_tcnv_rec.source_trx_id);
1075 p9_a81 := ddx_tcnv_rec.source_trx_type;
1076 p9_a82 := ddx_tcnv_rec.canceled_date;
1077 end;
1078
1079 end okl_transaction_pvt_w;