[Home] [Help]
PACKAGE BODY: APPS.OKL_AM_RESTRUCTURE_QUOTE_PUB_W
Source
1 package body okl_am_restructure_quote_pub_w as
2 /* $Header: OKLURTQB.pls 120.2 2007/11/05 18:58:00 rmunjulu ship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5
6 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7 function rosetta_g_miss_date_in_map(d date) return date as
8 begin
9 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10 return d;
11 end;
12
13 function rosetta_g_miss_num_map(n number) return number as
14 a number := fnd_api.g_miss_num;
15 b number := 0-1962.0724;
16 begin
17 if n=a then return b; end if;
18 if n=b then return a; end if;
19 return n;
20 end;
21
22 procedure create_restructure_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 out nocopy NUMBER
28 , p6_a1 out nocopy NUMBER
29 , p6_a2 out nocopy VARCHAR2
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 , p6_a9 out nocopy NUMBER
37 , p6_a10 out nocopy NUMBER
38 , p6_a11 out nocopy NUMBER
39 , p6_a12 out nocopy NUMBER
40 , p6_a13 out nocopy VARCHAR2
41 , p6_a14 out nocopy VARCHAR2
42 , p6_a15 out nocopy VARCHAR2
43 , p6_a16 out nocopy DATE
44 , p6_a17 out nocopy DATE
45 , p6_a18 out nocopy DATE
46 , p6_a19 out nocopy DATE
47 , p6_a20 out nocopy VARCHAR2
48 , p6_a21 out nocopy VARCHAR2
49 , p6_a22 out nocopy NUMBER
50 , p6_a23 out nocopy NUMBER
51 , p6_a24 out nocopy NUMBER
52 , p6_a25 out nocopy NUMBER
53 , p6_a26 out nocopy DATE
54 , p6_a27 out nocopy DATE
55 , p6_a28 out nocopy NUMBER
56 , p6_a29 out nocopy NUMBER
57 , p6_a30 out nocopy VARCHAR2
58 , p6_a31 out nocopy DATE
59 , p6_a32 out nocopy VARCHAR2
60 , p6_a33 out nocopy NUMBER
61 , p6_a34 out nocopy DATE
62 , p6_a35 out nocopy NUMBER
63 , p6_a36 out nocopy NUMBER
64 , p6_a37 out nocopy VARCHAR2
65 , p6_a38 out nocopy VARCHAR2
66 , p6_a39 out nocopy VARCHAR2
67 , p6_a40 out nocopy DATE
68 , p6_a41 out nocopy VARCHAR2
69 , p6_a42 out nocopy VARCHAR2
70 , p6_a43 out nocopy VARCHAR2
71 , p6_a44 out nocopy VARCHAR2
72 , p6_a45 out nocopy VARCHAR2
73 , p6_a46 out nocopy VARCHAR2
74 , p6_a47 out nocopy VARCHAR2
75 , p6_a48 out nocopy VARCHAR2
76 , p6_a49 out nocopy VARCHAR2
77 , p6_a50 out nocopy VARCHAR2
78 , p6_a51 out nocopy VARCHAR2
79 , p6_a52 out nocopy VARCHAR2
80 , p6_a53 out nocopy VARCHAR2
81 , p6_a54 out nocopy VARCHAR2
82 , p6_a55 out nocopy VARCHAR2
83 , p6_a56 out nocopy VARCHAR2
84 , p6_a57 out nocopy DATE
85 , p6_a58 out nocopy NUMBER
86 , p6_a59 out nocopy NUMBER
87 , p6_a60 out nocopy NUMBER
88 , p6_a61 out nocopy NUMBER
89 , p6_a62 out nocopy NUMBER
90 , p6_a63 out nocopy DATE
91 , p6_a64 out nocopy NUMBER
92 , p6_a65 out nocopy DATE
93 , p6_a66 out nocopy NUMBER
94 , p6_a67 out nocopy DATE
95 , p6_a68 out nocopy NUMBER
96 , p6_a69 out nocopy NUMBER
97 , p6_a70 out nocopy VARCHAR2
98 , p6_a71 out nocopy NUMBER
99 , p6_a72 out nocopy NUMBER
100 , p6_a73 out nocopy NUMBER
101 , p6_a74 out nocopy NUMBER
102 , p6_a75 out nocopy NUMBER
103 , p6_a76 out nocopy VARCHAR2
104 , p6_a77 out nocopy VARCHAR2
105 , p6_a78 out nocopy VARCHAR2
106 , p6_a79 out nocopy NUMBER
107 , p6_a80 out nocopy DATE
108 , p6_a81 out nocopy NUMBER
109 , p6_a82 out nocopy VARCHAR2
110 , p5_a0 NUMBER := 0-1962.0724
111 , p5_a1 NUMBER := 0-1962.0724
112 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
113 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
114 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
115 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
116 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
117 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
118 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
119 , p5_a9 NUMBER := 0-1962.0724
120 , p5_a10 NUMBER := 0-1962.0724
121 , p5_a11 NUMBER := 0-1962.0724
122 , p5_a12 NUMBER := 0-1962.0724
123 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
124 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
125 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
126 , p5_a16 DATE := fnd_api.g_miss_date
127 , p5_a17 DATE := fnd_api.g_miss_date
128 , p5_a18 DATE := fnd_api.g_miss_date
129 , p5_a19 DATE := fnd_api.g_miss_date
130 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
131 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
132 , p5_a22 NUMBER := 0-1962.0724
133 , p5_a23 NUMBER := 0-1962.0724
134 , p5_a24 NUMBER := 0-1962.0724
135 , p5_a25 NUMBER := 0-1962.0724
136 , p5_a26 DATE := fnd_api.g_miss_date
137 , p5_a27 DATE := fnd_api.g_miss_date
138 , p5_a28 NUMBER := 0-1962.0724
139 , p5_a29 NUMBER := 0-1962.0724
140 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
141 , p5_a31 DATE := fnd_api.g_miss_date
142 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
143 , p5_a33 NUMBER := 0-1962.0724
144 , p5_a34 DATE := fnd_api.g_miss_date
145 , p5_a35 NUMBER := 0-1962.0724
146 , p5_a36 NUMBER := 0-1962.0724
147 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
148 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
149 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
150 , p5_a40 DATE := fnd_api.g_miss_date
151 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
152 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
153 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
154 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
155 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
156 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
157 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
158 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
159 , p5_a49 VARCHAR2 := fnd_api.g_miss_char
160 , p5_a50 VARCHAR2 := fnd_api.g_miss_char
161 , p5_a51 VARCHAR2 := fnd_api.g_miss_char
162 , p5_a52 VARCHAR2 := fnd_api.g_miss_char
163 , p5_a53 VARCHAR2 := fnd_api.g_miss_char
164 , p5_a54 VARCHAR2 := fnd_api.g_miss_char
165 , p5_a55 VARCHAR2 := fnd_api.g_miss_char
166 , p5_a56 VARCHAR2 := fnd_api.g_miss_char
167 , p5_a57 DATE := fnd_api.g_miss_date
168 , p5_a58 NUMBER := 0-1962.0724
169 , p5_a59 NUMBER := 0-1962.0724
170 , p5_a60 NUMBER := 0-1962.0724
171 , p5_a61 NUMBER := 0-1962.0724
172 , p5_a62 NUMBER := 0-1962.0724
173 , p5_a63 DATE := fnd_api.g_miss_date
174 , p5_a64 NUMBER := 0-1962.0724
175 , p5_a65 DATE := fnd_api.g_miss_date
176 , p5_a66 NUMBER := 0-1962.0724
177 , p5_a67 DATE := fnd_api.g_miss_date
178 , p5_a68 NUMBER := 0-1962.0724
179 , p5_a69 NUMBER := 0-1962.0724
180 , p5_a70 VARCHAR2 := fnd_api.g_miss_char
181 , p5_a71 NUMBER := 0-1962.0724
182 , p5_a72 NUMBER := 0-1962.0724
183 , p5_a73 NUMBER := 0-1962.0724
184 , p5_a74 NUMBER := 0-1962.0724
185 , p5_a75 NUMBER := 0-1962.0724
186 , p5_a76 VARCHAR2 := fnd_api.g_miss_char
187 , p5_a77 VARCHAR2 := fnd_api.g_miss_char
188 , p5_a78 VARCHAR2 := fnd_api.g_miss_char
189 , p5_a79 NUMBER := 0-1962.0724
190 , p5_a80 DATE := fnd_api.g_miss_date
191 , p5_a81 NUMBER := 0-1962.0724
192 , p5_a82 VARCHAR2 := fnd_api.g_miss_char
193 )
194
195 as
196 ddp_quot_rec okl_am_restructure_quote_pub.quot_rec_type;
197 ddx_quot_rec okl_am_restructure_quote_pub.quot_rec_type;
198 ddindx binary_integer; indx binary_integer;
199 begin
200
201 -- copy data to the local IN or IN-OUT args, if any
202
203
204
205
206
207 ddp_quot_rec.id := rosetta_g_miss_num_map(p5_a0);
208 ddp_quot_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
209 ddp_quot_rec.sfwt_flag := p5_a2;
210 ddp_quot_rec.qrs_code := p5_a3;
211 ddp_quot_rec.qst_code := p5_a4;
212 ddp_quot_rec.qtp_code := p5_a5;
213 ddp_quot_rec.trn_code := p5_a6;
214 ddp_quot_rec.pop_code_end := p5_a7;
215 ddp_quot_rec.pop_code_early := p5_a8;
216 ddp_quot_rec.consolidated_qte_id := rosetta_g_miss_num_map(p5_a9);
217 ddp_quot_rec.khr_id := rosetta_g_miss_num_map(p5_a10);
218 ddp_quot_rec.art_id := rosetta_g_miss_num_map(p5_a11);
219 ddp_quot_rec.pdt_id := rosetta_g_miss_num_map(p5_a12);
220 ddp_quot_rec.early_termination_yn := p5_a13;
221 ddp_quot_rec.partial_yn := p5_a14;
222 ddp_quot_rec.preproceeds_yn := p5_a15;
223 ddp_quot_rec.date_requested := rosetta_g_miss_date_in_map(p5_a16);
224 ddp_quot_rec.date_proposal := rosetta_g_miss_date_in_map(p5_a17);
225 ddp_quot_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a18);
226 ddp_quot_rec.date_accepted := rosetta_g_miss_date_in_map(p5_a19);
227 ddp_quot_rec.summary_format_yn := p5_a20;
228 ddp_quot_rec.consolidated_yn := p5_a21;
229 ddp_quot_rec.principal_paydown_amount := rosetta_g_miss_num_map(p5_a22);
230 ddp_quot_rec.residual_amount := rosetta_g_miss_num_map(p5_a23);
231 ddp_quot_rec.yield := rosetta_g_miss_num_map(p5_a24);
232 ddp_quot_rec.rent_amount := rosetta_g_miss_num_map(p5_a25);
233 ddp_quot_rec.date_restructure_end := rosetta_g_miss_date_in_map(p5_a26);
234 ddp_quot_rec.date_restructure_start := rosetta_g_miss_date_in_map(p5_a27);
235 ddp_quot_rec.term := rosetta_g_miss_num_map(p5_a28);
236 ddp_quot_rec.purchase_percent := rosetta_g_miss_num_map(p5_a29);
237 ddp_quot_rec.comments := p5_a30;
238 ddp_quot_rec.date_due := rosetta_g_miss_date_in_map(p5_a31);
239 ddp_quot_rec.payment_frequency := p5_a32;
240 ddp_quot_rec.remaining_payments := rosetta_g_miss_num_map(p5_a33);
241 ddp_quot_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a34);
242 ddp_quot_rec.quote_number := rosetta_g_miss_num_map(p5_a35);
243 ddp_quot_rec.requested_by := rosetta_g_miss_num_map(p5_a36);
244 ddp_quot_rec.approved_yn := p5_a37;
245 ddp_quot_rec.accepted_yn := p5_a38;
246 ddp_quot_rec.payment_received_yn := p5_a39;
247 ddp_quot_rec.date_payment_received := rosetta_g_miss_date_in_map(p5_a40);
248 ddp_quot_rec.attribute_category := p5_a41;
249 ddp_quot_rec.attribute1 := p5_a42;
250 ddp_quot_rec.attribute2 := p5_a43;
251 ddp_quot_rec.attribute3 := p5_a44;
252 ddp_quot_rec.attribute4 := p5_a45;
253 ddp_quot_rec.attribute5 := p5_a46;
254 ddp_quot_rec.attribute6 := p5_a47;
255 ddp_quot_rec.attribute7 := p5_a48;
256 ddp_quot_rec.attribute8 := p5_a49;
257 ddp_quot_rec.attribute9 := p5_a50;
258 ddp_quot_rec.attribute10 := p5_a51;
259 ddp_quot_rec.attribute11 := p5_a52;
260 ddp_quot_rec.attribute12 := p5_a53;
261 ddp_quot_rec.attribute13 := p5_a54;
262 ddp_quot_rec.attribute14 := p5_a55;
263 ddp_quot_rec.attribute15 := p5_a56;
264 ddp_quot_rec.date_approved := rosetta_g_miss_date_in_map(p5_a57);
265 ddp_quot_rec.approved_by := rosetta_g_miss_num_map(p5_a58);
266 ddp_quot_rec.org_id := rosetta_g_miss_num_map(p5_a59);
267 ddp_quot_rec.request_id := rosetta_g_miss_num_map(p5_a60);
268 ddp_quot_rec.program_application_id := rosetta_g_miss_num_map(p5_a61);
269 ddp_quot_rec.program_id := rosetta_g_miss_num_map(p5_a62);
270 ddp_quot_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a63);
271 ddp_quot_rec.created_by := rosetta_g_miss_num_map(p5_a64);
272 ddp_quot_rec.creation_date := rosetta_g_miss_date_in_map(p5_a65);
273 ddp_quot_rec.last_updated_by := rosetta_g_miss_num_map(p5_a66);
274 ddp_quot_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a67);
275 ddp_quot_rec.last_update_login := rosetta_g_miss_num_map(p5_a68);
276 ddp_quot_rec.purchase_amount := rosetta_g_miss_num_map(p5_a69);
277 ddp_quot_rec.purchase_formula := p5_a70;
278 ddp_quot_rec.asset_value := rosetta_g_miss_num_map(p5_a71);
279 ddp_quot_rec.residual_value := rosetta_g_miss_num_map(p5_a72);
280 ddp_quot_rec.unbilled_receivables := rosetta_g_miss_num_map(p5_a73);
281 ddp_quot_rec.gain_loss := rosetta_g_miss_num_map(p5_a74);
282 ddp_quot_rec.perdiem_amount := rosetta_g_miss_num_map(p5_a75);
283 ddp_quot_rec.currency_code := p5_a76;
284 ddp_quot_rec.currency_conversion_code := p5_a77;
285 ddp_quot_rec.currency_conversion_type := p5_a78;
286 ddp_quot_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a79);
287 ddp_quot_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a80);
288 ddp_quot_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a81);
289 ddp_quot_rec.repo_quote_indicator_yn := p5_a82;
290
291
292 -- here's the delegated call to the old PL/SQL routine
293 okl_am_restructure_quote_pub.create_restructure_quote(p_api_version,
294 p_init_msg_list,
295 x_return_status,
296 x_msg_count,
297 x_msg_data,
298 ddp_quot_rec,
299 ddx_quot_rec);
300
301 -- copy data back from the local variables to OUT or IN-OUT args, if any
302
303
304
305
306
307
308 p6_a0 := rosetta_g_miss_num_map(ddx_quot_rec.id);
309 p6_a1 := rosetta_g_miss_num_map(ddx_quot_rec.object_version_number);
310 p6_a2 := ddx_quot_rec.sfwt_flag;
311 p6_a3 := ddx_quot_rec.qrs_code;
312 p6_a4 := ddx_quot_rec.qst_code;
313 p6_a5 := ddx_quot_rec.qtp_code;
314 p6_a6 := ddx_quot_rec.trn_code;
315 p6_a7 := ddx_quot_rec.pop_code_end;
316 p6_a8 := ddx_quot_rec.pop_code_early;
317 p6_a9 := rosetta_g_miss_num_map(ddx_quot_rec.consolidated_qte_id);
318 p6_a10 := rosetta_g_miss_num_map(ddx_quot_rec.khr_id);
319 p6_a11 := rosetta_g_miss_num_map(ddx_quot_rec.art_id);
320 p6_a12 := rosetta_g_miss_num_map(ddx_quot_rec.pdt_id);
321 p6_a13 := ddx_quot_rec.early_termination_yn;
322 p6_a14 := ddx_quot_rec.partial_yn;
323 p6_a15 := ddx_quot_rec.preproceeds_yn;
324 p6_a16 := ddx_quot_rec.date_requested;
325 p6_a17 := ddx_quot_rec.date_proposal;
326 p6_a18 := ddx_quot_rec.date_effective_to;
327 p6_a19 := ddx_quot_rec.date_accepted;
328 p6_a20 := ddx_quot_rec.summary_format_yn;
329 p6_a21 := ddx_quot_rec.consolidated_yn;
330 p6_a22 := rosetta_g_miss_num_map(ddx_quot_rec.principal_paydown_amount);
331 p6_a23 := rosetta_g_miss_num_map(ddx_quot_rec.residual_amount);
332 p6_a24 := rosetta_g_miss_num_map(ddx_quot_rec.yield);
333 p6_a25 := rosetta_g_miss_num_map(ddx_quot_rec.rent_amount);
334 p6_a26 := ddx_quot_rec.date_restructure_end;
335 p6_a27 := ddx_quot_rec.date_restructure_start;
336 p6_a28 := rosetta_g_miss_num_map(ddx_quot_rec.term);
337 p6_a29 := rosetta_g_miss_num_map(ddx_quot_rec.purchase_percent);
338 p6_a30 := ddx_quot_rec.comments;
339 p6_a31 := ddx_quot_rec.date_due;
340 p6_a32 := ddx_quot_rec.payment_frequency;
341 p6_a33 := rosetta_g_miss_num_map(ddx_quot_rec.remaining_payments);
342 p6_a34 := ddx_quot_rec.date_effective_from;
343 p6_a35 := rosetta_g_miss_num_map(ddx_quot_rec.quote_number);
344 p6_a36 := rosetta_g_miss_num_map(ddx_quot_rec.requested_by);
345 p6_a37 := ddx_quot_rec.approved_yn;
346 p6_a38 := ddx_quot_rec.accepted_yn;
347 p6_a39 := ddx_quot_rec.payment_received_yn;
348 p6_a40 := ddx_quot_rec.date_payment_received;
349 p6_a41 := ddx_quot_rec.attribute_category;
350 p6_a42 := ddx_quot_rec.attribute1;
351 p6_a43 := ddx_quot_rec.attribute2;
352 p6_a44 := ddx_quot_rec.attribute3;
353 p6_a45 := ddx_quot_rec.attribute4;
354 p6_a46 := ddx_quot_rec.attribute5;
355 p6_a47 := ddx_quot_rec.attribute6;
356 p6_a48 := ddx_quot_rec.attribute7;
357 p6_a49 := ddx_quot_rec.attribute8;
358 p6_a50 := ddx_quot_rec.attribute9;
359 p6_a51 := ddx_quot_rec.attribute10;
360 p6_a52 := ddx_quot_rec.attribute11;
361 p6_a53 := ddx_quot_rec.attribute12;
362 p6_a54 := ddx_quot_rec.attribute13;
363 p6_a55 := ddx_quot_rec.attribute14;
364 p6_a56 := ddx_quot_rec.attribute15;
365 p6_a57 := ddx_quot_rec.date_approved;
366 p6_a58 := rosetta_g_miss_num_map(ddx_quot_rec.approved_by);
367 p6_a59 := rosetta_g_miss_num_map(ddx_quot_rec.org_id);
368 p6_a60 := rosetta_g_miss_num_map(ddx_quot_rec.request_id);
369 p6_a61 := rosetta_g_miss_num_map(ddx_quot_rec.program_application_id);
370 p6_a62 := rosetta_g_miss_num_map(ddx_quot_rec.program_id);
371 p6_a63 := ddx_quot_rec.program_update_date;
372 p6_a64 := rosetta_g_miss_num_map(ddx_quot_rec.created_by);
373 p6_a65 := ddx_quot_rec.creation_date;
374 p6_a66 := rosetta_g_miss_num_map(ddx_quot_rec.last_updated_by);
375 p6_a67 := ddx_quot_rec.last_update_date;
376 p6_a68 := rosetta_g_miss_num_map(ddx_quot_rec.last_update_login);
377 p6_a69 := rosetta_g_miss_num_map(ddx_quot_rec.purchase_amount);
378 p6_a70 := ddx_quot_rec.purchase_formula;
379 p6_a71 := rosetta_g_miss_num_map(ddx_quot_rec.asset_value);
380 p6_a72 := rosetta_g_miss_num_map(ddx_quot_rec.residual_value);
381 p6_a73 := rosetta_g_miss_num_map(ddx_quot_rec.unbilled_receivables);
382 p6_a74 := rosetta_g_miss_num_map(ddx_quot_rec.gain_loss);
383 p6_a75 := rosetta_g_miss_num_map(ddx_quot_rec.perdiem_amount);
384 p6_a76 := ddx_quot_rec.currency_code;
385 p6_a77 := ddx_quot_rec.currency_conversion_code;
386 p6_a78 := ddx_quot_rec.currency_conversion_type;
387 p6_a79 := rosetta_g_miss_num_map(ddx_quot_rec.currency_conversion_rate);
388 p6_a80 := ddx_quot_rec.currency_conversion_date;
389 p6_a81 := rosetta_g_miss_num_map(ddx_quot_rec.legal_entity_id);
390 p6_a82 := ddx_quot_rec.repo_quote_indicator_yn;
391 end;
392
393 procedure create_restructure_quote(p_api_version NUMBER
394 , p_init_msg_list VARCHAR2
395 , x_return_status out nocopy VARCHAR2
396 , x_msg_count out nocopy NUMBER
397 , x_msg_data out nocopy VARCHAR2
398 , p5_a0 JTF_NUMBER_TABLE
399 , p5_a1 JTF_NUMBER_TABLE
400 , p5_a2 JTF_VARCHAR2_TABLE_100
401 , p5_a3 JTF_VARCHAR2_TABLE_100
402 , p5_a4 JTF_VARCHAR2_TABLE_100
403 , p5_a5 JTF_VARCHAR2_TABLE_100
404 , p5_a6 JTF_VARCHAR2_TABLE_100
405 , p5_a7 JTF_VARCHAR2_TABLE_100
406 , p5_a8 JTF_VARCHAR2_TABLE_100
407 , p5_a9 JTF_NUMBER_TABLE
408 , p5_a10 JTF_NUMBER_TABLE
409 , p5_a11 JTF_NUMBER_TABLE
410 , p5_a12 JTF_NUMBER_TABLE
411 , p5_a13 JTF_VARCHAR2_TABLE_100
412 , p5_a14 JTF_VARCHAR2_TABLE_100
413 , p5_a15 JTF_VARCHAR2_TABLE_100
414 , p5_a16 JTF_DATE_TABLE
415 , p5_a17 JTF_DATE_TABLE
416 , p5_a18 JTF_DATE_TABLE
417 , p5_a19 JTF_DATE_TABLE
418 , p5_a20 JTF_VARCHAR2_TABLE_100
419 , p5_a21 JTF_VARCHAR2_TABLE_100
420 , p5_a22 JTF_NUMBER_TABLE
421 , p5_a23 JTF_NUMBER_TABLE
422 , p5_a24 JTF_NUMBER_TABLE
423 , p5_a25 JTF_NUMBER_TABLE
424 , p5_a26 JTF_DATE_TABLE
425 , p5_a27 JTF_DATE_TABLE
426 , p5_a28 JTF_NUMBER_TABLE
427 , p5_a29 JTF_NUMBER_TABLE
428 , p5_a30 JTF_VARCHAR2_TABLE_2000
429 , p5_a31 JTF_DATE_TABLE
430 , p5_a32 JTF_VARCHAR2_TABLE_100
431 , p5_a33 JTF_NUMBER_TABLE
432 , p5_a34 JTF_DATE_TABLE
433 , p5_a35 JTF_NUMBER_TABLE
434 , p5_a36 JTF_NUMBER_TABLE
435 , p5_a37 JTF_VARCHAR2_TABLE_100
436 , p5_a38 JTF_VARCHAR2_TABLE_100
437 , p5_a39 JTF_VARCHAR2_TABLE_100
438 , p5_a40 JTF_DATE_TABLE
439 , p5_a41 JTF_VARCHAR2_TABLE_100
440 , p5_a42 JTF_VARCHAR2_TABLE_500
441 , p5_a43 JTF_VARCHAR2_TABLE_500
442 , p5_a44 JTF_VARCHAR2_TABLE_500
443 , p5_a45 JTF_VARCHAR2_TABLE_500
444 , p5_a46 JTF_VARCHAR2_TABLE_500
445 , p5_a47 JTF_VARCHAR2_TABLE_500
446 , p5_a48 JTF_VARCHAR2_TABLE_500
447 , p5_a49 JTF_VARCHAR2_TABLE_500
448 , p5_a50 JTF_VARCHAR2_TABLE_500
449 , p5_a51 JTF_VARCHAR2_TABLE_500
450 , p5_a52 JTF_VARCHAR2_TABLE_500
451 , p5_a53 JTF_VARCHAR2_TABLE_500
452 , p5_a54 JTF_VARCHAR2_TABLE_500
453 , p5_a55 JTF_VARCHAR2_TABLE_500
454 , p5_a56 JTF_VARCHAR2_TABLE_500
455 , p5_a57 JTF_DATE_TABLE
456 , p5_a58 JTF_NUMBER_TABLE
457 , p5_a59 JTF_NUMBER_TABLE
458 , p5_a60 JTF_NUMBER_TABLE
459 , p5_a61 JTF_NUMBER_TABLE
460 , p5_a62 JTF_NUMBER_TABLE
461 , p5_a63 JTF_DATE_TABLE
462 , p5_a64 JTF_NUMBER_TABLE
463 , p5_a65 JTF_DATE_TABLE
464 , p5_a66 JTF_NUMBER_TABLE
465 , p5_a67 JTF_DATE_TABLE
466 , p5_a68 JTF_NUMBER_TABLE
467 , p5_a69 JTF_NUMBER_TABLE
468 , p5_a70 JTF_VARCHAR2_TABLE_200
469 , p5_a71 JTF_NUMBER_TABLE
470 , p5_a72 JTF_NUMBER_TABLE
471 , p5_a73 JTF_NUMBER_TABLE
472 , p5_a74 JTF_NUMBER_TABLE
473 , p5_a75 JTF_NUMBER_TABLE
474 , p5_a76 JTF_VARCHAR2_TABLE_100
475 , p5_a77 JTF_VARCHAR2_TABLE_100
476 , p5_a78 JTF_VARCHAR2_TABLE_100
477 , p5_a79 JTF_NUMBER_TABLE
478 , p5_a80 JTF_DATE_TABLE
479 , p5_a81 JTF_NUMBER_TABLE
480 , p5_a82 JTF_VARCHAR2_TABLE_100
481 , p6_a0 out nocopy JTF_NUMBER_TABLE
482 , p6_a1 out nocopy JTF_NUMBER_TABLE
483 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
484 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
485 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
486 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
487 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
488 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
489 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
490 , p6_a9 out nocopy JTF_NUMBER_TABLE
491 , p6_a10 out nocopy JTF_NUMBER_TABLE
492 , p6_a11 out nocopy JTF_NUMBER_TABLE
493 , p6_a12 out nocopy JTF_NUMBER_TABLE
494 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
495 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
496 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
497 , p6_a16 out nocopy JTF_DATE_TABLE
498 , p6_a17 out nocopy JTF_DATE_TABLE
499 , p6_a18 out nocopy JTF_DATE_TABLE
500 , p6_a19 out nocopy JTF_DATE_TABLE
501 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_100
502 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_100
503 , p6_a22 out nocopy JTF_NUMBER_TABLE
504 , p6_a23 out nocopy JTF_NUMBER_TABLE
505 , p6_a24 out nocopy JTF_NUMBER_TABLE
506 , p6_a25 out nocopy JTF_NUMBER_TABLE
507 , p6_a26 out nocopy JTF_DATE_TABLE
508 , p6_a27 out nocopy JTF_DATE_TABLE
509 , p6_a28 out nocopy JTF_NUMBER_TABLE
510 , p6_a29 out nocopy JTF_NUMBER_TABLE
511 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_2000
512 , p6_a31 out nocopy JTF_DATE_TABLE
513 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_100
514 , p6_a33 out nocopy JTF_NUMBER_TABLE
515 , p6_a34 out nocopy JTF_DATE_TABLE
516 , p6_a35 out nocopy JTF_NUMBER_TABLE
517 , p6_a36 out nocopy JTF_NUMBER_TABLE
518 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_100
519 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
520 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
521 , p6_a40 out nocopy JTF_DATE_TABLE
522 , p6_a41 out nocopy JTF_VARCHAR2_TABLE_100
523 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
524 , p6_a43 out nocopy JTF_VARCHAR2_TABLE_500
525 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_500
526 , p6_a45 out nocopy JTF_VARCHAR2_TABLE_500
527 , p6_a46 out nocopy JTF_VARCHAR2_TABLE_500
528 , p6_a47 out nocopy JTF_VARCHAR2_TABLE_500
529 , p6_a48 out nocopy JTF_VARCHAR2_TABLE_500
530 , p6_a49 out nocopy JTF_VARCHAR2_TABLE_500
531 , p6_a50 out nocopy JTF_VARCHAR2_TABLE_500
532 , p6_a51 out nocopy JTF_VARCHAR2_TABLE_500
533 , p6_a52 out nocopy JTF_VARCHAR2_TABLE_500
534 , p6_a53 out nocopy JTF_VARCHAR2_TABLE_500
535 , p6_a54 out nocopy JTF_VARCHAR2_TABLE_500
536 , p6_a55 out nocopy JTF_VARCHAR2_TABLE_500
537 , p6_a56 out nocopy JTF_VARCHAR2_TABLE_500
538 , p6_a57 out nocopy JTF_DATE_TABLE
539 , p6_a58 out nocopy JTF_NUMBER_TABLE
540 , p6_a59 out nocopy JTF_NUMBER_TABLE
541 , p6_a60 out nocopy JTF_NUMBER_TABLE
542 , p6_a61 out nocopy JTF_NUMBER_TABLE
543 , p6_a62 out nocopy JTF_NUMBER_TABLE
544 , p6_a63 out nocopy JTF_DATE_TABLE
545 , p6_a64 out nocopy JTF_NUMBER_TABLE
546 , p6_a65 out nocopy JTF_DATE_TABLE
547 , p6_a66 out nocopy JTF_NUMBER_TABLE
548 , p6_a67 out nocopy JTF_DATE_TABLE
549 , p6_a68 out nocopy JTF_NUMBER_TABLE
550 , p6_a69 out nocopy JTF_NUMBER_TABLE
551 , p6_a70 out nocopy JTF_VARCHAR2_TABLE_200
552 , p6_a71 out nocopy JTF_NUMBER_TABLE
553 , p6_a72 out nocopy JTF_NUMBER_TABLE
554 , p6_a73 out nocopy JTF_NUMBER_TABLE
555 , p6_a74 out nocopy JTF_NUMBER_TABLE
556 , p6_a75 out nocopy JTF_NUMBER_TABLE
557 , p6_a76 out nocopy JTF_VARCHAR2_TABLE_100
558 , p6_a77 out nocopy JTF_VARCHAR2_TABLE_100
559 , p6_a78 out nocopy JTF_VARCHAR2_TABLE_100
560 , p6_a79 out nocopy JTF_NUMBER_TABLE
561 , p6_a80 out nocopy JTF_DATE_TABLE
562 , p6_a81 out nocopy JTF_NUMBER_TABLE
563 , p6_a82 out nocopy JTF_VARCHAR2_TABLE_100
564 )
565
566 as
567 ddp_quot_tbl okl_am_restructure_quote_pub.quot_tbl_type;
568 ddx_quot_tbl okl_am_restructure_quote_pub.quot_tbl_type;
569 ddindx binary_integer; indx binary_integer;
570 begin
571
572 -- copy data to the local IN or IN-OUT args, if any
573
574
575
576
577
578 okl_qte_pvt_w.rosetta_table_copy_in_p8(ddp_quot_tbl, p5_a0
579 , p5_a1
580 , p5_a2
581 , p5_a3
582 , p5_a4
583 , p5_a5
584 , p5_a6
585 , p5_a7
586 , p5_a8
587 , p5_a9
588 , p5_a10
589 , p5_a11
590 , p5_a12
591 , p5_a13
592 , p5_a14
593 , p5_a15
594 , p5_a16
595 , p5_a17
596 , p5_a18
597 , p5_a19
598 , p5_a20
599 , p5_a21
600 , p5_a22
601 , p5_a23
602 , p5_a24
603 , p5_a25
604 , p5_a26
605 , p5_a27
606 , p5_a28
607 , p5_a29
608 , p5_a30
609 , p5_a31
610 , p5_a32
611 , p5_a33
612 , p5_a34
613 , p5_a35
614 , p5_a36
615 , p5_a37
616 , p5_a38
617 , p5_a39
618 , p5_a40
619 , p5_a41
620 , p5_a42
621 , p5_a43
622 , p5_a44
623 , p5_a45
624 , p5_a46
625 , p5_a47
626 , p5_a48
627 , p5_a49
628 , p5_a50
629 , p5_a51
630 , p5_a52
631 , p5_a53
632 , p5_a54
633 , p5_a55
634 , p5_a56
635 , p5_a57
636 , p5_a58
637 , p5_a59
638 , p5_a60
639 , p5_a61
640 , p5_a62
641 , p5_a63
642 , p5_a64
643 , p5_a65
644 , p5_a66
645 , p5_a67
646 , p5_a68
647 , p5_a69
648 , p5_a70
649 , p5_a71
650 , p5_a72
651 , p5_a73
652 , p5_a74
653 , p5_a75
654 , p5_a76
655 , p5_a77
656 , p5_a78
657 , p5_a79
658 , p5_a80
659 , p5_a81
660 , p5_a82
661 );
662
663
664 -- here's the delegated call to the old PL/SQL routine
665 okl_am_restructure_quote_pub.create_restructure_quote(p_api_version,
666 p_init_msg_list,
667 x_return_status,
668 x_msg_count,
669 x_msg_data,
670 ddp_quot_tbl,
671 ddx_quot_tbl);
672
673 -- copy data back from the local variables to OUT or IN-OUT args, if any
674
675
676
677
678
679
680 okl_qte_pvt_w.rosetta_table_copy_out_p8(ddx_quot_tbl, p6_a0
681 , p6_a1
682 , p6_a2
683 , p6_a3
684 , p6_a4
685 , p6_a5
686 , p6_a6
687 , p6_a7
688 , p6_a8
689 , p6_a9
690 , p6_a10
691 , p6_a11
692 , p6_a12
693 , p6_a13
694 , p6_a14
695 , p6_a15
696 , p6_a16
697 , p6_a17
698 , p6_a18
699 , p6_a19
700 , p6_a20
701 , p6_a21
702 , p6_a22
703 , p6_a23
704 , p6_a24
705 , p6_a25
706 , p6_a26
707 , p6_a27
708 , p6_a28
709 , p6_a29
710 , p6_a30
711 , p6_a31
712 , p6_a32
713 , p6_a33
714 , p6_a34
715 , p6_a35
716 , p6_a36
717 , p6_a37
718 , p6_a38
719 , p6_a39
720 , p6_a40
721 , p6_a41
722 , p6_a42
723 , p6_a43
724 , p6_a44
725 , p6_a45
726 , p6_a46
727 , p6_a47
728 , p6_a48
729 , p6_a49
730 , p6_a50
731 , p6_a51
732 , p6_a52
733 , p6_a53
734 , p6_a54
735 , p6_a55
736 , p6_a56
737 , p6_a57
738 , p6_a58
739 , p6_a59
740 , p6_a60
741 , p6_a61
742 , p6_a62
743 , p6_a63
744 , p6_a64
745 , p6_a65
746 , p6_a66
747 , p6_a67
748 , p6_a68
749 , p6_a69
750 , p6_a70
751 , p6_a71
752 , p6_a72
753 , p6_a73
754 , p6_a74
755 , p6_a75
756 , p6_a76
757 , p6_a77
758 , p6_a78
759 , p6_a79
760 , p6_a80
761 , p6_a81
762 , p6_a82
763 );
764 end;
765
766 procedure update_restructure_quote(p_api_version NUMBER
767 , p_init_msg_list VARCHAR2
768 , x_return_status out nocopy VARCHAR2
769 , x_msg_count out nocopy NUMBER
770 , x_msg_data out nocopy VARCHAR2
771 , p6_a0 out nocopy NUMBER
772 , p6_a1 out nocopy NUMBER
773 , p6_a2 out nocopy VARCHAR2
774 , p6_a3 out nocopy VARCHAR2
775 , p6_a4 out nocopy VARCHAR2
776 , p6_a5 out nocopy VARCHAR2
777 , p6_a6 out nocopy VARCHAR2
778 , p6_a7 out nocopy VARCHAR2
779 , p6_a8 out nocopy VARCHAR2
780 , p6_a9 out nocopy NUMBER
781 , p6_a10 out nocopy NUMBER
782 , p6_a11 out nocopy NUMBER
783 , p6_a12 out nocopy NUMBER
784 , p6_a13 out nocopy VARCHAR2
785 , p6_a14 out nocopy VARCHAR2
786 , p6_a15 out nocopy VARCHAR2
787 , p6_a16 out nocopy DATE
788 , p6_a17 out nocopy DATE
789 , p6_a18 out nocopy DATE
790 , p6_a19 out nocopy DATE
791 , p6_a20 out nocopy VARCHAR2
792 , p6_a21 out nocopy VARCHAR2
793 , p6_a22 out nocopy NUMBER
794 , p6_a23 out nocopy NUMBER
795 , p6_a24 out nocopy NUMBER
796 , p6_a25 out nocopy NUMBER
797 , p6_a26 out nocopy DATE
798 , p6_a27 out nocopy DATE
799 , p6_a28 out nocopy NUMBER
800 , p6_a29 out nocopy NUMBER
801 , p6_a30 out nocopy VARCHAR2
802 , p6_a31 out nocopy DATE
803 , p6_a32 out nocopy VARCHAR2
804 , p6_a33 out nocopy NUMBER
805 , p6_a34 out nocopy DATE
806 , p6_a35 out nocopy NUMBER
807 , p6_a36 out nocopy NUMBER
808 , p6_a37 out nocopy VARCHAR2
809 , p6_a38 out nocopy VARCHAR2
810 , p6_a39 out nocopy VARCHAR2
811 , p6_a40 out nocopy DATE
812 , p6_a41 out nocopy VARCHAR2
813 , p6_a42 out nocopy VARCHAR2
814 , p6_a43 out nocopy VARCHAR2
815 , p6_a44 out nocopy VARCHAR2
816 , p6_a45 out nocopy VARCHAR2
817 , p6_a46 out nocopy VARCHAR2
818 , p6_a47 out nocopy VARCHAR2
819 , p6_a48 out nocopy VARCHAR2
820 , p6_a49 out nocopy VARCHAR2
821 , p6_a50 out nocopy VARCHAR2
822 , p6_a51 out nocopy VARCHAR2
823 , p6_a52 out nocopy VARCHAR2
824 , p6_a53 out nocopy VARCHAR2
825 , p6_a54 out nocopy VARCHAR2
826 , p6_a55 out nocopy VARCHAR2
827 , p6_a56 out nocopy VARCHAR2
828 , p6_a57 out nocopy DATE
829 , p6_a58 out nocopy NUMBER
830 , p6_a59 out nocopy NUMBER
831 , p6_a60 out nocopy NUMBER
832 , p6_a61 out nocopy NUMBER
833 , p6_a62 out nocopy NUMBER
834 , p6_a63 out nocopy DATE
835 , p6_a64 out nocopy NUMBER
836 , p6_a65 out nocopy DATE
837 , p6_a66 out nocopy NUMBER
838 , p6_a67 out nocopy DATE
839 , p6_a68 out nocopy NUMBER
840 , p6_a69 out nocopy NUMBER
841 , p6_a70 out nocopy VARCHAR2
842 , p6_a71 out nocopy NUMBER
843 , p6_a72 out nocopy NUMBER
844 , p6_a73 out nocopy NUMBER
845 , p6_a74 out nocopy NUMBER
846 , p6_a75 out nocopy NUMBER
847 , p6_a76 out nocopy VARCHAR2
848 , p6_a77 out nocopy VARCHAR2
849 , p6_a78 out nocopy VARCHAR2
850 , p6_a79 out nocopy NUMBER
851 , p6_a80 out nocopy DATE
852 , p6_a81 out nocopy NUMBER
853 , p6_a82 out nocopy VARCHAR2
854 , p5_a0 NUMBER := 0-1962.0724
855 , p5_a1 NUMBER := 0-1962.0724
856 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
857 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
858 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
859 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
860 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
861 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
862 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
863 , p5_a9 NUMBER := 0-1962.0724
864 , p5_a10 NUMBER := 0-1962.0724
865 , p5_a11 NUMBER := 0-1962.0724
866 , p5_a12 NUMBER := 0-1962.0724
867 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
868 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
869 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
870 , p5_a16 DATE := fnd_api.g_miss_date
871 , p5_a17 DATE := fnd_api.g_miss_date
872 , p5_a18 DATE := fnd_api.g_miss_date
873 , p5_a19 DATE := fnd_api.g_miss_date
874 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
875 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
876 , p5_a22 NUMBER := 0-1962.0724
877 , p5_a23 NUMBER := 0-1962.0724
878 , p5_a24 NUMBER := 0-1962.0724
879 , p5_a25 NUMBER := 0-1962.0724
880 , p5_a26 DATE := fnd_api.g_miss_date
881 , p5_a27 DATE := fnd_api.g_miss_date
882 , p5_a28 NUMBER := 0-1962.0724
883 , p5_a29 NUMBER := 0-1962.0724
884 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
885 , p5_a31 DATE := fnd_api.g_miss_date
886 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
887 , p5_a33 NUMBER := 0-1962.0724
888 , p5_a34 DATE := fnd_api.g_miss_date
889 , p5_a35 NUMBER := 0-1962.0724
890 , p5_a36 NUMBER := 0-1962.0724
891 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
892 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
893 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
894 , p5_a40 DATE := fnd_api.g_miss_date
895 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
896 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
897 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
898 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
899 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
900 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
901 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
902 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
903 , p5_a49 VARCHAR2 := fnd_api.g_miss_char
904 , p5_a50 VARCHAR2 := fnd_api.g_miss_char
905 , p5_a51 VARCHAR2 := fnd_api.g_miss_char
906 , p5_a52 VARCHAR2 := fnd_api.g_miss_char
907 , p5_a53 VARCHAR2 := fnd_api.g_miss_char
908 , p5_a54 VARCHAR2 := fnd_api.g_miss_char
909 , p5_a55 VARCHAR2 := fnd_api.g_miss_char
910 , p5_a56 VARCHAR2 := fnd_api.g_miss_char
911 , p5_a57 DATE := fnd_api.g_miss_date
912 , p5_a58 NUMBER := 0-1962.0724
913 , p5_a59 NUMBER := 0-1962.0724
914 , p5_a60 NUMBER := 0-1962.0724
915 , p5_a61 NUMBER := 0-1962.0724
916 , p5_a62 NUMBER := 0-1962.0724
917 , p5_a63 DATE := fnd_api.g_miss_date
918 , p5_a64 NUMBER := 0-1962.0724
919 , p5_a65 DATE := fnd_api.g_miss_date
920 , p5_a66 NUMBER := 0-1962.0724
921 , p5_a67 DATE := fnd_api.g_miss_date
922 , p5_a68 NUMBER := 0-1962.0724
923 , p5_a69 NUMBER := 0-1962.0724
924 , p5_a70 VARCHAR2 := fnd_api.g_miss_char
925 , p5_a71 NUMBER := 0-1962.0724
926 , p5_a72 NUMBER := 0-1962.0724
927 , p5_a73 NUMBER := 0-1962.0724
928 , p5_a74 NUMBER := 0-1962.0724
929 , p5_a75 NUMBER := 0-1962.0724
930 , p5_a76 VARCHAR2 := fnd_api.g_miss_char
931 , p5_a77 VARCHAR2 := fnd_api.g_miss_char
932 , p5_a78 VARCHAR2 := fnd_api.g_miss_char
933 , p5_a79 NUMBER := 0-1962.0724
934 , p5_a80 DATE := fnd_api.g_miss_date
935 , p5_a81 NUMBER := 0-1962.0724
936 , p5_a82 VARCHAR2 := fnd_api.g_miss_char
937 )
938
939 as
940 ddp_quot_rec okl_am_restructure_quote_pub.quot_rec_type;
941 ddx_quot_rec okl_am_restructure_quote_pub.quot_rec_type;
942 ddindx binary_integer; indx binary_integer;
943 begin
944
945 -- copy data to the local IN or IN-OUT args, if any
946
947
948
949
950
951 ddp_quot_rec.id := rosetta_g_miss_num_map(p5_a0);
952 ddp_quot_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
953 ddp_quot_rec.sfwt_flag := p5_a2;
954 ddp_quot_rec.qrs_code := p5_a3;
955 ddp_quot_rec.qst_code := p5_a4;
956 ddp_quot_rec.qtp_code := p5_a5;
957 ddp_quot_rec.trn_code := p5_a6;
958 ddp_quot_rec.pop_code_end := p5_a7;
959 ddp_quot_rec.pop_code_early := p5_a8;
960 ddp_quot_rec.consolidated_qte_id := rosetta_g_miss_num_map(p5_a9);
961 ddp_quot_rec.khr_id := rosetta_g_miss_num_map(p5_a10);
962 ddp_quot_rec.art_id := rosetta_g_miss_num_map(p5_a11);
963 ddp_quot_rec.pdt_id := rosetta_g_miss_num_map(p5_a12);
964 ddp_quot_rec.early_termination_yn := p5_a13;
965 ddp_quot_rec.partial_yn := p5_a14;
966 ddp_quot_rec.preproceeds_yn := p5_a15;
967 ddp_quot_rec.date_requested := rosetta_g_miss_date_in_map(p5_a16);
968 ddp_quot_rec.date_proposal := rosetta_g_miss_date_in_map(p5_a17);
969 ddp_quot_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a18);
970 ddp_quot_rec.date_accepted := rosetta_g_miss_date_in_map(p5_a19);
971 ddp_quot_rec.summary_format_yn := p5_a20;
972 ddp_quot_rec.consolidated_yn := p5_a21;
973 ddp_quot_rec.principal_paydown_amount := rosetta_g_miss_num_map(p5_a22);
974 ddp_quot_rec.residual_amount := rosetta_g_miss_num_map(p5_a23);
975 ddp_quot_rec.yield := rosetta_g_miss_num_map(p5_a24);
976 ddp_quot_rec.rent_amount := rosetta_g_miss_num_map(p5_a25);
977 ddp_quot_rec.date_restructure_end := rosetta_g_miss_date_in_map(p5_a26);
978 ddp_quot_rec.date_restructure_start := rosetta_g_miss_date_in_map(p5_a27);
979 ddp_quot_rec.term := rosetta_g_miss_num_map(p5_a28);
980 ddp_quot_rec.purchase_percent := rosetta_g_miss_num_map(p5_a29);
981 ddp_quot_rec.comments := p5_a30;
982 ddp_quot_rec.date_due := rosetta_g_miss_date_in_map(p5_a31);
983 ddp_quot_rec.payment_frequency := p5_a32;
984 ddp_quot_rec.remaining_payments := rosetta_g_miss_num_map(p5_a33);
985 ddp_quot_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a34);
986 ddp_quot_rec.quote_number := rosetta_g_miss_num_map(p5_a35);
987 ddp_quot_rec.requested_by := rosetta_g_miss_num_map(p5_a36);
988 ddp_quot_rec.approved_yn := p5_a37;
989 ddp_quot_rec.accepted_yn := p5_a38;
990 ddp_quot_rec.payment_received_yn := p5_a39;
991 ddp_quot_rec.date_payment_received := rosetta_g_miss_date_in_map(p5_a40);
992 ddp_quot_rec.attribute_category := p5_a41;
993 ddp_quot_rec.attribute1 := p5_a42;
994 ddp_quot_rec.attribute2 := p5_a43;
995 ddp_quot_rec.attribute3 := p5_a44;
996 ddp_quot_rec.attribute4 := p5_a45;
997 ddp_quot_rec.attribute5 := p5_a46;
998 ddp_quot_rec.attribute6 := p5_a47;
999 ddp_quot_rec.attribute7 := p5_a48;
1000 ddp_quot_rec.attribute8 := p5_a49;
1001 ddp_quot_rec.attribute9 := p5_a50;
1002 ddp_quot_rec.attribute10 := p5_a51;
1003 ddp_quot_rec.attribute11 := p5_a52;
1004 ddp_quot_rec.attribute12 := p5_a53;
1005 ddp_quot_rec.attribute13 := p5_a54;
1006 ddp_quot_rec.attribute14 := p5_a55;
1007 ddp_quot_rec.attribute15 := p5_a56;
1008 ddp_quot_rec.date_approved := rosetta_g_miss_date_in_map(p5_a57);
1009 ddp_quot_rec.approved_by := rosetta_g_miss_num_map(p5_a58);
1010 ddp_quot_rec.org_id := rosetta_g_miss_num_map(p5_a59);
1011 ddp_quot_rec.request_id := rosetta_g_miss_num_map(p5_a60);
1012 ddp_quot_rec.program_application_id := rosetta_g_miss_num_map(p5_a61);
1013 ddp_quot_rec.program_id := rosetta_g_miss_num_map(p5_a62);
1014 ddp_quot_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a63);
1015 ddp_quot_rec.created_by := rosetta_g_miss_num_map(p5_a64);
1016 ddp_quot_rec.creation_date := rosetta_g_miss_date_in_map(p5_a65);
1017 ddp_quot_rec.last_updated_by := rosetta_g_miss_num_map(p5_a66);
1018 ddp_quot_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a67);
1019 ddp_quot_rec.last_update_login := rosetta_g_miss_num_map(p5_a68);
1020 ddp_quot_rec.purchase_amount := rosetta_g_miss_num_map(p5_a69);
1021 ddp_quot_rec.purchase_formula := p5_a70;
1022 ddp_quot_rec.asset_value := rosetta_g_miss_num_map(p5_a71);
1023 ddp_quot_rec.residual_value := rosetta_g_miss_num_map(p5_a72);
1024 ddp_quot_rec.unbilled_receivables := rosetta_g_miss_num_map(p5_a73);
1025 ddp_quot_rec.gain_loss := rosetta_g_miss_num_map(p5_a74);
1026 ddp_quot_rec.perdiem_amount := rosetta_g_miss_num_map(p5_a75);
1027 ddp_quot_rec.currency_code := p5_a76;
1028 ddp_quot_rec.currency_conversion_code := p5_a77;
1029 ddp_quot_rec.currency_conversion_type := p5_a78;
1030 ddp_quot_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a79);
1031 ddp_quot_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a80);
1032 ddp_quot_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a81);
1033 ddp_quot_rec.repo_quote_indicator_yn := p5_a82;
1034
1035
1036 -- here's the delegated call to the old PL/SQL routine
1037 okl_am_restructure_quote_pub.update_restructure_quote(p_api_version,
1038 p_init_msg_list,
1039 x_return_status,
1040 x_msg_count,
1041 x_msg_data,
1042 ddp_quot_rec,
1043 ddx_quot_rec);
1044
1045 -- copy data back from the local variables to OUT or IN-OUT args, if any
1046
1047
1048
1049
1050
1051
1052 p6_a0 := rosetta_g_miss_num_map(ddx_quot_rec.id);
1053 p6_a1 := rosetta_g_miss_num_map(ddx_quot_rec.object_version_number);
1054 p6_a2 := ddx_quot_rec.sfwt_flag;
1055 p6_a3 := ddx_quot_rec.qrs_code;
1056 p6_a4 := ddx_quot_rec.qst_code;
1057 p6_a5 := ddx_quot_rec.qtp_code;
1058 p6_a6 := ddx_quot_rec.trn_code;
1059 p6_a7 := ddx_quot_rec.pop_code_end;
1060 p6_a8 := ddx_quot_rec.pop_code_early;
1061 p6_a9 := rosetta_g_miss_num_map(ddx_quot_rec.consolidated_qte_id);
1062 p6_a10 := rosetta_g_miss_num_map(ddx_quot_rec.khr_id);
1063 p6_a11 := rosetta_g_miss_num_map(ddx_quot_rec.art_id);
1064 p6_a12 := rosetta_g_miss_num_map(ddx_quot_rec.pdt_id);
1065 p6_a13 := ddx_quot_rec.early_termination_yn;
1066 p6_a14 := ddx_quot_rec.partial_yn;
1067 p6_a15 := ddx_quot_rec.preproceeds_yn;
1068 p6_a16 := ddx_quot_rec.date_requested;
1069 p6_a17 := ddx_quot_rec.date_proposal;
1070 p6_a18 := ddx_quot_rec.date_effective_to;
1071 p6_a19 := ddx_quot_rec.date_accepted;
1072 p6_a20 := ddx_quot_rec.summary_format_yn;
1073 p6_a21 := ddx_quot_rec.consolidated_yn;
1074 p6_a22 := rosetta_g_miss_num_map(ddx_quot_rec.principal_paydown_amount);
1075 p6_a23 := rosetta_g_miss_num_map(ddx_quot_rec.residual_amount);
1076 p6_a24 := rosetta_g_miss_num_map(ddx_quot_rec.yield);
1077 p6_a25 := rosetta_g_miss_num_map(ddx_quot_rec.rent_amount);
1078 p6_a26 := ddx_quot_rec.date_restructure_end;
1079 p6_a27 := ddx_quot_rec.date_restructure_start;
1080 p6_a28 := rosetta_g_miss_num_map(ddx_quot_rec.term);
1081 p6_a29 := rosetta_g_miss_num_map(ddx_quot_rec.purchase_percent);
1082 p6_a30 := ddx_quot_rec.comments;
1083 p6_a31 := ddx_quot_rec.date_due;
1084 p6_a32 := ddx_quot_rec.payment_frequency;
1085 p6_a33 := rosetta_g_miss_num_map(ddx_quot_rec.remaining_payments);
1086 p6_a34 := ddx_quot_rec.date_effective_from;
1087 p6_a35 := rosetta_g_miss_num_map(ddx_quot_rec.quote_number);
1088 p6_a36 := rosetta_g_miss_num_map(ddx_quot_rec.requested_by);
1089 p6_a37 := ddx_quot_rec.approved_yn;
1090 p6_a38 := ddx_quot_rec.accepted_yn;
1091 p6_a39 := ddx_quot_rec.payment_received_yn;
1092 p6_a40 := ddx_quot_rec.date_payment_received;
1093 p6_a41 := ddx_quot_rec.attribute_category;
1094 p6_a42 := ddx_quot_rec.attribute1;
1095 p6_a43 := ddx_quot_rec.attribute2;
1096 p6_a44 := ddx_quot_rec.attribute3;
1097 p6_a45 := ddx_quot_rec.attribute4;
1098 p6_a46 := ddx_quot_rec.attribute5;
1099 p6_a47 := ddx_quot_rec.attribute6;
1100 p6_a48 := ddx_quot_rec.attribute7;
1101 p6_a49 := ddx_quot_rec.attribute8;
1102 p6_a50 := ddx_quot_rec.attribute9;
1103 p6_a51 := ddx_quot_rec.attribute10;
1104 p6_a52 := ddx_quot_rec.attribute11;
1105 p6_a53 := ddx_quot_rec.attribute12;
1106 p6_a54 := ddx_quot_rec.attribute13;
1107 p6_a55 := ddx_quot_rec.attribute14;
1108 p6_a56 := ddx_quot_rec.attribute15;
1109 p6_a57 := ddx_quot_rec.date_approved;
1110 p6_a58 := rosetta_g_miss_num_map(ddx_quot_rec.approved_by);
1111 p6_a59 := rosetta_g_miss_num_map(ddx_quot_rec.org_id);
1112 p6_a60 := rosetta_g_miss_num_map(ddx_quot_rec.request_id);
1113 p6_a61 := rosetta_g_miss_num_map(ddx_quot_rec.program_application_id);
1114 p6_a62 := rosetta_g_miss_num_map(ddx_quot_rec.program_id);
1115 p6_a63 := ddx_quot_rec.program_update_date;
1116 p6_a64 := rosetta_g_miss_num_map(ddx_quot_rec.created_by);
1117 p6_a65 := ddx_quot_rec.creation_date;
1118 p6_a66 := rosetta_g_miss_num_map(ddx_quot_rec.last_updated_by);
1119 p6_a67 := ddx_quot_rec.last_update_date;
1120 p6_a68 := rosetta_g_miss_num_map(ddx_quot_rec.last_update_login);
1121 p6_a69 := rosetta_g_miss_num_map(ddx_quot_rec.purchase_amount);
1122 p6_a70 := ddx_quot_rec.purchase_formula;
1123 p6_a71 := rosetta_g_miss_num_map(ddx_quot_rec.asset_value);
1124 p6_a72 := rosetta_g_miss_num_map(ddx_quot_rec.residual_value);
1125 p6_a73 := rosetta_g_miss_num_map(ddx_quot_rec.unbilled_receivables);
1126 p6_a74 := rosetta_g_miss_num_map(ddx_quot_rec.gain_loss);
1127 p6_a75 := rosetta_g_miss_num_map(ddx_quot_rec.perdiem_amount);
1128 p6_a76 := ddx_quot_rec.currency_code;
1129 p6_a77 := ddx_quot_rec.currency_conversion_code;
1130 p6_a78 := ddx_quot_rec.currency_conversion_type;
1131 p6_a79 := rosetta_g_miss_num_map(ddx_quot_rec.currency_conversion_rate);
1132 p6_a80 := ddx_quot_rec.currency_conversion_date;
1133 p6_a81 := rosetta_g_miss_num_map(ddx_quot_rec.legal_entity_id);
1134 p6_a82 := ddx_quot_rec.repo_quote_indicator_yn;
1135 end;
1136
1137 procedure update_restructure_quote(p_api_version NUMBER
1138 , p_init_msg_list VARCHAR2
1139 , x_return_status out nocopy VARCHAR2
1140 , x_msg_count out nocopy NUMBER
1141 , x_msg_data out nocopy VARCHAR2
1142 , p5_a0 JTF_NUMBER_TABLE
1143 , p5_a1 JTF_NUMBER_TABLE
1144 , p5_a2 JTF_VARCHAR2_TABLE_100
1145 , p5_a3 JTF_VARCHAR2_TABLE_100
1146 , p5_a4 JTF_VARCHAR2_TABLE_100
1147 , p5_a5 JTF_VARCHAR2_TABLE_100
1148 , p5_a6 JTF_VARCHAR2_TABLE_100
1149 , p5_a7 JTF_VARCHAR2_TABLE_100
1150 , p5_a8 JTF_VARCHAR2_TABLE_100
1151 , p5_a9 JTF_NUMBER_TABLE
1152 , p5_a10 JTF_NUMBER_TABLE
1153 , p5_a11 JTF_NUMBER_TABLE
1154 , p5_a12 JTF_NUMBER_TABLE
1155 , p5_a13 JTF_VARCHAR2_TABLE_100
1156 , p5_a14 JTF_VARCHAR2_TABLE_100
1157 , p5_a15 JTF_VARCHAR2_TABLE_100
1158 , p5_a16 JTF_DATE_TABLE
1159 , p5_a17 JTF_DATE_TABLE
1160 , p5_a18 JTF_DATE_TABLE
1161 , p5_a19 JTF_DATE_TABLE
1162 , p5_a20 JTF_VARCHAR2_TABLE_100
1163 , p5_a21 JTF_VARCHAR2_TABLE_100
1164 , p5_a22 JTF_NUMBER_TABLE
1165 , p5_a23 JTF_NUMBER_TABLE
1166 , p5_a24 JTF_NUMBER_TABLE
1167 , p5_a25 JTF_NUMBER_TABLE
1168 , p5_a26 JTF_DATE_TABLE
1169 , p5_a27 JTF_DATE_TABLE
1170 , p5_a28 JTF_NUMBER_TABLE
1171 , p5_a29 JTF_NUMBER_TABLE
1172 , p5_a30 JTF_VARCHAR2_TABLE_2000
1173 , p5_a31 JTF_DATE_TABLE
1174 , p5_a32 JTF_VARCHAR2_TABLE_100
1175 , p5_a33 JTF_NUMBER_TABLE
1176 , p5_a34 JTF_DATE_TABLE
1177 , p5_a35 JTF_NUMBER_TABLE
1178 , p5_a36 JTF_NUMBER_TABLE
1179 , p5_a37 JTF_VARCHAR2_TABLE_100
1180 , p5_a38 JTF_VARCHAR2_TABLE_100
1181 , p5_a39 JTF_VARCHAR2_TABLE_100
1182 , p5_a40 JTF_DATE_TABLE
1183 , p5_a41 JTF_VARCHAR2_TABLE_100
1184 , p5_a42 JTF_VARCHAR2_TABLE_500
1185 , p5_a43 JTF_VARCHAR2_TABLE_500
1186 , p5_a44 JTF_VARCHAR2_TABLE_500
1187 , p5_a45 JTF_VARCHAR2_TABLE_500
1188 , p5_a46 JTF_VARCHAR2_TABLE_500
1189 , p5_a47 JTF_VARCHAR2_TABLE_500
1190 , p5_a48 JTF_VARCHAR2_TABLE_500
1191 , p5_a49 JTF_VARCHAR2_TABLE_500
1192 , p5_a50 JTF_VARCHAR2_TABLE_500
1193 , p5_a51 JTF_VARCHAR2_TABLE_500
1194 , p5_a52 JTF_VARCHAR2_TABLE_500
1195 , p5_a53 JTF_VARCHAR2_TABLE_500
1196 , p5_a54 JTF_VARCHAR2_TABLE_500
1197 , p5_a55 JTF_VARCHAR2_TABLE_500
1198 , p5_a56 JTF_VARCHAR2_TABLE_500
1199 , p5_a57 JTF_DATE_TABLE
1200 , p5_a58 JTF_NUMBER_TABLE
1201 , p5_a59 JTF_NUMBER_TABLE
1202 , p5_a60 JTF_NUMBER_TABLE
1203 , p5_a61 JTF_NUMBER_TABLE
1204 , p5_a62 JTF_NUMBER_TABLE
1205 , p5_a63 JTF_DATE_TABLE
1206 , p5_a64 JTF_NUMBER_TABLE
1207 , p5_a65 JTF_DATE_TABLE
1208 , p5_a66 JTF_NUMBER_TABLE
1209 , p5_a67 JTF_DATE_TABLE
1210 , p5_a68 JTF_NUMBER_TABLE
1211 , p5_a69 JTF_NUMBER_TABLE
1212 , p5_a70 JTF_VARCHAR2_TABLE_200
1213 , p5_a71 JTF_NUMBER_TABLE
1214 , p5_a72 JTF_NUMBER_TABLE
1215 , p5_a73 JTF_NUMBER_TABLE
1216 , p5_a74 JTF_NUMBER_TABLE
1217 , p5_a75 JTF_NUMBER_TABLE
1218 , p5_a76 JTF_VARCHAR2_TABLE_100
1219 , p5_a77 JTF_VARCHAR2_TABLE_100
1220 , p5_a78 JTF_VARCHAR2_TABLE_100
1221 , p5_a79 JTF_NUMBER_TABLE
1222 , p5_a80 JTF_DATE_TABLE
1223 , p5_a81 JTF_NUMBER_TABLE
1224 , p5_a82 JTF_VARCHAR2_TABLE_100
1225 , p6_a0 out nocopy JTF_NUMBER_TABLE
1226 , p6_a1 out nocopy JTF_NUMBER_TABLE
1227 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1228 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1229 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
1230 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
1231 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
1232 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
1233 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
1234 , p6_a9 out nocopy JTF_NUMBER_TABLE
1235 , p6_a10 out nocopy JTF_NUMBER_TABLE
1236 , p6_a11 out nocopy JTF_NUMBER_TABLE
1237 , p6_a12 out nocopy JTF_NUMBER_TABLE
1238 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
1239 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
1240 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
1241 , p6_a16 out nocopy JTF_DATE_TABLE
1242 , p6_a17 out nocopy JTF_DATE_TABLE
1243 , p6_a18 out nocopy JTF_DATE_TABLE
1244 , p6_a19 out nocopy JTF_DATE_TABLE
1245 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_100
1246 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_100
1247 , p6_a22 out nocopy JTF_NUMBER_TABLE
1248 , p6_a23 out nocopy JTF_NUMBER_TABLE
1249 , p6_a24 out nocopy JTF_NUMBER_TABLE
1250 , p6_a25 out nocopy JTF_NUMBER_TABLE
1251 , p6_a26 out nocopy JTF_DATE_TABLE
1252 , p6_a27 out nocopy JTF_DATE_TABLE
1253 , p6_a28 out nocopy JTF_NUMBER_TABLE
1254 , p6_a29 out nocopy JTF_NUMBER_TABLE
1255 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_2000
1256 , p6_a31 out nocopy JTF_DATE_TABLE
1257 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_100
1258 , p6_a33 out nocopy JTF_NUMBER_TABLE
1259 , p6_a34 out nocopy JTF_DATE_TABLE
1260 , p6_a35 out nocopy JTF_NUMBER_TABLE
1261 , p6_a36 out nocopy JTF_NUMBER_TABLE
1262 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_100
1263 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
1264 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
1265 , p6_a40 out nocopy JTF_DATE_TABLE
1266 , p6_a41 out nocopy JTF_VARCHAR2_TABLE_100
1267 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
1268 , p6_a43 out nocopy JTF_VARCHAR2_TABLE_500
1269 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_500
1270 , p6_a45 out nocopy JTF_VARCHAR2_TABLE_500
1271 , p6_a46 out nocopy JTF_VARCHAR2_TABLE_500
1272 , p6_a47 out nocopy JTF_VARCHAR2_TABLE_500
1273 , p6_a48 out nocopy JTF_VARCHAR2_TABLE_500
1274 , p6_a49 out nocopy JTF_VARCHAR2_TABLE_500
1275 , p6_a50 out nocopy JTF_VARCHAR2_TABLE_500
1276 , p6_a51 out nocopy JTF_VARCHAR2_TABLE_500
1277 , p6_a52 out nocopy JTF_VARCHAR2_TABLE_500
1278 , p6_a53 out nocopy JTF_VARCHAR2_TABLE_500
1279 , p6_a54 out nocopy JTF_VARCHAR2_TABLE_500
1280 , p6_a55 out nocopy JTF_VARCHAR2_TABLE_500
1281 , p6_a56 out nocopy JTF_VARCHAR2_TABLE_500
1282 , p6_a57 out nocopy JTF_DATE_TABLE
1283 , p6_a58 out nocopy JTF_NUMBER_TABLE
1284 , p6_a59 out nocopy JTF_NUMBER_TABLE
1285 , p6_a60 out nocopy JTF_NUMBER_TABLE
1286 , p6_a61 out nocopy JTF_NUMBER_TABLE
1287 , p6_a62 out nocopy JTF_NUMBER_TABLE
1288 , p6_a63 out nocopy JTF_DATE_TABLE
1289 , p6_a64 out nocopy JTF_NUMBER_TABLE
1290 , p6_a65 out nocopy JTF_DATE_TABLE
1291 , p6_a66 out nocopy JTF_NUMBER_TABLE
1292 , p6_a67 out nocopy JTF_DATE_TABLE
1293 , p6_a68 out nocopy JTF_NUMBER_TABLE
1294 , p6_a69 out nocopy JTF_NUMBER_TABLE
1295 , p6_a70 out nocopy JTF_VARCHAR2_TABLE_200
1296 , p6_a71 out nocopy JTF_NUMBER_TABLE
1297 , p6_a72 out nocopy JTF_NUMBER_TABLE
1298 , p6_a73 out nocopy JTF_NUMBER_TABLE
1299 , p6_a74 out nocopy JTF_NUMBER_TABLE
1300 , p6_a75 out nocopy JTF_NUMBER_TABLE
1301 , p6_a76 out nocopy JTF_VARCHAR2_TABLE_100
1302 , p6_a77 out nocopy JTF_VARCHAR2_TABLE_100
1303 , p6_a78 out nocopy JTF_VARCHAR2_TABLE_100
1304 , p6_a79 out nocopy JTF_NUMBER_TABLE
1305 , p6_a80 out nocopy JTF_DATE_TABLE
1306 , p6_a81 out nocopy JTF_NUMBER_TABLE
1307 , p6_a82 out nocopy JTF_VARCHAR2_TABLE_100
1308 )
1309
1310 as
1311 ddp_quot_tbl okl_am_restructure_quote_pub.quot_tbl_type;
1312 ddx_quot_tbl okl_am_restructure_quote_pub.quot_tbl_type;
1313 ddindx binary_integer; indx binary_integer;
1314 begin
1315
1316 -- copy data to the local IN or IN-OUT args, if any
1317
1318
1319
1320
1321
1322 okl_qte_pvt_w.rosetta_table_copy_in_p8(ddp_quot_tbl, p5_a0
1323 , p5_a1
1324 , p5_a2
1325 , p5_a3
1326 , p5_a4
1327 , p5_a5
1328 , p5_a6
1329 , p5_a7
1330 , p5_a8
1331 , p5_a9
1332 , p5_a10
1333 , p5_a11
1334 , p5_a12
1335 , p5_a13
1336 , p5_a14
1337 , p5_a15
1338 , p5_a16
1339 , p5_a17
1340 , p5_a18
1341 , p5_a19
1342 , p5_a20
1343 , p5_a21
1344 , p5_a22
1345 , p5_a23
1346 , p5_a24
1347 , p5_a25
1348 , p5_a26
1349 , p5_a27
1350 , p5_a28
1351 , p5_a29
1352 , p5_a30
1353 , p5_a31
1354 , p5_a32
1355 , p5_a33
1356 , p5_a34
1357 , p5_a35
1358 , p5_a36
1359 , p5_a37
1360 , p5_a38
1361 , p5_a39
1362 , p5_a40
1363 , p5_a41
1364 , p5_a42
1365 , p5_a43
1366 , p5_a44
1367 , p5_a45
1368 , p5_a46
1369 , p5_a47
1370 , p5_a48
1371 , p5_a49
1372 , p5_a50
1373 , p5_a51
1374 , p5_a52
1375 , p5_a53
1376 , p5_a54
1377 , p5_a55
1378 , p5_a56
1379 , p5_a57
1380 , p5_a58
1381 , p5_a59
1382 , p5_a60
1383 , p5_a61
1384 , p5_a62
1385 , p5_a63
1386 , p5_a64
1387 , p5_a65
1388 , p5_a66
1389 , p5_a67
1390 , p5_a68
1391 , p5_a69
1392 , p5_a70
1393 , p5_a71
1394 , p5_a72
1395 , p5_a73
1396 , p5_a74
1397 , p5_a75
1398 , p5_a76
1399 , p5_a77
1400 , p5_a78
1401 , p5_a79
1402 , p5_a80
1403 , p5_a81
1404 , p5_a82
1405 );
1406
1407
1408 -- here's the delegated call to the old PL/SQL routine
1409 okl_am_restructure_quote_pub.update_restructure_quote(p_api_version,
1410 p_init_msg_list,
1411 x_return_status,
1412 x_msg_count,
1413 x_msg_data,
1414 ddp_quot_tbl,
1415 ddx_quot_tbl);
1416
1417 -- copy data back from the local variables to OUT or IN-OUT args, if any
1418
1419
1420
1421
1422
1423
1424 okl_qte_pvt_w.rosetta_table_copy_out_p8(ddx_quot_tbl, p6_a0
1425 , p6_a1
1426 , p6_a2
1427 , p6_a3
1428 , p6_a4
1429 , p6_a5
1430 , p6_a6
1431 , p6_a7
1432 , p6_a8
1433 , p6_a9
1434 , p6_a10
1435 , p6_a11
1436 , p6_a12
1437 , p6_a13
1438 , p6_a14
1439 , p6_a15
1440 , p6_a16
1441 , p6_a17
1442 , p6_a18
1443 , p6_a19
1444 , p6_a20
1445 , p6_a21
1446 , p6_a22
1447 , p6_a23
1448 , p6_a24
1449 , p6_a25
1450 , p6_a26
1451 , p6_a27
1452 , p6_a28
1453 , p6_a29
1454 , p6_a30
1455 , p6_a31
1456 , p6_a32
1457 , p6_a33
1458 , p6_a34
1459 , p6_a35
1460 , p6_a36
1461 , p6_a37
1462 , p6_a38
1463 , p6_a39
1464 , p6_a40
1465 , p6_a41
1466 , p6_a42
1467 , p6_a43
1468 , p6_a44
1469 , p6_a45
1470 , p6_a46
1471 , p6_a47
1472 , p6_a48
1473 , p6_a49
1474 , p6_a50
1475 , p6_a51
1476 , p6_a52
1477 , p6_a53
1478 , p6_a54
1479 , p6_a55
1480 , p6_a56
1481 , p6_a57
1482 , p6_a58
1483 , p6_a59
1484 , p6_a60
1485 , p6_a61
1486 , p6_a62
1487 , p6_a63
1488 , p6_a64
1489 , p6_a65
1490 , p6_a66
1491 , p6_a67
1492 , p6_a68
1493 , p6_a69
1494 , p6_a70
1495 , p6_a71
1496 , p6_a72
1497 , p6_a73
1498 , p6_a74
1499 , p6_a75
1500 , p6_a76
1501 , p6_a77
1502 , p6_a78
1503 , p6_a79
1504 , p6_a80
1505 , p6_a81
1506 , p6_a82
1507 );
1508 end;
1509
1510 end okl_am_restructure_quote_pub_w;