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