[Home] [Help]
PACKAGE BODY: APPS.OKL_AM_REPURCHASE_ASSET_PUB_W
Source
1 package body okl_am_repurchase_asset_pub_w as
2 /* $Header: OKLURQUB.pls 120.2 2005/08/19 01:37:16 rmunjulu 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 create_repurchase_quote(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 JTF_NUMBER_TABLE
28 , p6_a1 JTF_NUMBER_TABLE
29 , p6_a2 JTF_VARCHAR2_TABLE_100
30 , p6_a3 JTF_VARCHAR2_TABLE_100
31 , p6_a4 JTF_NUMBER_TABLE
32 , p6_a5 JTF_NUMBER_TABLE
33 , p6_a6 JTF_NUMBER_TABLE
34 , p6_a7 JTF_NUMBER_TABLE
35 , p6_a8 JTF_VARCHAR2_TABLE_2000
36 , p6_a9 JTF_NUMBER_TABLE
37 , p6_a10 JTF_VARCHAR2_TABLE_100
38 , p6_a11 JTF_VARCHAR2_TABLE_100
39 , p6_a12 JTF_VARCHAR2_TABLE_100
40 , p6_a13 JTF_VARCHAR2_TABLE_100
41 , p6_a14 JTF_VARCHAR2_TABLE_500
42 , p6_a15 JTF_VARCHAR2_TABLE_500
43 , p6_a16 JTF_VARCHAR2_TABLE_500
44 , p6_a17 JTF_VARCHAR2_TABLE_500
45 , p6_a18 JTF_VARCHAR2_TABLE_500
46 , p6_a19 JTF_VARCHAR2_TABLE_500
47 , p6_a20 JTF_VARCHAR2_TABLE_500
48 , p6_a21 JTF_VARCHAR2_TABLE_500
49 , p6_a22 JTF_VARCHAR2_TABLE_500
50 , p6_a23 JTF_VARCHAR2_TABLE_500
51 , p6_a24 JTF_VARCHAR2_TABLE_500
52 , p6_a25 JTF_VARCHAR2_TABLE_500
53 , p6_a26 JTF_VARCHAR2_TABLE_500
54 , p6_a27 JTF_VARCHAR2_TABLE_500
55 , p6_a28 JTF_VARCHAR2_TABLE_500
56 , p6_a29 JTF_NUMBER_TABLE
57 , p6_a30 JTF_NUMBER_TABLE
58 , p6_a31 JTF_NUMBER_TABLE
59 , p6_a32 JTF_NUMBER_TABLE
60 , p6_a33 JTF_DATE_TABLE
61 , p6_a34 JTF_NUMBER_TABLE
62 , p6_a35 JTF_DATE_TABLE
63 , p6_a36 JTF_NUMBER_TABLE
64 , p6_a37 JTF_DATE_TABLE
65 , p6_a38 JTF_NUMBER_TABLE
66 , p6_a39 JTF_DATE_TABLE
67 , p6_a40 JTF_VARCHAR2_TABLE_100
68 , p6_a41 JTF_NUMBER_TABLE
69 , p6_a42 JTF_VARCHAR2_TABLE_100
70 , p6_a43 JTF_VARCHAR2_TABLE_100
71 , p6_a44 JTF_VARCHAR2_TABLE_200
72 , p6_a45 JTF_NUMBER_TABLE
73 , p6_a46 JTF_NUMBER_TABLE
74 , p6_a47 JTF_NUMBER_TABLE
75 , p6_a48 JTF_NUMBER_TABLE
76 , p6_a49 JTF_NUMBER_TABLE
77 , p6_a50 JTF_NUMBER_TABLE
78 , p6_a51 JTF_NUMBER_TABLE
79 , p6_a52 JTF_NUMBER_TABLE
80 , p6_a53 JTF_VARCHAR2_TABLE_200
81 , p6_a54 JTF_VARCHAR2_TABLE_100
82 , p6_a55 JTF_VARCHAR2_TABLE_100
83 , p6_a56 JTF_VARCHAR2_TABLE_100
84 , p6_a57 JTF_NUMBER_TABLE
85 , p6_a58 JTF_DATE_TABLE
86 , p6_a59 JTF_DATE_TABLE
87 , p6_a60 JTF_NUMBER_TABLE
88 , p7_a0 out nocopy NUMBER
89 , p7_a1 out nocopy NUMBER
90 , p7_a2 out nocopy VARCHAR2
91 , p7_a3 out nocopy VARCHAR2
92 , p7_a4 out nocopy VARCHAR2
93 , p7_a5 out nocopy VARCHAR2
94 , p7_a6 out nocopy VARCHAR2
95 , p7_a7 out nocopy VARCHAR2
96 , p7_a8 out nocopy VARCHAR2
97 , p7_a9 out nocopy NUMBER
98 , p7_a10 out nocopy NUMBER
99 , p7_a11 out nocopy NUMBER
100 , p7_a12 out nocopy NUMBER
101 , p7_a13 out nocopy VARCHAR2
102 , p7_a14 out nocopy VARCHAR2
103 , p7_a15 out nocopy VARCHAR2
104 , p7_a16 out nocopy DATE
105 , p7_a17 out nocopy DATE
106 , p7_a18 out nocopy DATE
107 , p7_a19 out nocopy DATE
108 , p7_a20 out nocopy VARCHAR2
109 , p7_a21 out nocopy VARCHAR2
110 , p7_a22 out nocopy NUMBER
111 , p7_a23 out nocopy NUMBER
112 , p7_a24 out nocopy NUMBER
113 , p7_a25 out nocopy NUMBER
114 , p7_a26 out nocopy DATE
115 , p7_a27 out nocopy DATE
116 , p7_a28 out nocopy NUMBER
117 , p7_a29 out nocopy NUMBER
118 , p7_a30 out nocopy VARCHAR2
119 , p7_a31 out nocopy DATE
120 , p7_a32 out nocopy VARCHAR2
121 , p7_a33 out nocopy NUMBER
122 , p7_a34 out nocopy DATE
123 , p7_a35 out nocopy NUMBER
124 , p7_a36 out nocopy NUMBER
125 , p7_a37 out nocopy VARCHAR2
126 , p7_a38 out nocopy VARCHAR2
127 , p7_a39 out nocopy VARCHAR2
128 , p7_a40 out nocopy DATE
129 , p7_a41 out nocopy VARCHAR2
130 , p7_a42 out nocopy VARCHAR2
131 , p7_a43 out nocopy VARCHAR2
132 , p7_a44 out nocopy VARCHAR2
133 , p7_a45 out nocopy VARCHAR2
134 , p7_a46 out nocopy VARCHAR2
135 , p7_a47 out nocopy VARCHAR2
136 , p7_a48 out nocopy VARCHAR2
137 , p7_a49 out nocopy VARCHAR2
138 , p7_a50 out nocopy VARCHAR2
139 , p7_a51 out nocopy VARCHAR2
140 , p7_a52 out nocopy VARCHAR2
141 , p7_a53 out nocopy VARCHAR2
142 , p7_a54 out nocopy VARCHAR2
143 , p7_a55 out nocopy VARCHAR2
144 , p7_a56 out nocopy VARCHAR2
145 , p7_a57 out nocopy DATE
146 , p7_a58 out nocopy NUMBER
147 , p7_a59 out nocopy NUMBER
148 , p7_a60 out nocopy NUMBER
149 , p7_a61 out nocopy NUMBER
150 , p7_a62 out nocopy NUMBER
151 , p7_a63 out nocopy DATE
152 , p7_a64 out nocopy NUMBER
153 , p7_a65 out nocopy DATE
154 , p7_a66 out nocopy NUMBER
155 , p7_a67 out nocopy DATE
156 , p7_a68 out nocopy NUMBER
157 , p7_a69 out nocopy NUMBER
158 , p7_a70 out nocopy VARCHAR2
159 , p7_a71 out nocopy NUMBER
160 , p7_a72 out nocopy NUMBER
161 , p7_a73 out nocopy NUMBER
162 , p7_a74 out nocopy NUMBER
163 , p7_a75 out nocopy VARCHAR2
164 , p7_a76 out nocopy VARCHAR2
165 , p7_a77 out nocopy VARCHAR2
166 , p7_a78 out nocopy NUMBER
167 , p7_a79 out nocopy DATE
168 , p8_a0 out nocopy JTF_NUMBER_TABLE
169 , p8_a1 out nocopy JTF_NUMBER_TABLE
170 , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
171 , p8_a3 out nocopy JTF_VARCHAR2_TABLE_100
172 , p8_a4 out nocopy JTF_NUMBER_TABLE
173 , p8_a5 out nocopy JTF_NUMBER_TABLE
174 , p8_a6 out nocopy JTF_NUMBER_TABLE
175 , p8_a7 out nocopy JTF_NUMBER_TABLE
176 , p8_a8 out nocopy JTF_VARCHAR2_TABLE_2000
177 , p8_a9 out nocopy JTF_NUMBER_TABLE
178 , p8_a10 out nocopy JTF_VARCHAR2_TABLE_100
179 , p8_a11 out nocopy JTF_VARCHAR2_TABLE_100
180 , p8_a12 out nocopy JTF_VARCHAR2_TABLE_100
181 , p8_a13 out nocopy JTF_VARCHAR2_TABLE_100
182 , p8_a14 out nocopy JTF_VARCHAR2_TABLE_500
183 , p8_a15 out nocopy JTF_VARCHAR2_TABLE_500
184 , p8_a16 out nocopy JTF_VARCHAR2_TABLE_500
185 , p8_a17 out nocopy JTF_VARCHAR2_TABLE_500
186 , p8_a18 out nocopy JTF_VARCHAR2_TABLE_500
187 , p8_a19 out nocopy JTF_VARCHAR2_TABLE_500
188 , p8_a20 out nocopy JTF_VARCHAR2_TABLE_500
189 , p8_a21 out nocopy JTF_VARCHAR2_TABLE_500
190 , p8_a22 out nocopy JTF_VARCHAR2_TABLE_500
191 , p8_a23 out nocopy JTF_VARCHAR2_TABLE_500
192 , p8_a24 out nocopy JTF_VARCHAR2_TABLE_500
193 , p8_a25 out nocopy JTF_VARCHAR2_TABLE_500
194 , p8_a26 out nocopy JTF_VARCHAR2_TABLE_500
195 , p8_a27 out nocopy JTF_VARCHAR2_TABLE_500
196 , p8_a28 out nocopy JTF_VARCHAR2_TABLE_500
197 , p8_a29 out nocopy JTF_NUMBER_TABLE
198 , p8_a30 out nocopy JTF_NUMBER_TABLE
199 , p8_a31 out nocopy JTF_NUMBER_TABLE
200 , p8_a32 out nocopy JTF_NUMBER_TABLE
201 , p8_a33 out nocopy JTF_DATE_TABLE
202 , p8_a34 out nocopy JTF_NUMBER_TABLE
203 , p8_a35 out nocopy JTF_DATE_TABLE
204 , p8_a36 out nocopy JTF_NUMBER_TABLE
205 , p8_a37 out nocopy JTF_DATE_TABLE
206 , p8_a38 out nocopy JTF_NUMBER_TABLE
207 , p8_a39 out nocopy JTF_DATE_TABLE
208 , p8_a40 out nocopy JTF_VARCHAR2_TABLE_100
209 , p8_a41 out nocopy JTF_NUMBER_TABLE
210 , p8_a42 out nocopy JTF_VARCHAR2_TABLE_100
211 , p8_a43 out nocopy JTF_VARCHAR2_TABLE_100
212 , p8_a44 out nocopy JTF_VARCHAR2_TABLE_200
213 , p8_a45 out nocopy JTF_NUMBER_TABLE
214 , p8_a46 out nocopy JTF_NUMBER_TABLE
215 , p8_a47 out nocopy JTF_NUMBER_TABLE
216 , p8_a48 out nocopy JTF_NUMBER_TABLE
217 , p8_a49 out nocopy JTF_NUMBER_TABLE
218 , p8_a50 out nocopy JTF_NUMBER_TABLE
219 , p8_a51 out nocopy JTF_NUMBER_TABLE
220 , p8_a52 out nocopy JTF_NUMBER_TABLE
221 , p8_a53 out nocopy JTF_VARCHAR2_TABLE_200
222 , p8_a54 out nocopy JTF_VARCHAR2_TABLE_100
223 , p8_a55 out nocopy JTF_VARCHAR2_TABLE_100
224 , p8_a56 out nocopy JTF_VARCHAR2_TABLE_100
225 , p8_a57 out nocopy JTF_NUMBER_TABLE
226 , p8_a58 out nocopy JTF_DATE_TABLE
227 , p8_a59 out nocopy JTF_DATE_TABLE
228 , p8_a60 out nocopy JTF_NUMBER_TABLE
229 , p5_a0 NUMBER := 0-1962.0724
230 , p5_a1 NUMBER := 0-1962.0724
231 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
232 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
233 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
234 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
235 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
236 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
237 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
238 , p5_a9 NUMBER := 0-1962.0724
239 , p5_a10 NUMBER := 0-1962.0724
240 , p5_a11 NUMBER := 0-1962.0724
241 , p5_a12 NUMBER := 0-1962.0724
242 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
243 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
244 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
245 , p5_a16 DATE := fnd_api.g_miss_date
246 , p5_a17 DATE := fnd_api.g_miss_date
247 , p5_a18 DATE := fnd_api.g_miss_date
248 , p5_a19 DATE := fnd_api.g_miss_date
249 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
250 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
251 , p5_a22 NUMBER := 0-1962.0724
252 , p5_a23 NUMBER := 0-1962.0724
253 , p5_a24 NUMBER := 0-1962.0724
254 , p5_a25 NUMBER := 0-1962.0724
255 , p5_a26 DATE := fnd_api.g_miss_date
256 , p5_a27 DATE := fnd_api.g_miss_date
257 , p5_a28 NUMBER := 0-1962.0724
258 , p5_a29 NUMBER := 0-1962.0724
259 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
260 , p5_a31 DATE := fnd_api.g_miss_date
261 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
262 , p5_a33 NUMBER := 0-1962.0724
263 , p5_a34 DATE := fnd_api.g_miss_date
264 , p5_a35 NUMBER := 0-1962.0724
265 , p5_a36 NUMBER := 0-1962.0724
266 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
267 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
268 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
269 , p5_a40 DATE := fnd_api.g_miss_date
270 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
271 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
272 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
273 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
274 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
275 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
276 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
277 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
278 , p5_a49 VARCHAR2 := fnd_api.g_miss_char
279 , p5_a50 VARCHAR2 := fnd_api.g_miss_char
280 , p5_a51 VARCHAR2 := fnd_api.g_miss_char
281 , p5_a52 VARCHAR2 := fnd_api.g_miss_char
282 , p5_a53 VARCHAR2 := fnd_api.g_miss_char
283 , p5_a54 VARCHAR2 := fnd_api.g_miss_char
284 , p5_a55 VARCHAR2 := fnd_api.g_miss_char
285 , p5_a56 VARCHAR2 := fnd_api.g_miss_char
286 , p5_a57 DATE := fnd_api.g_miss_date
287 , p5_a58 NUMBER := 0-1962.0724
288 , p5_a59 NUMBER := 0-1962.0724
289 , p5_a60 NUMBER := 0-1962.0724
290 , p5_a61 NUMBER := 0-1962.0724
291 , p5_a62 NUMBER := 0-1962.0724
292 , p5_a63 DATE := fnd_api.g_miss_date
293 , p5_a64 NUMBER := 0-1962.0724
294 , p5_a65 DATE := fnd_api.g_miss_date
295 , p5_a66 NUMBER := 0-1962.0724
296 , p5_a67 DATE := fnd_api.g_miss_date
297 , p5_a68 NUMBER := 0-1962.0724
298 , p5_a69 NUMBER := 0-1962.0724
299 , p5_a70 VARCHAR2 := fnd_api.g_miss_char
300 , p5_a71 NUMBER := 0-1962.0724
301 , p5_a72 NUMBER := 0-1962.0724
302 , p5_a73 NUMBER := 0-1962.0724
303 , p5_a74 NUMBER := 0-1962.0724
304 , p5_a75 VARCHAR2 := fnd_api.g_miss_char
305 , p5_a76 VARCHAR2 := fnd_api.g_miss_char
306 , p5_a77 VARCHAR2 := fnd_api.g_miss_char
307 , p5_a78 NUMBER := 0-1962.0724
308 , p5_a79 DATE := fnd_api.g_miss_date
309 )
310
311 as
312 ddp_qtev_rec okl_am_repurchase_asset_pub.qtev_rec_type;
313 ddp_tqlv_tbl okl_am_repurchase_asset_pub.tqlv_tbl_type;
314 ddx_qtev_rec okl_am_repurchase_asset_pub.qtev_rec_type;
315 ddx_tqlv_tbl okl_am_repurchase_asset_pub.tqlv_tbl_type;
316 ddindx binary_integer; indx binary_integer;
317 begin
318
319 -- copy data to the local IN or IN-OUT args, if any
320
321
322
323
324
325 ddp_qtev_rec.id := rosetta_g_miss_num_map(p5_a0);
326 ddp_qtev_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
327 ddp_qtev_rec.sfwt_flag := p5_a2;
328 ddp_qtev_rec.qrs_code := p5_a3;
329 ddp_qtev_rec.qst_code := p5_a4;
330 ddp_qtev_rec.qtp_code := p5_a5;
331 ddp_qtev_rec.trn_code := p5_a6;
332 ddp_qtev_rec.pop_code_end := p5_a7;
333 ddp_qtev_rec.pop_code_early := p5_a8;
334 ddp_qtev_rec.consolidated_qte_id := rosetta_g_miss_num_map(p5_a9);
335 ddp_qtev_rec.khr_id := rosetta_g_miss_num_map(p5_a10);
336 ddp_qtev_rec.art_id := rosetta_g_miss_num_map(p5_a11);
337 ddp_qtev_rec.pdt_id := rosetta_g_miss_num_map(p5_a12);
338 ddp_qtev_rec.early_termination_yn := p5_a13;
339 ddp_qtev_rec.partial_yn := p5_a14;
340 ddp_qtev_rec.preproceeds_yn := p5_a15;
341 ddp_qtev_rec.date_requested := rosetta_g_miss_date_in_map(p5_a16);
342 ddp_qtev_rec.date_proposal := rosetta_g_miss_date_in_map(p5_a17);
343 ddp_qtev_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a18);
344 ddp_qtev_rec.date_accepted := rosetta_g_miss_date_in_map(p5_a19);
345 ddp_qtev_rec.summary_format_yn := p5_a20;
346 ddp_qtev_rec.consolidated_yn := p5_a21;
347 ddp_qtev_rec.principal_paydown_amount := rosetta_g_miss_num_map(p5_a22);
348 ddp_qtev_rec.residual_amount := rosetta_g_miss_num_map(p5_a23);
349 ddp_qtev_rec.yield := rosetta_g_miss_num_map(p5_a24);
350 ddp_qtev_rec.rent_amount := rosetta_g_miss_num_map(p5_a25);
351 ddp_qtev_rec.date_restructure_end := rosetta_g_miss_date_in_map(p5_a26);
352 ddp_qtev_rec.date_restructure_start := rosetta_g_miss_date_in_map(p5_a27);
353 ddp_qtev_rec.term := rosetta_g_miss_num_map(p5_a28);
354 ddp_qtev_rec.purchase_percent := rosetta_g_miss_num_map(p5_a29);
355 ddp_qtev_rec.comments := p5_a30;
356 ddp_qtev_rec.date_due := rosetta_g_miss_date_in_map(p5_a31);
357 ddp_qtev_rec.payment_frequency := p5_a32;
358 ddp_qtev_rec.remaining_payments := rosetta_g_miss_num_map(p5_a33);
359 ddp_qtev_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a34);
360 ddp_qtev_rec.quote_number := rosetta_g_miss_num_map(p5_a35);
361 ddp_qtev_rec.requested_by := rosetta_g_miss_num_map(p5_a36);
362 ddp_qtev_rec.approved_yn := p5_a37;
363 ddp_qtev_rec.accepted_yn := p5_a38;
364 ddp_qtev_rec.payment_received_yn := p5_a39;
365 ddp_qtev_rec.date_payment_received := rosetta_g_miss_date_in_map(p5_a40);
366 ddp_qtev_rec.attribute_category := p5_a41;
367 ddp_qtev_rec.attribute1 := p5_a42;
368 ddp_qtev_rec.attribute2 := p5_a43;
369 ddp_qtev_rec.attribute3 := p5_a44;
370 ddp_qtev_rec.attribute4 := p5_a45;
371 ddp_qtev_rec.attribute5 := p5_a46;
372 ddp_qtev_rec.attribute6 := p5_a47;
373 ddp_qtev_rec.attribute7 := p5_a48;
374 ddp_qtev_rec.attribute8 := p5_a49;
375 ddp_qtev_rec.attribute9 := p5_a50;
376 ddp_qtev_rec.attribute10 := p5_a51;
377 ddp_qtev_rec.attribute11 := p5_a52;
378 ddp_qtev_rec.attribute12 := p5_a53;
379 ddp_qtev_rec.attribute13 := p5_a54;
380 ddp_qtev_rec.attribute14 := p5_a55;
381 ddp_qtev_rec.attribute15 := p5_a56;
382 ddp_qtev_rec.date_approved := rosetta_g_miss_date_in_map(p5_a57);
383 ddp_qtev_rec.approved_by := rosetta_g_miss_num_map(p5_a58);
384 ddp_qtev_rec.org_id := rosetta_g_miss_num_map(p5_a59);
385 ddp_qtev_rec.request_id := rosetta_g_miss_num_map(p5_a60);
386 ddp_qtev_rec.program_application_id := rosetta_g_miss_num_map(p5_a61);
387 ddp_qtev_rec.program_id := rosetta_g_miss_num_map(p5_a62);
388 ddp_qtev_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a63);
389 ddp_qtev_rec.created_by := rosetta_g_miss_num_map(p5_a64);
390 ddp_qtev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a65);
391 ddp_qtev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a66);
392 ddp_qtev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a67);
393 ddp_qtev_rec.last_update_login := rosetta_g_miss_num_map(p5_a68);
394 ddp_qtev_rec.purchase_amount := rosetta_g_miss_num_map(p5_a69);
395 ddp_qtev_rec.purchase_formula := p5_a70;
396 ddp_qtev_rec.asset_value := rosetta_g_miss_num_map(p5_a71);
397 ddp_qtev_rec.residual_value := rosetta_g_miss_num_map(p5_a72);
398 ddp_qtev_rec.unbilled_receivables := rosetta_g_miss_num_map(p5_a73);
399 ddp_qtev_rec.gain_loss := rosetta_g_miss_num_map(p5_a74);
400 ddp_qtev_rec.currency_code := p5_a75;
401 ddp_qtev_rec.currency_conversion_code := p5_a76;
402 ddp_qtev_rec.currency_conversion_type := p5_a77;
403 ddp_qtev_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a78);
404 ddp_qtev_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a79);
405
406 okl_tql_pvt_w.rosetta_table_copy_in_p8(ddp_tqlv_tbl, p6_a0
407 , p6_a1
408 , p6_a2
409 , p6_a3
410 , p6_a4
411 , p6_a5
412 , p6_a6
413 , p6_a7
414 , p6_a8
415 , p6_a9
416 , p6_a10
417 , p6_a11
418 , p6_a12
419 , p6_a13
420 , p6_a14
421 , p6_a15
422 , p6_a16
423 , p6_a17
424 , p6_a18
425 , p6_a19
426 , p6_a20
427 , p6_a21
428 , p6_a22
429 , p6_a23
430 , p6_a24
431 , p6_a25
432 , p6_a26
433 , p6_a27
434 , p6_a28
435 , p6_a29
436 , p6_a30
437 , p6_a31
438 , p6_a32
439 , p6_a33
440 , p6_a34
441 , p6_a35
442 , p6_a36
443 , p6_a37
444 , p6_a38
445 , p6_a39
446 , p6_a40
447 , p6_a41
448 , p6_a42
449 , p6_a43
450 , p6_a44
451 , p6_a45
452 , p6_a46
453 , p6_a47
454 , p6_a48
455 , p6_a49
456 , p6_a50
457 , p6_a51
458 , p6_a52
459 , p6_a53
460 , p6_a54
461 , p6_a55
462 , p6_a56
463 , p6_a57
464 , p6_a58
465 , p6_a59
466 , p6_a60
467 );
468
469
470
471 -- here's the delegated call to the old PL/SQL routine
472 okl_am_repurchase_asset_pub.create_repurchase_quote(p_api_version,
473 p_init_msg_list,
474 x_return_status,
475 x_msg_count,
476 x_msg_data,
477 ddp_qtev_rec,
478 ddp_tqlv_tbl,
479 ddx_qtev_rec,
480 ddx_tqlv_tbl);
481
482 -- copy data back from the local variables to OUT or IN-OUT args, if any
483
484
485
486
487
488
489
490 p7_a0 := rosetta_g_miss_num_map(ddx_qtev_rec.id);
491 p7_a1 := rosetta_g_miss_num_map(ddx_qtev_rec.object_version_number);
492 p7_a2 := ddx_qtev_rec.sfwt_flag;
493 p7_a3 := ddx_qtev_rec.qrs_code;
494 p7_a4 := ddx_qtev_rec.qst_code;
495 p7_a5 := ddx_qtev_rec.qtp_code;
496 p7_a6 := ddx_qtev_rec.trn_code;
497 p7_a7 := ddx_qtev_rec.pop_code_end;
498 p7_a8 := ddx_qtev_rec.pop_code_early;
499 p7_a9 := rosetta_g_miss_num_map(ddx_qtev_rec.consolidated_qte_id);
500 p7_a10 := rosetta_g_miss_num_map(ddx_qtev_rec.khr_id);
501 p7_a11 := rosetta_g_miss_num_map(ddx_qtev_rec.art_id);
502 p7_a12 := rosetta_g_miss_num_map(ddx_qtev_rec.pdt_id);
503 p7_a13 := ddx_qtev_rec.early_termination_yn;
504 p7_a14 := ddx_qtev_rec.partial_yn;
505 p7_a15 := ddx_qtev_rec.preproceeds_yn;
506 p7_a16 := ddx_qtev_rec.date_requested;
507 p7_a17 := ddx_qtev_rec.date_proposal;
508 p7_a18 := ddx_qtev_rec.date_effective_to;
509 p7_a19 := ddx_qtev_rec.date_accepted;
510 p7_a20 := ddx_qtev_rec.summary_format_yn;
511 p7_a21 := ddx_qtev_rec.consolidated_yn;
512 p7_a22 := rosetta_g_miss_num_map(ddx_qtev_rec.principal_paydown_amount);
513 p7_a23 := rosetta_g_miss_num_map(ddx_qtev_rec.residual_amount);
514 p7_a24 := rosetta_g_miss_num_map(ddx_qtev_rec.yield);
515 p7_a25 := rosetta_g_miss_num_map(ddx_qtev_rec.rent_amount);
516 p7_a26 := ddx_qtev_rec.date_restructure_end;
517 p7_a27 := ddx_qtev_rec.date_restructure_start;
518 p7_a28 := rosetta_g_miss_num_map(ddx_qtev_rec.term);
519 p7_a29 := rosetta_g_miss_num_map(ddx_qtev_rec.purchase_percent);
520 p7_a30 := ddx_qtev_rec.comments;
521 p7_a31 := ddx_qtev_rec.date_due;
522 p7_a32 := ddx_qtev_rec.payment_frequency;
523 p7_a33 := rosetta_g_miss_num_map(ddx_qtev_rec.remaining_payments);
524 p7_a34 := ddx_qtev_rec.date_effective_from;
525 p7_a35 := rosetta_g_miss_num_map(ddx_qtev_rec.quote_number);
526 p7_a36 := rosetta_g_miss_num_map(ddx_qtev_rec.requested_by);
527 p7_a37 := ddx_qtev_rec.approved_yn;
528 p7_a38 := ddx_qtev_rec.accepted_yn;
529 p7_a39 := ddx_qtev_rec.payment_received_yn;
530 p7_a40 := ddx_qtev_rec.date_payment_received;
531 p7_a41 := ddx_qtev_rec.attribute_category;
532 p7_a42 := ddx_qtev_rec.attribute1;
533 p7_a43 := ddx_qtev_rec.attribute2;
534 p7_a44 := ddx_qtev_rec.attribute3;
535 p7_a45 := ddx_qtev_rec.attribute4;
536 p7_a46 := ddx_qtev_rec.attribute5;
537 p7_a47 := ddx_qtev_rec.attribute6;
538 p7_a48 := ddx_qtev_rec.attribute7;
539 p7_a49 := ddx_qtev_rec.attribute8;
540 p7_a50 := ddx_qtev_rec.attribute9;
541 p7_a51 := ddx_qtev_rec.attribute10;
542 p7_a52 := ddx_qtev_rec.attribute11;
543 p7_a53 := ddx_qtev_rec.attribute12;
544 p7_a54 := ddx_qtev_rec.attribute13;
545 p7_a55 := ddx_qtev_rec.attribute14;
546 p7_a56 := ddx_qtev_rec.attribute15;
547 p7_a57 := ddx_qtev_rec.date_approved;
548 p7_a58 := rosetta_g_miss_num_map(ddx_qtev_rec.approved_by);
549 p7_a59 := rosetta_g_miss_num_map(ddx_qtev_rec.org_id);
550 p7_a60 := rosetta_g_miss_num_map(ddx_qtev_rec.request_id);
551 p7_a61 := rosetta_g_miss_num_map(ddx_qtev_rec.program_application_id);
552 p7_a62 := rosetta_g_miss_num_map(ddx_qtev_rec.program_id);
553 p7_a63 := ddx_qtev_rec.program_update_date;
554 p7_a64 := rosetta_g_miss_num_map(ddx_qtev_rec.created_by);
555 p7_a65 := ddx_qtev_rec.creation_date;
556 p7_a66 := rosetta_g_miss_num_map(ddx_qtev_rec.last_updated_by);
557 p7_a67 := ddx_qtev_rec.last_update_date;
558 p7_a68 := rosetta_g_miss_num_map(ddx_qtev_rec.last_update_login);
559 p7_a69 := rosetta_g_miss_num_map(ddx_qtev_rec.purchase_amount);
560 p7_a70 := ddx_qtev_rec.purchase_formula;
561 p7_a71 := rosetta_g_miss_num_map(ddx_qtev_rec.asset_value);
562 p7_a72 := rosetta_g_miss_num_map(ddx_qtev_rec.residual_value);
563 p7_a73 := rosetta_g_miss_num_map(ddx_qtev_rec.unbilled_receivables);
564 p7_a74 := rosetta_g_miss_num_map(ddx_qtev_rec.gain_loss);
565 p7_a75 := ddx_qtev_rec.currency_code;
566 p7_a76 := ddx_qtev_rec.currency_conversion_code;
567 p7_a77 := ddx_qtev_rec.currency_conversion_type;
568 p7_a78 := rosetta_g_miss_num_map(ddx_qtev_rec.currency_conversion_rate);
569 p7_a79 := ddx_qtev_rec.currency_conversion_date;
570
571 okl_tql_pvt_w.rosetta_table_copy_out_p8(ddx_tqlv_tbl, p8_a0
572 , p8_a1
573 , p8_a2
574 , p8_a3
575 , p8_a4
576 , p8_a5
577 , p8_a6
578 , p8_a7
579 , p8_a8
580 , p8_a9
581 , p8_a10
582 , p8_a11
583 , p8_a12
584 , p8_a13
585 , p8_a14
586 , p8_a15
587 , p8_a16
588 , p8_a17
589 , p8_a18
590 , p8_a19
591 , p8_a20
592 , p8_a21
593 , p8_a22
594 , p8_a23
595 , p8_a24
596 , p8_a25
597 , p8_a26
598 , p8_a27
599 , p8_a28
600 , p8_a29
601 , p8_a30
602 , p8_a31
603 , p8_a32
604 , p8_a33
605 , p8_a34
606 , p8_a35
607 , p8_a36
608 , p8_a37
609 , p8_a38
610 , p8_a39
611 , p8_a40
612 , p8_a41
613 , p8_a42
614 , p8_a43
615 , p8_a44
616 , p8_a45
617 , p8_a46
618 , p8_a47
619 , p8_a48
620 , p8_a49
621 , p8_a50
622 , p8_a51
623 , p8_a52
624 , p8_a53
625 , p8_a54
626 , p8_a55
627 , p8_a56
628 , p8_a57
629 , p8_a58
630 , p8_a59
631 , p8_a60
632 );
633 end;
634
635 procedure update_repurchase_quote(p_api_version NUMBER
636 , p_init_msg_list VARCHAR2
637 , x_return_status out nocopy VARCHAR2
638 , x_msg_count out nocopy NUMBER
639 , x_msg_data out nocopy VARCHAR2
640 , p6_a0 JTF_NUMBER_TABLE
641 , p6_a1 JTF_NUMBER_TABLE
642 , p6_a2 JTF_VARCHAR2_TABLE_100
643 , p6_a3 JTF_VARCHAR2_TABLE_100
644 , p6_a4 JTF_NUMBER_TABLE
645 , p6_a5 JTF_NUMBER_TABLE
646 , p6_a6 JTF_NUMBER_TABLE
647 , p6_a7 JTF_NUMBER_TABLE
648 , p6_a8 JTF_VARCHAR2_TABLE_2000
649 , p6_a9 JTF_NUMBER_TABLE
650 , p6_a10 JTF_VARCHAR2_TABLE_100
651 , p6_a11 JTF_VARCHAR2_TABLE_100
652 , p6_a12 JTF_VARCHAR2_TABLE_100
653 , p6_a13 JTF_VARCHAR2_TABLE_100
654 , p6_a14 JTF_VARCHAR2_TABLE_500
655 , p6_a15 JTF_VARCHAR2_TABLE_500
656 , p6_a16 JTF_VARCHAR2_TABLE_500
657 , p6_a17 JTF_VARCHAR2_TABLE_500
658 , p6_a18 JTF_VARCHAR2_TABLE_500
659 , p6_a19 JTF_VARCHAR2_TABLE_500
660 , p6_a20 JTF_VARCHAR2_TABLE_500
661 , p6_a21 JTF_VARCHAR2_TABLE_500
662 , p6_a22 JTF_VARCHAR2_TABLE_500
663 , p6_a23 JTF_VARCHAR2_TABLE_500
664 , p6_a24 JTF_VARCHAR2_TABLE_500
665 , p6_a25 JTF_VARCHAR2_TABLE_500
666 , p6_a26 JTF_VARCHAR2_TABLE_500
667 , p6_a27 JTF_VARCHAR2_TABLE_500
668 , p6_a28 JTF_VARCHAR2_TABLE_500
669 , p6_a29 JTF_NUMBER_TABLE
670 , p6_a30 JTF_NUMBER_TABLE
671 , p6_a31 JTF_NUMBER_TABLE
672 , p6_a32 JTF_NUMBER_TABLE
673 , p6_a33 JTF_DATE_TABLE
674 , p6_a34 JTF_NUMBER_TABLE
675 , p6_a35 JTF_DATE_TABLE
676 , p6_a36 JTF_NUMBER_TABLE
677 , p6_a37 JTF_DATE_TABLE
678 , p6_a38 JTF_NUMBER_TABLE
679 , p6_a39 JTF_DATE_TABLE
680 , p6_a40 JTF_VARCHAR2_TABLE_100
681 , p6_a41 JTF_NUMBER_TABLE
682 , p6_a42 JTF_VARCHAR2_TABLE_100
683 , p6_a43 JTF_VARCHAR2_TABLE_100
684 , p6_a44 JTF_VARCHAR2_TABLE_200
685 , p6_a45 JTF_NUMBER_TABLE
686 , p6_a46 JTF_NUMBER_TABLE
687 , p6_a47 JTF_NUMBER_TABLE
688 , p6_a48 JTF_NUMBER_TABLE
689 , p6_a49 JTF_NUMBER_TABLE
690 , p6_a50 JTF_NUMBER_TABLE
691 , p6_a51 JTF_NUMBER_TABLE
692 , p6_a52 JTF_NUMBER_TABLE
693 , p6_a53 JTF_VARCHAR2_TABLE_200
694 , p6_a54 JTF_VARCHAR2_TABLE_100
695 , p6_a55 JTF_VARCHAR2_TABLE_100
696 , p6_a56 JTF_VARCHAR2_TABLE_100
697 , p6_a57 JTF_NUMBER_TABLE
698 , p6_a58 JTF_DATE_TABLE
699 , p6_a59 JTF_DATE_TABLE
700 , p6_a60 JTF_NUMBER_TABLE
701 , p7_a0 out nocopy NUMBER
702 , p7_a1 out nocopy NUMBER
703 , p7_a2 out nocopy VARCHAR2
704 , p7_a3 out nocopy VARCHAR2
705 , p7_a4 out nocopy VARCHAR2
706 , p7_a5 out nocopy VARCHAR2
707 , p7_a6 out nocopy VARCHAR2
708 , p7_a7 out nocopy VARCHAR2
709 , p7_a8 out nocopy VARCHAR2
710 , p7_a9 out nocopy NUMBER
711 , p7_a10 out nocopy NUMBER
712 , p7_a11 out nocopy NUMBER
713 , p7_a12 out nocopy NUMBER
714 , p7_a13 out nocopy VARCHAR2
715 , p7_a14 out nocopy VARCHAR2
716 , p7_a15 out nocopy VARCHAR2
717 , p7_a16 out nocopy DATE
718 , p7_a17 out nocopy DATE
719 , p7_a18 out nocopy DATE
720 , p7_a19 out nocopy DATE
721 , p7_a20 out nocopy VARCHAR2
722 , p7_a21 out nocopy VARCHAR2
723 , p7_a22 out nocopy NUMBER
724 , p7_a23 out nocopy NUMBER
725 , p7_a24 out nocopy NUMBER
726 , p7_a25 out nocopy NUMBER
727 , p7_a26 out nocopy DATE
728 , p7_a27 out nocopy DATE
729 , p7_a28 out nocopy NUMBER
730 , p7_a29 out nocopy NUMBER
731 , p7_a30 out nocopy VARCHAR2
732 , p7_a31 out nocopy DATE
733 , p7_a32 out nocopy VARCHAR2
734 , p7_a33 out nocopy NUMBER
735 , p7_a34 out nocopy DATE
736 , p7_a35 out nocopy NUMBER
737 , p7_a36 out nocopy NUMBER
738 , p7_a37 out nocopy VARCHAR2
739 , p7_a38 out nocopy VARCHAR2
740 , p7_a39 out nocopy VARCHAR2
741 , p7_a40 out nocopy DATE
742 , p7_a41 out nocopy VARCHAR2
743 , p7_a42 out nocopy VARCHAR2
744 , p7_a43 out nocopy VARCHAR2
745 , p7_a44 out nocopy VARCHAR2
746 , p7_a45 out nocopy VARCHAR2
747 , p7_a46 out nocopy VARCHAR2
748 , p7_a47 out nocopy VARCHAR2
749 , p7_a48 out nocopy VARCHAR2
750 , p7_a49 out nocopy VARCHAR2
751 , p7_a50 out nocopy VARCHAR2
752 , p7_a51 out nocopy VARCHAR2
753 , p7_a52 out nocopy VARCHAR2
754 , p7_a53 out nocopy VARCHAR2
755 , p7_a54 out nocopy VARCHAR2
756 , p7_a55 out nocopy VARCHAR2
757 , p7_a56 out nocopy VARCHAR2
758 , p7_a57 out nocopy DATE
759 , p7_a58 out nocopy NUMBER
760 , p7_a59 out nocopy NUMBER
761 , p7_a60 out nocopy NUMBER
762 , p7_a61 out nocopy NUMBER
763 , p7_a62 out nocopy NUMBER
764 , p7_a63 out nocopy DATE
765 , p7_a64 out nocopy NUMBER
766 , p7_a65 out nocopy DATE
767 , p7_a66 out nocopy NUMBER
768 , p7_a67 out nocopy DATE
769 , p7_a68 out nocopy NUMBER
770 , p7_a69 out nocopy NUMBER
771 , p7_a70 out nocopy VARCHAR2
772 , p7_a71 out nocopy NUMBER
773 , p7_a72 out nocopy NUMBER
774 , p7_a73 out nocopy NUMBER
775 , p7_a74 out nocopy NUMBER
776 , p7_a75 out nocopy VARCHAR2
777 , p7_a76 out nocopy VARCHAR2
778 , p7_a77 out nocopy VARCHAR2
779 , p7_a78 out nocopy NUMBER
780 , p7_a79 out nocopy DATE
781 , p8_a0 out nocopy JTF_NUMBER_TABLE
782 , p8_a1 out nocopy JTF_NUMBER_TABLE
783 , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
784 , p8_a3 out nocopy JTF_VARCHAR2_TABLE_100
785 , p8_a4 out nocopy JTF_NUMBER_TABLE
786 , p8_a5 out nocopy JTF_NUMBER_TABLE
787 , p8_a6 out nocopy JTF_NUMBER_TABLE
788 , p8_a7 out nocopy JTF_NUMBER_TABLE
789 , p8_a8 out nocopy JTF_VARCHAR2_TABLE_2000
790 , p8_a9 out nocopy JTF_NUMBER_TABLE
791 , p8_a10 out nocopy JTF_VARCHAR2_TABLE_100
792 , p8_a11 out nocopy JTF_VARCHAR2_TABLE_100
793 , p8_a12 out nocopy JTF_VARCHAR2_TABLE_100
794 , p8_a13 out nocopy JTF_VARCHAR2_TABLE_100
795 , p8_a14 out nocopy JTF_VARCHAR2_TABLE_500
796 , p8_a15 out nocopy JTF_VARCHAR2_TABLE_500
797 , p8_a16 out nocopy JTF_VARCHAR2_TABLE_500
798 , p8_a17 out nocopy JTF_VARCHAR2_TABLE_500
799 , p8_a18 out nocopy JTF_VARCHAR2_TABLE_500
800 , p8_a19 out nocopy JTF_VARCHAR2_TABLE_500
801 , p8_a20 out nocopy JTF_VARCHAR2_TABLE_500
802 , p8_a21 out nocopy JTF_VARCHAR2_TABLE_500
803 , p8_a22 out nocopy JTF_VARCHAR2_TABLE_500
804 , p8_a23 out nocopy JTF_VARCHAR2_TABLE_500
805 , p8_a24 out nocopy JTF_VARCHAR2_TABLE_500
806 , p8_a25 out nocopy JTF_VARCHAR2_TABLE_500
807 , p8_a26 out nocopy JTF_VARCHAR2_TABLE_500
808 , p8_a27 out nocopy JTF_VARCHAR2_TABLE_500
809 , p8_a28 out nocopy JTF_VARCHAR2_TABLE_500
810 , p8_a29 out nocopy JTF_NUMBER_TABLE
811 , p8_a30 out nocopy JTF_NUMBER_TABLE
812 , p8_a31 out nocopy JTF_NUMBER_TABLE
813 , p8_a32 out nocopy JTF_NUMBER_TABLE
814 , p8_a33 out nocopy JTF_DATE_TABLE
815 , p8_a34 out nocopy JTF_NUMBER_TABLE
816 , p8_a35 out nocopy JTF_DATE_TABLE
817 , p8_a36 out nocopy JTF_NUMBER_TABLE
818 , p8_a37 out nocopy JTF_DATE_TABLE
819 , p8_a38 out nocopy JTF_NUMBER_TABLE
820 , p8_a39 out nocopy JTF_DATE_TABLE
821 , p8_a40 out nocopy JTF_VARCHAR2_TABLE_100
822 , p8_a41 out nocopy JTF_NUMBER_TABLE
823 , p8_a42 out nocopy JTF_VARCHAR2_TABLE_100
824 , p8_a43 out nocopy JTF_VARCHAR2_TABLE_100
825 , p8_a44 out nocopy JTF_VARCHAR2_TABLE_200
826 , p8_a45 out nocopy JTF_NUMBER_TABLE
827 , p8_a46 out nocopy JTF_NUMBER_TABLE
828 , p8_a47 out nocopy JTF_NUMBER_TABLE
829 , p8_a48 out nocopy JTF_NUMBER_TABLE
830 , p8_a49 out nocopy JTF_NUMBER_TABLE
831 , p8_a50 out nocopy JTF_NUMBER_TABLE
832 , p8_a51 out nocopy JTF_NUMBER_TABLE
833 , p8_a52 out nocopy JTF_NUMBER_TABLE
834 , p8_a53 out nocopy JTF_VARCHAR2_TABLE_200
835 , p8_a54 out nocopy JTF_VARCHAR2_TABLE_100
836 , p8_a55 out nocopy JTF_VARCHAR2_TABLE_100
837 , p8_a56 out nocopy JTF_VARCHAR2_TABLE_100
838 , p8_a57 out nocopy JTF_NUMBER_TABLE
839 , p8_a58 out nocopy JTF_DATE_TABLE
840 , p8_a59 out nocopy JTF_DATE_TABLE
841 , p8_a60 out nocopy JTF_NUMBER_TABLE
842 , p5_a0 NUMBER := 0-1962.0724
843 , p5_a1 NUMBER := 0-1962.0724
844 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
845 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
846 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
847 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
848 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
849 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
850 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
851 , p5_a9 NUMBER := 0-1962.0724
852 , p5_a10 NUMBER := 0-1962.0724
853 , p5_a11 NUMBER := 0-1962.0724
854 , p5_a12 NUMBER := 0-1962.0724
855 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
856 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
857 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
858 , p5_a16 DATE := fnd_api.g_miss_date
859 , p5_a17 DATE := fnd_api.g_miss_date
860 , p5_a18 DATE := fnd_api.g_miss_date
861 , p5_a19 DATE := fnd_api.g_miss_date
862 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
863 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
864 , p5_a22 NUMBER := 0-1962.0724
865 , p5_a23 NUMBER := 0-1962.0724
866 , p5_a24 NUMBER := 0-1962.0724
867 , p5_a25 NUMBER := 0-1962.0724
868 , p5_a26 DATE := fnd_api.g_miss_date
869 , p5_a27 DATE := fnd_api.g_miss_date
870 , p5_a28 NUMBER := 0-1962.0724
871 , p5_a29 NUMBER := 0-1962.0724
872 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
873 , p5_a31 DATE := fnd_api.g_miss_date
874 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
875 , p5_a33 NUMBER := 0-1962.0724
876 , p5_a34 DATE := fnd_api.g_miss_date
877 , p5_a35 NUMBER := 0-1962.0724
878 , p5_a36 NUMBER := 0-1962.0724
879 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
880 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
881 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
882 , p5_a40 DATE := fnd_api.g_miss_date
883 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
884 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
885 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
886 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
887 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
888 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
889 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
890 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
891 , p5_a49 VARCHAR2 := fnd_api.g_miss_char
892 , p5_a50 VARCHAR2 := fnd_api.g_miss_char
893 , p5_a51 VARCHAR2 := fnd_api.g_miss_char
894 , p5_a52 VARCHAR2 := fnd_api.g_miss_char
895 , p5_a53 VARCHAR2 := fnd_api.g_miss_char
896 , p5_a54 VARCHAR2 := fnd_api.g_miss_char
897 , p5_a55 VARCHAR2 := fnd_api.g_miss_char
898 , p5_a56 VARCHAR2 := fnd_api.g_miss_char
899 , p5_a57 DATE := fnd_api.g_miss_date
900 , p5_a58 NUMBER := 0-1962.0724
901 , p5_a59 NUMBER := 0-1962.0724
902 , p5_a60 NUMBER := 0-1962.0724
903 , p5_a61 NUMBER := 0-1962.0724
904 , p5_a62 NUMBER := 0-1962.0724
905 , p5_a63 DATE := fnd_api.g_miss_date
906 , p5_a64 NUMBER := 0-1962.0724
907 , p5_a65 DATE := fnd_api.g_miss_date
908 , p5_a66 NUMBER := 0-1962.0724
909 , p5_a67 DATE := fnd_api.g_miss_date
910 , p5_a68 NUMBER := 0-1962.0724
911 , p5_a69 NUMBER := 0-1962.0724
912 , p5_a70 VARCHAR2 := fnd_api.g_miss_char
913 , p5_a71 NUMBER := 0-1962.0724
914 , p5_a72 NUMBER := 0-1962.0724
915 , p5_a73 NUMBER := 0-1962.0724
916 , p5_a74 NUMBER := 0-1962.0724
917 , p5_a75 VARCHAR2 := fnd_api.g_miss_char
918 , p5_a76 VARCHAR2 := fnd_api.g_miss_char
919 , p5_a77 VARCHAR2 := fnd_api.g_miss_char
920 , p5_a78 NUMBER := 0-1962.0724
921 , p5_a79 DATE := fnd_api.g_miss_date
922 )
923
924 as
925 ddp_qtev_rec okl_am_repurchase_asset_pub.qtev_rec_type;
926 ddp_tqlv_tbl okl_am_repurchase_asset_pub.tqlv_tbl_type;
927 ddx_qtev_rec okl_am_repurchase_asset_pub.qtev_rec_type;
928 ddx_tqlv_tbl okl_am_repurchase_asset_pub.tqlv_tbl_type;
929 ddindx binary_integer; indx binary_integer;
930 begin
931
932 -- copy data to the local IN or IN-OUT args, if any
933
934
935
936
937
938 ddp_qtev_rec.id := rosetta_g_miss_num_map(p5_a0);
939 ddp_qtev_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
940 ddp_qtev_rec.sfwt_flag := p5_a2;
941 ddp_qtev_rec.qrs_code := p5_a3;
942 ddp_qtev_rec.qst_code := p5_a4;
943 ddp_qtev_rec.qtp_code := p5_a5;
944 ddp_qtev_rec.trn_code := p5_a6;
945 ddp_qtev_rec.pop_code_end := p5_a7;
946 ddp_qtev_rec.pop_code_early := p5_a8;
947 ddp_qtev_rec.consolidated_qte_id := rosetta_g_miss_num_map(p5_a9);
948 ddp_qtev_rec.khr_id := rosetta_g_miss_num_map(p5_a10);
949 ddp_qtev_rec.art_id := rosetta_g_miss_num_map(p5_a11);
950 ddp_qtev_rec.pdt_id := rosetta_g_miss_num_map(p5_a12);
951 ddp_qtev_rec.early_termination_yn := p5_a13;
952 ddp_qtev_rec.partial_yn := p5_a14;
953 ddp_qtev_rec.preproceeds_yn := p5_a15;
954 ddp_qtev_rec.date_requested := rosetta_g_miss_date_in_map(p5_a16);
955 ddp_qtev_rec.date_proposal := rosetta_g_miss_date_in_map(p5_a17);
956 ddp_qtev_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a18);
957 ddp_qtev_rec.date_accepted := rosetta_g_miss_date_in_map(p5_a19);
958 ddp_qtev_rec.summary_format_yn := p5_a20;
959 ddp_qtev_rec.consolidated_yn := p5_a21;
960 ddp_qtev_rec.principal_paydown_amount := rosetta_g_miss_num_map(p5_a22);
961 ddp_qtev_rec.residual_amount := rosetta_g_miss_num_map(p5_a23);
962 ddp_qtev_rec.yield := rosetta_g_miss_num_map(p5_a24);
963 ddp_qtev_rec.rent_amount := rosetta_g_miss_num_map(p5_a25);
964 ddp_qtev_rec.date_restructure_end := rosetta_g_miss_date_in_map(p5_a26);
965 ddp_qtev_rec.date_restructure_start := rosetta_g_miss_date_in_map(p5_a27);
966 ddp_qtev_rec.term := rosetta_g_miss_num_map(p5_a28);
967 ddp_qtev_rec.purchase_percent := rosetta_g_miss_num_map(p5_a29);
968 ddp_qtev_rec.comments := p5_a30;
969 ddp_qtev_rec.date_due := rosetta_g_miss_date_in_map(p5_a31);
970 ddp_qtev_rec.payment_frequency := p5_a32;
971 ddp_qtev_rec.remaining_payments := rosetta_g_miss_num_map(p5_a33);
972 ddp_qtev_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a34);
973 ddp_qtev_rec.quote_number := rosetta_g_miss_num_map(p5_a35);
974 ddp_qtev_rec.requested_by := rosetta_g_miss_num_map(p5_a36);
975 ddp_qtev_rec.approved_yn := p5_a37;
976 ddp_qtev_rec.accepted_yn := p5_a38;
977 ddp_qtev_rec.payment_received_yn := p5_a39;
978 ddp_qtev_rec.date_payment_received := rosetta_g_miss_date_in_map(p5_a40);
979 ddp_qtev_rec.attribute_category := p5_a41;
980 ddp_qtev_rec.attribute1 := p5_a42;
981 ddp_qtev_rec.attribute2 := p5_a43;
982 ddp_qtev_rec.attribute3 := p5_a44;
983 ddp_qtev_rec.attribute4 := p5_a45;
984 ddp_qtev_rec.attribute5 := p5_a46;
985 ddp_qtev_rec.attribute6 := p5_a47;
986 ddp_qtev_rec.attribute7 := p5_a48;
987 ddp_qtev_rec.attribute8 := p5_a49;
988 ddp_qtev_rec.attribute9 := p5_a50;
989 ddp_qtev_rec.attribute10 := p5_a51;
990 ddp_qtev_rec.attribute11 := p5_a52;
991 ddp_qtev_rec.attribute12 := p5_a53;
992 ddp_qtev_rec.attribute13 := p5_a54;
993 ddp_qtev_rec.attribute14 := p5_a55;
994 ddp_qtev_rec.attribute15 := p5_a56;
995 ddp_qtev_rec.date_approved := rosetta_g_miss_date_in_map(p5_a57);
996 ddp_qtev_rec.approved_by := rosetta_g_miss_num_map(p5_a58);
997 ddp_qtev_rec.org_id := rosetta_g_miss_num_map(p5_a59);
998 ddp_qtev_rec.request_id := rosetta_g_miss_num_map(p5_a60);
999 ddp_qtev_rec.program_application_id := rosetta_g_miss_num_map(p5_a61);
1000 ddp_qtev_rec.program_id := rosetta_g_miss_num_map(p5_a62);
1001 ddp_qtev_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a63);
1002 ddp_qtev_rec.created_by := rosetta_g_miss_num_map(p5_a64);
1003 ddp_qtev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a65);
1004 ddp_qtev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a66);
1005 ddp_qtev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a67);
1006 ddp_qtev_rec.last_update_login := rosetta_g_miss_num_map(p5_a68);
1007 ddp_qtev_rec.purchase_amount := rosetta_g_miss_num_map(p5_a69);
1008 ddp_qtev_rec.purchase_formula := p5_a70;
1009 ddp_qtev_rec.asset_value := rosetta_g_miss_num_map(p5_a71);
1010 ddp_qtev_rec.residual_value := rosetta_g_miss_num_map(p5_a72);
1011 ddp_qtev_rec.unbilled_receivables := rosetta_g_miss_num_map(p5_a73);
1012 ddp_qtev_rec.gain_loss := rosetta_g_miss_num_map(p5_a74);
1013 ddp_qtev_rec.currency_code := p5_a75;
1014 ddp_qtev_rec.currency_conversion_code := p5_a76;
1015 ddp_qtev_rec.currency_conversion_type := p5_a77;
1016 ddp_qtev_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a78);
1017 ddp_qtev_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a79);
1018
1019 okl_tql_pvt_w.rosetta_table_copy_in_p8(ddp_tqlv_tbl, p6_a0
1020 , p6_a1
1021 , p6_a2
1022 , p6_a3
1023 , p6_a4
1024 , p6_a5
1025 , p6_a6
1026 , p6_a7
1027 , p6_a8
1028 , p6_a9
1029 , p6_a10
1030 , p6_a11
1031 , p6_a12
1032 , p6_a13
1033 , p6_a14
1034 , p6_a15
1035 , p6_a16
1036 , p6_a17
1037 , p6_a18
1038 , p6_a19
1039 , p6_a20
1040 , p6_a21
1041 , p6_a22
1042 , p6_a23
1043 , p6_a24
1044 , p6_a25
1045 , p6_a26
1046 , p6_a27
1047 , p6_a28
1048 , p6_a29
1049 , p6_a30
1050 , p6_a31
1051 , p6_a32
1052 , p6_a33
1053 , p6_a34
1054 , p6_a35
1055 , p6_a36
1056 , p6_a37
1057 , p6_a38
1058 , p6_a39
1059 , p6_a40
1060 , p6_a41
1061 , p6_a42
1062 , p6_a43
1063 , p6_a44
1064 , p6_a45
1065 , p6_a46
1066 , p6_a47
1067 , p6_a48
1068 , p6_a49
1069 , p6_a50
1070 , p6_a51
1071 , p6_a52
1072 , p6_a53
1073 , p6_a54
1074 , p6_a55
1075 , p6_a56
1076 , p6_a57
1077 , p6_a58
1078 , p6_a59
1079 , p6_a60
1080 );
1081
1082
1083
1084 -- here's the delegated call to the old PL/SQL routine
1085 okl_am_repurchase_asset_pub.update_repurchase_quote(p_api_version,
1086 p_init_msg_list,
1087 x_return_status,
1088 x_msg_count,
1089 x_msg_data,
1090 ddp_qtev_rec,
1091 ddp_tqlv_tbl,
1092 ddx_qtev_rec,
1093 ddx_tqlv_tbl);
1094
1095 -- copy data back from the local variables to OUT or IN-OUT args, if any
1096
1097
1098
1099
1100
1101
1102
1103 p7_a0 := rosetta_g_miss_num_map(ddx_qtev_rec.id);
1104 p7_a1 := rosetta_g_miss_num_map(ddx_qtev_rec.object_version_number);
1105 p7_a2 := ddx_qtev_rec.sfwt_flag;
1106 p7_a3 := ddx_qtev_rec.qrs_code;
1107 p7_a4 := ddx_qtev_rec.qst_code;
1108 p7_a5 := ddx_qtev_rec.qtp_code;
1109 p7_a6 := ddx_qtev_rec.trn_code;
1110 p7_a7 := ddx_qtev_rec.pop_code_end;
1111 p7_a8 := ddx_qtev_rec.pop_code_early;
1112 p7_a9 := rosetta_g_miss_num_map(ddx_qtev_rec.consolidated_qte_id);
1113 p7_a10 := rosetta_g_miss_num_map(ddx_qtev_rec.khr_id);
1114 p7_a11 := rosetta_g_miss_num_map(ddx_qtev_rec.art_id);
1115 p7_a12 := rosetta_g_miss_num_map(ddx_qtev_rec.pdt_id);
1116 p7_a13 := ddx_qtev_rec.early_termination_yn;
1117 p7_a14 := ddx_qtev_rec.partial_yn;
1118 p7_a15 := ddx_qtev_rec.preproceeds_yn;
1119 p7_a16 := ddx_qtev_rec.date_requested;
1120 p7_a17 := ddx_qtev_rec.date_proposal;
1121 p7_a18 := ddx_qtev_rec.date_effective_to;
1122 p7_a19 := ddx_qtev_rec.date_accepted;
1123 p7_a20 := ddx_qtev_rec.summary_format_yn;
1124 p7_a21 := ddx_qtev_rec.consolidated_yn;
1125 p7_a22 := rosetta_g_miss_num_map(ddx_qtev_rec.principal_paydown_amount);
1126 p7_a23 := rosetta_g_miss_num_map(ddx_qtev_rec.residual_amount);
1127 p7_a24 := rosetta_g_miss_num_map(ddx_qtev_rec.yield);
1128 p7_a25 := rosetta_g_miss_num_map(ddx_qtev_rec.rent_amount);
1129 p7_a26 := ddx_qtev_rec.date_restructure_end;
1130 p7_a27 := ddx_qtev_rec.date_restructure_start;
1131 p7_a28 := rosetta_g_miss_num_map(ddx_qtev_rec.term);
1132 p7_a29 := rosetta_g_miss_num_map(ddx_qtev_rec.purchase_percent);
1133 p7_a30 := ddx_qtev_rec.comments;
1134 p7_a31 := ddx_qtev_rec.date_due;
1135 p7_a32 := ddx_qtev_rec.payment_frequency;
1136 p7_a33 := rosetta_g_miss_num_map(ddx_qtev_rec.remaining_payments);
1137 p7_a34 := ddx_qtev_rec.date_effective_from;
1138 p7_a35 := rosetta_g_miss_num_map(ddx_qtev_rec.quote_number);
1139 p7_a36 := rosetta_g_miss_num_map(ddx_qtev_rec.requested_by);
1140 p7_a37 := ddx_qtev_rec.approved_yn;
1141 p7_a38 := ddx_qtev_rec.accepted_yn;
1142 p7_a39 := ddx_qtev_rec.payment_received_yn;
1143 p7_a40 := ddx_qtev_rec.date_payment_received;
1144 p7_a41 := ddx_qtev_rec.attribute_category;
1145 p7_a42 := ddx_qtev_rec.attribute1;
1146 p7_a43 := ddx_qtev_rec.attribute2;
1147 p7_a44 := ddx_qtev_rec.attribute3;
1148 p7_a45 := ddx_qtev_rec.attribute4;
1149 p7_a46 := ddx_qtev_rec.attribute5;
1150 p7_a47 := ddx_qtev_rec.attribute6;
1151 p7_a48 := ddx_qtev_rec.attribute7;
1152 p7_a49 := ddx_qtev_rec.attribute8;
1153 p7_a50 := ddx_qtev_rec.attribute9;
1154 p7_a51 := ddx_qtev_rec.attribute10;
1155 p7_a52 := ddx_qtev_rec.attribute11;
1156 p7_a53 := ddx_qtev_rec.attribute12;
1157 p7_a54 := ddx_qtev_rec.attribute13;
1158 p7_a55 := ddx_qtev_rec.attribute14;
1159 p7_a56 := ddx_qtev_rec.attribute15;
1160 p7_a57 := ddx_qtev_rec.date_approved;
1161 p7_a58 := rosetta_g_miss_num_map(ddx_qtev_rec.approved_by);
1162 p7_a59 := rosetta_g_miss_num_map(ddx_qtev_rec.org_id);
1163 p7_a60 := rosetta_g_miss_num_map(ddx_qtev_rec.request_id);
1164 p7_a61 := rosetta_g_miss_num_map(ddx_qtev_rec.program_application_id);
1165 p7_a62 := rosetta_g_miss_num_map(ddx_qtev_rec.program_id);
1166 p7_a63 := ddx_qtev_rec.program_update_date;
1167 p7_a64 := rosetta_g_miss_num_map(ddx_qtev_rec.created_by);
1168 p7_a65 := ddx_qtev_rec.creation_date;
1169 p7_a66 := rosetta_g_miss_num_map(ddx_qtev_rec.last_updated_by);
1170 p7_a67 := ddx_qtev_rec.last_update_date;
1171 p7_a68 := rosetta_g_miss_num_map(ddx_qtev_rec.last_update_login);
1172 p7_a69 := rosetta_g_miss_num_map(ddx_qtev_rec.purchase_amount);
1173 p7_a70 := ddx_qtev_rec.purchase_formula;
1174 p7_a71 := rosetta_g_miss_num_map(ddx_qtev_rec.asset_value);
1175 p7_a72 := rosetta_g_miss_num_map(ddx_qtev_rec.residual_value);
1176 p7_a73 := rosetta_g_miss_num_map(ddx_qtev_rec.unbilled_receivables);
1177 p7_a74 := rosetta_g_miss_num_map(ddx_qtev_rec.gain_loss);
1178 p7_a75 := ddx_qtev_rec.currency_code;
1179 p7_a76 := ddx_qtev_rec.currency_conversion_code;
1180 p7_a77 := ddx_qtev_rec.currency_conversion_type;
1181 p7_a78 := rosetta_g_miss_num_map(ddx_qtev_rec.currency_conversion_rate);
1182 p7_a79 := ddx_qtev_rec.currency_conversion_date;
1183
1184 okl_tql_pvt_w.rosetta_table_copy_out_p8(ddx_tqlv_tbl, p8_a0
1185 , p8_a1
1186 , p8_a2
1187 , p8_a3
1188 , p8_a4
1189 , p8_a5
1190 , p8_a6
1191 , p8_a7
1192 , p8_a8
1193 , p8_a9
1194 , p8_a10
1195 , p8_a11
1196 , p8_a12
1197 , p8_a13
1198 , p8_a14
1199 , p8_a15
1200 , p8_a16
1201 , p8_a17
1202 , p8_a18
1203 , p8_a19
1204 , p8_a20
1205 , p8_a21
1206 , p8_a22
1207 , p8_a23
1208 , p8_a24
1209 , p8_a25
1210 , p8_a26
1211 , p8_a27
1212 , p8_a28
1213 , p8_a29
1214 , p8_a30
1215 , p8_a31
1216 , p8_a32
1217 , p8_a33
1218 , p8_a34
1219 , p8_a35
1220 , p8_a36
1221 , p8_a37
1222 , p8_a38
1223 , p8_a39
1224 , p8_a40
1225 , p8_a41
1226 , p8_a42
1227 , p8_a43
1228 , p8_a44
1229 , p8_a45
1230 , p8_a46
1231 , p8_a47
1232 , p8_a48
1233 , p8_a49
1234 , p8_a50
1235 , p8_a51
1236 , p8_a52
1237 , p8_a53
1238 , p8_a54
1239 , p8_a55
1240 , p8_a56
1241 , p8_a57
1242 , p8_a58
1243 , p8_a59
1244 , p8_a60
1245 );
1246 end;
1247
1248 end okl_am_repurchase_asset_pub_w;