[Home] [Help]
PACKAGE BODY: APPS.OKL_AM_TERMNT_QUOTE_PVT_W
Source
1 package body okl_am_termnt_quote_pvt_w as
2 /* $Header: OKLETNQB.pls 120.5 2007/11/02 21:06:36 rmunjulu ship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5
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_am_termnt_quote_pvt.qte_ln_dtl_tbl, a0 JTF_VARCHAR2_TABLE_100
23 , a1 JTF_NUMBER_TABLE
24 , a2 JTF_NUMBER_TABLE
25 , a3 JTF_NUMBER_TABLE
26 , a4 JTF_NUMBER_TABLE
27 , a5 JTF_VARCHAR2_TABLE_100
28 , a6 JTF_NUMBER_TABLE
29 , a7 JTF_NUMBER_TABLE
30 , a8 JTF_NUMBER_TABLE
31 ) as
32 ddindx binary_integer; indx binary_integer;
33 begin
34 if a0 is not null and a0.count > 0 then
35 if a0.count > 0 then
36 indx := a0.first;
37 ddindx := 1;
38 while true loop
39 t(ddindx).qst_code := a0(indx);
40 t(ddindx).qte_id := rosetta_g_miss_num_map(a1(indx));
41 t(ddindx).instance_quantity := rosetta_g_miss_num_map(a2(indx));
42 t(ddindx).tql_id := rosetta_g_miss_num_map(a3(indx));
43 t(ddindx).tqd_id := rosetta_g_miss_num_map(a4(indx));
44 t(ddindx).select_yn := a5(indx);
45 t(ddindx).ib_line_id := rosetta_g_miss_num_map(a6(indx));
46 t(ddindx).fin_line_id := rosetta_g_miss_num_map(a7(indx));
47 t(ddindx).dnz_chr_id := rosetta_g_miss_num_map(a8(indx));
48 ddindx := ddindx+1;
49 if a0.last =indx
50 then exit;
51 end if;
52 indx := a0.next(indx);
53 end loop;
54 end if;
55 end if;
56 end rosetta_table_copy_in_p11;
57 procedure rosetta_table_copy_out_p11(t okl_am_termnt_quote_pvt.qte_ln_dtl_tbl, a0 out nocopy JTF_VARCHAR2_TABLE_100
58 , a1 out nocopy JTF_NUMBER_TABLE
59 , a2 out nocopy JTF_NUMBER_TABLE
60 , a3 out nocopy JTF_NUMBER_TABLE
61 , a4 out nocopy JTF_NUMBER_TABLE
62 , a5 out nocopy JTF_VARCHAR2_TABLE_100
63 , a6 out nocopy JTF_NUMBER_TABLE
64 , a7 out nocopy JTF_NUMBER_TABLE
65 , a8 out nocopy JTF_NUMBER_TABLE
66 ) as
67 ddindx binary_integer; indx binary_integer;
68 begin
69 if t is null or t.count = 0 then
70 a0 := JTF_VARCHAR2_TABLE_100();
71 a1 := JTF_NUMBER_TABLE();
72 a2 := JTF_NUMBER_TABLE();
73 a3 := JTF_NUMBER_TABLE();
74 a4 := JTF_NUMBER_TABLE();
75 a5 := JTF_VARCHAR2_TABLE_100();
76 a6 := JTF_NUMBER_TABLE();
77 a7 := JTF_NUMBER_TABLE();
78 a8 := JTF_NUMBER_TABLE();
79 else
80 a0 := JTF_VARCHAR2_TABLE_100();
81 a1 := JTF_NUMBER_TABLE();
82 a2 := JTF_NUMBER_TABLE();
83 a3 := JTF_NUMBER_TABLE();
84 a4 := JTF_NUMBER_TABLE();
85 a5 := JTF_VARCHAR2_TABLE_100();
86 a6 := JTF_NUMBER_TABLE();
87 a7 := JTF_NUMBER_TABLE();
88 a8 := JTF_NUMBER_TABLE();
89 if t.count > 0 then
90 a0.extend(t.count);
91 a1.extend(t.count);
92 a2.extend(t.count);
93 a3.extend(t.count);
94 a4.extend(t.count);
95 a5.extend(t.count);
96 a6.extend(t.count);
97 a7.extend(t.count);
98 a8.extend(t.count);
99 ddindx := t.first;
100 indx := 1;
101 while true loop
102 a0(indx) := t(ddindx).qst_code;
103 a1(indx) := rosetta_g_miss_num_map(t(ddindx).qte_id);
104 a2(indx) := rosetta_g_miss_num_map(t(ddindx).instance_quantity);
105 a3(indx) := rosetta_g_miss_num_map(t(ddindx).tql_id);
106 a4(indx) := rosetta_g_miss_num_map(t(ddindx).tqd_id);
107 a5(indx) := t(ddindx).select_yn;
108 a6(indx) := rosetta_g_miss_num_map(t(ddindx).ib_line_id);
109 a7(indx) := rosetta_g_miss_num_map(t(ddindx).fin_line_id);
110 a8(indx) := rosetta_g_miss_num_map(t(ddindx).dnz_chr_id);
111 indx := indx+1;
112 if t.last =ddindx
113 then exit;
114 end if;
115 ddindx := t.next(ddindx);
116 end loop;
117 end if;
118 end if;
119 end rosetta_table_copy_out_p11;
120
121 procedure rosetta_table_copy_in_p25(t out nocopy okl_am_termnt_quote_pvt.unit_tbl_type, a0 JTF_NUMBER_TABLE
122 , a1 JTF_VARCHAR2_TABLE_100
123 , a2 JTF_VARCHAR2_TABLE_100
124 , a3 JTF_NUMBER_TABLE
125 , a4 JTF_NUMBER_TABLE
126 , a5 JTF_NUMBER_TABLE
127 , a6 JTF_NUMBER_TABLE
128 , a7 JTF_NUMBER_TABLE
129 , a8 JTF_NUMBER_TABLE
130 , a9 JTF_NUMBER_TABLE
131 , a10 JTF_VARCHAR2_TABLE_300
132 , a11 JTF_NUMBER_TABLE
133 , a12 JTF_NUMBER_TABLE
134 , a13 JTF_VARCHAR2_TABLE_300
135 , a14 JTF_VARCHAR2_TABLE_2000
136 , a15 JTF_VARCHAR2_TABLE_2000
137 , a16 JTF_NUMBER_TABLE
138 ) as
139 ddindx binary_integer; indx binary_integer;
140 begin
141 if a0 is not null and a0.count > 0 then
142 if a0.count > 0 then
143 indx := a0.first;
144 ddindx := 1;
145 while true loop
146 t(ddindx).quote_number := rosetta_g_miss_num_map(a0(indx));
147 t(ddindx).qst_code := a1(indx);
148 t(ddindx).qtp_code := a2(indx);
149 t(ddindx).tql_id := rosetta_g_miss_num_map(a3(indx));
150 t(ddindx).tqd_id := rosetta_g_miss_num_map(a4(indx));
151 t(ddindx).asset_quantity := rosetta_g_miss_num_map(a5(indx));
152 t(ddindx).quote_quantity := rosetta_g_miss_num_map(a6(indx));
153 t(ddindx).ib_line_id := rosetta_g_miss_num_map(a7(indx));
154 t(ddindx).fin_line_id := rosetta_g_miss_num_map(a8(indx));
155 t(ddindx).dnz_chr_id := rosetta_g_miss_num_map(a9(indx));
156 t(ddindx).serial_number := a10(indx);
157 t(ddindx).instance_quantity := rosetta_g_miss_num_map(a11(indx));
158 t(ddindx).instance_number := rosetta_g_miss_num_map(a12(indx));
159 t(ddindx).asset_number := a13(indx);
160 t(ddindx).asset_description := a14(indx);
161 t(ddindx).location_description := a15(indx);
162 t(ddindx).qte_id := rosetta_g_miss_num_map(a16(indx));
163 ddindx := ddindx+1;
164 if a0.last =indx
165 then exit;
166 end if;
167 indx := a0.next(indx);
168 end loop;
169 end if;
170 end if;
171 end rosetta_table_copy_in_p25;
172 procedure rosetta_table_copy_out_p25(t okl_am_termnt_quote_pvt.unit_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
173 , a1 out nocopy JTF_VARCHAR2_TABLE_100
174 , a2 out nocopy JTF_VARCHAR2_TABLE_100
175 , a3 out nocopy JTF_NUMBER_TABLE
176 , a4 out nocopy JTF_NUMBER_TABLE
177 , a5 out nocopy JTF_NUMBER_TABLE
178 , a6 out nocopy JTF_NUMBER_TABLE
179 , a7 out nocopy JTF_NUMBER_TABLE
180 , a8 out nocopy JTF_NUMBER_TABLE
181 , a9 out nocopy JTF_NUMBER_TABLE
182 , a10 out nocopy JTF_VARCHAR2_TABLE_300
183 , a11 out nocopy JTF_NUMBER_TABLE
184 , a12 out nocopy JTF_NUMBER_TABLE
185 , a13 out nocopy JTF_VARCHAR2_TABLE_300
186 , a14 out nocopy JTF_VARCHAR2_TABLE_2000
187 , a15 out nocopy JTF_VARCHAR2_TABLE_2000
188 , a16 out nocopy JTF_NUMBER_TABLE
189 ) as
190 ddindx binary_integer; indx binary_integer;
191 begin
192 if t is null or t.count = 0 then
193 a0 := JTF_NUMBER_TABLE();
194 a1 := JTF_VARCHAR2_TABLE_100();
195 a2 := JTF_VARCHAR2_TABLE_100();
196 a3 := JTF_NUMBER_TABLE();
197 a4 := JTF_NUMBER_TABLE();
198 a5 := JTF_NUMBER_TABLE();
199 a6 := JTF_NUMBER_TABLE();
200 a7 := JTF_NUMBER_TABLE();
201 a8 := JTF_NUMBER_TABLE();
202 a9 := JTF_NUMBER_TABLE();
203 a10 := JTF_VARCHAR2_TABLE_300();
204 a11 := JTF_NUMBER_TABLE();
205 a12 := JTF_NUMBER_TABLE();
206 a13 := JTF_VARCHAR2_TABLE_300();
207 a14 := JTF_VARCHAR2_TABLE_2000();
208 a15 := JTF_VARCHAR2_TABLE_2000();
209 a16 := JTF_NUMBER_TABLE();
210 else
211 a0 := JTF_NUMBER_TABLE();
212 a1 := JTF_VARCHAR2_TABLE_100();
213 a2 := JTF_VARCHAR2_TABLE_100();
214 a3 := JTF_NUMBER_TABLE();
215 a4 := JTF_NUMBER_TABLE();
216 a5 := JTF_NUMBER_TABLE();
217 a6 := JTF_NUMBER_TABLE();
218 a7 := JTF_NUMBER_TABLE();
219 a8 := JTF_NUMBER_TABLE();
220 a9 := JTF_NUMBER_TABLE();
221 a10 := JTF_VARCHAR2_TABLE_300();
222 a11 := JTF_NUMBER_TABLE();
223 a12 := JTF_NUMBER_TABLE();
224 a13 := JTF_VARCHAR2_TABLE_300();
225 a14 := JTF_VARCHAR2_TABLE_2000();
226 a15 := JTF_VARCHAR2_TABLE_2000();
227 a16 := JTF_NUMBER_TABLE();
228 if t.count > 0 then
229 a0.extend(t.count);
230 a1.extend(t.count);
231 a2.extend(t.count);
232 a3.extend(t.count);
233 a4.extend(t.count);
234 a5.extend(t.count);
235 a6.extend(t.count);
236 a7.extend(t.count);
237 a8.extend(t.count);
238 a9.extend(t.count);
239 a10.extend(t.count);
240 a11.extend(t.count);
241 a12.extend(t.count);
242 a13.extend(t.count);
243 a14.extend(t.count);
244 a15.extend(t.count);
245 a16.extend(t.count);
246 ddindx := t.first;
247 indx := 1;
248 while true loop
249 a0(indx) := rosetta_g_miss_num_map(t(ddindx).quote_number);
250 a1(indx) := t(ddindx).qst_code;
251 a2(indx) := t(ddindx).qtp_code;
252 a3(indx) := rosetta_g_miss_num_map(t(ddindx).tql_id);
253 a4(indx) := rosetta_g_miss_num_map(t(ddindx).tqd_id);
254 a5(indx) := rosetta_g_miss_num_map(t(ddindx).asset_quantity);
255 a6(indx) := rosetta_g_miss_num_map(t(ddindx).quote_quantity);
256 a7(indx) := rosetta_g_miss_num_map(t(ddindx).ib_line_id);
257 a8(indx) := rosetta_g_miss_num_map(t(ddindx).fin_line_id);
258 a9(indx) := rosetta_g_miss_num_map(t(ddindx).dnz_chr_id);
259 a10(indx) := t(ddindx).serial_number;
260 a11(indx) := rosetta_g_miss_num_map(t(ddindx).instance_quantity);
261 a12(indx) := rosetta_g_miss_num_map(t(ddindx).instance_number);
262 a13(indx) := t(ddindx).asset_number;
263 a14(indx) := t(ddindx).asset_description;
264 a15(indx) := t(ddindx).location_description;
265 a16(indx) := rosetta_g_miss_num_map(t(ddindx).qte_id);
266 indx := indx+1;
267 if t.last =ddindx
268 then exit;
269 end if;
270 ddindx := t.next(ddindx);
271 end loop;
272 end if;
273 end if;
274 end rosetta_table_copy_out_p25;
275
276 procedure terminate_quote(p_api_version NUMBER
277 , p_init_msg_list VARCHAR2
278 , x_return_status out nocopy VARCHAR2
279 , x_msg_count out nocopy NUMBER
280 , x_msg_data out nocopy VARCHAR2
281 , p6_a0 out nocopy NUMBER
282 , p6_a1 out nocopy NUMBER
283 , p6_a2 out nocopy VARCHAR2
284 , p6_a3 out nocopy VARCHAR2
285 , p6_a4 out nocopy VARCHAR2
286 , p6_a5 out nocopy VARCHAR2
287 , p6_a6 out nocopy VARCHAR2
288 , p6_a7 out nocopy VARCHAR2
289 , p6_a8 out nocopy VARCHAR2
290 , p6_a9 out nocopy NUMBER
291 , p6_a10 out nocopy NUMBER
292 , p6_a11 out nocopy NUMBER
293 , p6_a12 out nocopy NUMBER
294 , p6_a13 out nocopy VARCHAR2
295 , p6_a14 out nocopy VARCHAR2
296 , p6_a15 out nocopy VARCHAR2
297 , p6_a16 out nocopy DATE
298 , p6_a17 out nocopy DATE
299 , p6_a18 out nocopy DATE
300 , p6_a19 out nocopy DATE
301 , p6_a20 out nocopy VARCHAR2
302 , p6_a21 out nocopy VARCHAR2
303 , p6_a22 out nocopy NUMBER
304 , p6_a23 out nocopy NUMBER
305 , p6_a24 out nocopy NUMBER
306 , p6_a25 out nocopy NUMBER
307 , p6_a26 out nocopy DATE
308 , p6_a27 out nocopy DATE
309 , p6_a28 out nocopy NUMBER
310 , p6_a29 out nocopy NUMBER
311 , p6_a30 out nocopy VARCHAR2
312 , p6_a31 out nocopy DATE
313 , p6_a32 out nocopy VARCHAR2
314 , p6_a33 out nocopy NUMBER
315 , p6_a34 out nocopy DATE
316 , p6_a35 out nocopy NUMBER
317 , p6_a36 out nocopy NUMBER
318 , p6_a37 out nocopy VARCHAR2
319 , p6_a38 out nocopy VARCHAR2
320 , p6_a39 out nocopy VARCHAR2
321 , p6_a40 out nocopy DATE
322 , p6_a41 out nocopy VARCHAR2
323 , p6_a42 out nocopy VARCHAR2
324 , p6_a43 out nocopy VARCHAR2
325 , p6_a44 out nocopy VARCHAR2
326 , p6_a45 out nocopy VARCHAR2
327 , p6_a46 out nocopy VARCHAR2
328 , p6_a47 out nocopy VARCHAR2
329 , p6_a48 out nocopy VARCHAR2
330 , p6_a49 out nocopy VARCHAR2
331 , p6_a50 out nocopy VARCHAR2
332 , p6_a51 out nocopy VARCHAR2
333 , p6_a52 out nocopy VARCHAR2
334 , p6_a53 out nocopy VARCHAR2
335 , p6_a54 out nocopy VARCHAR2
336 , p6_a55 out nocopy VARCHAR2
337 , p6_a56 out nocopy VARCHAR2
338 , p6_a57 out nocopy DATE
339 , p6_a58 out nocopy NUMBER
340 , p6_a59 out nocopy NUMBER
341 , p6_a60 out nocopy NUMBER
342 , p6_a61 out nocopy NUMBER
343 , p6_a62 out nocopy NUMBER
344 , p6_a63 out nocopy DATE
345 , p6_a64 out nocopy NUMBER
346 , p6_a65 out nocopy DATE
347 , p6_a66 out nocopy NUMBER
348 , p6_a67 out nocopy DATE
349 , p6_a68 out nocopy NUMBER
350 , p6_a69 out nocopy NUMBER
351 , p6_a70 out nocopy VARCHAR2
352 , p6_a71 out nocopy NUMBER
353 , p6_a72 out nocopy NUMBER
354 , p6_a73 out nocopy NUMBER
355 , p6_a74 out nocopy NUMBER
356 , p6_a75 out nocopy NUMBER
357 , p6_a76 out nocopy VARCHAR2
358 , p6_a77 out nocopy VARCHAR2
359 , p6_a78 out nocopy VARCHAR2
360 , p6_a79 out nocopy NUMBER
361 , p6_a80 out nocopy DATE
362 , p6_a81 out nocopy NUMBER
363 , p6_a82 out nocopy VARCHAR2
364 , x_err_msg out nocopy VARCHAR2
365 , p_acceptance_source VARCHAR2
366 , p5_a0 NUMBER := 0-1962.0724
367 , p5_a1 NUMBER := 0-1962.0724
368 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
369 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
370 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
371 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
372 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
373 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
374 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
375 , p5_a9 NUMBER := 0-1962.0724
376 , p5_a10 NUMBER := 0-1962.0724
377 , p5_a11 NUMBER := 0-1962.0724
378 , p5_a12 NUMBER := 0-1962.0724
379 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
380 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
381 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
382 , p5_a16 DATE := fnd_api.g_miss_date
383 , p5_a17 DATE := fnd_api.g_miss_date
384 , p5_a18 DATE := fnd_api.g_miss_date
385 , p5_a19 DATE := fnd_api.g_miss_date
386 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
387 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
388 , p5_a22 NUMBER := 0-1962.0724
389 , p5_a23 NUMBER := 0-1962.0724
390 , p5_a24 NUMBER := 0-1962.0724
391 , p5_a25 NUMBER := 0-1962.0724
392 , p5_a26 DATE := fnd_api.g_miss_date
393 , p5_a27 DATE := fnd_api.g_miss_date
394 , p5_a28 NUMBER := 0-1962.0724
395 , p5_a29 NUMBER := 0-1962.0724
396 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
397 , p5_a31 DATE := fnd_api.g_miss_date
398 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
399 , p5_a33 NUMBER := 0-1962.0724
400 , p5_a34 DATE := fnd_api.g_miss_date
401 , p5_a35 NUMBER := 0-1962.0724
402 , p5_a36 NUMBER := 0-1962.0724
403 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
404 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
405 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
406 , p5_a40 DATE := fnd_api.g_miss_date
407 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
408 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
409 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
410 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
411 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
412 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
413 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
414 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
415 , p5_a49 VARCHAR2 := fnd_api.g_miss_char
416 , p5_a50 VARCHAR2 := fnd_api.g_miss_char
417 , p5_a51 VARCHAR2 := fnd_api.g_miss_char
418 , p5_a52 VARCHAR2 := fnd_api.g_miss_char
419 , p5_a53 VARCHAR2 := fnd_api.g_miss_char
420 , p5_a54 VARCHAR2 := fnd_api.g_miss_char
421 , p5_a55 VARCHAR2 := fnd_api.g_miss_char
422 , p5_a56 VARCHAR2 := fnd_api.g_miss_char
423 , p5_a57 DATE := fnd_api.g_miss_date
424 , p5_a58 NUMBER := 0-1962.0724
425 , p5_a59 NUMBER := 0-1962.0724
426 , p5_a60 NUMBER := 0-1962.0724
427 , p5_a61 NUMBER := 0-1962.0724
428 , p5_a62 NUMBER := 0-1962.0724
429 , p5_a63 DATE := fnd_api.g_miss_date
430 , p5_a64 NUMBER := 0-1962.0724
431 , p5_a65 DATE := fnd_api.g_miss_date
432 , p5_a66 NUMBER := 0-1962.0724
433 , p5_a67 DATE := fnd_api.g_miss_date
434 , p5_a68 NUMBER := 0-1962.0724
435 , p5_a69 NUMBER := 0-1962.0724
436 , p5_a70 VARCHAR2 := fnd_api.g_miss_char
437 , p5_a71 NUMBER := 0-1962.0724
438 , p5_a72 NUMBER := 0-1962.0724
439 , p5_a73 NUMBER := 0-1962.0724
440 , p5_a74 NUMBER := 0-1962.0724
441 , p5_a75 NUMBER := 0-1962.0724
442 , p5_a76 VARCHAR2 := fnd_api.g_miss_char
443 , p5_a77 VARCHAR2 := fnd_api.g_miss_char
444 , p5_a78 VARCHAR2 := fnd_api.g_miss_char
445 , p5_a79 NUMBER := 0-1962.0724
446 , p5_a80 DATE := fnd_api.g_miss_date
447 , p5_a81 NUMBER := 0-1962.0724
448 , p5_a82 VARCHAR2 := fnd_api.g_miss_char
449 )
450
451 as
452 ddp_term_rec okl_am_termnt_quote_pvt.term_rec_type;
453 ddx_term_rec okl_am_termnt_quote_pvt.term_rec_type;
454 ddindx binary_integer; indx binary_integer;
455 begin
456
457 -- copy data to the local IN or IN-OUT args, if any
458
459
460
461
462
463 ddp_term_rec.id := rosetta_g_miss_num_map(p5_a0);
464 ddp_term_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
465 ddp_term_rec.sfwt_flag := p5_a2;
466 ddp_term_rec.qrs_code := p5_a3;
467 ddp_term_rec.qst_code := p5_a4;
468 ddp_term_rec.qtp_code := p5_a5;
469 ddp_term_rec.trn_code := p5_a6;
470 ddp_term_rec.pop_code_end := p5_a7;
471 ddp_term_rec.pop_code_early := p5_a8;
472 ddp_term_rec.consolidated_qte_id := rosetta_g_miss_num_map(p5_a9);
473 ddp_term_rec.khr_id := rosetta_g_miss_num_map(p5_a10);
474 ddp_term_rec.art_id := rosetta_g_miss_num_map(p5_a11);
475 ddp_term_rec.pdt_id := rosetta_g_miss_num_map(p5_a12);
476 ddp_term_rec.early_termination_yn := p5_a13;
477 ddp_term_rec.partial_yn := p5_a14;
478 ddp_term_rec.preproceeds_yn := p5_a15;
479 ddp_term_rec.date_requested := rosetta_g_miss_date_in_map(p5_a16);
480 ddp_term_rec.date_proposal := rosetta_g_miss_date_in_map(p5_a17);
481 ddp_term_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a18);
482 ddp_term_rec.date_accepted := rosetta_g_miss_date_in_map(p5_a19);
483 ddp_term_rec.summary_format_yn := p5_a20;
484 ddp_term_rec.consolidated_yn := p5_a21;
485 ddp_term_rec.principal_paydown_amount := rosetta_g_miss_num_map(p5_a22);
486 ddp_term_rec.residual_amount := rosetta_g_miss_num_map(p5_a23);
487 ddp_term_rec.yield := rosetta_g_miss_num_map(p5_a24);
488 ddp_term_rec.rent_amount := rosetta_g_miss_num_map(p5_a25);
489 ddp_term_rec.date_restructure_end := rosetta_g_miss_date_in_map(p5_a26);
490 ddp_term_rec.date_restructure_start := rosetta_g_miss_date_in_map(p5_a27);
491 ddp_term_rec.term := rosetta_g_miss_num_map(p5_a28);
492 ddp_term_rec.purchase_percent := rosetta_g_miss_num_map(p5_a29);
493 ddp_term_rec.comments := p5_a30;
494 ddp_term_rec.date_due := rosetta_g_miss_date_in_map(p5_a31);
495 ddp_term_rec.payment_frequency := p5_a32;
496 ddp_term_rec.remaining_payments := rosetta_g_miss_num_map(p5_a33);
497 ddp_term_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a34);
498 ddp_term_rec.quote_number := rosetta_g_miss_num_map(p5_a35);
499 ddp_term_rec.requested_by := rosetta_g_miss_num_map(p5_a36);
500 ddp_term_rec.approved_yn := p5_a37;
501 ddp_term_rec.accepted_yn := p5_a38;
502 ddp_term_rec.payment_received_yn := p5_a39;
503 ddp_term_rec.date_payment_received := rosetta_g_miss_date_in_map(p5_a40);
504 ddp_term_rec.attribute_category := p5_a41;
505 ddp_term_rec.attribute1 := p5_a42;
506 ddp_term_rec.attribute2 := p5_a43;
507 ddp_term_rec.attribute3 := p5_a44;
508 ddp_term_rec.attribute4 := p5_a45;
509 ddp_term_rec.attribute5 := p5_a46;
510 ddp_term_rec.attribute6 := p5_a47;
511 ddp_term_rec.attribute7 := p5_a48;
512 ddp_term_rec.attribute8 := p5_a49;
513 ddp_term_rec.attribute9 := p5_a50;
514 ddp_term_rec.attribute10 := p5_a51;
515 ddp_term_rec.attribute11 := p5_a52;
516 ddp_term_rec.attribute12 := p5_a53;
517 ddp_term_rec.attribute13 := p5_a54;
518 ddp_term_rec.attribute14 := p5_a55;
519 ddp_term_rec.attribute15 := p5_a56;
520 ddp_term_rec.date_approved := rosetta_g_miss_date_in_map(p5_a57);
521 ddp_term_rec.approved_by := rosetta_g_miss_num_map(p5_a58);
522 ddp_term_rec.org_id := rosetta_g_miss_num_map(p5_a59);
523 ddp_term_rec.request_id := rosetta_g_miss_num_map(p5_a60);
524 ddp_term_rec.program_application_id := rosetta_g_miss_num_map(p5_a61);
525 ddp_term_rec.program_id := rosetta_g_miss_num_map(p5_a62);
526 ddp_term_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a63);
527 ddp_term_rec.created_by := rosetta_g_miss_num_map(p5_a64);
528 ddp_term_rec.creation_date := rosetta_g_miss_date_in_map(p5_a65);
529 ddp_term_rec.last_updated_by := rosetta_g_miss_num_map(p5_a66);
530 ddp_term_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a67);
531 ddp_term_rec.last_update_login := rosetta_g_miss_num_map(p5_a68);
532 ddp_term_rec.purchase_amount := rosetta_g_miss_num_map(p5_a69);
533 ddp_term_rec.purchase_formula := p5_a70;
534 ddp_term_rec.asset_value := rosetta_g_miss_num_map(p5_a71);
535 ddp_term_rec.residual_value := rosetta_g_miss_num_map(p5_a72);
536 ddp_term_rec.unbilled_receivables := rosetta_g_miss_num_map(p5_a73);
537 ddp_term_rec.gain_loss := rosetta_g_miss_num_map(p5_a74);
538 ddp_term_rec.perdiem_amount := rosetta_g_miss_num_map(p5_a75);
539 ddp_term_rec.currency_code := p5_a76;
540 ddp_term_rec.currency_conversion_code := p5_a77;
541 ddp_term_rec.currency_conversion_type := p5_a78;
542 ddp_term_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a79);
543 ddp_term_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a80);
544 ddp_term_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a81);
545 ddp_term_rec.repo_quote_indicator_yn := p5_a82;
546
547
548
549
550 -- here's the delegated call to the old PL/SQL routine
551 okl_am_termnt_quote_pvt.terminate_quote(p_api_version,
552 p_init_msg_list,
553 x_return_status,
554 x_msg_count,
555 x_msg_data,
556 ddp_term_rec,
557 ddx_term_rec,
558 x_err_msg,
559 p_acceptance_source);
560
561 -- copy data back from the local variables to OUT or IN-OUT args, if any
562
563
564
565
566
567
568 p6_a0 := rosetta_g_miss_num_map(ddx_term_rec.id);
569 p6_a1 := rosetta_g_miss_num_map(ddx_term_rec.object_version_number);
570 p6_a2 := ddx_term_rec.sfwt_flag;
571 p6_a3 := ddx_term_rec.qrs_code;
572 p6_a4 := ddx_term_rec.qst_code;
573 p6_a5 := ddx_term_rec.qtp_code;
574 p6_a6 := ddx_term_rec.trn_code;
575 p6_a7 := ddx_term_rec.pop_code_end;
576 p6_a8 := ddx_term_rec.pop_code_early;
577 p6_a9 := rosetta_g_miss_num_map(ddx_term_rec.consolidated_qte_id);
578 p6_a10 := rosetta_g_miss_num_map(ddx_term_rec.khr_id);
579 p6_a11 := rosetta_g_miss_num_map(ddx_term_rec.art_id);
580 p6_a12 := rosetta_g_miss_num_map(ddx_term_rec.pdt_id);
581 p6_a13 := ddx_term_rec.early_termination_yn;
582 p6_a14 := ddx_term_rec.partial_yn;
583 p6_a15 := ddx_term_rec.preproceeds_yn;
584 p6_a16 := ddx_term_rec.date_requested;
585 p6_a17 := ddx_term_rec.date_proposal;
586 p6_a18 := ddx_term_rec.date_effective_to;
587 p6_a19 := ddx_term_rec.date_accepted;
588 p6_a20 := ddx_term_rec.summary_format_yn;
589 p6_a21 := ddx_term_rec.consolidated_yn;
590 p6_a22 := rosetta_g_miss_num_map(ddx_term_rec.principal_paydown_amount);
591 p6_a23 := rosetta_g_miss_num_map(ddx_term_rec.residual_amount);
592 p6_a24 := rosetta_g_miss_num_map(ddx_term_rec.yield);
593 p6_a25 := rosetta_g_miss_num_map(ddx_term_rec.rent_amount);
594 p6_a26 := ddx_term_rec.date_restructure_end;
595 p6_a27 := ddx_term_rec.date_restructure_start;
596 p6_a28 := rosetta_g_miss_num_map(ddx_term_rec.term);
597 p6_a29 := rosetta_g_miss_num_map(ddx_term_rec.purchase_percent);
598 p6_a30 := ddx_term_rec.comments;
599 p6_a31 := ddx_term_rec.date_due;
600 p6_a32 := ddx_term_rec.payment_frequency;
601 p6_a33 := rosetta_g_miss_num_map(ddx_term_rec.remaining_payments);
602 p6_a34 := ddx_term_rec.date_effective_from;
603 p6_a35 := rosetta_g_miss_num_map(ddx_term_rec.quote_number);
604 p6_a36 := rosetta_g_miss_num_map(ddx_term_rec.requested_by);
605 p6_a37 := ddx_term_rec.approved_yn;
606 p6_a38 := ddx_term_rec.accepted_yn;
607 p6_a39 := ddx_term_rec.payment_received_yn;
608 p6_a40 := ddx_term_rec.date_payment_received;
609 p6_a41 := ddx_term_rec.attribute_category;
610 p6_a42 := ddx_term_rec.attribute1;
611 p6_a43 := ddx_term_rec.attribute2;
612 p6_a44 := ddx_term_rec.attribute3;
613 p6_a45 := ddx_term_rec.attribute4;
614 p6_a46 := ddx_term_rec.attribute5;
615 p6_a47 := ddx_term_rec.attribute6;
616 p6_a48 := ddx_term_rec.attribute7;
617 p6_a49 := ddx_term_rec.attribute8;
618 p6_a50 := ddx_term_rec.attribute9;
619 p6_a51 := ddx_term_rec.attribute10;
620 p6_a52 := ddx_term_rec.attribute11;
621 p6_a53 := ddx_term_rec.attribute12;
622 p6_a54 := ddx_term_rec.attribute13;
623 p6_a55 := ddx_term_rec.attribute14;
624 p6_a56 := ddx_term_rec.attribute15;
625 p6_a57 := ddx_term_rec.date_approved;
626 p6_a58 := rosetta_g_miss_num_map(ddx_term_rec.approved_by);
627 p6_a59 := rosetta_g_miss_num_map(ddx_term_rec.org_id);
628 p6_a60 := rosetta_g_miss_num_map(ddx_term_rec.request_id);
629 p6_a61 := rosetta_g_miss_num_map(ddx_term_rec.program_application_id);
630 p6_a62 := rosetta_g_miss_num_map(ddx_term_rec.program_id);
631 p6_a63 := ddx_term_rec.program_update_date;
632 p6_a64 := rosetta_g_miss_num_map(ddx_term_rec.created_by);
633 p6_a65 := ddx_term_rec.creation_date;
634 p6_a66 := rosetta_g_miss_num_map(ddx_term_rec.last_updated_by);
635 p6_a67 := ddx_term_rec.last_update_date;
636 p6_a68 := rosetta_g_miss_num_map(ddx_term_rec.last_update_login);
637 p6_a69 := rosetta_g_miss_num_map(ddx_term_rec.purchase_amount);
638 p6_a70 := ddx_term_rec.purchase_formula;
639 p6_a71 := rosetta_g_miss_num_map(ddx_term_rec.asset_value);
640 p6_a72 := rosetta_g_miss_num_map(ddx_term_rec.residual_value);
641 p6_a73 := rosetta_g_miss_num_map(ddx_term_rec.unbilled_receivables);
642 p6_a74 := rosetta_g_miss_num_map(ddx_term_rec.gain_loss);
643 p6_a75 := rosetta_g_miss_num_map(ddx_term_rec.perdiem_amount);
644 p6_a76 := ddx_term_rec.currency_code;
645 p6_a77 := ddx_term_rec.currency_conversion_code;
646 p6_a78 := ddx_term_rec.currency_conversion_type;
647 p6_a79 := rosetta_g_miss_num_map(ddx_term_rec.currency_conversion_rate);
648 p6_a80 := ddx_term_rec.currency_conversion_date;
649 p6_a81 := rosetta_g_miss_num_map(ddx_term_rec.legal_entity_id);
650 p6_a82 := ddx_term_rec.repo_quote_indicator_yn;
651
652
653 end;
654
655 procedure terminate_quote(p_api_version NUMBER
656 , p_init_msg_list VARCHAR2
657 , x_return_status out nocopy VARCHAR2
658 , x_msg_count out nocopy NUMBER
659 , x_msg_data out nocopy VARCHAR2
660 , p5_a0 JTF_NUMBER_TABLE
661 , p5_a1 JTF_NUMBER_TABLE
662 , p5_a2 JTF_VARCHAR2_TABLE_100
663 , p5_a3 JTF_VARCHAR2_TABLE_100
664 , p5_a4 JTF_VARCHAR2_TABLE_100
665 , p5_a5 JTF_VARCHAR2_TABLE_100
666 , p5_a6 JTF_VARCHAR2_TABLE_100
667 , p5_a7 JTF_VARCHAR2_TABLE_100
668 , p5_a8 JTF_VARCHAR2_TABLE_100
669 , p5_a9 JTF_NUMBER_TABLE
670 , p5_a10 JTF_NUMBER_TABLE
671 , p5_a11 JTF_NUMBER_TABLE
672 , p5_a12 JTF_NUMBER_TABLE
673 , p5_a13 JTF_VARCHAR2_TABLE_100
674 , p5_a14 JTF_VARCHAR2_TABLE_100
675 , p5_a15 JTF_VARCHAR2_TABLE_100
676 , p5_a16 JTF_DATE_TABLE
677 , p5_a17 JTF_DATE_TABLE
678 , p5_a18 JTF_DATE_TABLE
679 , p5_a19 JTF_DATE_TABLE
680 , p5_a20 JTF_VARCHAR2_TABLE_100
681 , p5_a21 JTF_VARCHAR2_TABLE_100
682 , p5_a22 JTF_NUMBER_TABLE
683 , p5_a23 JTF_NUMBER_TABLE
684 , p5_a24 JTF_NUMBER_TABLE
685 , p5_a25 JTF_NUMBER_TABLE
686 , p5_a26 JTF_DATE_TABLE
687 , p5_a27 JTF_DATE_TABLE
688 , p5_a28 JTF_NUMBER_TABLE
689 , p5_a29 JTF_NUMBER_TABLE
690 , p5_a30 JTF_VARCHAR2_TABLE_2000
691 , p5_a31 JTF_DATE_TABLE
692 , p5_a32 JTF_VARCHAR2_TABLE_100
693 , p5_a33 JTF_NUMBER_TABLE
694 , p5_a34 JTF_DATE_TABLE
695 , p5_a35 JTF_NUMBER_TABLE
696 , p5_a36 JTF_NUMBER_TABLE
697 , p5_a37 JTF_VARCHAR2_TABLE_100
698 , p5_a38 JTF_VARCHAR2_TABLE_100
699 , p5_a39 JTF_VARCHAR2_TABLE_100
700 , p5_a40 JTF_DATE_TABLE
701 , p5_a41 JTF_VARCHAR2_TABLE_100
702 , p5_a42 JTF_VARCHAR2_TABLE_500
703 , p5_a43 JTF_VARCHAR2_TABLE_500
704 , p5_a44 JTF_VARCHAR2_TABLE_500
705 , p5_a45 JTF_VARCHAR2_TABLE_500
706 , p5_a46 JTF_VARCHAR2_TABLE_500
707 , p5_a47 JTF_VARCHAR2_TABLE_500
708 , p5_a48 JTF_VARCHAR2_TABLE_500
709 , p5_a49 JTF_VARCHAR2_TABLE_500
710 , p5_a50 JTF_VARCHAR2_TABLE_500
711 , p5_a51 JTF_VARCHAR2_TABLE_500
712 , p5_a52 JTF_VARCHAR2_TABLE_500
713 , p5_a53 JTF_VARCHAR2_TABLE_500
714 , p5_a54 JTF_VARCHAR2_TABLE_500
715 , p5_a55 JTF_VARCHAR2_TABLE_500
716 , p5_a56 JTF_VARCHAR2_TABLE_500
717 , p5_a57 JTF_DATE_TABLE
718 , p5_a58 JTF_NUMBER_TABLE
719 , p5_a59 JTF_NUMBER_TABLE
720 , p5_a60 JTF_NUMBER_TABLE
721 , p5_a61 JTF_NUMBER_TABLE
722 , p5_a62 JTF_NUMBER_TABLE
723 , p5_a63 JTF_DATE_TABLE
724 , p5_a64 JTF_NUMBER_TABLE
725 , p5_a65 JTF_DATE_TABLE
726 , p5_a66 JTF_NUMBER_TABLE
727 , p5_a67 JTF_DATE_TABLE
728 , p5_a68 JTF_NUMBER_TABLE
729 , p5_a69 JTF_NUMBER_TABLE
730 , p5_a70 JTF_VARCHAR2_TABLE_200
731 , p5_a71 JTF_NUMBER_TABLE
732 , p5_a72 JTF_NUMBER_TABLE
733 , p5_a73 JTF_NUMBER_TABLE
734 , p5_a74 JTF_NUMBER_TABLE
735 , p5_a75 JTF_NUMBER_TABLE
736 , p5_a76 JTF_VARCHAR2_TABLE_100
737 , p5_a77 JTF_VARCHAR2_TABLE_100
738 , p5_a78 JTF_VARCHAR2_TABLE_100
739 , p5_a79 JTF_NUMBER_TABLE
740 , p5_a80 JTF_DATE_TABLE
741 , p5_a81 JTF_NUMBER_TABLE
742 , p5_a82 JTF_VARCHAR2_TABLE_100
743 , p6_a0 out nocopy JTF_NUMBER_TABLE
744 , p6_a1 out nocopy JTF_NUMBER_TABLE
745 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
746 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
747 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
748 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
749 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
750 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
751 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
752 , p6_a9 out nocopy JTF_NUMBER_TABLE
753 , p6_a10 out nocopy JTF_NUMBER_TABLE
754 , p6_a11 out nocopy JTF_NUMBER_TABLE
755 , p6_a12 out nocopy JTF_NUMBER_TABLE
756 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
757 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
758 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
759 , p6_a16 out nocopy JTF_DATE_TABLE
760 , p6_a17 out nocopy JTF_DATE_TABLE
761 , p6_a18 out nocopy JTF_DATE_TABLE
762 , p6_a19 out nocopy JTF_DATE_TABLE
763 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_100
764 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_100
765 , p6_a22 out nocopy JTF_NUMBER_TABLE
766 , p6_a23 out nocopy JTF_NUMBER_TABLE
767 , p6_a24 out nocopy JTF_NUMBER_TABLE
768 , p6_a25 out nocopy JTF_NUMBER_TABLE
769 , p6_a26 out nocopy JTF_DATE_TABLE
770 , p6_a27 out nocopy JTF_DATE_TABLE
771 , p6_a28 out nocopy JTF_NUMBER_TABLE
772 , p6_a29 out nocopy JTF_NUMBER_TABLE
773 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_2000
774 , p6_a31 out nocopy JTF_DATE_TABLE
775 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_100
776 , p6_a33 out nocopy JTF_NUMBER_TABLE
777 , p6_a34 out nocopy JTF_DATE_TABLE
778 , p6_a35 out nocopy JTF_NUMBER_TABLE
779 , p6_a36 out nocopy JTF_NUMBER_TABLE
780 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_100
781 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
782 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
783 , p6_a40 out nocopy JTF_DATE_TABLE
784 , p6_a41 out nocopy JTF_VARCHAR2_TABLE_100
785 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
786 , p6_a43 out nocopy JTF_VARCHAR2_TABLE_500
787 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_500
788 , p6_a45 out nocopy JTF_VARCHAR2_TABLE_500
789 , p6_a46 out nocopy JTF_VARCHAR2_TABLE_500
790 , p6_a47 out nocopy JTF_VARCHAR2_TABLE_500
791 , p6_a48 out nocopy JTF_VARCHAR2_TABLE_500
792 , p6_a49 out nocopy JTF_VARCHAR2_TABLE_500
793 , p6_a50 out nocopy JTF_VARCHAR2_TABLE_500
794 , p6_a51 out nocopy JTF_VARCHAR2_TABLE_500
795 , p6_a52 out nocopy JTF_VARCHAR2_TABLE_500
796 , p6_a53 out nocopy JTF_VARCHAR2_TABLE_500
797 , p6_a54 out nocopy JTF_VARCHAR2_TABLE_500
798 , p6_a55 out nocopy JTF_VARCHAR2_TABLE_500
799 , p6_a56 out nocopy JTF_VARCHAR2_TABLE_500
800 , p6_a57 out nocopy JTF_DATE_TABLE
801 , p6_a58 out nocopy JTF_NUMBER_TABLE
802 , p6_a59 out nocopy JTF_NUMBER_TABLE
803 , p6_a60 out nocopy JTF_NUMBER_TABLE
804 , p6_a61 out nocopy JTF_NUMBER_TABLE
805 , p6_a62 out nocopy JTF_NUMBER_TABLE
806 , p6_a63 out nocopy JTF_DATE_TABLE
807 , p6_a64 out nocopy JTF_NUMBER_TABLE
808 , p6_a65 out nocopy JTF_DATE_TABLE
809 , p6_a66 out nocopy JTF_NUMBER_TABLE
810 , p6_a67 out nocopy JTF_DATE_TABLE
811 , p6_a68 out nocopy JTF_NUMBER_TABLE
812 , p6_a69 out nocopy JTF_NUMBER_TABLE
813 , p6_a70 out nocopy JTF_VARCHAR2_TABLE_200
814 , p6_a71 out nocopy JTF_NUMBER_TABLE
815 , p6_a72 out nocopy JTF_NUMBER_TABLE
816 , p6_a73 out nocopy JTF_NUMBER_TABLE
817 , p6_a74 out nocopy JTF_NUMBER_TABLE
818 , p6_a75 out nocopy JTF_NUMBER_TABLE
819 , p6_a76 out nocopy JTF_VARCHAR2_TABLE_100
820 , p6_a77 out nocopy JTF_VARCHAR2_TABLE_100
821 , p6_a78 out nocopy JTF_VARCHAR2_TABLE_100
822 , p6_a79 out nocopy JTF_NUMBER_TABLE
823 , p6_a80 out nocopy JTF_DATE_TABLE
824 , p6_a81 out nocopy JTF_NUMBER_TABLE
825 , p6_a82 out nocopy JTF_VARCHAR2_TABLE_100
826 , x_err_msg out nocopy VARCHAR2
827 , p_acceptance_source VARCHAR2
828 )
829
830 as
831 ddp_term_tbl okl_am_termnt_quote_pvt.term_tbl_type;
832 ddx_term_tbl okl_am_termnt_quote_pvt.term_tbl_type;
833 ddindx binary_integer; indx binary_integer;
834 begin
835
836 -- copy data to the local IN or IN-OUT args, if any
837
838
839
840
841
842 okl_qte_pvt_w.rosetta_table_copy_in_p8(ddp_term_tbl, p5_a0
843 , p5_a1
844 , p5_a2
845 , p5_a3
846 , p5_a4
847 , p5_a5
848 , p5_a6
849 , p5_a7
850 , p5_a8
851 , p5_a9
852 , p5_a10
853 , p5_a11
854 , p5_a12
855 , p5_a13
856 , p5_a14
857 , p5_a15
858 , p5_a16
859 , p5_a17
860 , p5_a18
861 , p5_a19
862 , p5_a20
863 , p5_a21
864 , p5_a22
865 , p5_a23
866 , p5_a24
867 , p5_a25
868 , p5_a26
869 , p5_a27
870 , p5_a28
871 , p5_a29
872 , p5_a30
873 , p5_a31
874 , p5_a32
875 , p5_a33
876 , p5_a34
877 , p5_a35
878 , p5_a36
879 , p5_a37
880 , p5_a38
881 , p5_a39
882 , p5_a40
883 , p5_a41
884 , p5_a42
885 , p5_a43
886 , p5_a44
887 , p5_a45
888 , p5_a46
889 , p5_a47
890 , p5_a48
891 , p5_a49
892 , p5_a50
893 , p5_a51
894 , p5_a52
895 , p5_a53
896 , p5_a54
897 , p5_a55
898 , p5_a56
899 , p5_a57
900 , p5_a58
901 , p5_a59
902 , p5_a60
903 , p5_a61
904 , p5_a62
905 , p5_a63
906 , p5_a64
907 , p5_a65
908 , p5_a66
909 , p5_a67
910 , p5_a68
911 , p5_a69
912 , p5_a70
913 , p5_a71
914 , p5_a72
915 , p5_a73
916 , p5_a74
917 , p5_a75
918 , p5_a76
919 , p5_a77
920 , p5_a78
921 , p5_a79
922 , p5_a80
923 , p5_a81
924 , p5_a82
925 );
926
927
928
929
930 -- here's the delegated call to the old PL/SQL routine
931 okl_am_termnt_quote_pvt.terminate_quote(p_api_version,
932 p_init_msg_list,
933 x_return_status,
934 x_msg_count,
935 x_msg_data,
936 ddp_term_tbl,
937 ddx_term_tbl,
938 x_err_msg,
939 p_acceptance_source);
940
941 -- copy data back from the local variables to OUT or IN-OUT args, if any
942
943
944
945
946
947
948 okl_qte_pvt_w.rosetta_table_copy_out_p8(ddx_term_tbl, p6_a0
949 , p6_a1
950 , p6_a2
951 , p6_a3
952 , p6_a4
953 , p6_a5
954 , p6_a6
955 , p6_a7
956 , p6_a8
957 , p6_a9
958 , p6_a10
959 , p6_a11
960 , p6_a12
961 , p6_a13
962 , p6_a14
963 , p6_a15
964 , p6_a16
965 , p6_a17
966 , p6_a18
967 , p6_a19
968 , p6_a20
969 , p6_a21
970 , p6_a22
971 , p6_a23
972 , p6_a24
973 , p6_a25
974 , p6_a26
975 , p6_a27
976 , p6_a28
977 , p6_a29
978 , p6_a30
979 , p6_a31
980 , p6_a32
981 , p6_a33
982 , p6_a34
983 , p6_a35
984 , p6_a36
985 , p6_a37
986 , p6_a38
987 , p6_a39
988 , p6_a40
989 , p6_a41
990 , p6_a42
991 , p6_a43
992 , p6_a44
993 , p6_a45
994 , p6_a46
995 , p6_a47
996 , p6_a48
997 , p6_a49
998 , p6_a50
999 , p6_a51
1000 , p6_a52
1001 , p6_a53
1002 , p6_a54
1003 , p6_a55
1004 , p6_a56
1005 , p6_a57
1006 , p6_a58
1007 , p6_a59
1008 , p6_a60
1009 , p6_a61
1010 , p6_a62
1011 , p6_a63
1012 , p6_a64
1013 , p6_a65
1014 , p6_a66
1015 , p6_a67
1016 , p6_a68
1017 , p6_a69
1018 , p6_a70
1019 , p6_a71
1020 , p6_a72
1021 , p6_a73
1022 , p6_a74
1023 , p6_a75
1024 , p6_a76
1025 , p6_a77
1026 , p6_a78
1027 , p6_a79
1028 , p6_a80
1029 , p6_a81
1030 , p6_a82
1031 );
1032
1033
1034 end;
1035
1036 procedure submit_for_approval(p_api_version NUMBER
1037 , p_init_msg_list VARCHAR2
1038 , x_return_status out nocopy VARCHAR2
1039 , x_msg_count out nocopy NUMBER
1040 , x_msg_data out nocopy VARCHAR2
1041 , p6_a0 out nocopy NUMBER
1042 , p6_a1 out nocopy NUMBER
1043 , p6_a2 out nocopy VARCHAR2
1044 , p6_a3 out nocopy VARCHAR2
1045 , p6_a4 out nocopy VARCHAR2
1046 , p6_a5 out nocopy VARCHAR2
1047 , p6_a6 out nocopy VARCHAR2
1048 , p6_a7 out nocopy VARCHAR2
1049 , p6_a8 out nocopy VARCHAR2
1050 , p6_a9 out nocopy NUMBER
1051 , p6_a10 out nocopy NUMBER
1052 , p6_a11 out nocopy NUMBER
1053 , p6_a12 out nocopy NUMBER
1054 , p6_a13 out nocopy VARCHAR2
1055 , p6_a14 out nocopy VARCHAR2
1056 , p6_a15 out nocopy VARCHAR2
1057 , p6_a16 out nocopy DATE
1058 , p6_a17 out nocopy DATE
1059 , p6_a18 out nocopy DATE
1060 , p6_a19 out nocopy DATE
1061 , p6_a20 out nocopy VARCHAR2
1062 , p6_a21 out nocopy VARCHAR2
1063 , p6_a22 out nocopy NUMBER
1064 , p6_a23 out nocopy NUMBER
1065 , p6_a24 out nocopy NUMBER
1066 , p6_a25 out nocopy NUMBER
1067 , p6_a26 out nocopy DATE
1068 , p6_a27 out nocopy DATE
1069 , p6_a28 out nocopy NUMBER
1070 , p6_a29 out nocopy NUMBER
1071 , p6_a30 out nocopy VARCHAR2
1072 , p6_a31 out nocopy DATE
1073 , p6_a32 out nocopy VARCHAR2
1074 , p6_a33 out nocopy NUMBER
1075 , p6_a34 out nocopy DATE
1076 , p6_a35 out nocopy NUMBER
1077 , p6_a36 out nocopy NUMBER
1078 , p6_a37 out nocopy VARCHAR2
1079 , p6_a38 out nocopy VARCHAR2
1080 , p6_a39 out nocopy VARCHAR2
1081 , p6_a40 out nocopy DATE
1082 , p6_a41 out nocopy VARCHAR2
1083 , p6_a42 out nocopy VARCHAR2
1084 , p6_a43 out nocopy VARCHAR2
1085 , p6_a44 out nocopy VARCHAR2
1086 , p6_a45 out nocopy VARCHAR2
1087 , p6_a46 out nocopy VARCHAR2
1088 , p6_a47 out nocopy VARCHAR2
1089 , p6_a48 out nocopy VARCHAR2
1090 , p6_a49 out nocopy VARCHAR2
1091 , p6_a50 out nocopy VARCHAR2
1092 , p6_a51 out nocopy VARCHAR2
1093 , p6_a52 out nocopy VARCHAR2
1094 , p6_a53 out nocopy VARCHAR2
1095 , p6_a54 out nocopy VARCHAR2
1096 , p6_a55 out nocopy VARCHAR2
1097 , p6_a56 out nocopy VARCHAR2
1098 , p6_a57 out nocopy DATE
1099 , p6_a58 out nocopy NUMBER
1100 , p6_a59 out nocopy NUMBER
1101 , p6_a60 out nocopy NUMBER
1102 , p6_a61 out nocopy NUMBER
1103 , p6_a62 out nocopy NUMBER
1104 , p6_a63 out nocopy DATE
1105 , p6_a64 out nocopy NUMBER
1106 , p6_a65 out nocopy DATE
1107 , p6_a66 out nocopy NUMBER
1108 , p6_a67 out nocopy DATE
1109 , p6_a68 out nocopy NUMBER
1110 , p6_a69 out nocopy NUMBER
1111 , p6_a70 out nocopy VARCHAR2
1112 , p6_a71 out nocopy NUMBER
1113 , p6_a72 out nocopy NUMBER
1114 , p6_a73 out nocopy NUMBER
1115 , p6_a74 out nocopy NUMBER
1116 , p6_a75 out nocopy NUMBER
1117 , p6_a76 out nocopy VARCHAR2
1118 , p6_a77 out nocopy VARCHAR2
1119 , p6_a78 out nocopy VARCHAR2
1120 , p6_a79 out nocopy NUMBER
1121 , p6_a80 out nocopy DATE
1122 , p6_a81 out nocopy NUMBER
1123 , p6_a82 out nocopy VARCHAR2
1124 , p5_a0 NUMBER := 0-1962.0724
1125 , p5_a1 NUMBER := 0-1962.0724
1126 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1127 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1128 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1129 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1130 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1131 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1132 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1133 , p5_a9 NUMBER := 0-1962.0724
1134 , p5_a10 NUMBER := 0-1962.0724
1135 , p5_a11 NUMBER := 0-1962.0724
1136 , p5_a12 NUMBER := 0-1962.0724
1137 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1138 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1139 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1140 , p5_a16 DATE := fnd_api.g_miss_date
1141 , p5_a17 DATE := fnd_api.g_miss_date
1142 , p5_a18 DATE := fnd_api.g_miss_date
1143 , p5_a19 DATE := fnd_api.g_miss_date
1144 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1145 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1146 , p5_a22 NUMBER := 0-1962.0724
1147 , p5_a23 NUMBER := 0-1962.0724
1148 , p5_a24 NUMBER := 0-1962.0724
1149 , p5_a25 NUMBER := 0-1962.0724
1150 , p5_a26 DATE := fnd_api.g_miss_date
1151 , p5_a27 DATE := fnd_api.g_miss_date
1152 , p5_a28 NUMBER := 0-1962.0724
1153 , p5_a29 NUMBER := 0-1962.0724
1154 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
1155 , p5_a31 DATE := fnd_api.g_miss_date
1156 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
1157 , p5_a33 NUMBER := 0-1962.0724
1158 , p5_a34 DATE := fnd_api.g_miss_date
1159 , p5_a35 NUMBER := 0-1962.0724
1160 , p5_a36 NUMBER := 0-1962.0724
1161 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
1162 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
1163 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
1164 , p5_a40 DATE := fnd_api.g_miss_date
1165 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
1166 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
1167 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
1168 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
1169 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
1170 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
1171 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
1172 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
1173 , p5_a49 VARCHAR2 := fnd_api.g_miss_char
1174 , p5_a50 VARCHAR2 := fnd_api.g_miss_char
1175 , p5_a51 VARCHAR2 := fnd_api.g_miss_char
1176 , p5_a52 VARCHAR2 := fnd_api.g_miss_char
1177 , p5_a53 VARCHAR2 := fnd_api.g_miss_char
1178 , p5_a54 VARCHAR2 := fnd_api.g_miss_char
1179 , p5_a55 VARCHAR2 := fnd_api.g_miss_char
1180 , p5_a56 VARCHAR2 := fnd_api.g_miss_char
1181 , p5_a57 DATE := fnd_api.g_miss_date
1182 , p5_a58 NUMBER := 0-1962.0724
1183 , p5_a59 NUMBER := 0-1962.0724
1184 , p5_a60 NUMBER := 0-1962.0724
1185 , p5_a61 NUMBER := 0-1962.0724
1186 , p5_a62 NUMBER := 0-1962.0724
1187 , p5_a63 DATE := fnd_api.g_miss_date
1188 , p5_a64 NUMBER := 0-1962.0724
1189 , p5_a65 DATE := fnd_api.g_miss_date
1190 , p5_a66 NUMBER := 0-1962.0724
1191 , p5_a67 DATE := fnd_api.g_miss_date
1192 , p5_a68 NUMBER := 0-1962.0724
1193 , p5_a69 NUMBER := 0-1962.0724
1194 , p5_a70 VARCHAR2 := fnd_api.g_miss_char
1195 , p5_a71 NUMBER := 0-1962.0724
1196 , p5_a72 NUMBER := 0-1962.0724
1197 , p5_a73 NUMBER := 0-1962.0724
1198 , p5_a74 NUMBER := 0-1962.0724
1199 , p5_a75 NUMBER := 0-1962.0724
1200 , p5_a76 VARCHAR2 := fnd_api.g_miss_char
1201 , p5_a77 VARCHAR2 := fnd_api.g_miss_char
1202 , p5_a78 VARCHAR2 := fnd_api.g_miss_char
1203 , p5_a79 NUMBER := 0-1962.0724
1204 , p5_a80 DATE := fnd_api.g_miss_date
1205 , p5_a81 NUMBER := 0-1962.0724
1206 , p5_a82 VARCHAR2 := fnd_api.g_miss_char
1207 )
1208
1209 as
1210 ddp_term_rec okl_am_termnt_quote_pvt.term_rec_type;
1211 ddx_term_rec okl_am_termnt_quote_pvt.term_rec_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 ddp_term_rec.id := rosetta_g_miss_num_map(p5_a0);
1222 ddp_term_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1223 ddp_term_rec.sfwt_flag := p5_a2;
1224 ddp_term_rec.qrs_code := p5_a3;
1225 ddp_term_rec.qst_code := p5_a4;
1226 ddp_term_rec.qtp_code := p5_a5;
1227 ddp_term_rec.trn_code := p5_a6;
1228 ddp_term_rec.pop_code_end := p5_a7;
1229 ddp_term_rec.pop_code_early := p5_a8;
1230 ddp_term_rec.consolidated_qte_id := rosetta_g_miss_num_map(p5_a9);
1231 ddp_term_rec.khr_id := rosetta_g_miss_num_map(p5_a10);
1232 ddp_term_rec.art_id := rosetta_g_miss_num_map(p5_a11);
1233 ddp_term_rec.pdt_id := rosetta_g_miss_num_map(p5_a12);
1234 ddp_term_rec.early_termination_yn := p5_a13;
1235 ddp_term_rec.partial_yn := p5_a14;
1236 ddp_term_rec.preproceeds_yn := p5_a15;
1237 ddp_term_rec.date_requested := rosetta_g_miss_date_in_map(p5_a16);
1238 ddp_term_rec.date_proposal := rosetta_g_miss_date_in_map(p5_a17);
1239 ddp_term_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a18);
1240 ddp_term_rec.date_accepted := rosetta_g_miss_date_in_map(p5_a19);
1241 ddp_term_rec.summary_format_yn := p5_a20;
1242 ddp_term_rec.consolidated_yn := p5_a21;
1243 ddp_term_rec.principal_paydown_amount := rosetta_g_miss_num_map(p5_a22);
1244 ddp_term_rec.residual_amount := rosetta_g_miss_num_map(p5_a23);
1245 ddp_term_rec.yield := rosetta_g_miss_num_map(p5_a24);
1246 ddp_term_rec.rent_amount := rosetta_g_miss_num_map(p5_a25);
1247 ddp_term_rec.date_restructure_end := rosetta_g_miss_date_in_map(p5_a26);
1248 ddp_term_rec.date_restructure_start := rosetta_g_miss_date_in_map(p5_a27);
1249 ddp_term_rec.term := rosetta_g_miss_num_map(p5_a28);
1250 ddp_term_rec.purchase_percent := rosetta_g_miss_num_map(p5_a29);
1251 ddp_term_rec.comments := p5_a30;
1252 ddp_term_rec.date_due := rosetta_g_miss_date_in_map(p5_a31);
1253 ddp_term_rec.payment_frequency := p5_a32;
1254 ddp_term_rec.remaining_payments := rosetta_g_miss_num_map(p5_a33);
1255 ddp_term_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a34);
1256 ddp_term_rec.quote_number := rosetta_g_miss_num_map(p5_a35);
1257 ddp_term_rec.requested_by := rosetta_g_miss_num_map(p5_a36);
1258 ddp_term_rec.approved_yn := p5_a37;
1259 ddp_term_rec.accepted_yn := p5_a38;
1260 ddp_term_rec.payment_received_yn := p5_a39;
1261 ddp_term_rec.date_payment_received := rosetta_g_miss_date_in_map(p5_a40);
1262 ddp_term_rec.attribute_category := p5_a41;
1263 ddp_term_rec.attribute1 := p5_a42;
1264 ddp_term_rec.attribute2 := p5_a43;
1265 ddp_term_rec.attribute3 := p5_a44;
1266 ddp_term_rec.attribute4 := p5_a45;
1267 ddp_term_rec.attribute5 := p5_a46;
1268 ddp_term_rec.attribute6 := p5_a47;
1269 ddp_term_rec.attribute7 := p5_a48;
1270 ddp_term_rec.attribute8 := p5_a49;
1271 ddp_term_rec.attribute9 := p5_a50;
1272 ddp_term_rec.attribute10 := p5_a51;
1273 ddp_term_rec.attribute11 := p5_a52;
1274 ddp_term_rec.attribute12 := p5_a53;
1275 ddp_term_rec.attribute13 := p5_a54;
1276 ddp_term_rec.attribute14 := p5_a55;
1277 ddp_term_rec.attribute15 := p5_a56;
1278 ddp_term_rec.date_approved := rosetta_g_miss_date_in_map(p5_a57);
1279 ddp_term_rec.approved_by := rosetta_g_miss_num_map(p5_a58);
1280 ddp_term_rec.org_id := rosetta_g_miss_num_map(p5_a59);
1281 ddp_term_rec.request_id := rosetta_g_miss_num_map(p5_a60);
1282 ddp_term_rec.program_application_id := rosetta_g_miss_num_map(p5_a61);
1283 ddp_term_rec.program_id := rosetta_g_miss_num_map(p5_a62);
1284 ddp_term_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a63);
1285 ddp_term_rec.created_by := rosetta_g_miss_num_map(p5_a64);
1286 ddp_term_rec.creation_date := rosetta_g_miss_date_in_map(p5_a65);
1287 ddp_term_rec.last_updated_by := rosetta_g_miss_num_map(p5_a66);
1288 ddp_term_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a67);
1289 ddp_term_rec.last_update_login := rosetta_g_miss_num_map(p5_a68);
1290 ddp_term_rec.purchase_amount := rosetta_g_miss_num_map(p5_a69);
1291 ddp_term_rec.purchase_formula := p5_a70;
1292 ddp_term_rec.asset_value := rosetta_g_miss_num_map(p5_a71);
1293 ddp_term_rec.residual_value := rosetta_g_miss_num_map(p5_a72);
1294 ddp_term_rec.unbilled_receivables := rosetta_g_miss_num_map(p5_a73);
1295 ddp_term_rec.gain_loss := rosetta_g_miss_num_map(p5_a74);
1296 ddp_term_rec.perdiem_amount := rosetta_g_miss_num_map(p5_a75);
1297 ddp_term_rec.currency_code := p5_a76;
1298 ddp_term_rec.currency_conversion_code := p5_a77;
1299 ddp_term_rec.currency_conversion_type := p5_a78;
1300 ddp_term_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a79);
1301 ddp_term_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a80);
1302 ddp_term_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a81);
1303 ddp_term_rec.repo_quote_indicator_yn := p5_a82;
1304
1305
1306 -- here's the delegated call to the old PL/SQL routine
1307 okl_am_termnt_quote_pvt.submit_for_approval(p_api_version,
1308 p_init_msg_list,
1309 x_return_status,
1310 x_msg_count,
1311 x_msg_data,
1312 ddp_term_rec,
1313 ddx_term_rec);
1314
1315 -- copy data back from the local variables to OUT or IN-OUT args, if any
1316
1317
1318
1319
1320
1321
1322 p6_a0 := rosetta_g_miss_num_map(ddx_term_rec.id);
1323 p6_a1 := rosetta_g_miss_num_map(ddx_term_rec.object_version_number);
1324 p6_a2 := ddx_term_rec.sfwt_flag;
1325 p6_a3 := ddx_term_rec.qrs_code;
1326 p6_a4 := ddx_term_rec.qst_code;
1327 p6_a5 := ddx_term_rec.qtp_code;
1328 p6_a6 := ddx_term_rec.trn_code;
1329 p6_a7 := ddx_term_rec.pop_code_end;
1330 p6_a8 := ddx_term_rec.pop_code_early;
1331 p6_a9 := rosetta_g_miss_num_map(ddx_term_rec.consolidated_qte_id);
1332 p6_a10 := rosetta_g_miss_num_map(ddx_term_rec.khr_id);
1333 p6_a11 := rosetta_g_miss_num_map(ddx_term_rec.art_id);
1334 p6_a12 := rosetta_g_miss_num_map(ddx_term_rec.pdt_id);
1335 p6_a13 := ddx_term_rec.early_termination_yn;
1336 p6_a14 := ddx_term_rec.partial_yn;
1337 p6_a15 := ddx_term_rec.preproceeds_yn;
1338 p6_a16 := ddx_term_rec.date_requested;
1339 p6_a17 := ddx_term_rec.date_proposal;
1340 p6_a18 := ddx_term_rec.date_effective_to;
1341 p6_a19 := ddx_term_rec.date_accepted;
1342 p6_a20 := ddx_term_rec.summary_format_yn;
1343 p6_a21 := ddx_term_rec.consolidated_yn;
1344 p6_a22 := rosetta_g_miss_num_map(ddx_term_rec.principal_paydown_amount);
1345 p6_a23 := rosetta_g_miss_num_map(ddx_term_rec.residual_amount);
1346 p6_a24 := rosetta_g_miss_num_map(ddx_term_rec.yield);
1347 p6_a25 := rosetta_g_miss_num_map(ddx_term_rec.rent_amount);
1348 p6_a26 := ddx_term_rec.date_restructure_end;
1349 p6_a27 := ddx_term_rec.date_restructure_start;
1350 p6_a28 := rosetta_g_miss_num_map(ddx_term_rec.term);
1351 p6_a29 := rosetta_g_miss_num_map(ddx_term_rec.purchase_percent);
1352 p6_a30 := ddx_term_rec.comments;
1353 p6_a31 := ddx_term_rec.date_due;
1354 p6_a32 := ddx_term_rec.payment_frequency;
1355 p6_a33 := rosetta_g_miss_num_map(ddx_term_rec.remaining_payments);
1356 p6_a34 := ddx_term_rec.date_effective_from;
1357 p6_a35 := rosetta_g_miss_num_map(ddx_term_rec.quote_number);
1358 p6_a36 := rosetta_g_miss_num_map(ddx_term_rec.requested_by);
1359 p6_a37 := ddx_term_rec.approved_yn;
1360 p6_a38 := ddx_term_rec.accepted_yn;
1361 p6_a39 := ddx_term_rec.payment_received_yn;
1362 p6_a40 := ddx_term_rec.date_payment_received;
1363 p6_a41 := ddx_term_rec.attribute_category;
1364 p6_a42 := ddx_term_rec.attribute1;
1365 p6_a43 := ddx_term_rec.attribute2;
1366 p6_a44 := ddx_term_rec.attribute3;
1367 p6_a45 := ddx_term_rec.attribute4;
1368 p6_a46 := ddx_term_rec.attribute5;
1369 p6_a47 := ddx_term_rec.attribute6;
1370 p6_a48 := ddx_term_rec.attribute7;
1371 p6_a49 := ddx_term_rec.attribute8;
1372 p6_a50 := ddx_term_rec.attribute9;
1373 p6_a51 := ddx_term_rec.attribute10;
1374 p6_a52 := ddx_term_rec.attribute11;
1375 p6_a53 := ddx_term_rec.attribute12;
1376 p6_a54 := ddx_term_rec.attribute13;
1377 p6_a55 := ddx_term_rec.attribute14;
1378 p6_a56 := ddx_term_rec.attribute15;
1379 p6_a57 := ddx_term_rec.date_approved;
1380 p6_a58 := rosetta_g_miss_num_map(ddx_term_rec.approved_by);
1381 p6_a59 := rosetta_g_miss_num_map(ddx_term_rec.org_id);
1382 p6_a60 := rosetta_g_miss_num_map(ddx_term_rec.request_id);
1383 p6_a61 := rosetta_g_miss_num_map(ddx_term_rec.program_application_id);
1384 p6_a62 := rosetta_g_miss_num_map(ddx_term_rec.program_id);
1385 p6_a63 := ddx_term_rec.program_update_date;
1386 p6_a64 := rosetta_g_miss_num_map(ddx_term_rec.created_by);
1387 p6_a65 := ddx_term_rec.creation_date;
1388 p6_a66 := rosetta_g_miss_num_map(ddx_term_rec.last_updated_by);
1389 p6_a67 := ddx_term_rec.last_update_date;
1390 p6_a68 := rosetta_g_miss_num_map(ddx_term_rec.last_update_login);
1391 p6_a69 := rosetta_g_miss_num_map(ddx_term_rec.purchase_amount);
1392 p6_a70 := ddx_term_rec.purchase_formula;
1393 p6_a71 := rosetta_g_miss_num_map(ddx_term_rec.asset_value);
1394 p6_a72 := rosetta_g_miss_num_map(ddx_term_rec.residual_value);
1395 p6_a73 := rosetta_g_miss_num_map(ddx_term_rec.unbilled_receivables);
1396 p6_a74 := rosetta_g_miss_num_map(ddx_term_rec.gain_loss);
1397 p6_a75 := rosetta_g_miss_num_map(ddx_term_rec.perdiem_amount);
1398 p6_a76 := ddx_term_rec.currency_code;
1399 p6_a77 := ddx_term_rec.currency_conversion_code;
1400 p6_a78 := ddx_term_rec.currency_conversion_type;
1401 p6_a79 := rosetta_g_miss_num_map(ddx_term_rec.currency_conversion_rate);
1402 p6_a80 := ddx_term_rec.currency_conversion_date;
1403 p6_a81 := rosetta_g_miss_num_map(ddx_term_rec.legal_entity_id);
1404 p6_a82 := ddx_term_rec.repo_quote_indicator_yn;
1405 end;
1406
1407 procedure quote_line_dtls(p_api_version NUMBER
1408 , p_init_msg_list VARCHAR2
1409 , x_return_status out nocopy VARCHAR2
1410 , x_msg_count out nocopy NUMBER
1411 , x_msg_data out nocopy VARCHAR2
1412 , p5_a0 in out nocopy JTF_VARCHAR2_TABLE_100
1413 , p5_a1 in out nocopy JTF_NUMBER_TABLE
1414 , p5_a2 in out nocopy JTF_NUMBER_TABLE
1415 , p5_a3 in out nocopy JTF_NUMBER_TABLE
1416 , p5_a4 in out nocopy JTF_NUMBER_TABLE
1417 , p5_a5 in out nocopy JTF_VARCHAR2_TABLE_100
1418 , p5_a6 in out nocopy JTF_NUMBER_TABLE
1419 , p5_a7 in out nocopy JTF_NUMBER_TABLE
1420 , p5_a8 in out nocopy JTF_NUMBER_TABLE
1421 )
1422
1423 as
1424 ddp_qld_tbl okl_am_termnt_quote_pvt.qte_ln_dtl_tbl;
1425 ddindx binary_integer; indx binary_integer;
1426 begin
1427
1428 -- copy data to the local IN or IN-OUT args, if any
1429
1430
1431
1432
1433
1434 okl_am_termnt_quote_pvt_w.rosetta_table_copy_in_p11(ddp_qld_tbl, p5_a0
1435 , p5_a1
1436 , p5_a2
1437 , p5_a3
1438 , p5_a4
1439 , p5_a5
1440 , p5_a6
1441 , p5_a7
1442 , p5_a8
1443 );
1444
1445 -- here's the delegated call to the old PL/SQL routine
1446 okl_am_termnt_quote_pvt.quote_line_dtls(p_api_version,
1447 p_init_msg_list,
1448 x_return_status,
1449 x_msg_count,
1450 x_msg_data,
1451 ddp_qld_tbl);
1452
1453 -- copy data back from the local variables to OUT or IN-OUT args, if any
1454
1455
1456
1457
1458
1459 okl_am_termnt_quote_pvt_w.rosetta_table_copy_out_p11(ddp_qld_tbl, p5_a0
1460 , p5_a1
1461 , p5_a2
1462 , p5_a3
1463 , p5_a4
1464 , p5_a5
1465 , p5_a6
1466 , p5_a7
1467 , p5_a8
1468 );
1469 end;
1470
1471 procedure create_quote_line(p_api_version NUMBER
1472 , p_init_msg_list VARCHAR2
1473 , x_return_status out nocopy VARCHAR2
1474 , x_msg_count out nocopy NUMBER
1475 , x_msg_data out nocopy VARCHAR2
1476 , p6_a0 out nocopy NUMBER
1477 , p6_a1 out nocopy NUMBER
1478 , p6_a2 out nocopy VARCHAR2
1479 , p6_a3 out nocopy VARCHAR2
1480 , p6_a4 out nocopy NUMBER
1481 , p6_a5 out nocopy NUMBER
1482 , p6_a6 out nocopy NUMBER
1483 , p6_a7 out nocopy NUMBER
1484 , p6_a8 out nocopy VARCHAR2
1485 , p6_a9 out nocopy NUMBER
1486 , p6_a10 out nocopy VARCHAR2
1487 , p6_a11 out nocopy VARCHAR2
1488 , p6_a12 out nocopy VARCHAR2
1489 , p6_a13 out nocopy VARCHAR2
1490 , p6_a14 out nocopy VARCHAR2
1491 , p6_a15 out nocopy VARCHAR2
1492 , p6_a16 out nocopy VARCHAR2
1493 , p6_a17 out nocopy VARCHAR2
1494 , p6_a18 out nocopy VARCHAR2
1495 , p6_a19 out nocopy VARCHAR2
1496 , p6_a20 out nocopy VARCHAR2
1497 , p6_a21 out nocopy VARCHAR2
1498 , p6_a22 out nocopy VARCHAR2
1499 , p6_a23 out nocopy VARCHAR2
1500 , p6_a24 out nocopy VARCHAR2
1501 , p6_a25 out nocopy VARCHAR2
1502 , p6_a26 out nocopy VARCHAR2
1503 , p6_a27 out nocopy VARCHAR2
1504 , p6_a28 out nocopy VARCHAR2
1505 , p6_a29 out nocopy NUMBER
1506 , p6_a30 out nocopy NUMBER
1507 , p6_a31 out nocopy NUMBER
1508 , p6_a32 out nocopy NUMBER
1509 , p6_a33 out nocopy DATE
1510 , p6_a34 out nocopy NUMBER
1511 , p6_a35 out nocopy DATE
1512 , p6_a36 out nocopy NUMBER
1513 , p6_a37 out nocopy DATE
1514 , p6_a38 out nocopy NUMBER
1515 , p6_a39 out nocopy DATE
1516 , p6_a40 out nocopy VARCHAR2
1517 , p6_a41 out nocopy NUMBER
1518 , p6_a42 out nocopy VARCHAR2
1519 , p6_a43 out nocopy VARCHAR2
1520 , p6_a44 out nocopy VARCHAR2
1521 , p6_a45 out nocopy NUMBER
1522 , p6_a46 out nocopy NUMBER
1523 , p6_a47 out nocopy NUMBER
1524 , p6_a48 out nocopy NUMBER
1525 , p6_a49 out nocopy NUMBER
1526 , p6_a50 out nocopy NUMBER
1527 , p6_a51 out nocopy NUMBER
1528 , p6_a52 out nocopy NUMBER
1529 , p6_a53 out nocopy VARCHAR2
1530 , p6_a54 out nocopy VARCHAR2
1531 , p6_a55 out nocopy VARCHAR2
1532 , p6_a56 out nocopy VARCHAR2
1533 , p6_a57 out nocopy NUMBER
1534 , p6_a58 out nocopy DATE
1535 , p6_a59 out nocopy DATE
1536 , p6_a60 out nocopy NUMBER
1537 , p5_a0 NUMBER := 0-1962.0724
1538 , p5_a1 NUMBER := 0-1962.0724
1539 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1540 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1541 , p5_a4 NUMBER := 0-1962.0724
1542 , p5_a5 NUMBER := 0-1962.0724
1543 , p5_a6 NUMBER := 0-1962.0724
1544 , p5_a7 NUMBER := 0-1962.0724
1545 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1546 , p5_a9 NUMBER := 0-1962.0724
1547 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1548 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1549 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1550 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1551 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1552 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1553 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1554 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1555 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1556 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1557 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1558 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1559 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1560 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1561 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1562 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
1563 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
1564 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
1565 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
1566 , p5_a29 NUMBER := 0-1962.0724
1567 , p5_a30 NUMBER := 0-1962.0724
1568 , p5_a31 NUMBER := 0-1962.0724
1569 , p5_a32 NUMBER := 0-1962.0724
1570 , p5_a33 DATE := fnd_api.g_miss_date
1571 , p5_a34 NUMBER := 0-1962.0724
1572 , p5_a35 DATE := fnd_api.g_miss_date
1573 , p5_a36 NUMBER := 0-1962.0724
1574 , p5_a37 DATE := fnd_api.g_miss_date
1575 , p5_a38 NUMBER := 0-1962.0724
1576 , p5_a39 DATE := fnd_api.g_miss_date
1577 , p5_a40 VARCHAR2 := fnd_api.g_miss_char
1578 , p5_a41 NUMBER := 0-1962.0724
1579 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
1580 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
1581 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
1582 , p5_a45 NUMBER := 0-1962.0724
1583 , p5_a46 NUMBER := 0-1962.0724
1584 , p5_a47 NUMBER := 0-1962.0724
1585 , p5_a48 NUMBER := 0-1962.0724
1586 , p5_a49 NUMBER := 0-1962.0724
1587 , p5_a50 NUMBER := 0-1962.0724
1588 , p5_a51 NUMBER := 0-1962.0724
1589 , p5_a52 NUMBER := 0-1962.0724
1590 , p5_a53 VARCHAR2 := fnd_api.g_miss_char
1591 , p5_a54 VARCHAR2 := fnd_api.g_miss_char
1592 , p5_a55 VARCHAR2 := fnd_api.g_miss_char
1593 , p5_a56 VARCHAR2 := fnd_api.g_miss_char
1594 , p5_a57 NUMBER := 0-1962.0724
1595 , p5_a58 DATE := fnd_api.g_miss_date
1596 , p5_a59 DATE := fnd_api.g_miss_date
1597 , p5_a60 NUMBER := 0-1962.0724
1598 )
1599
1600 as
1601 ddp_tqlv_rec okl_am_termnt_quote_pvt.tqlv_rec_type;
1602 ddx_tqlv_rec okl_am_termnt_quote_pvt.tqlv_rec_type;
1603 ddindx binary_integer; indx binary_integer;
1604 begin
1605
1606 -- copy data to the local IN or IN-OUT args, if any
1607
1608
1609
1610
1611
1612 ddp_tqlv_rec.id := rosetta_g_miss_num_map(p5_a0);
1613 ddp_tqlv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1614 ddp_tqlv_rec.sfwt_flag := p5_a2;
1615 ddp_tqlv_rec.qlt_code := p5_a3;
1616 ddp_tqlv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
1617 ddp_tqlv_rec.sty_id := rosetta_g_miss_num_map(p5_a5);
1618 ddp_tqlv_rec.qte_id := rosetta_g_miss_num_map(p5_a6);
1619 ddp_tqlv_rec.line_number := rosetta_g_miss_num_map(p5_a7);
1620 ddp_tqlv_rec.description := p5_a8;
1621 ddp_tqlv_rec.amount := rosetta_g_miss_num_map(p5_a9);
1622 ddp_tqlv_rec.modified_yn := p5_a10;
1623 ddp_tqlv_rec.taxed_yn := p5_a11;
1624 ddp_tqlv_rec.defaulted_yn := p5_a12;
1625 ddp_tqlv_rec.attribute_category := p5_a13;
1626 ddp_tqlv_rec.attribute1 := p5_a14;
1627 ddp_tqlv_rec.attribute2 := p5_a15;
1628 ddp_tqlv_rec.attribute3 := p5_a16;
1629 ddp_tqlv_rec.attribute4 := p5_a17;
1630 ddp_tqlv_rec.attribute5 := p5_a18;
1631 ddp_tqlv_rec.attribute6 := p5_a19;
1632 ddp_tqlv_rec.attribute7 := p5_a20;
1633 ddp_tqlv_rec.attribute8 := p5_a21;
1634 ddp_tqlv_rec.attribute9 := p5_a22;
1635 ddp_tqlv_rec.attribute10 := p5_a23;
1636 ddp_tqlv_rec.attribute11 := p5_a24;
1637 ddp_tqlv_rec.attribute12 := p5_a25;
1638 ddp_tqlv_rec.attribute13 := p5_a26;
1639 ddp_tqlv_rec.attribute14 := p5_a27;
1640 ddp_tqlv_rec.attribute15 := p5_a28;
1641 ddp_tqlv_rec.org_id := rosetta_g_miss_num_map(p5_a29);
1642 ddp_tqlv_rec.request_id := rosetta_g_miss_num_map(p5_a30);
1643 ddp_tqlv_rec.program_application_id := rosetta_g_miss_num_map(p5_a31);
1644 ddp_tqlv_rec.program_id := rosetta_g_miss_num_map(p5_a32);
1645 ddp_tqlv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a33);
1646 ddp_tqlv_rec.created_by := rosetta_g_miss_num_map(p5_a34);
1647 ddp_tqlv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a35);
1648 ddp_tqlv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a36);
1649 ddp_tqlv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a37);
1650 ddp_tqlv_rec.last_update_login := rosetta_g_miss_num_map(p5_a38);
1651 ddp_tqlv_rec.start_date := rosetta_g_miss_date_in_map(p5_a39);
1652 ddp_tqlv_rec.period := p5_a40;
1653 ddp_tqlv_rec.number_of_periods := rosetta_g_miss_num_map(p5_a41);
1654 ddp_tqlv_rec.lock_level_step := p5_a42;
1655 ddp_tqlv_rec.advance_or_arrears := p5_a43;
1656 ddp_tqlv_rec.yield_name := p5_a44;
1657 ddp_tqlv_rec.yield_value := rosetta_g_miss_num_map(p5_a45);
1658 ddp_tqlv_rec.implicit_interest_rate := rosetta_g_miss_num_map(p5_a46);
1659 ddp_tqlv_rec.asset_value := rosetta_g_miss_num_map(p5_a47);
1660 ddp_tqlv_rec.residual_value := rosetta_g_miss_num_map(p5_a48);
1661 ddp_tqlv_rec.unbilled_receivables := rosetta_g_miss_num_map(p5_a49);
1662 ddp_tqlv_rec.asset_quantity := rosetta_g_miss_num_map(p5_a50);
1663 ddp_tqlv_rec.quote_quantity := rosetta_g_miss_num_map(p5_a51);
1664 ddp_tqlv_rec.split_kle_id := rosetta_g_miss_num_map(p5_a52);
1665 ddp_tqlv_rec.split_kle_name := p5_a53;
1666 ddp_tqlv_rec.currency_code := p5_a54;
1667 ddp_tqlv_rec.currency_conversion_code := p5_a55;
1668 ddp_tqlv_rec.currency_conversion_type := p5_a56;
1669 ddp_tqlv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a57);
1670 ddp_tqlv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a58);
1671 ddp_tqlv_rec.due_date := rosetta_g_miss_date_in_map(p5_a59);
1672 ddp_tqlv_rec.try_id := rosetta_g_miss_num_map(p5_a60);
1673
1674
1675 -- here's the delegated call to the old PL/SQL routine
1676 okl_am_termnt_quote_pvt.create_quote_line(p_api_version,
1677 p_init_msg_list,
1678 x_return_status,
1679 x_msg_count,
1680 x_msg_data,
1681 ddp_tqlv_rec,
1682 ddx_tqlv_rec);
1683
1684 -- copy data back from the local variables to OUT or IN-OUT args, if any
1685
1686
1687
1688
1689
1690
1691 p6_a0 := rosetta_g_miss_num_map(ddx_tqlv_rec.id);
1692 p6_a1 := rosetta_g_miss_num_map(ddx_tqlv_rec.object_version_number);
1693 p6_a2 := ddx_tqlv_rec.sfwt_flag;
1694 p6_a3 := ddx_tqlv_rec.qlt_code;
1695 p6_a4 := rosetta_g_miss_num_map(ddx_tqlv_rec.kle_id);
1696 p6_a5 := rosetta_g_miss_num_map(ddx_tqlv_rec.sty_id);
1697 p6_a6 := rosetta_g_miss_num_map(ddx_tqlv_rec.qte_id);
1698 p6_a7 := rosetta_g_miss_num_map(ddx_tqlv_rec.line_number);
1699 p6_a8 := ddx_tqlv_rec.description;
1700 p6_a9 := rosetta_g_miss_num_map(ddx_tqlv_rec.amount);
1701 p6_a10 := ddx_tqlv_rec.modified_yn;
1702 p6_a11 := ddx_tqlv_rec.taxed_yn;
1703 p6_a12 := ddx_tqlv_rec.defaulted_yn;
1704 p6_a13 := ddx_tqlv_rec.attribute_category;
1705 p6_a14 := ddx_tqlv_rec.attribute1;
1706 p6_a15 := ddx_tqlv_rec.attribute2;
1707 p6_a16 := ddx_tqlv_rec.attribute3;
1708 p6_a17 := ddx_tqlv_rec.attribute4;
1709 p6_a18 := ddx_tqlv_rec.attribute5;
1710 p6_a19 := ddx_tqlv_rec.attribute6;
1711 p6_a20 := ddx_tqlv_rec.attribute7;
1712 p6_a21 := ddx_tqlv_rec.attribute8;
1713 p6_a22 := ddx_tqlv_rec.attribute9;
1714 p6_a23 := ddx_tqlv_rec.attribute10;
1715 p6_a24 := ddx_tqlv_rec.attribute11;
1716 p6_a25 := ddx_tqlv_rec.attribute12;
1717 p6_a26 := ddx_tqlv_rec.attribute13;
1718 p6_a27 := ddx_tqlv_rec.attribute14;
1719 p6_a28 := ddx_tqlv_rec.attribute15;
1720 p6_a29 := rosetta_g_miss_num_map(ddx_tqlv_rec.org_id);
1721 p6_a30 := rosetta_g_miss_num_map(ddx_tqlv_rec.request_id);
1722 p6_a31 := rosetta_g_miss_num_map(ddx_tqlv_rec.program_application_id);
1723 p6_a32 := rosetta_g_miss_num_map(ddx_tqlv_rec.program_id);
1724 p6_a33 := ddx_tqlv_rec.program_update_date;
1725 p6_a34 := rosetta_g_miss_num_map(ddx_tqlv_rec.created_by);
1726 p6_a35 := ddx_tqlv_rec.creation_date;
1727 p6_a36 := rosetta_g_miss_num_map(ddx_tqlv_rec.last_updated_by);
1728 p6_a37 := ddx_tqlv_rec.last_update_date;
1729 p6_a38 := rosetta_g_miss_num_map(ddx_tqlv_rec.last_update_login);
1730 p6_a39 := ddx_tqlv_rec.start_date;
1731 p6_a40 := ddx_tqlv_rec.period;
1732 p6_a41 := rosetta_g_miss_num_map(ddx_tqlv_rec.number_of_periods);
1733 p6_a42 := ddx_tqlv_rec.lock_level_step;
1734 p6_a43 := ddx_tqlv_rec.advance_or_arrears;
1735 p6_a44 := ddx_tqlv_rec.yield_name;
1736 p6_a45 := rosetta_g_miss_num_map(ddx_tqlv_rec.yield_value);
1737 p6_a46 := rosetta_g_miss_num_map(ddx_tqlv_rec.implicit_interest_rate);
1738 p6_a47 := rosetta_g_miss_num_map(ddx_tqlv_rec.asset_value);
1739 p6_a48 := rosetta_g_miss_num_map(ddx_tqlv_rec.residual_value);
1740 p6_a49 := rosetta_g_miss_num_map(ddx_tqlv_rec.unbilled_receivables);
1741 p6_a50 := rosetta_g_miss_num_map(ddx_tqlv_rec.asset_quantity);
1742 p6_a51 := rosetta_g_miss_num_map(ddx_tqlv_rec.quote_quantity);
1743 p6_a52 := rosetta_g_miss_num_map(ddx_tqlv_rec.split_kle_id);
1744 p6_a53 := ddx_tqlv_rec.split_kle_name;
1745 p6_a54 := ddx_tqlv_rec.currency_code;
1746 p6_a55 := ddx_tqlv_rec.currency_conversion_code;
1747 p6_a56 := ddx_tqlv_rec.currency_conversion_type;
1748 p6_a57 := rosetta_g_miss_num_map(ddx_tqlv_rec.currency_conversion_rate);
1749 p6_a58 := ddx_tqlv_rec.currency_conversion_date;
1750 p6_a59 := ddx_tqlv_rec.due_date;
1751 p6_a60 := rosetta_g_miss_num_map(ddx_tqlv_rec.try_id);
1752 end;
1753
1754 procedure create_quote_line(p_api_version NUMBER
1755 , p_init_msg_list VARCHAR2
1756 , x_return_status out nocopy VARCHAR2
1757 , x_msg_count out nocopy NUMBER
1758 , x_msg_data out nocopy VARCHAR2
1759 , p5_a0 JTF_NUMBER_TABLE
1760 , p5_a1 JTF_NUMBER_TABLE
1761 , p5_a2 JTF_VARCHAR2_TABLE_100
1762 , p5_a3 JTF_VARCHAR2_TABLE_100
1763 , p5_a4 JTF_NUMBER_TABLE
1764 , p5_a5 JTF_NUMBER_TABLE
1765 , p5_a6 JTF_NUMBER_TABLE
1766 , p5_a7 JTF_NUMBER_TABLE
1767 , p5_a8 JTF_VARCHAR2_TABLE_2000
1768 , p5_a9 JTF_NUMBER_TABLE
1769 , p5_a10 JTF_VARCHAR2_TABLE_100
1770 , p5_a11 JTF_VARCHAR2_TABLE_100
1771 , p5_a12 JTF_VARCHAR2_TABLE_100
1772 , p5_a13 JTF_VARCHAR2_TABLE_100
1773 , p5_a14 JTF_VARCHAR2_TABLE_500
1774 , p5_a15 JTF_VARCHAR2_TABLE_500
1775 , p5_a16 JTF_VARCHAR2_TABLE_500
1776 , p5_a17 JTF_VARCHAR2_TABLE_500
1777 , p5_a18 JTF_VARCHAR2_TABLE_500
1778 , p5_a19 JTF_VARCHAR2_TABLE_500
1779 , p5_a20 JTF_VARCHAR2_TABLE_500
1780 , p5_a21 JTF_VARCHAR2_TABLE_500
1781 , p5_a22 JTF_VARCHAR2_TABLE_500
1782 , p5_a23 JTF_VARCHAR2_TABLE_500
1783 , p5_a24 JTF_VARCHAR2_TABLE_500
1784 , p5_a25 JTF_VARCHAR2_TABLE_500
1785 , p5_a26 JTF_VARCHAR2_TABLE_500
1786 , p5_a27 JTF_VARCHAR2_TABLE_500
1787 , p5_a28 JTF_VARCHAR2_TABLE_500
1788 , p5_a29 JTF_NUMBER_TABLE
1789 , p5_a30 JTF_NUMBER_TABLE
1790 , p5_a31 JTF_NUMBER_TABLE
1791 , p5_a32 JTF_NUMBER_TABLE
1792 , p5_a33 JTF_DATE_TABLE
1793 , p5_a34 JTF_NUMBER_TABLE
1794 , p5_a35 JTF_DATE_TABLE
1795 , p5_a36 JTF_NUMBER_TABLE
1796 , p5_a37 JTF_DATE_TABLE
1797 , p5_a38 JTF_NUMBER_TABLE
1798 , p5_a39 JTF_DATE_TABLE
1799 , p5_a40 JTF_VARCHAR2_TABLE_100
1800 , p5_a41 JTF_NUMBER_TABLE
1801 , p5_a42 JTF_VARCHAR2_TABLE_100
1802 , p5_a43 JTF_VARCHAR2_TABLE_100
1803 , p5_a44 JTF_VARCHAR2_TABLE_200
1804 , p5_a45 JTF_NUMBER_TABLE
1805 , p5_a46 JTF_NUMBER_TABLE
1806 , p5_a47 JTF_NUMBER_TABLE
1807 , p5_a48 JTF_NUMBER_TABLE
1808 , p5_a49 JTF_NUMBER_TABLE
1809 , p5_a50 JTF_NUMBER_TABLE
1810 , p5_a51 JTF_NUMBER_TABLE
1811 , p5_a52 JTF_NUMBER_TABLE
1812 , p5_a53 JTF_VARCHAR2_TABLE_200
1813 , p5_a54 JTF_VARCHAR2_TABLE_100
1814 , p5_a55 JTF_VARCHAR2_TABLE_100
1815 , p5_a56 JTF_VARCHAR2_TABLE_100
1816 , p5_a57 JTF_NUMBER_TABLE
1817 , p5_a58 JTF_DATE_TABLE
1818 , p5_a59 JTF_DATE_TABLE
1819 , p5_a60 JTF_NUMBER_TABLE
1820 , p6_a0 out nocopy JTF_NUMBER_TABLE
1821 , p6_a1 out nocopy JTF_NUMBER_TABLE
1822 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1823 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1824 , p6_a4 out nocopy JTF_NUMBER_TABLE
1825 , p6_a5 out nocopy JTF_NUMBER_TABLE
1826 , p6_a6 out nocopy JTF_NUMBER_TABLE
1827 , p6_a7 out nocopy JTF_NUMBER_TABLE
1828 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_2000
1829 , p6_a9 out nocopy JTF_NUMBER_TABLE
1830 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
1831 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_100
1832 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
1833 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
1834 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
1835 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
1836 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
1837 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
1838 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
1839 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
1840 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
1841 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
1842 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
1843 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
1844 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
1845 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
1846 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
1847 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
1848 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
1849 , p6_a29 out nocopy JTF_NUMBER_TABLE
1850 , p6_a30 out nocopy JTF_NUMBER_TABLE
1851 , p6_a31 out nocopy JTF_NUMBER_TABLE
1852 , p6_a32 out nocopy JTF_NUMBER_TABLE
1853 , p6_a33 out nocopy JTF_DATE_TABLE
1854 , p6_a34 out nocopy JTF_NUMBER_TABLE
1855 , p6_a35 out nocopy JTF_DATE_TABLE
1856 , p6_a36 out nocopy JTF_NUMBER_TABLE
1857 , p6_a37 out nocopy JTF_DATE_TABLE
1858 , p6_a38 out nocopy JTF_NUMBER_TABLE
1859 , p6_a39 out nocopy JTF_DATE_TABLE
1860 , p6_a40 out nocopy JTF_VARCHAR2_TABLE_100
1861 , p6_a41 out nocopy JTF_NUMBER_TABLE
1862 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_100
1863 , p6_a43 out nocopy JTF_VARCHAR2_TABLE_100
1864 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_200
1865 , p6_a45 out nocopy JTF_NUMBER_TABLE
1866 , p6_a46 out nocopy JTF_NUMBER_TABLE
1867 , p6_a47 out nocopy JTF_NUMBER_TABLE
1868 , p6_a48 out nocopy JTF_NUMBER_TABLE
1869 , p6_a49 out nocopy JTF_NUMBER_TABLE
1870 , p6_a50 out nocopy JTF_NUMBER_TABLE
1871 , p6_a51 out nocopy JTF_NUMBER_TABLE
1872 , p6_a52 out nocopy JTF_NUMBER_TABLE
1873 , p6_a53 out nocopy JTF_VARCHAR2_TABLE_200
1874 , p6_a54 out nocopy JTF_VARCHAR2_TABLE_100
1875 , p6_a55 out nocopy JTF_VARCHAR2_TABLE_100
1876 , p6_a56 out nocopy JTF_VARCHAR2_TABLE_100
1877 , p6_a57 out nocopy JTF_NUMBER_TABLE
1878 , p6_a58 out nocopy JTF_DATE_TABLE
1879 , p6_a59 out nocopy JTF_DATE_TABLE
1880 , p6_a60 out nocopy JTF_NUMBER_TABLE
1881 )
1882
1883 as
1884 ddp_tqlv_tbl okl_am_termnt_quote_pvt.tqlv_tbl_type;
1885 ddx_tqlv_tbl okl_am_termnt_quote_pvt.tqlv_tbl_type;
1886 ddindx binary_integer; indx binary_integer;
1887 begin
1888
1889 -- copy data to the local IN or IN-OUT args, if any
1890
1891
1892
1893
1894
1895 okl_tql_pvt_w.rosetta_table_copy_in_p8(ddp_tqlv_tbl, p5_a0
1896 , p5_a1
1897 , p5_a2
1898 , p5_a3
1899 , p5_a4
1900 , p5_a5
1901 , p5_a6
1902 , p5_a7
1903 , p5_a8
1904 , p5_a9
1905 , p5_a10
1906 , p5_a11
1907 , p5_a12
1908 , p5_a13
1909 , p5_a14
1910 , p5_a15
1911 , p5_a16
1912 , p5_a17
1913 , p5_a18
1914 , p5_a19
1915 , p5_a20
1916 , p5_a21
1917 , p5_a22
1918 , p5_a23
1919 , p5_a24
1920 , p5_a25
1921 , p5_a26
1922 , p5_a27
1923 , p5_a28
1924 , p5_a29
1925 , p5_a30
1926 , p5_a31
1927 , p5_a32
1928 , p5_a33
1929 , p5_a34
1930 , p5_a35
1931 , p5_a36
1932 , p5_a37
1933 , p5_a38
1934 , p5_a39
1935 , p5_a40
1936 , p5_a41
1937 , p5_a42
1938 , p5_a43
1939 , p5_a44
1940 , p5_a45
1941 , p5_a46
1942 , p5_a47
1943 , p5_a48
1944 , p5_a49
1945 , p5_a50
1946 , p5_a51
1947 , p5_a52
1948 , p5_a53
1949 , p5_a54
1950 , p5_a55
1951 , p5_a56
1952 , p5_a57
1953 , p5_a58
1954 , p5_a59
1955 , p5_a60
1956 );
1957
1958
1959 -- here's the delegated call to the old PL/SQL routine
1960 okl_am_termnt_quote_pvt.create_quote_line(p_api_version,
1961 p_init_msg_list,
1962 x_return_status,
1963 x_msg_count,
1964 x_msg_data,
1965 ddp_tqlv_tbl,
1966 ddx_tqlv_tbl);
1967
1968 -- copy data back from the local variables to OUT or IN-OUT args, if any
1969
1970
1971
1972
1973
1974
1975 okl_tql_pvt_w.rosetta_table_copy_out_p8(ddx_tqlv_tbl, p6_a0
1976 , p6_a1
1977 , p6_a2
1978 , p6_a3
1979 , p6_a4
1980 , p6_a5
1981 , p6_a6
1982 , p6_a7
1983 , p6_a8
1984 , p6_a9
1985 , p6_a10
1986 , p6_a11
1987 , p6_a12
1988 , p6_a13
1989 , p6_a14
1990 , p6_a15
1991 , p6_a16
1992 , p6_a17
1993 , p6_a18
1994 , p6_a19
1995 , p6_a20
1996 , p6_a21
1997 , p6_a22
1998 , p6_a23
1999 , p6_a24
2000 , p6_a25
2001 , p6_a26
2002 , p6_a27
2003 , p6_a28
2004 , p6_a29
2005 , p6_a30
2006 , p6_a31
2007 , p6_a32
2008 , p6_a33
2009 , p6_a34
2010 , p6_a35
2011 , p6_a36
2012 , p6_a37
2013 , p6_a38
2014 , p6_a39
2015 , p6_a40
2016 , p6_a41
2017 , p6_a42
2018 , p6_a43
2019 , p6_a44
2020 , p6_a45
2021 , p6_a46
2022 , p6_a47
2023 , p6_a48
2024 , p6_a49
2025 , p6_a50
2026 , p6_a51
2027 , p6_a52
2028 , p6_a53
2029 , p6_a54
2030 , p6_a55
2031 , p6_a56
2032 , p6_a57
2033 , p6_a58
2034 , p6_a59
2035 , p6_a60
2036 );
2037 end;
2038
2039 procedure update_quote_line(p_api_version NUMBER
2040 , p_init_msg_list VARCHAR2
2041 , x_return_status out nocopy VARCHAR2
2042 , x_msg_count out nocopy NUMBER
2043 , x_msg_data out nocopy VARCHAR2
2044 , p6_a0 out nocopy NUMBER
2045 , p6_a1 out nocopy NUMBER
2046 , p6_a2 out nocopy VARCHAR2
2047 , p6_a3 out nocopy VARCHAR2
2048 , p6_a4 out nocopy NUMBER
2049 , p6_a5 out nocopy NUMBER
2050 , p6_a6 out nocopy NUMBER
2051 , p6_a7 out nocopy NUMBER
2052 , p6_a8 out nocopy VARCHAR2
2053 , p6_a9 out nocopy NUMBER
2054 , p6_a10 out nocopy VARCHAR2
2055 , p6_a11 out nocopy VARCHAR2
2056 , p6_a12 out nocopy VARCHAR2
2057 , p6_a13 out nocopy VARCHAR2
2058 , p6_a14 out nocopy VARCHAR2
2059 , p6_a15 out nocopy VARCHAR2
2060 , p6_a16 out nocopy VARCHAR2
2061 , p6_a17 out nocopy VARCHAR2
2062 , p6_a18 out nocopy VARCHAR2
2063 , p6_a19 out nocopy VARCHAR2
2064 , p6_a20 out nocopy VARCHAR2
2065 , p6_a21 out nocopy VARCHAR2
2066 , p6_a22 out nocopy VARCHAR2
2067 , p6_a23 out nocopy VARCHAR2
2068 , p6_a24 out nocopy VARCHAR2
2069 , p6_a25 out nocopy VARCHAR2
2070 , p6_a26 out nocopy VARCHAR2
2071 , p6_a27 out nocopy VARCHAR2
2072 , p6_a28 out nocopy VARCHAR2
2073 , p6_a29 out nocopy NUMBER
2074 , p6_a30 out nocopy NUMBER
2075 , p6_a31 out nocopy NUMBER
2076 , p6_a32 out nocopy NUMBER
2077 , p6_a33 out nocopy DATE
2078 , p6_a34 out nocopy NUMBER
2079 , p6_a35 out nocopy DATE
2080 , p6_a36 out nocopy NUMBER
2081 , p6_a37 out nocopy DATE
2082 , p6_a38 out nocopy NUMBER
2083 , p6_a39 out nocopy DATE
2084 , p6_a40 out nocopy VARCHAR2
2085 , p6_a41 out nocopy NUMBER
2086 , p6_a42 out nocopy VARCHAR2
2087 , p6_a43 out nocopy VARCHAR2
2088 , p6_a44 out nocopy VARCHAR2
2089 , p6_a45 out nocopy NUMBER
2090 , p6_a46 out nocopy NUMBER
2091 , p6_a47 out nocopy NUMBER
2092 , p6_a48 out nocopy NUMBER
2093 , p6_a49 out nocopy NUMBER
2094 , p6_a50 out nocopy NUMBER
2095 , p6_a51 out nocopy NUMBER
2096 , p6_a52 out nocopy NUMBER
2097 , p6_a53 out nocopy VARCHAR2
2098 , p6_a54 out nocopy VARCHAR2
2099 , p6_a55 out nocopy VARCHAR2
2100 , p6_a56 out nocopy VARCHAR2
2101 , p6_a57 out nocopy NUMBER
2102 , p6_a58 out nocopy DATE
2103 , p6_a59 out nocopy DATE
2104 , p6_a60 out nocopy NUMBER
2105 , p5_a0 NUMBER := 0-1962.0724
2106 , p5_a1 NUMBER := 0-1962.0724
2107 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
2108 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
2109 , p5_a4 NUMBER := 0-1962.0724
2110 , p5_a5 NUMBER := 0-1962.0724
2111 , p5_a6 NUMBER := 0-1962.0724
2112 , p5_a7 NUMBER := 0-1962.0724
2113 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
2114 , p5_a9 NUMBER := 0-1962.0724
2115 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
2116 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
2117 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
2118 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
2119 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
2120 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
2121 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
2122 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
2123 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
2124 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
2125 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
2126 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
2127 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
2128 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
2129 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
2130 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
2131 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
2132 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
2133 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
2134 , p5_a29 NUMBER := 0-1962.0724
2135 , p5_a30 NUMBER := 0-1962.0724
2136 , p5_a31 NUMBER := 0-1962.0724
2137 , p5_a32 NUMBER := 0-1962.0724
2138 , p5_a33 DATE := fnd_api.g_miss_date
2139 , p5_a34 NUMBER := 0-1962.0724
2140 , p5_a35 DATE := fnd_api.g_miss_date
2141 , p5_a36 NUMBER := 0-1962.0724
2142 , p5_a37 DATE := fnd_api.g_miss_date
2143 , p5_a38 NUMBER := 0-1962.0724
2144 , p5_a39 DATE := fnd_api.g_miss_date
2145 , p5_a40 VARCHAR2 := fnd_api.g_miss_char
2146 , p5_a41 NUMBER := 0-1962.0724
2147 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
2148 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
2149 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
2150 , p5_a45 NUMBER := 0-1962.0724
2151 , p5_a46 NUMBER := 0-1962.0724
2152 , p5_a47 NUMBER := 0-1962.0724
2153 , p5_a48 NUMBER := 0-1962.0724
2154 , p5_a49 NUMBER := 0-1962.0724
2155 , p5_a50 NUMBER := 0-1962.0724
2156 , p5_a51 NUMBER := 0-1962.0724
2157 , p5_a52 NUMBER := 0-1962.0724
2158 , p5_a53 VARCHAR2 := fnd_api.g_miss_char
2159 , p5_a54 VARCHAR2 := fnd_api.g_miss_char
2160 , p5_a55 VARCHAR2 := fnd_api.g_miss_char
2161 , p5_a56 VARCHAR2 := fnd_api.g_miss_char
2162 , p5_a57 NUMBER := 0-1962.0724
2163 , p5_a58 DATE := fnd_api.g_miss_date
2164 , p5_a59 DATE := fnd_api.g_miss_date
2165 , p5_a60 NUMBER := 0-1962.0724
2166 )
2167
2168 as
2169 ddp_tqlv_rec okl_am_termnt_quote_pvt.tqlv_rec_type;
2170 ddx_tqlv_rec okl_am_termnt_quote_pvt.tqlv_rec_type;
2171 ddindx binary_integer; indx binary_integer;
2172 begin
2173
2174 -- copy data to the local IN or IN-OUT args, if any
2175
2176
2177
2178
2179
2180 ddp_tqlv_rec.id := rosetta_g_miss_num_map(p5_a0);
2181 ddp_tqlv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2182 ddp_tqlv_rec.sfwt_flag := p5_a2;
2183 ddp_tqlv_rec.qlt_code := p5_a3;
2184 ddp_tqlv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
2185 ddp_tqlv_rec.sty_id := rosetta_g_miss_num_map(p5_a5);
2186 ddp_tqlv_rec.qte_id := rosetta_g_miss_num_map(p5_a6);
2187 ddp_tqlv_rec.line_number := rosetta_g_miss_num_map(p5_a7);
2188 ddp_tqlv_rec.description := p5_a8;
2189 ddp_tqlv_rec.amount := rosetta_g_miss_num_map(p5_a9);
2190 ddp_tqlv_rec.modified_yn := p5_a10;
2191 ddp_tqlv_rec.taxed_yn := p5_a11;
2192 ddp_tqlv_rec.defaulted_yn := p5_a12;
2193 ddp_tqlv_rec.attribute_category := p5_a13;
2194 ddp_tqlv_rec.attribute1 := p5_a14;
2195 ddp_tqlv_rec.attribute2 := p5_a15;
2196 ddp_tqlv_rec.attribute3 := p5_a16;
2197 ddp_tqlv_rec.attribute4 := p5_a17;
2198 ddp_tqlv_rec.attribute5 := p5_a18;
2199 ddp_tqlv_rec.attribute6 := p5_a19;
2200 ddp_tqlv_rec.attribute7 := p5_a20;
2201 ddp_tqlv_rec.attribute8 := p5_a21;
2202 ddp_tqlv_rec.attribute9 := p5_a22;
2203 ddp_tqlv_rec.attribute10 := p5_a23;
2204 ddp_tqlv_rec.attribute11 := p5_a24;
2205 ddp_tqlv_rec.attribute12 := p5_a25;
2206 ddp_tqlv_rec.attribute13 := p5_a26;
2207 ddp_tqlv_rec.attribute14 := p5_a27;
2208 ddp_tqlv_rec.attribute15 := p5_a28;
2209 ddp_tqlv_rec.org_id := rosetta_g_miss_num_map(p5_a29);
2210 ddp_tqlv_rec.request_id := rosetta_g_miss_num_map(p5_a30);
2211 ddp_tqlv_rec.program_application_id := rosetta_g_miss_num_map(p5_a31);
2212 ddp_tqlv_rec.program_id := rosetta_g_miss_num_map(p5_a32);
2213 ddp_tqlv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a33);
2214 ddp_tqlv_rec.created_by := rosetta_g_miss_num_map(p5_a34);
2215 ddp_tqlv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a35);
2216 ddp_tqlv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a36);
2217 ddp_tqlv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a37);
2218 ddp_tqlv_rec.last_update_login := rosetta_g_miss_num_map(p5_a38);
2219 ddp_tqlv_rec.start_date := rosetta_g_miss_date_in_map(p5_a39);
2220 ddp_tqlv_rec.period := p5_a40;
2221 ddp_tqlv_rec.number_of_periods := rosetta_g_miss_num_map(p5_a41);
2222 ddp_tqlv_rec.lock_level_step := p5_a42;
2223 ddp_tqlv_rec.advance_or_arrears := p5_a43;
2224 ddp_tqlv_rec.yield_name := p5_a44;
2225 ddp_tqlv_rec.yield_value := rosetta_g_miss_num_map(p5_a45);
2226 ddp_tqlv_rec.implicit_interest_rate := rosetta_g_miss_num_map(p5_a46);
2227 ddp_tqlv_rec.asset_value := rosetta_g_miss_num_map(p5_a47);
2228 ddp_tqlv_rec.residual_value := rosetta_g_miss_num_map(p5_a48);
2229 ddp_tqlv_rec.unbilled_receivables := rosetta_g_miss_num_map(p5_a49);
2230 ddp_tqlv_rec.asset_quantity := rosetta_g_miss_num_map(p5_a50);
2231 ddp_tqlv_rec.quote_quantity := rosetta_g_miss_num_map(p5_a51);
2232 ddp_tqlv_rec.split_kle_id := rosetta_g_miss_num_map(p5_a52);
2233 ddp_tqlv_rec.split_kle_name := p5_a53;
2234 ddp_tqlv_rec.currency_code := p5_a54;
2235 ddp_tqlv_rec.currency_conversion_code := p5_a55;
2236 ddp_tqlv_rec.currency_conversion_type := p5_a56;
2237 ddp_tqlv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a57);
2238 ddp_tqlv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a58);
2239 ddp_tqlv_rec.due_date := rosetta_g_miss_date_in_map(p5_a59);
2240 ddp_tqlv_rec.try_id := rosetta_g_miss_num_map(p5_a60);
2241
2242
2243 -- here's the delegated call to the old PL/SQL routine
2244 okl_am_termnt_quote_pvt.update_quote_line(p_api_version,
2245 p_init_msg_list,
2246 x_return_status,
2247 x_msg_count,
2248 x_msg_data,
2249 ddp_tqlv_rec,
2250 ddx_tqlv_rec);
2251
2252 -- copy data back from the local variables to OUT or IN-OUT args, if any
2253
2254
2255
2256
2257
2258
2259 p6_a0 := rosetta_g_miss_num_map(ddx_tqlv_rec.id);
2260 p6_a1 := rosetta_g_miss_num_map(ddx_tqlv_rec.object_version_number);
2261 p6_a2 := ddx_tqlv_rec.sfwt_flag;
2262 p6_a3 := ddx_tqlv_rec.qlt_code;
2263 p6_a4 := rosetta_g_miss_num_map(ddx_tqlv_rec.kle_id);
2264 p6_a5 := rosetta_g_miss_num_map(ddx_tqlv_rec.sty_id);
2265 p6_a6 := rosetta_g_miss_num_map(ddx_tqlv_rec.qte_id);
2266 p6_a7 := rosetta_g_miss_num_map(ddx_tqlv_rec.line_number);
2267 p6_a8 := ddx_tqlv_rec.description;
2268 p6_a9 := rosetta_g_miss_num_map(ddx_tqlv_rec.amount);
2269 p6_a10 := ddx_tqlv_rec.modified_yn;
2270 p6_a11 := ddx_tqlv_rec.taxed_yn;
2271 p6_a12 := ddx_tqlv_rec.defaulted_yn;
2272 p6_a13 := ddx_tqlv_rec.attribute_category;
2273 p6_a14 := ddx_tqlv_rec.attribute1;
2274 p6_a15 := ddx_tqlv_rec.attribute2;
2275 p6_a16 := ddx_tqlv_rec.attribute3;
2276 p6_a17 := ddx_tqlv_rec.attribute4;
2277 p6_a18 := ddx_tqlv_rec.attribute5;
2278 p6_a19 := ddx_tqlv_rec.attribute6;
2279 p6_a20 := ddx_tqlv_rec.attribute7;
2280 p6_a21 := ddx_tqlv_rec.attribute8;
2281 p6_a22 := ddx_tqlv_rec.attribute9;
2282 p6_a23 := ddx_tqlv_rec.attribute10;
2283 p6_a24 := ddx_tqlv_rec.attribute11;
2284 p6_a25 := ddx_tqlv_rec.attribute12;
2285 p6_a26 := ddx_tqlv_rec.attribute13;
2286 p6_a27 := ddx_tqlv_rec.attribute14;
2287 p6_a28 := ddx_tqlv_rec.attribute15;
2288 p6_a29 := rosetta_g_miss_num_map(ddx_tqlv_rec.org_id);
2289 p6_a30 := rosetta_g_miss_num_map(ddx_tqlv_rec.request_id);
2290 p6_a31 := rosetta_g_miss_num_map(ddx_tqlv_rec.program_application_id);
2291 p6_a32 := rosetta_g_miss_num_map(ddx_tqlv_rec.program_id);
2292 p6_a33 := ddx_tqlv_rec.program_update_date;
2293 p6_a34 := rosetta_g_miss_num_map(ddx_tqlv_rec.created_by);
2294 p6_a35 := ddx_tqlv_rec.creation_date;
2295 p6_a36 := rosetta_g_miss_num_map(ddx_tqlv_rec.last_updated_by);
2296 p6_a37 := ddx_tqlv_rec.last_update_date;
2297 p6_a38 := rosetta_g_miss_num_map(ddx_tqlv_rec.last_update_login);
2298 p6_a39 := ddx_tqlv_rec.start_date;
2299 p6_a40 := ddx_tqlv_rec.period;
2300 p6_a41 := rosetta_g_miss_num_map(ddx_tqlv_rec.number_of_periods);
2301 p6_a42 := ddx_tqlv_rec.lock_level_step;
2302 p6_a43 := ddx_tqlv_rec.advance_or_arrears;
2303 p6_a44 := ddx_tqlv_rec.yield_name;
2304 p6_a45 := rosetta_g_miss_num_map(ddx_tqlv_rec.yield_value);
2305 p6_a46 := rosetta_g_miss_num_map(ddx_tqlv_rec.implicit_interest_rate);
2306 p6_a47 := rosetta_g_miss_num_map(ddx_tqlv_rec.asset_value);
2307 p6_a48 := rosetta_g_miss_num_map(ddx_tqlv_rec.residual_value);
2308 p6_a49 := rosetta_g_miss_num_map(ddx_tqlv_rec.unbilled_receivables);
2309 p6_a50 := rosetta_g_miss_num_map(ddx_tqlv_rec.asset_quantity);
2310 p6_a51 := rosetta_g_miss_num_map(ddx_tqlv_rec.quote_quantity);
2311 p6_a52 := rosetta_g_miss_num_map(ddx_tqlv_rec.split_kle_id);
2312 p6_a53 := ddx_tqlv_rec.split_kle_name;
2313 p6_a54 := ddx_tqlv_rec.currency_code;
2314 p6_a55 := ddx_tqlv_rec.currency_conversion_code;
2315 p6_a56 := ddx_tqlv_rec.currency_conversion_type;
2316 p6_a57 := rosetta_g_miss_num_map(ddx_tqlv_rec.currency_conversion_rate);
2317 p6_a58 := ddx_tqlv_rec.currency_conversion_date;
2318 p6_a59 := ddx_tqlv_rec.due_date;
2319 p6_a60 := rosetta_g_miss_num_map(ddx_tqlv_rec.try_id);
2320 end;
2321
2322 procedure update_quote_line(p_api_version NUMBER
2323 , p_init_msg_list VARCHAR2
2324 , x_return_status out nocopy VARCHAR2
2325 , x_msg_count out nocopy NUMBER
2326 , x_msg_data out nocopy VARCHAR2
2327 , p5_a0 JTF_NUMBER_TABLE
2328 , p5_a1 JTF_NUMBER_TABLE
2329 , p5_a2 JTF_VARCHAR2_TABLE_100
2330 , p5_a3 JTF_VARCHAR2_TABLE_100
2331 , p5_a4 JTF_NUMBER_TABLE
2332 , p5_a5 JTF_NUMBER_TABLE
2333 , p5_a6 JTF_NUMBER_TABLE
2334 , p5_a7 JTF_NUMBER_TABLE
2335 , p5_a8 JTF_VARCHAR2_TABLE_2000
2336 , p5_a9 JTF_NUMBER_TABLE
2337 , p5_a10 JTF_VARCHAR2_TABLE_100
2338 , p5_a11 JTF_VARCHAR2_TABLE_100
2339 , p5_a12 JTF_VARCHAR2_TABLE_100
2340 , p5_a13 JTF_VARCHAR2_TABLE_100
2341 , p5_a14 JTF_VARCHAR2_TABLE_500
2342 , p5_a15 JTF_VARCHAR2_TABLE_500
2343 , p5_a16 JTF_VARCHAR2_TABLE_500
2344 , p5_a17 JTF_VARCHAR2_TABLE_500
2345 , p5_a18 JTF_VARCHAR2_TABLE_500
2346 , p5_a19 JTF_VARCHAR2_TABLE_500
2347 , p5_a20 JTF_VARCHAR2_TABLE_500
2348 , p5_a21 JTF_VARCHAR2_TABLE_500
2349 , p5_a22 JTF_VARCHAR2_TABLE_500
2350 , p5_a23 JTF_VARCHAR2_TABLE_500
2351 , p5_a24 JTF_VARCHAR2_TABLE_500
2352 , p5_a25 JTF_VARCHAR2_TABLE_500
2353 , p5_a26 JTF_VARCHAR2_TABLE_500
2354 , p5_a27 JTF_VARCHAR2_TABLE_500
2355 , p5_a28 JTF_VARCHAR2_TABLE_500
2356 , p5_a29 JTF_NUMBER_TABLE
2357 , p5_a30 JTF_NUMBER_TABLE
2358 , p5_a31 JTF_NUMBER_TABLE
2359 , p5_a32 JTF_NUMBER_TABLE
2360 , p5_a33 JTF_DATE_TABLE
2361 , p5_a34 JTF_NUMBER_TABLE
2362 , p5_a35 JTF_DATE_TABLE
2363 , p5_a36 JTF_NUMBER_TABLE
2364 , p5_a37 JTF_DATE_TABLE
2365 , p5_a38 JTF_NUMBER_TABLE
2366 , p5_a39 JTF_DATE_TABLE
2367 , p5_a40 JTF_VARCHAR2_TABLE_100
2368 , p5_a41 JTF_NUMBER_TABLE
2369 , p5_a42 JTF_VARCHAR2_TABLE_100
2370 , p5_a43 JTF_VARCHAR2_TABLE_100
2371 , p5_a44 JTF_VARCHAR2_TABLE_200
2372 , p5_a45 JTF_NUMBER_TABLE
2373 , p5_a46 JTF_NUMBER_TABLE
2374 , p5_a47 JTF_NUMBER_TABLE
2375 , p5_a48 JTF_NUMBER_TABLE
2376 , p5_a49 JTF_NUMBER_TABLE
2377 , p5_a50 JTF_NUMBER_TABLE
2378 , p5_a51 JTF_NUMBER_TABLE
2379 , p5_a52 JTF_NUMBER_TABLE
2380 , p5_a53 JTF_VARCHAR2_TABLE_200
2381 , p5_a54 JTF_VARCHAR2_TABLE_100
2382 , p5_a55 JTF_VARCHAR2_TABLE_100
2383 , p5_a56 JTF_VARCHAR2_TABLE_100
2384 , p5_a57 JTF_NUMBER_TABLE
2385 , p5_a58 JTF_DATE_TABLE
2386 , p5_a59 JTF_DATE_TABLE
2387 , p5_a60 JTF_NUMBER_TABLE
2388 , p6_a0 out nocopy JTF_NUMBER_TABLE
2389 , p6_a1 out nocopy JTF_NUMBER_TABLE
2390 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
2391 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
2392 , p6_a4 out nocopy JTF_NUMBER_TABLE
2393 , p6_a5 out nocopy JTF_NUMBER_TABLE
2394 , p6_a6 out nocopy JTF_NUMBER_TABLE
2395 , p6_a7 out nocopy JTF_NUMBER_TABLE
2396 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_2000
2397 , p6_a9 out nocopy JTF_NUMBER_TABLE
2398 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
2399 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_100
2400 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
2401 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
2402 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
2403 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
2404 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
2405 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
2406 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
2407 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
2408 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
2409 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
2410 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
2411 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
2412 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
2413 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
2414 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
2415 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
2416 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
2417 , p6_a29 out nocopy JTF_NUMBER_TABLE
2418 , p6_a30 out nocopy JTF_NUMBER_TABLE
2419 , p6_a31 out nocopy JTF_NUMBER_TABLE
2420 , p6_a32 out nocopy JTF_NUMBER_TABLE
2421 , p6_a33 out nocopy JTF_DATE_TABLE
2422 , p6_a34 out nocopy JTF_NUMBER_TABLE
2423 , p6_a35 out nocopy JTF_DATE_TABLE
2424 , p6_a36 out nocopy JTF_NUMBER_TABLE
2425 , p6_a37 out nocopy JTF_DATE_TABLE
2426 , p6_a38 out nocopy JTF_NUMBER_TABLE
2427 , p6_a39 out nocopy JTF_DATE_TABLE
2428 , p6_a40 out nocopy JTF_VARCHAR2_TABLE_100
2429 , p6_a41 out nocopy JTF_NUMBER_TABLE
2430 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_100
2431 , p6_a43 out nocopy JTF_VARCHAR2_TABLE_100
2432 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_200
2433 , p6_a45 out nocopy JTF_NUMBER_TABLE
2434 , p6_a46 out nocopy JTF_NUMBER_TABLE
2435 , p6_a47 out nocopy JTF_NUMBER_TABLE
2436 , p6_a48 out nocopy JTF_NUMBER_TABLE
2437 , p6_a49 out nocopy JTF_NUMBER_TABLE
2438 , p6_a50 out nocopy JTF_NUMBER_TABLE
2439 , p6_a51 out nocopy JTF_NUMBER_TABLE
2440 , p6_a52 out nocopy JTF_NUMBER_TABLE
2441 , p6_a53 out nocopy JTF_VARCHAR2_TABLE_200
2442 , p6_a54 out nocopy JTF_VARCHAR2_TABLE_100
2443 , p6_a55 out nocopy JTF_VARCHAR2_TABLE_100
2444 , p6_a56 out nocopy JTF_VARCHAR2_TABLE_100
2445 , p6_a57 out nocopy JTF_NUMBER_TABLE
2446 , p6_a58 out nocopy JTF_DATE_TABLE
2447 , p6_a59 out nocopy JTF_DATE_TABLE
2448 , p6_a60 out nocopy JTF_NUMBER_TABLE
2449 )
2450
2451 as
2452 ddp_tqlv_tbl okl_am_termnt_quote_pvt.tqlv_tbl_type;
2453 ddx_tqlv_tbl okl_am_termnt_quote_pvt.tqlv_tbl_type;
2454 ddindx binary_integer; indx binary_integer;
2455 begin
2456
2457 -- copy data to the local IN or IN-OUT args, if any
2458
2459
2460
2461
2462
2463 okl_tql_pvt_w.rosetta_table_copy_in_p8(ddp_tqlv_tbl, p5_a0
2464 , p5_a1
2465 , p5_a2
2466 , p5_a3
2467 , p5_a4
2468 , p5_a5
2469 , p5_a6
2470 , p5_a7
2471 , p5_a8
2472 , p5_a9
2473 , p5_a10
2474 , p5_a11
2475 , p5_a12
2476 , p5_a13
2477 , p5_a14
2478 , p5_a15
2479 , p5_a16
2480 , p5_a17
2481 , p5_a18
2482 , p5_a19
2483 , p5_a20
2484 , p5_a21
2485 , p5_a22
2486 , p5_a23
2487 , p5_a24
2488 , p5_a25
2489 , p5_a26
2490 , p5_a27
2491 , p5_a28
2492 , p5_a29
2493 , p5_a30
2494 , p5_a31
2495 , p5_a32
2496 , p5_a33
2497 , p5_a34
2498 , p5_a35
2499 , p5_a36
2500 , p5_a37
2501 , p5_a38
2502 , p5_a39
2503 , p5_a40
2504 , p5_a41
2505 , p5_a42
2506 , p5_a43
2507 , p5_a44
2508 , p5_a45
2509 , p5_a46
2510 , p5_a47
2511 , p5_a48
2512 , p5_a49
2513 , p5_a50
2514 , p5_a51
2515 , p5_a52
2516 , p5_a53
2517 , p5_a54
2518 , p5_a55
2519 , p5_a56
2520 , p5_a57
2521 , p5_a58
2522 , p5_a59
2523 , p5_a60
2524 );
2525
2526
2527 -- here's the delegated call to the old PL/SQL routine
2528 okl_am_termnt_quote_pvt.update_quote_line(p_api_version,
2529 p_init_msg_list,
2530 x_return_status,
2531 x_msg_count,
2532 x_msg_data,
2533 ddp_tqlv_tbl,
2534 ddx_tqlv_tbl);
2535
2536 -- copy data back from the local variables to OUT or IN-OUT args, if any
2537
2538
2539
2540
2541
2542
2543 okl_tql_pvt_w.rosetta_table_copy_out_p8(ddx_tqlv_tbl, p6_a0
2544 , p6_a1
2545 , p6_a2
2546 , p6_a3
2547 , p6_a4
2548 , p6_a5
2549 , p6_a6
2550 , p6_a7
2551 , p6_a8
2552 , p6_a9
2553 , p6_a10
2554 , p6_a11
2555 , p6_a12
2556 , p6_a13
2557 , p6_a14
2558 , p6_a15
2559 , p6_a16
2560 , p6_a17
2561 , p6_a18
2562 , p6_a19
2563 , p6_a20
2564 , p6_a21
2565 , p6_a22
2566 , p6_a23
2567 , p6_a24
2568 , p6_a25
2569 , p6_a26
2570 , p6_a27
2571 , p6_a28
2572 , p6_a29
2573 , p6_a30
2574 , p6_a31
2575 , p6_a32
2576 , p6_a33
2577 , p6_a34
2578 , p6_a35
2579 , p6_a36
2580 , p6_a37
2581 , p6_a38
2582 , p6_a39
2583 , p6_a40
2584 , p6_a41
2585 , p6_a42
2586 , p6_a43
2587 , p6_a44
2588 , p6_a45
2589 , p6_a46
2590 , p6_a47
2591 , p6_a48
2592 , p6_a49
2593 , p6_a50
2594 , p6_a51
2595 , p6_a52
2596 , p6_a53
2597 , p6_a54
2598 , p6_a55
2599 , p6_a56
2600 , p6_a57
2601 , p6_a58
2602 , p6_a59
2603 , p6_a60
2604 );
2605 end;
2606
2607 procedure get_quote_units(p_api_version NUMBER
2608 , p_init_msg_list VARCHAR2
2609 , x_return_status out nocopy VARCHAR2
2610 , x_msg_count out nocopy NUMBER
2611 , x_msg_data out nocopy VARCHAR2
2612 , p_tql_id NUMBER
2613 , p6_a0 out nocopy JTF_NUMBER_TABLE
2614 , p6_a1 out nocopy JTF_VARCHAR2_TABLE_100
2615 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
2616 , p6_a3 out nocopy JTF_NUMBER_TABLE
2617 , p6_a4 out nocopy JTF_NUMBER_TABLE
2618 , p6_a5 out nocopy JTF_NUMBER_TABLE
2619 , p6_a6 out nocopy JTF_NUMBER_TABLE
2620 , p6_a7 out nocopy JTF_NUMBER_TABLE
2621 , p6_a8 out nocopy JTF_NUMBER_TABLE
2622 , p6_a9 out nocopy JTF_NUMBER_TABLE
2623 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_300
2624 , p6_a11 out nocopy JTF_NUMBER_TABLE
2625 , p6_a12 out nocopy JTF_NUMBER_TABLE
2626 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_300
2627 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_2000
2628 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_2000
2629 , p6_a16 out nocopy JTF_NUMBER_TABLE
2630 )
2631
2632 as
2633 ddx_unit_tbl okl_am_termnt_quote_pvt.unit_tbl_type;
2634 ddindx binary_integer; indx binary_integer;
2635 begin
2636
2637 -- copy data to the local IN or IN-OUT args, if any
2638
2639
2640
2641
2642
2643
2644
2645 -- here's the delegated call to the old PL/SQL routine
2646 okl_am_termnt_quote_pvt.get_quote_units(p_api_version,
2647 p_init_msg_list,
2648 x_return_status,
2649 x_msg_count,
2650 x_msg_data,
2651 p_tql_id,
2652 ddx_unit_tbl);
2653
2654 -- copy data back from the local variables to OUT or IN-OUT args, if any
2655
2656
2657
2658
2659
2660
2661 okl_am_termnt_quote_pvt_w.rosetta_table_copy_out_p25(ddx_unit_tbl, p6_a0
2662 , p6_a1
2663 , p6_a2
2664 , p6_a3
2665 , p6_a4
2666 , p6_a5
2667 , p6_a6
2668 , p6_a7
2669 , p6_a8
2670 , p6_a9
2671 , p6_a10
2672 , p6_a11
2673 , p6_a12
2674 , p6_a13
2675 , p6_a14
2676 , p6_a15
2677 , p6_a16
2678 );
2679 end;
2680
2681 procedure delete_quote_line(p_api_version NUMBER
2682 , p_init_msg_list VARCHAR2
2683 , x_return_status out nocopy VARCHAR2
2684 , x_msg_count out nocopy NUMBER
2685 , x_msg_data out nocopy VARCHAR2
2686 , p5_a0 NUMBER := 0-1962.0724
2687 , p5_a1 NUMBER := 0-1962.0724
2688 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
2689 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
2690 , p5_a4 NUMBER := 0-1962.0724
2691 , p5_a5 NUMBER := 0-1962.0724
2692 , p5_a6 NUMBER := 0-1962.0724
2693 , p5_a7 NUMBER := 0-1962.0724
2694 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
2695 , p5_a9 NUMBER := 0-1962.0724
2696 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
2697 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
2698 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
2699 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
2700 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
2701 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
2702 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
2703 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
2704 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
2705 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
2706 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
2707 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
2708 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
2709 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
2710 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
2711 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
2712 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
2713 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
2714 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
2715 , p5_a29 NUMBER := 0-1962.0724
2716 , p5_a30 NUMBER := 0-1962.0724
2717 , p5_a31 NUMBER := 0-1962.0724
2718 , p5_a32 NUMBER := 0-1962.0724
2719 , p5_a33 DATE := fnd_api.g_miss_date
2720 , p5_a34 NUMBER := 0-1962.0724
2721 , p5_a35 DATE := fnd_api.g_miss_date
2722 , p5_a36 NUMBER := 0-1962.0724
2723 , p5_a37 DATE := fnd_api.g_miss_date
2724 , p5_a38 NUMBER := 0-1962.0724
2725 , p5_a39 DATE := fnd_api.g_miss_date
2726 , p5_a40 VARCHAR2 := fnd_api.g_miss_char
2727 , p5_a41 NUMBER := 0-1962.0724
2728 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
2729 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
2730 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
2731 , p5_a45 NUMBER := 0-1962.0724
2732 , p5_a46 NUMBER := 0-1962.0724
2733 , p5_a47 NUMBER := 0-1962.0724
2734 , p5_a48 NUMBER := 0-1962.0724
2735 , p5_a49 NUMBER := 0-1962.0724
2736 , p5_a50 NUMBER := 0-1962.0724
2737 , p5_a51 NUMBER := 0-1962.0724
2738 , p5_a52 NUMBER := 0-1962.0724
2739 , p5_a53 VARCHAR2 := fnd_api.g_miss_char
2740 , p5_a54 VARCHAR2 := fnd_api.g_miss_char
2741 , p5_a55 VARCHAR2 := fnd_api.g_miss_char
2742 , p5_a56 VARCHAR2 := fnd_api.g_miss_char
2743 , p5_a57 NUMBER := 0-1962.0724
2744 , p5_a58 DATE := fnd_api.g_miss_date
2745 , p5_a59 DATE := fnd_api.g_miss_date
2746 , p5_a60 NUMBER := 0-1962.0724
2747 )
2748
2749 as
2750 ddp_tqlv_rec okl_am_termnt_quote_pvt.tqlv_rec_type;
2751 ddindx binary_integer; indx binary_integer;
2752 begin
2753
2754 -- copy data to the local IN or IN-OUT args, if any
2755
2756
2757
2758
2759
2760 ddp_tqlv_rec.id := rosetta_g_miss_num_map(p5_a0);
2761 ddp_tqlv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2762 ddp_tqlv_rec.sfwt_flag := p5_a2;
2763 ddp_tqlv_rec.qlt_code := p5_a3;
2764 ddp_tqlv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
2765 ddp_tqlv_rec.sty_id := rosetta_g_miss_num_map(p5_a5);
2766 ddp_tqlv_rec.qte_id := rosetta_g_miss_num_map(p5_a6);
2767 ddp_tqlv_rec.line_number := rosetta_g_miss_num_map(p5_a7);
2768 ddp_tqlv_rec.description := p5_a8;
2769 ddp_tqlv_rec.amount := rosetta_g_miss_num_map(p5_a9);
2770 ddp_tqlv_rec.modified_yn := p5_a10;
2771 ddp_tqlv_rec.taxed_yn := p5_a11;
2772 ddp_tqlv_rec.defaulted_yn := p5_a12;
2773 ddp_tqlv_rec.attribute_category := p5_a13;
2774 ddp_tqlv_rec.attribute1 := p5_a14;
2775 ddp_tqlv_rec.attribute2 := p5_a15;
2776 ddp_tqlv_rec.attribute3 := p5_a16;
2777 ddp_tqlv_rec.attribute4 := p5_a17;
2778 ddp_tqlv_rec.attribute5 := p5_a18;
2779 ddp_tqlv_rec.attribute6 := p5_a19;
2780 ddp_tqlv_rec.attribute7 := p5_a20;
2781 ddp_tqlv_rec.attribute8 := p5_a21;
2782 ddp_tqlv_rec.attribute9 := p5_a22;
2783 ddp_tqlv_rec.attribute10 := p5_a23;
2784 ddp_tqlv_rec.attribute11 := p5_a24;
2785 ddp_tqlv_rec.attribute12 := p5_a25;
2786 ddp_tqlv_rec.attribute13 := p5_a26;
2787 ddp_tqlv_rec.attribute14 := p5_a27;
2788 ddp_tqlv_rec.attribute15 := p5_a28;
2789 ddp_tqlv_rec.org_id := rosetta_g_miss_num_map(p5_a29);
2790 ddp_tqlv_rec.request_id := rosetta_g_miss_num_map(p5_a30);
2791 ddp_tqlv_rec.program_application_id := rosetta_g_miss_num_map(p5_a31);
2792 ddp_tqlv_rec.program_id := rosetta_g_miss_num_map(p5_a32);
2793 ddp_tqlv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a33);
2794 ddp_tqlv_rec.created_by := rosetta_g_miss_num_map(p5_a34);
2795 ddp_tqlv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a35);
2796 ddp_tqlv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a36);
2797 ddp_tqlv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a37);
2798 ddp_tqlv_rec.last_update_login := rosetta_g_miss_num_map(p5_a38);
2799 ddp_tqlv_rec.start_date := rosetta_g_miss_date_in_map(p5_a39);
2800 ddp_tqlv_rec.period := p5_a40;
2801 ddp_tqlv_rec.number_of_periods := rosetta_g_miss_num_map(p5_a41);
2802 ddp_tqlv_rec.lock_level_step := p5_a42;
2803 ddp_tqlv_rec.advance_or_arrears := p5_a43;
2804 ddp_tqlv_rec.yield_name := p5_a44;
2805 ddp_tqlv_rec.yield_value := rosetta_g_miss_num_map(p5_a45);
2806 ddp_tqlv_rec.implicit_interest_rate := rosetta_g_miss_num_map(p5_a46);
2807 ddp_tqlv_rec.asset_value := rosetta_g_miss_num_map(p5_a47);
2808 ddp_tqlv_rec.residual_value := rosetta_g_miss_num_map(p5_a48);
2809 ddp_tqlv_rec.unbilled_receivables := rosetta_g_miss_num_map(p5_a49);
2810 ddp_tqlv_rec.asset_quantity := rosetta_g_miss_num_map(p5_a50);
2811 ddp_tqlv_rec.quote_quantity := rosetta_g_miss_num_map(p5_a51);
2812 ddp_tqlv_rec.split_kle_id := rosetta_g_miss_num_map(p5_a52);
2813 ddp_tqlv_rec.split_kle_name := p5_a53;
2814 ddp_tqlv_rec.currency_code := p5_a54;
2815 ddp_tqlv_rec.currency_conversion_code := p5_a55;
2816 ddp_tqlv_rec.currency_conversion_type := p5_a56;
2817 ddp_tqlv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a57);
2818 ddp_tqlv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a58);
2819 ddp_tqlv_rec.due_date := rosetta_g_miss_date_in_map(p5_a59);
2820 ddp_tqlv_rec.try_id := rosetta_g_miss_num_map(p5_a60);
2821
2822 -- here's the delegated call to the old PL/SQL routine
2823 okl_am_termnt_quote_pvt.delete_quote_line(p_api_version,
2824 p_init_msg_list,
2825 x_return_status,
2826 x_msg_count,
2827 x_msg_data,
2828 ddp_tqlv_rec);
2829
2830 -- copy data back from the local variables to OUT or IN-OUT args, if any
2831
2832
2833
2834
2835
2836 end;
2837
2838 procedure delete_quote_line(p_api_version NUMBER
2839 , p_init_msg_list VARCHAR2
2840 , x_return_status out nocopy VARCHAR2
2841 , x_msg_count out nocopy NUMBER
2842 , x_msg_data out nocopy VARCHAR2
2843 , p5_a0 JTF_NUMBER_TABLE
2844 , p5_a1 JTF_NUMBER_TABLE
2845 , p5_a2 JTF_VARCHAR2_TABLE_100
2846 , p5_a3 JTF_VARCHAR2_TABLE_100
2847 , p5_a4 JTF_NUMBER_TABLE
2848 , p5_a5 JTF_NUMBER_TABLE
2849 , p5_a6 JTF_NUMBER_TABLE
2850 , p5_a7 JTF_NUMBER_TABLE
2851 , p5_a8 JTF_VARCHAR2_TABLE_2000
2852 , p5_a9 JTF_NUMBER_TABLE
2853 , p5_a10 JTF_VARCHAR2_TABLE_100
2854 , p5_a11 JTF_VARCHAR2_TABLE_100
2855 , p5_a12 JTF_VARCHAR2_TABLE_100
2856 , p5_a13 JTF_VARCHAR2_TABLE_100
2857 , p5_a14 JTF_VARCHAR2_TABLE_500
2858 , p5_a15 JTF_VARCHAR2_TABLE_500
2859 , p5_a16 JTF_VARCHAR2_TABLE_500
2860 , p5_a17 JTF_VARCHAR2_TABLE_500
2861 , p5_a18 JTF_VARCHAR2_TABLE_500
2862 , p5_a19 JTF_VARCHAR2_TABLE_500
2863 , p5_a20 JTF_VARCHAR2_TABLE_500
2864 , p5_a21 JTF_VARCHAR2_TABLE_500
2865 , p5_a22 JTF_VARCHAR2_TABLE_500
2866 , p5_a23 JTF_VARCHAR2_TABLE_500
2867 , p5_a24 JTF_VARCHAR2_TABLE_500
2868 , p5_a25 JTF_VARCHAR2_TABLE_500
2869 , p5_a26 JTF_VARCHAR2_TABLE_500
2870 , p5_a27 JTF_VARCHAR2_TABLE_500
2871 , p5_a28 JTF_VARCHAR2_TABLE_500
2872 , p5_a29 JTF_NUMBER_TABLE
2873 , p5_a30 JTF_NUMBER_TABLE
2874 , p5_a31 JTF_NUMBER_TABLE
2875 , p5_a32 JTF_NUMBER_TABLE
2876 , p5_a33 JTF_DATE_TABLE
2877 , p5_a34 JTF_NUMBER_TABLE
2878 , p5_a35 JTF_DATE_TABLE
2879 , p5_a36 JTF_NUMBER_TABLE
2880 , p5_a37 JTF_DATE_TABLE
2881 , p5_a38 JTF_NUMBER_TABLE
2882 , p5_a39 JTF_DATE_TABLE
2883 , p5_a40 JTF_VARCHAR2_TABLE_100
2884 , p5_a41 JTF_NUMBER_TABLE
2885 , p5_a42 JTF_VARCHAR2_TABLE_100
2886 , p5_a43 JTF_VARCHAR2_TABLE_100
2887 , p5_a44 JTF_VARCHAR2_TABLE_200
2888 , p5_a45 JTF_NUMBER_TABLE
2889 , p5_a46 JTF_NUMBER_TABLE
2890 , p5_a47 JTF_NUMBER_TABLE
2891 , p5_a48 JTF_NUMBER_TABLE
2892 , p5_a49 JTF_NUMBER_TABLE
2893 , p5_a50 JTF_NUMBER_TABLE
2894 , p5_a51 JTF_NUMBER_TABLE
2895 , p5_a52 JTF_NUMBER_TABLE
2896 , p5_a53 JTF_VARCHAR2_TABLE_200
2897 , p5_a54 JTF_VARCHAR2_TABLE_100
2898 , p5_a55 JTF_VARCHAR2_TABLE_100
2899 , p5_a56 JTF_VARCHAR2_TABLE_100
2900 , p5_a57 JTF_NUMBER_TABLE
2901 , p5_a58 JTF_DATE_TABLE
2902 , p5_a59 JTF_DATE_TABLE
2903 , p5_a60 JTF_NUMBER_TABLE
2904 )
2905
2906 as
2907 ddp_tqlv_tbl okl_am_termnt_quote_pvt.tqlv_tbl_type;
2908 ddindx binary_integer; indx binary_integer;
2909 begin
2910
2911 -- copy data to the local IN or IN-OUT args, if any
2912
2913
2914
2915
2916
2917 okl_tql_pvt_w.rosetta_table_copy_in_p8(ddp_tqlv_tbl, p5_a0
2918 , p5_a1
2919 , p5_a2
2920 , p5_a3
2921 , p5_a4
2922 , p5_a5
2923 , p5_a6
2924 , p5_a7
2925 , p5_a8
2926 , p5_a9
2927 , p5_a10
2928 , p5_a11
2929 , p5_a12
2930 , p5_a13
2931 , p5_a14
2932 , p5_a15
2933 , p5_a16
2934 , p5_a17
2935 , p5_a18
2936 , p5_a19
2937 , p5_a20
2938 , p5_a21
2939 , p5_a22
2940 , p5_a23
2941 , p5_a24
2942 , p5_a25
2943 , p5_a26
2944 , p5_a27
2945 , p5_a28
2946 , p5_a29
2947 , p5_a30
2948 , p5_a31
2949 , p5_a32
2950 , p5_a33
2951 , p5_a34
2952 , p5_a35
2953 , p5_a36
2954 , p5_a37
2955 , p5_a38
2956 , p5_a39
2957 , p5_a40
2958 , p5_a41
2959 , p5_a42
2960 , p5_a43
2961 , p5_a44
2962 , p5_a45
2963 , p5_a46
2964 , p5_a47
2965 , p5_a48
2966 , p5_a49
2967 , p5_a50
2968 , p5_a51
2969 , p5_a52
2970 , p5_a53
2971 , p5_a54
2972 , p5_a55
2973 , p5_a56
2974 , p5_a57
2975 , p5_a58
2976 , p5_a59
2977 , p5_a60
2978 );
2979
2980 -- here's the delegated call to the old PL/SQL routine
2981 okl_am_termnt_quote_pvt.delete_quote_line(p_api_version,
2982 p_init_msg_list,
2983 x_return_status,
2984 x_msg_count,
2985 x_msg_data,
2986 ddp_tqlv_tbl);
2987
2988 -- copy data back from the local variables to OUT or IN-OUT args, if any
2989
2990
2991
2992
2993
2994 end;
2995
2996 procedure check_asset_validity_in_fa(p_kle_id NUMBER
2997 , p_trn_date date
2998 , p_check_fa_year VARCHAR2
2999 , p_check_fa_trn VARCHAR2
3000 , p_contract_number VARCHAR2
3001 , x_return_status out nocopy VARCHAR2
3002 )
3003
3004 as
3005 ddp_trn_date date;
3006 ddindx binary_integer; indx binary_integer;
3007 begin
3008
3009 -- copy data to the local IN or IN-OUT args, if any
3010
3011 ddp_trn_date := rosetta_g_miss_date_in_map(p_trn_date);
3012
3013
3014
3015
3016
3017 -- here's the delegated call to the old PL/SQL routine
3018 okl_am_termnt_quote_pvt.check_asset_validity_in_fa(p_kle_id,
3019 ddp_trn_date,
3020 p_check_fa_year,
3021 p_check_fa_trn,
3022 p_contract_number,
3023 x_return_status);
3024
3025 -- copy data back from the local variables to OUT or IN-OUT args, if any
3026
3027
3028
3029
3030
3031 end;
3032
3033 end okl_am_termnt_quote_pvt_w;