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