[Home] [Help]
PACKAGE BODY: APPS.OZF_ADJ_NEW_LINE_PVT_W
Source
1 package body ozf_adj_new_line_pvt_w as
2 /* $Header: ozfwanlb.pls 120.1 2006/04/04 18:01:24 rssharma 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 rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6 rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7
8
9 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
10 function rosetta_g_miss_date_in_map(d date) return date as
11 begin
12 if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
13 if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
14 return d;
15 end;
16
17
18 function rosetta_g_miss_num_map(n number) return number as
19 a number := fnd_api.g_miss_num;
20 b number := 0-1962.0724;
21 begin
22 if n=a then return b; end if;
23 if n=b then return a; end if;
24 return n;
25 end;
26
27 procedure rosetta_table_copy_in_p3(t out nocopy ozf_adj_new_line_pvt.adj_new_line_tbl_type, a0 JTF_NUMBER_TABLE
28 , a1 JTF_NUMBER_TABLE
29 , a2 JTF_NUMBER_TABLE
30 , a3 JTF_NUMBER_TABLE
31 , a4 JTF_VARCHAR2_TABLE_100
32 , a5 JTF_NUMBER_TABLE
33 , a6 JTF_VARCHAR2_TABLE_100
34 , a7 JTF_VARCHAR2_TABLE_100
35 , a8 JTF_NUMBER_TABLE
36 , a9 JTF_VARCHAR2_TABLE_100
37 , a10 JTF_NUMBER_TABLE
38 , a11 JTF_NUMBER_TABLE
39 , a12 JTF_NUMBER_TABLE
40 , a13 JTF_DATE_TABLE
41 , a14 JTF_DATE_TABLE
42 , a15 JTF_DATE_TABLE
43 , a16 JTF_NUMBER_TABLE
44 , a17 JTF_DATE_TABLE
45 , a18 JTF_NUMBER_TABLE
46 , a19 JTF_NUMBER_TABLE
47 , a20 JTF_NUMBER_TABLE
48 ) as
49 ddindx binary_integer; indx binary_integer;
50 begin
51 if a0 is not null and a0.count > 0 then
52 if a0.count > 0 then
53 indx := a0.first;
54 ddindx := 1;
55 while true loop
56 t(ddindx).offer_adj_new_line_id := rosetta_g_miss_num_map(a0(indx));
57 t(ddindx).offer_adjustment_id := rosetta_g_miss_num_map(a1(indx));
58 t(ddindx).volume_from := rosetta_g_miss_num_map(a2(indx));
59 t(ddindx).volume_to := rosetta_g_miss_num_map(a3(indx));
60 t(ddindx).volume_type := a4(indx);
61 t(ddindx).discount := rosetta_g_miss_num_map(a5(indx));
62 t(ddindx).discount_type := a6(indx);
63 t(ddindx).tier_type := a7(indx);
64 t(ddindx).td_discount := rosetta_g_miss_num_map(a8(indx));
65 t(ddindx).td_discount_type := a9(indx);
66 t(ddindx).quantity := rosetta_g_miss_num_map(a10(indx));
67 t(ddindx).benefit_price_list_line_id := rosetta_g_miss_num_map(a11(indx));
68 t(ddindx).parent_adj_line_id := rosetta_g_miss_num_map(a12(indx));
69 t(ddindx).start_date_active := rosetta_g_miss_date_in_map(a13(indx));
70 t(ddindx).end_date_active := rosetta_g_miss_date_in_map(a14(indx));
71 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a15(indx));
72 t(ddindx).created_by := rosetta_g_miss_num_map(a16(indx));
73 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a17(indx));
74 t(ddindx).last_updated_by := rosetta_g_miss_num_map(a18(indx));
75 t(ddindx).last_update_login := rosetta_g_miss_num_map(a19(indx));
76 t(ddindx).object_version_number := rosetta_g_miss_num_map(a20(indx));
77 ddindx := ddindx+1;
78 if a0.last =indx
79 then exit;
80 end if;
81 indx := a0.next(indx);
82 end loop;
83 end if;
84 end if;
85 end rosetta_table_copy_in_p3;
86 procedure rosetta_table_copy_out_p3(t ozf_adj_new_line_pvt.adj_new_line_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
87 , a1 out nocopy JTF_NUMBER_TABLE
88 , a2 out nocopy JTF_NUMBER_TABLE
89 , a3 out nocopy JTF_NUMBER_TABLE
90 , a4 out nocopy JTF_VARCHAR2_TABLE_100
91 , a5 out nocopy JTF_NUMBER_TABLE
92 , a6 out nocopy JTF_VARCHAR2_TABLE_100
93 , a7 out nocopy JTF_VARCHAR2_TABLE_100
94 , a8 out nocopy JTF_NUMBER_TABLE
95 , a9 out nocopy JTF_VARCHAR2_TABLE_100
96 , a10 out nocopy JTF_NUMBER_TABLE
97 , a11 out nocopy JTF_NUMBER_TABLE
98 , a12 out nocopy JTF_NUMBER_TABLE
99 , a13 out nocopy JTF_DATE_TABLE
100 , a14 out nocopy JTF_DATE_TABLE
101 , a15 out nocopy JTF_DATE_TABLE
102 , a16 out nocopy JTF_NUMBER_TABLE
103 , a17 out nocopy JTF_DATE_TABLE
104 , a18 out nocopy JTF_NUMBER_TABLE
105 , a19 out nocopy JTF_NUMBER_TABLE
106 , a20 out nocopy JTF_NUMBER_TABLE
107 ) as
108 ddindx binary_integer; indx binary_integer;
109 begin
110 if t is null or t.count = 0 then
111 a0 := JTF_NUMBER_TABLE();
112 a1 := JTF_NUMBER_TABLE();
113 a2 := JTF_NUMBER_TABLE();
114 a3 := JTF_NUMBER_TABLE();
115 a4 := JTF_VARCHAR2_TABLE_100();
116 a5 := JTF_NUMBER_TABLE();
117 a6 := JTF_VARCHAR2_TABLE_100();
118 a7 := JTF_VARCHAR2_TABLE_100();
119 a8 := JTF_NUMBER_TABLE();
120 a9 := JTF_VARCHAR2_TABLE_100();
121 a10 := JTF_NUMBER_TABLE();
122 a11 := JTF_NUMBER_TABLE();
123 a12 := JTF_NUMBER_TABLE();
124 a13 := JTF_DATE_TABLE();
125 a14 := JTF_DATE_TABLE();
126 a15 := JTF_DATE_TABLE();
127 a16 := JTF_NUMBER_TABLE();
128 a17 := JTF_DATE_TABLE();
129 a18 := JTF_NUMBER_TABLE();
130 a19 := JTF_NUMBER_TABLE();
131 a20 := JTF_NUMBER_TABLE();
132 else
133 a0 := JTF_NUMBER_TABLE();
134 a1 := JTF_NUMBER_TABLE();
135 a2 := JTF_NUMBER_TABLE();
136 a3 := JTF_NUMBER_TABLE();
137 a4 := JTF_VARCHAR2_TABLE_100();
138 a5 := JTF_NUMBER_TABLE();
139 a6 := JTF_VARCHAR2_TABLE_100();
140 a7 := JTF_VARCHAR2_TABLE_100();
141 a8 := JTF_NUMBER_TABLE();
142 a9 := JTF_VARCHAR2_TABLE_100();
143 a10 := JTF_NUMBER_TABLE();
144 a11 := JTF_NUMBER_TABLE();
145 a12 := JTF_NUMBER_TABLE();
146 a13 := JTF_DATE_TABLE();
147 a14 := JTF_DATE_TABLE();
148 a15 := JTF_DATE_TABLE();
149 a16 := JTF_NUMBER_TABLE();
150 a17 := JTF_DATE_TABLE();
151 a18 := JTF_NUMBER_TABLE();
152 a19 := JTF_NUMBER_TABLE();
153 a20 := JTF_NUMBER_TABLE();
154 if t.count > 0 then
155 a0.extend(t.count);
156 a1.extend(t.count);
157 a2.extend(t.count);
158 a3.extend(t.count);
159 a4.extend(t.count);
160 a5.extend(t.count);
161 a6.extend(t.count);
162 a7.extend(t.count);
163 a8.extend(t.count);
164 a9.extend(t.count);
165 a10.extend(t.count);
166 a11.extend(t.count);
167 a12.extend(t.count);
168 a13.extend(t.count);
169 a14.extend(t.count);
170 a15.extend(t.count);
171 a16.extend(t.count);
172 a17.extend(t.count);
173 a18.extend(t.count);
174 a19.extend(t.count);
175 a20.extend(t.count);
176 ddindx := t.first;
177 indx := 1;
178 while true loop
179 a0(indx) := rosetta_g_miss_num_map(t(ddindx).offer_adj_new_line_id);
180 a1(indx) := rosetta_g_miss_num_map(t(ddindx).offer_adjustment_id);
181 a2(indx) := rosetta_g_miss_num_map(t(ddindx).volume_from);
182 a3(indx) := rosetta_g_miss_num_map(t(ddindx).volume_to);
183 a4(indx) := t(ddindx).volume_type;
184 a5(indx) := rosetta_g_miss_num_map(t(ddindx).discount);
185 a6(indx) := t(ddindx).discount_type;
186 a7(indx) := t(ddindx).tier_type;
187 a8(indx) := rosetta_g_miss_num_map(t(ddindx).td_discount);
188 a9(indx) := t(ddindx).td_discount_type;
189 a10(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
190 a11(indx) := rosetta_g_miss_num_map(t(ddindx).benefit_price_list_line_id);
191 a12(indx) := rosetta_g_miss_num_map(t(ddindx).parent_adj_line_id);
192 a13(indx) := t(ddindx).start_date_active;
193 a14(indx) := t(ddindx).end_date_active;
194 a15(indx) := t(ddindx).creation_date;
195 a16(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
196 a17(indx) := t(ddindx).last_update_date;
197 a18(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
198 a19(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
199 a20(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
200 indx := indx+1;
201 if t.last =ddindx
202 then exit;
203 end if;
204 ddindx := t.next(ddindx);
205 end loop;
206 end if;
207 end if;
208 end rosetta_table_copy_out_p3;
209
210 procedure rosetta_table_copy_in_p7(t out nocopy ozf_adj_new_line_pvt.adj_new_disc_tbl_type, a0 JTF_NUMBER_TABLE
211 , a1 JTF_NUMBER_TABLE
212 , a2 JTF_NUMBER_TABLE
213 , a3 JTF_NUMBER_TABLE
214 , a4 JTF_VARCHAR2_TABLE_100
215 , a5 JTF_NUMBER_TABLE
216 , a6 JTF_VARCHAR2_TABLE_100
217 , a7 JTF_VARCHAR2_TABLE_100
218 , a8 JTF_NUMBER_TABLE
219 , a9 JTF_VARCHAR2_TABLE_100
220 , a10 JTF_NUMBER_TABLE
221 , a11 JTF_NUMBER_TABLE
222 , a12 JTF_NUMBER_TABLE
223 , a13 JTF_NUMBER_TABLE
224 , a14 JTF_VARCHAR2_TABLE_100
225 , a15 JTF_VARCHAR2_TABLE_100
226 , a16 JTF_VARCHAR2_TABLE_300
227 , a17 JTF_VARCHAR2_TABLE_100
228 , a18 JTF_VARCHAR2_TABLE_100
229 , a19 JTF_DATE_TABLE
230 , a20 JTF_DATE_TABLE
231 , a21 JTF_DATE_TABLE
232 , a22 JTF_NUMBER_TABLE
233 , a23 JTF_DATE_TABLE
234 , a24 JTF_NUMBER_TABLE
235 , a25 JTF_NUMBER_TABLE
236 , a26 JTF_NUMBER_TABLE
237 , a27 JTF_NUMBER_TABLE
238 ) as
239 ddindx binary_integer; indx binary_integer;
240 begin
241 if a0 is not null and a0.count > 0 then
242 if a0.count > 0 then
243 indx := a0.first;
244 ddindx := 1;
245 while true loop
246 t(ddindx).offer_adj_new_line_id := rosetta_g_miss_num_map(a0(indx));
247 t(ddindx).offer_adjustment_id := rosetta_g_miss_num_map(a1(indx));
248 t(ddindx).volume_from := rosetta_g_miss_num_map(a2(indx));
249 t(ddindx).volume_to := rosetta_g_miss_num_map(a3(indx));
250 t(ddindx).volume_type := a4(indx);
251 t(ddindx).discount := rosetta_g_miss_num_map(a5(indx));
252 t(ddindx).discount_type := a6(indx);
253 t(ddindx).tier_type := a7(indx);
254 t(ddindx).td_discount := rosetta_g_miss_num_map(a8(indx));
255 t(ddindx).td_discount_type := a9(indx);
256 t(ddindx).quantity := rosetta_g_miss_num_map(a10(indx));
257 t(ddindx).benefit_price_list_line_id := rosetta_g_miss_num_map(a11(indx));
258 t(ddindx).parent_adj_line_id := rosetta_g_miss_num_map(a12(indx));
259 t(ddindx).offer_adj_new_product_id := rosetta_g_miss_num_map(a13(indx));
260 t(ddindx).product_context := a14(indx);
261 t(ddindx).product_attribute := a15(indx);
262 t(ddindx).product_attr_value := a16(indx);
263 t(ddindx).excluder_flag := a17(indx);
264 t(ddindx).uom_code := a18(indx);
265 t(ddindx).start_date_active := rosetta_g_miss_date_in_map(a19(indx));
266 t(ddindx).end_date_active := rosetta_g_miss_date_in_map(a20(indx));
267 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a21(indx));
268 t(ddindx).created_by := rosetta_g_miss_num_map(a22(indx));
269 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a23(indx));
270 t(ddindx).last_updated_by := rosetta_g_miss_num_map(a24(indx));
271 t(ddindx).last_update_login := rosetta_g_miss_num_map(a25(indx));
272 t(ddindx).object_version_number := rosetta_g_miss_num_map(a26(indx));
273 t(ddindx).prod_obj_version_number := rosetta_g_miss_num_map(a27(indx));
274 ddindx := ddindx+1;
275 if a0.last =indx
276 then exit;
277 end if;
278 indx := a0.next(indx);
279 end loop;
280 end if;
281 end if;
282 end rosetta_table_copy_in_p7;
283 procedure rosetta_table_copy_out_p7(t ozf_adj_new_line_pvt.adj_new_disc_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
284 , a1 out nocopy JTF_NUMBER_TABLE
285 , a2 out nocopy JTF_NUMBER_TABLE
286 , a3 out nocopy JTF_NUMBER_TABLE
287 , a4 out nocopy JTF_VARCHAR2_TABLE_100
288 , a5 out nocopy JTF_NUMBER_TABLE
289 , a6 out nocopy JTF_VARCHAR2_TABLE_100
290 , a7 out nocopy JTF_VARCHAR2_TABLE_100
291 , a8 out nocopy JTF_NUMBER_TABLE
292 , a9 out nocopy JTF_VARCHAR2_TABLE_100
293 , a10 out nocopy JTF_NUMBER_TABLE
294 , a11 out nocopy JTF_NUMBER_TABLE
295 , a12 out nocopy JTF_NUMBER_TABLE
296 , a13 out nocopy JTF_NUMBER_TABLE
297 , a14 out nocopy JTF_VARCHAR2_TABLE_100
298 , a15 out nocopy JTF_VARCHAR2_TABLE_100
299 , a16 out nocopy JTF_VARCHAR2_TABLE_300
300 , a17 out nocopy JTF_VARCHAR2_TABLE_100
301 , a18 out nocopy JTF_VARCHAR2_TABLE_100
302 , a19 out nocopy JTF_DATE_TABLE
303 , a20 out nocopy JTF_DATE_TABLE
304 , a21 out nocopy JTF_DATE_TABLE
305 , a22 out nocopy JTF_NUMBER_TABLE
306 , a23 out nocopy JTF_DATE_TABLE
307 , a24 out nocopy JTF_NUMBER_TABLE
308 , a25 out nocopy JTF_NUMBER_TABLE
309 , a26 out nocopy JTF_NUMBER_TABLE
310 , a27 out nocopy JTF_NUMBER_TABLE
311 ) as
312 ddindx binary_integer; indx binary_integer;
313 begin
314 if t is null or t.count = 0 then
315 a0 := JTF_NUMBER_TABLE();
316 a1 := JTF_NUMBER_TABLE();
317 a2 := JTF_NUMBER_TABLE();
318 a3 := JTF_NUMBER_TABLE();
319 a4 := JTF_VARCHAR2_TABLE_100();
320 a5 := JTF_NUMBER_TABLE();
321 a6 := JTF_VARCHAR2_TABLE_100();
322 a7 := JTF_VARCHAR2_TABLE_100();
323 a8 := JTF_NUMBER_TABLE();
324 a9 := JTF_VARCHAR2_TABLE_100();
325 a10 := JTF_NUMBER_TABLE();
326 a11 := JTF_NUMBER_TABLE();
327 a12 := JTF_NUMBER_TABLE();
328 a13 := JTF_NUMBER_TABLE();
329 a14 := JTF_VARCHAR2_TABLE_100();
330 a15 := JTF_VARCHAR2_TABLE_100();
331 a16 := JTF_VARCHAR2_TABLE_300();
332 a17 := JTF_VARCHAR2_TABLE_100();
333 a18 := JTF_VARCHAR2_TABLE_100();
334 a19 := JTF_DATE_TABLE();
335 a20 := JTF_DATE_TABLE();
336 a21 := JTF_DATE_TABLE();
337 a22 := JTF_NUMBER_TABLE();
338 a23 := JTF_DATE_TABLE();
339 a24 := JTF_NUMBER_TABLE();
340 a25 := JTF_NUMBER_TABLE();
341 a26 := JTF_NUMBER_TABLE();
342 a27 := JTF_NUMBER_TABLE();
343 else
344 a0 := JTF_NUMBER_TABLE();
345 a1 := JTF_NUMBER_TABLE();
346 a2 := JTF_NUMBER_TABLE();
347 a3 := JTF_NUMBER_TABLE();
348 a4 := JTF_VARCHAR2_TABLE_100();
349 a5 := JTF_NUMBER_TABLE();
350 a6 := JTF_VARCHAR2_TABLE_100();
351 a7 := JTF_VARCHAR2_TABLE_100();
352 a8 := JTF_NUMBER_TABLE();
353 a9 := JTF_VARCHAR2_TABLE_100();
354 a10 := JTF_NUMBER_TABLE();
355 a11 := JTF_NUMBER_TABLE();
356 a12 := JTF_NUMBER_TABLE();
357 a13 := JTF_NUMBER_TABLE();
358 a14 := JTF_VARCHAR2_TABLE_100();
359 a15 := JTF_VARCHAR2_TABLE_100();
360 a16 := JTF_VARCHAR2_TABLE_300();
361 a17 := JTF_VARCHAR2_TABLE_100();
362 a18 := JTF_VARCHAR2_TABLE_100();
363 a19 := JTF_DATE_TABLE();
364 a20 := JTF_DATE_TABLE();
365 a21 := JTF_DATE_TABLE();
366 a22 := JTF_NUMBER_TABLE();
367 a23 := JTF_DATE_TABLE();
368 a24 := JTF_NUMBER_TABLE();
369 a25 := JTF_NUMBER_TABLE();
370 a26 := JTF_NUMBER_TABLE();
371 a27 := JTF_NUMBER_TABLE();
372 if t.count > 0 then
373 a0.extend(t.count);
374 a1.extend(t.count);
375 a2.extend(t.count);
376 a3.extend(t.count);
377 a4.extend(t.count);
378 a5.extend(t.count);
379 a6.extend(t.count);
380 a7.extend(t.count);
381 a8.extend(t.count);
382 a9.extend(t.count);
383 a10.extend(t.count);
384 a11.extend(t.count);
385 a12.extend(t.count);
386 a13.extend(t.count);
387 a14.extend(t.count);
388 a15.extend(t.count);
389 a16.extend(t.count);
390 a17.extend(t.count);
391 a18.extend(t.count);
392 a19.extend(t.count);
393 a20.extend(t.count);
394 a21.extend(t.count);
395 a22.extend(t.count);
396 a23.extend(t.count);
397 a24.extend(t.count);
398 a25.extend(t.count);
399 a26.extend(t.count);
400 a27.extend(t.count);
401 ddindx := t.first;
402 indx := 1;
403 while true loop
404 a0(indx) := rosetta_g_miss_num_map(t(ddindx).offer_adj_new_line_id);
405 a1(indx) := rosetta_g_miss_num_map(t(ddindx).offer_adjustment_id);
406 a2(indx) := rosetta_g_miss_num_map(t(ddindx).volume_from);
407 a3(indx) := rosetta_g_miss_num_map(t(ddindx).volume_to);
408 a4(indx) := t(ddindx).volume_type;
409 a5(indx) := rosetta_g_miss_num_map(t(ddindx).discount);
410 a6(indx) := t(ddindx).discount_type;
411 a7(indx) := t(ddindx).tier_type;
412 a8(indx) := rosetta_g_miss_num_map(t(ddindx).td_discount);
413 a9(indx) := t(ddindx).td_discount_type;
414 a10(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
415 a11(indx) := rosetta_g_miss_num_map(t(ddindx).benefit_price_list_line_id);
416 a12(indx) := rosetta_g_miss_num_map(t(ddindx).parent_adj_line_id);
417 a13(indx) := rosetta_g_miss_num_map(t(ddindx).offer_adj_new_product_id);
418 a14(indx) := t(ddindx).product_context;
419 a15(indx) := t(ddindx).product_attribute;
420 a16(indx) := t(ddindx).product_attr_value;
421 a17(indx) := t(ddindx).excluder_flag;
422 a18(indx) := t(ddindx).uom_code;
423 a19(indx) := t(ddindx).start_date_active;
424 a20(indx) := t(ddindx).end_date_active;
425 a21(indx) := t(ddindx).creation_date;
426 a22(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
427 a23(indx) := t(ddindx).last_update_date;
428 a24(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
429 a25(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
430 a26(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
431 a27(indx) := rosetta_g_miss_num_map(t(ddindx).prod_obj_version_number);
432 indx := indx+1;
433 if t.last =ddindx
434 then exit;
435 end if;
436 ddindx := t.next(ddindx);
437 end loop;
438 end if;
439 end if;
440 end rosetta_table_copy_out_p7;
441
442 procedure create_adj_new_line(p_api_version_number NUMBER
443 , p_init_msg_list VARCHAR2
444 , p_commit VARCHAR2
445 , p_validation_level NUMBER
446 , x_return_status out nocopy VARCHAR2
447 , x_msg_count out nocopy NUMBER
448 , x_msg_data out nocopy VARCHAR2
449 , p7_a0 NUMBER := 0-1962.0724
450 , p7_a1 NUMBER := 0-1962.0724
451 , p7_a2 NUMBER := 0-1962.0724
452 , p7_a3 NUMBER := 0-1962.0724
453 , p7_a4 VARCHAR2 := fnd_api.g_miss_char
454 , p7_a5 NUMBER := 0-1962.0724
455 , p7_a6 VARCHAR2 := fnd_api.g_miss_char
456 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
457 , p7_a8 NUMBER := 0-1962.0724
458 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
459 , p7_a10 NUMBER := 0-1962.0724
460 , p7_a11 NUMBER := 0-1962.0724
461 , p7_a12 NUMBER := 0-1962.0724
462 , p7_a13 DATE := fnd_api.g_miss_date
463 , p7_a14 DATE := fnd_api.g_miss_date
464 , p7_a15 DATE := fnd_api.g_miss_date
465 , p7_a16 NUMBER := 0-1962.0724
466 , p7_a17 DATE := fnd_api.g_miss_date
467 , p7_a18 NUMBER := 0-1962.0724
468 , p7_a19 NUMBER := 0-1962.0724
469 , p7_a20 NUMBER := 0-1962.0724
470 , x_offer_adj_new_line_id out nocopy NUMBER
471 )
472
473 as
474 ddp_adj_new_line_rec ozf_adj_new_line_pvt.adj_new_line_rec_type;
475 ddindx binary_integer; indx binary_integer;
476 begin
477
478 -- copy data to the local IN or IN-OUT args, if any
479
480
481
482
483
484
485
486 ddp_adj_new_line_rec.offer_adj_new_line_id := rosetta_g_miss_num_map(p7_a0);
487 ddp_adj_new_line_rec.offer_adjustment_id := rosetta_g_miss_num_map(p7_a1);
488 ddp_adj_new_line_rec.volume_from := rosetta_g_miss_num_map(p7_a2);
489 ddp_adj_new_line_rec.volume_to := rosetta_g_miss_num_map(p7_a3);
490 ddp_adj_new_line_rec.volume_type := p7_a4;
491 ddp_adj_new_line_rec.discount := rosetta_g_miss_num_map(p7_a5);
492 ddp_adj_new_line_rec.discount_type := p7_a6;
493 ddp_adj_new_line_rec.tier_type := p7_a7;
494 ddp_adj_new_line_rec.td_discount := rosetta_g_miss_num_map(p7_a8);
495 ddp_adj_new_line_rec.td_discount_type := p7_a9;
496 ddp_adj_new_line_rec.quantity := rosetta_g_miss_num_map(p7_a10);
497 ddp_adj_new_line_rec.benefit_price_list_line_id := rosetta_g_miss_num_map(p7_a11);
498 ddp_adj_new_line_rec.parent_adj_line_id := rosetta_g_miss_num_map(p7_a12);
499 ddp_adj_new_line_rec.start_date_active := rosetta_g_miss_date_in_map(p7_a13);
500 ddp_adj_new_line_rec.end_date_active := rosetta_g_miss_date_in_map(p7_a14);
501 ddp_adj_new_line_rec.creation_date := rosetta_g_miss_date_in_map(p7_a15);
502 ddp_adj_new_line_rec.created_by := rosetta_g_miss_num_map(p7_a16);
503 ddp_adj_new_line_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a17);
504 ddp_adj_new_line_rec.last_updated_by := rosetta_g_miss_num_map(p7_a18);
505 ddp_adj_new_line_rec.last_update_login := rosetta_g_miss_num_map(p7_a19);
506 ddp_adj_new_line_rec.object_version_number := rosetta_g_miss_num_map(p7_a20);
507
508
509 -- here's the delegated call to the old PL/SQL routine
510 ozf_adj_new_line_pvt.create_adj_new_line(p_api_version_number,
511 p_init_msg_list,
512 p_commit,
513 p_validation_level,
514 x_return_status,
515 x_msg_count,
516 x_msg_data,
517 ddp_adj_new_line_rec,
518 x_offer_adj_new_line_id);
519
520 -- copy data back from the local variables to OUT or IN-OUT args, if any
521
522
523
524
525
526
527
528
529 end;
530
531 procedure update_adj_new_line(p_api_version_number NUMBER
532 , p_init_msg_list VARCHAR2
533 , p_commit VARCHAR2
534 , p_validation_level NUMBER
535 , x_return_status out nocopy VARCHAR2
536 , x_msg_count out nocopy NUMBER
537 , x_msg_data out nocopy VARCHAR2
538 , p7_a0 NUMBER := 0-1962.0724
539 , p7_a1 NUMBER := 0-1962.0724
540 , p7_a2 NUMBER := 0-1962.0724
541 , p7_a3 NUMBER := 0-1962.0724
542 , p7_a4 VARCHAR2 := fnd_api.g_miss_char
543 , p7_a5 NUMBER := 0-1962.0724
544 , p7_a6 VARCHAR2 := fnd_api.g_miss_char
545 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
546 , p7_a8 NUMBER := 0-1962.0724
547 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
548 , p7_a10 NUMBER := 0-1962.0724
549 , p7_a11 NUMBER := 0-1962.0724
550 , p7_a12 NUMBER := 0-1962.0724
551 , p7_a13 DATE := fnd_api.g_miss_date
552 , p7_a14 DATE := fnd_api.g_miss_date
553 , p7_a15 DATE := fnd_api.g_miss_date
554 , p7_a16 NUMBER := 0-1962.0724
555 , p7_a17 DATE := fnd_api.g_miss_date
556 , p7_a18 NUMBER := 0-1962.0724
557 , p7_a19 NUMBER := 0-1962.0724
558 , p7_a20 NUMBER := 0-1962.0724
559 , x_object_version_number out nocopy NUMBER
560 )
561
562 as
563 ddp_adj_new_line_rec ozf_adj_new_line_pvt.adj_new_line_rec_type;
564 ddindx binary_integer; indx binary_integer;
565 begin
566
567 -- copy data to the local IN or IN-OUT args, if any
568
569
570
571
572
573
574
575 ddp_adj_new_line_rec.offer_adj_new_line_id := rosetta_g_miss_num_map(p7_a0);
576 ddp_adj_new_line_rec.offer_adjustment_id := rosetta_g_miss_num_map(p7_a1);
577 ddp_adj_new_line_rec.volume_from := rosetta_g_miss_num_map(p7_a2);
578 ddp_adj_new_line_rec.volume_to := rosetta_g_miss_num_map(p7_a3);
579 ddp_adj_new_line_rec.volume_type := p7_a4;
580 ddp_adj_new_line_rec.discount := rosetta_g_miss_num_map(p7_a5);
581 ddp_adj_new_line_rec.discount_type := p7_a6;
582 ddp_adj_new_line_rec.tier_type := p7_a7;
583 ddp_adj_new_line_rec.td_discount := rosetta_g_miss_num_map(p7_a8);
584 ddp_adj_new_line_rec.td_discount_type := p7_a9;
585 ddp_adj_new_line_rec.quantity := rosetta_g_miss_num_map(p7_a10);
586 ddp_adj_new_line_rec.benefit_price_list_line_id := rosetta_g_miss_num_map(p7_a11);
587 ddp_adj_new_line_rec.parent_adj_line_id := rosetta_g_miss_num_map(p7_a12);
588 ddp_adj_new_line_rec.start_date_active := rosetta_g_miss_date_in_map(p7_a13);
589 ddp_adj_new_line_rec.end_date_active := rosetta_g_miss_date_in_map(p7_a14);
590 ddp_adj_new_line_rec.creation_date := rosetta_g_miss_date_in_map(p7_a15);
591 ddp_adj_new_line_rec.created_by := rosetta_g_miss_num_map(p7_a16);
592 ddp_adj_new_line_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a17);
593 ddp_adj_new_line_rec.last_updated_by := rosetta_g_miss_num_map(p7_a18);
594 ddp_adj_new_line_rec.last_update_login := rosetta_g_miss_num_map(p7_a19);
595 ddp_adj_new_line_rec.object_version_number := rosetta_g_miss_num_map(p7_a20);
596
597
598 -- here's the delegated call to the old PL/SQL routine
599 ozf_adj_new_line_pvt.update_adj_new_line(p_api_version_number,
600 p_init_msg_list,
601 p_commit,
602 p_validation_level,
603 x_return_status,
604 x_msg_count,
605 x_msg_data,
606 ddp_adj_new_line_rec,
607 x_object_version_number);
608
609 -- copy data back from the local variables to OUT or IN-OUT args, if any
610
611
612
613
614
615
616
617
618 end;
619
620 procedure validate_adj_new_line(p_api_version_number NUMBER
621 , p_init_msg_list VARCHAR2
622 , p_validation_level NUMBER
623 , p_validation_mode VARCHAR2
624 , x_return_status out nocopy VARCHAR2
625 , x_msg_count out nocopy NUMBER
626 , x_msg_data out nocopy VARCHAR2
627 , p4_a0 NUMBER := 0-1962.0724
628 , p4_a1 NUMBER := 0-1962.0724
629 , p4_a2 NUMBER := 0-1962.0724
630 , p4_a3 NUMBER := 0-1962.0724
631 , p4_a4 VARCHAR2 := fnd_api.g_miss_char
632 , p4_a5 NUMBER := 0-1962.0724
633 , p4_a6 VARCHAR2 := fnd_api.g_miss_char
634 , p4_a7 VARCHAR2 := fnd_api.g_miss_char
635 , p4_a8 NUMBER := 0-1962.0724
636 , p4_a9 VARCHAR2 := fnd_api.g_miss_char
637 , p4_a10 NUMBER := 0-1962.0724
638 , p4_a11 NUMBER := 0-1962.0724
639 , p4_a12 NUMBER := 0-1962.0724
640 , p4_a13 DATE := fnd_api.g_miss_date
641 , p4_a14 DATE := fnd_api.g_miss_date
642 , p4_a15 DATE := fnd_api.g_miss_date
643 , p4_a16 NUMBER := 0-1962.0724
644 , p4_a17 DATE := fnd_api.g_miss_date
645 , p4_a18 NUMBER := 0-1962.0724
646 , p4_a19 NUMBER := 0-1962.0724
647 , p4_a20 NUMBER := 0-1962.0724
648 )
649
650 as
651 ddp_adj_new_line_rec ozf_adj_new_line_pvt.adj_new_line_rec_type;
652 ddindx binary_integer; indx binary_integer;
653 begin
654
655 -- copy data to the local IN or IN-OUT args, if any
656
657
658
659
660 ddp_adj_new_line_rec.offer_adj_new_line_id := rosetta_g_miss_num_map(p4_a0);
661 ddp_adj_new_line_rec.offer_adjustment_id := rosetta_g_miss_num_map(p4_a1);
662 ddp_adj_new_line_rec.volume_from := rosetta_g_miss_num_map(p4_a2);
663 ddp_adj_new_line_rec.volume_to := rosetta_g_miss_num_map(p4_a3);
664 ddp_adj_new_line_rec.volume_type := p4_a4;
665 ddp_adj_new_line_rec.discount := rosetta_g_miss_num_map(p4_a5);
666 ddp_adj_new_line_rec.discount_type := p4_a6;
667 ddp_adj_new_line_rec.tier_type := p4_a7;
668 ddp_adj_new_line_rec.td_discount := rosetta_g_miss_num_map(p4_a8);
669 ddp_adj_new_line_rec.td_discount_type := p4_a9;
670 ddp_adj_new_line_rec.quantity := rosetta_g_miss_num_map(p4_a10);
671 ddp_adj_new_line_rec.benefit_price_list_line_id := rosetta_g_miss_num_map(p4_a11);
672 ddp_adj_new_line_rec.parent_adj_line_id := rosetta_g_miss_num_map(p4_a12);
673 ddp_adj_new_line_rec.start_date_active := rosetta_g_miss_date_in_map(p4_a13);
674 ddp_adj_new_line_rec.end_date_active := rosetta_g_miss_date_in_map(p4_a14);
675 ddp_adj_new_line_rec.creation_date := rosetta_g_miss_date_in_map(p4_a15);
676 ddp_adj_new_line_rec.created_by := rosetta_g_miss_num_map(p4_a16);
677 ddp_adj_new_line_rec.last_update_date := rosetta_g_miss_date_in_map(p4_a17);
678 ddp_adj_new_line_rec.last_updated_by := rosetta_g_miss_num_map(p4_a18);
679 ddp_adj_new_line_rec.last_update_login := rosetta_g_miss_num_map(p4_a19);
680 ddp_adj_new_line_rec.object_version_number := rosetta_g_miss_num_map(p4_a20);
681
682
683
684
685 -- here's the delegated call to the old PL/SQL routine
686 ozf_adj_new_line_pvt.validate_adj_new_line(p_api_version_number,
687 p_init_msg_list,
688 p_validation_level,
689 p_validation_mode,
690 ddp_adj_new_line_rec,
691 x_return_status,
692 x_msg_count,
693 x_msg_data);
694
695 -- copy data back from the local variables to OUT or IN-OUT args, if any
696
697
698
699
700
701
702
703 end;
704
705 procedure check_adj_new_line_items(p_validation_mode VARCHAR2
706 , x_return_status out nocopy VARCHAR2
707 , p0_a0 NUMBER := 0-1962.0724
708 , p0_a1 NUMBER := 0-1962.0724
709 , p0_a2 NUMBER := 0-1962.0724
710 , p0_a3 NUMBER := 0-1962.0724
711 , p0_a4 VARCHAR2 := fnd_api.g_miss_char
712 , p0_a5 NUMBER := 0-1962.0724
713 , p0_a6 VARCHAR2 := fnd_api.g_miss_char
714 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
715 , p0_a8 NUMBER := 0-1962.0724
716 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
717 , p0_a10 NUMBER := 0-1962.0724
718 , p0_a11 NUMBER := 0-1962.0724
719 , p0_a12 NUMBER := 0-1962.0724
720 , p0_a13 DATE := fnd_api.g_miss_date
721 , p0_a14 DATE := fnd_api.g_miss_date
722 , p0_a15 DATE := fnd_api.g_miss_date
723 , p0_a16 NUMBER := 0-1962.0724
724 , p0_a17 DATE := fnd_api.g_miss_date
725 , p0_a18 NUMBER := 0-1962.0724
726 , p0_a19 NUMBER := 0-1962.0724
727 , p0_a20 NUMBER := 0-1962.0724
728 )
729
730 as
731 ddp_adj_new_line_rec ozf_adj_new_line_pvt.adj_new_line_rec_type;
732 ddindx binary_integer; indx binary_integer;
733 begin
734
735 -- copy data to the local IN or IN-OUT args, if any
736 ddp_adj_new_line_rec.offer_adj_new_line_id := rosetta_g_miss_num_map(p0_a0);
737 ddp_adj_new_line_rec.offer_adjustment_id := rosetta_g_miss_num_map(p0_a1);
738 ddp_adj_new_line_rec.volume_from := rosetta_g_miss_num_map(p0_a2);
739 ddp_adj_new_line_rec.volume_to := rosetta_g_miss_num_map(p0_a3);
740 ddp_adj_new_line_rec.volume_type := p0_a4;
741 ddp_adj_new_line_rec.discount := rosetta_g_miss_num_map(p0_a5);
742 ddp_adj_new_line_rec.discount_type := p0_a6;
743 ddp_adj_new_line_rec.tier_type := p0_a7;
744 ddp_adj_new_line_rec.td_discount := rosetta_g_miss_num_map(p0_a8);
745 ddp_adj_new_line_rec.td_discount_type := p0_a9;
746 ddp_adj_new_line_rec.quantity := rosetta_g_miss_num_map(p0_a10);
747 ddp_adj_new_line_rec.benefit_price_list_line_id := rosetta_g_miss_num_map(p0_a11);
748 ddp_adj_new_line_rec.parent_adj_line_id := rosetta_g_miss_num_map(p0_a12);
749 ddp_adj_new_line_rec.start_date_active := rosetta_g_miss_date_in_map(p0_a13);
750 ddp_adj_new_line_rec.end_date_active := rosetta_g_miss_date_in_map(p0_a14);
751 ddp_adj_new_line_rec.creation_date := rosetta_g_miss_date_in_map(p0_a15);
752 ddp_adj_new_line_rec.created_by := rosetta_g_miss_num_map(p0_a16);
753 ddp_adj_new_line_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a17);
754 ddp_adj_new_line_rec.last_updated_by := rosetta_g_miss_num_map(p0_a18);
755 ddp_adj_new_line_rec.last_update_login := rosetta_g_miss_num_map(p0_a19);
756 ddp_adj_new_line_rec.object_version_number := rosetta_g_miss_num_map(p0_a20);
757
758
759
760 -- here's the delegated call to the old PL/SQL routine
761 ozf_adj_new_line_pvt.check_adj_new_line_items(ddp_adj_new_line_rec,
762 p_validation_mode,
763 x_return_status);
764
765 -- copy data back from the local variables to OUT or IN-OUT args, if any
766
767
768 end;
769
770 procedure validate_adj_new_line_rec(p_api_version_number NUMBER
771 , p_init_msg_list VARCHAR2
772 , x_return_status out nocopy VARCHAR2
773 , x_msg_count out nocopy NUMBER
774 , x_msg_data out nocopy VARCHAR2
775 , p5_a0 NUMBER := 0-1962.0724
776 , p5_a1 NUMBER := 0-1962.0724
777 , p5_a2 NUMBER := 0-1962.0724
778 , p5_a3 NUMBER := 0-1962.0724
779 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
780 , p5_a5 NUMBER := 0-1962.0724
781 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
782 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
783 , p5_a8 NUMBER := 0-1962.0724
784 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
785 , p5_a10 NUMBER := 0-1962.0724
786 , p5_a11 NUMBER := 0-1962.0724
787 , p5_a12 NUMBER := 0-1962.0724
788 , p5_a13 DATE := fnd_api.g_miss_date
789 , p5_a14 DATE := fnd_api.g_miss_date
790 , p5_a15 DATE := fnd_api.g_miss_date
791 , p5_a16 NUMBER := 0-1962.0724
792 , p5_a17 DATE := fnd_api.g_miss_date
793 , p5_a18 NUMBER := 0-1962.0724
794 , p5_a19 NUMBER := 0-1962.0724
795 , p5_a20 NUMBER := 0-1962.0724
796 )
797
798 as
799 ddp_adj_new_line_rec ozf_adj_new_line_pvt.adj_new_line_rec_type;
800 ddindx binary_integer; indx binary_integer;
801 begin
802
803 -- copy data to the local IN or IN-OUT args, if any
804
805
806
807
808
809 ddp_adj_new_line_rec.offer_adj_new_line_id := rosetta_g_miss_num_map(p5_a0);
810 ddp_adj_new_line_rec.offer_adjustment_id := rosetta_g_miss_num_map(p5_a1);
811 ddp_adj_new_line_rec.volume_from := rosetta_g_miss_num_map(p5_a2);
812 ddp_adj_new_line_rec.volume_to := rosetta_g_miss_num_map(p5_a3);
813 ddp_adj_new_line_rec.volume_type := p5_a4;
814 ddp_adj_new_line_rec.discount := rosetta_g_miss_num_map(p5_a5);
815 ddp_adj_new_line_rec.discount_type := p5_a6;
816 ddp_adj_new_line_rec.tier_type := p5_a7;
817 ddp_adj_new_line_rec.td_discount := rosetta_g_miss_num_map(p5_a8);
818 ddp_adj_new_line_rec.td_discount_type := p5_a9;
819 ddp_adj_new_line_rec.quantity := rosetta_g_miss_num_map(p5_a10);
820 ddp_adj_new_line_rec.benefit_price_list_line_id := rosetta_g_miss_num_map(p5_a11);
821 ddp_adj_new_line_rec.parent_adj_line_id := rosetta_g_miss_num_map(p5_a12);
822 ddp_adj_new_line_rec.start_date_active := rosetta_g_miss_date_in_map(p5_a13);
823 ddp_adj_new_line_rec.end_date_active := rosetta_g_miss_date_in_map(p5_a14);
824 ddp_adj_new_line_rec.creation_date := rosetta_g_miss_date_in_map(p5_a15);
825 ddp_adj_new_line_rec.created_by := rosetta_g_miss_num_map(p5_a16);
826 ddp_adj_new_line_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a17);
827 ddp_adj_new_line_rec.last_updated_by := rosetta_g_miss_num_map(p5_a18);
828 ddp_adj_new_line_rec.last_update_login := rosetta_g_miss_num_map(p5_a19);
829 ddp_adj_new_line_rec.object_version_number := rosetta_g_miss_num_map(p5_a20);
830
831 -- here's the delegated call to the old PL/SQL routine
832 ozf_adj_new_line_pvt.validate_adj_new_line_rec(p_api_version_number,
833 p_init_msg_list,
834 x_return_status,
835 x_msg_count,
836 x_msg_data,
837 ddp_adj_new_line_rec);
838
839 -- copy data back from the local variables to OUT or IN-OUT args, if any
840
841
842
843
844
845 end;
846
847 procedure create_adj_new_disc(p_api_version_number NUMBER
848 , p_init_msg_list VARCHAR2
849 , p_commit VARCHAR2
850 , p_validation_level NUMBER
851 , x_return_status out nocopy VARCHAR2
852 , x_msg_count out nocopy NUMBER
853 , x_msg_data out nocopy VARCHAR2
854 , p7_a0 NUMBER := 0-1962.0724
855 , p7_a1 NUMBER := 0-1962.0724
856 , p7_a2 NUMBER := 0-1962.0724
857 , p7_a3 NUMBER := 0-1962.0724
858 , p7_a4 VARCHAR2 := fnd_api.g_miss_char
859 , p7_a5 NUMBER := 0-1962.0724
860 , p7_a6 VARCHAR2 := fnd_api.g_miss_char
861 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
862 , p7_a8 NUMBER := 0-1962.0724
863 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
864 , p7_a10 NUMBER := 0-1962.0724
865 , p7_a11 NUMBER := 0-1962.0724
866 , p7_a12 NUMBER := 0-1962.0724
867 , p7_a13 NUMBER := 0-1962.0724
868 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
869 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
870 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
871 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
872 , p7_a18 VARCHAR2 := fnd_api.g_miss_char
873 , p7_a19 DATE := fnd_api.g_miss_date
874 , p7_a20 DATE := fnd_api.g_miss_date
875 , p7_a21 DATE := fnd_api.g_miss_date
876 , p7_a22 NUMBER := 0-1962.0724
877 , p7_a23 DATE := fnd_api.g_miss_date
878 , p7_a24 NUMBER := 0-1962.0724
879 , p7_a25 NUMBER := 0-1962.0724
880 , p7_a26 NUMBER := 0-1962.0724
881 , p7_a27 NUMBER := 0-1962.0724
882 , x_offer_adj_new_line_id out nocopy NUMBER
883 )
884
885 as
886 ddp_adj_new_disc_rec ozf_adj_new_line_pvt.adj_new_disc_rec_type;
887 ddindx binary_integer; indx binary_integer;
888 begin
889
890 -- copy data to the local IN or IN-OUT args, if any
891
892
893
894
895
896
897
898 ddp_adj_new_disc_rec.offer_adj_new_line_id := rosetta_g_miss_num_map(p7_a0);
899 ddp_adj_new_disc_rec.offer_adjustment_id := rosetta_g_miss_num_map(p7_a1);
900 ddp_adj_new_disc_rec.volume_from := rosetta_g_miss_num_map(p7_a2);
901 ddp_adj_new_disc_rec.volume_to := rosetta_g_miss_num_map(p7_a3);
902 ddp_adj_new_disc_rec.volume_type := p7_a4;
903 ddp_adj_new_disc_rec.discount := rosetta_g_miss_num_map(p7_a5);
904 ddp_adj_new_disc_rec.discount_type := p7_a6;
905 ddp_adj_new_disc_rec.tier_type := p7_a7;
906 ddp_adj_new_disc_rec.td_discount := rosetta_g_miss_num_map(p7_a8);
907 ddp_adj_new_disc_rec.td_discount_type := p7_a9;
908 ddp_adj_new_disc_rec.quantity := rosetta_g_miss_num_map(p7_a10);
909 ddp_adj_new_disc_rec.benefit_price_list_line_id := rosetta_g_miss_num_map(p7_a11);
910 ddp_adj_new_disc_rec.parent_adj_line_id := rosetta_g_miss_num_map(p7_a12);
911 ddp_adj_new_disc_rec.offer_adj_new_product_id := rosetta_g_miss_num_map(p7_a13);
912 ddp_adj_new_disc_rec.product_context := p7_a14;
913 ddp_adj_new_disc_rec.product_attribute := p7_a15;
914 ddp_adj_new_disc_rec.product_attr_value := p7_a16;
915 ddp_adj_new_disc_rec.excluder_flag := p7_a17;
916 ddp_adj_new_disc_rec.uom_code := p7_a18;
917 ddp_adj_new_disc_rec.start_date_active := rosetta_g_miss_date_in_map(p7_a19);
918 ddp_adj_new_disc_rec.end_date_active := rosetta_g_miss_date_in_map(p7_a20);
919 ddp_adj_new_disc_rec.creation_date := rosetta_g_miss_date_in_map(p7_a21);
920 ddp_adj_new_disc_rec.created_by := rosetta_g_miss_num_map(p7_a22);
921 ddp_adj_new_disc_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a23);
922 ddp_adj_new_disc_rec.last_updated_by := rosetta_g_miss_num_map(p7_a24);
923 ddp_adj_new_disc_rec.last_update_login := rosetta_g_miss_num_map(p7_a25);
924 ddp_adj_new_disc_rec.object_version_number := rosetta_g_miss_num_map(p7_a26);
925 ddp_adj_new_disc_rec.prod_obj_version_number := rosetta_g_miss_num_map(p7_a27);
926
927
928 -- here's the delegated call to the old PL/SQL routine
929 ozf_adj_new_line_pvt.create_adj_new_disc(p_api_version_number,
930 p_init_msg_list,
931 p_commit,
932 p_validation_level,
933 x_return_status,
934 x_msg_count,
935 x_msg_data,
936 ddp_adj_new_disc_rec,
937 x_offer_adj_new_line_id);
938
939 -- copy data back from the local variables to OUT or IN-OUT args, if any
940
941
942
943
944
945
946
947
948 end;
949
950 procedure update_adj_new_disc(p_api_version_number NUMBER
951 , p_init_msg_list VARCHAR2
952 , p_commit VARCHAR2
953 , p_validation_level NUMBER
954 , x_return_status out nocopy VARCHAR2
955 , x_msg_count out nocopy NUMBER
956 , x_msg_data out nocopy VARCHAR2
957 , p7_a0 NUMBER := 0-1962.0724
958 , p7_a1 NUMBER := 0-1962.0724
959 , p7_a2 NUMBER := 0-1962.0724
960 , p7_a3 NUMBER := 0-1962.0724
961 , p7_a4 VARCHAR2 := fnd_api.g_miss_char
962 , p7_a5 NUMBER := 0-1962.0724
963 , p7_a6 VARCHAR2 := fnd_api.g_miss_char
964 , p7_a7 VARCHAR2 := fnd_api.g_miss_char
965 , p7_a8 NUMBER := 0-1962.0724
966 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
967 , p7_a10 NUMBER := 0-1962.0724
968 , p7_a11 NUMBER := 0-1962.0724
969 , p7_a12 NUMBER := 0-1962.0724
970 , p7_a13 NUMBER := 0-1962.0724
971 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
972 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
973 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
974 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
975 , p7_a18 VARCHAR2 := fnd_api.g_miss_char
976 , p7_a19 DATE := fnd_api.g_miss_date
977 , p7_a20 DATE := fnd_api.g_miss_date
978 , p7_a21 DATE := fnd_api.g_miss_date
979 , p7_a22 NUMBER := 0-1962.0724
980 , p7_a23 DATE := fnd_api.g_miss_date
981 , p7_a24 NUMBER := 0-1962.0724
982 , p7_a25 NUMBER := 0-1962.0724
983 , p7_a26 NUMBER := 0-1962.0724
984 , p7_a27 NUMBER := 0-1962.0724
985 , x_object_version_number out nocopy NUMBER
986 )
987
988 as
989 ddp_adj_new_disc_rec ozf_adj_new_line_pvt.adj_new_disc_rec_type;
990 ddindx binary_integer; indx binary_integer;
991 begin
992
993 -- copy data to the local IN or IN-OUT args, if any
994
995
996
997
998
999
1000
1001 ddp_adj_new_disc_rec.offer_adj_new_line_id := rosetta_g_miss_num_map(p7_a0);
1002 ddp_adj_new_disc_rec.offer_adjustment_id := rosetta_g_miss_num_map(p7_a1);
1003 ddp_adj_new_disc_rec.volume_from := rosetta_g_miss_num_map(p7_a2);
1004 ddp_adj_new_disc_rec.volume_to := rosetta_g_miss_num_map(p7_a3);
1005 ddp_adj_new_disc_rec.volume_type := p7_a4;
1006 ddp_adj_new_disc_rec.discount := rosetta_g_miss_num_map(p7_a5);
1007 ddp_adj_new_disc_rec.discount_type := p7_a6;
1008 ddp_adj_new_disc_rec.tier_type := p7_a7;
1009 ddp_adj_new_disc_rec.td_discount := rosetta_g_miss_num_map(p7_a8);
1010 ddp_adj_new_disc_rec.td_discount_type := p7_a9;
1011 ddp_adj_new_disc_rec.quantity := rosetta_g_miss_num_map(p7_a10);
1012 ddp_adj_new_disc_rec.benefit_price_list_line_id := rosetta_g_miss_num_map(p7_a11);
1013 ddp_adj_new_disc_rec.parent_adj_line_id := rosetta_g_miss_num_map(p7_a12);
1014 ddp_adj_new_disc_rec.offer_adj_new_product_id := rosetta_g_miss_num_map(p7_a13);
1015 ddp_adj_new_disc_rec.product_context := p7_a14;
1016 ddp_adj_new_disc_rec.product_attribute := p7_a15;
1017 ddp_adj_new_disc_rec.product_attr_value := p7_a16;
1018 ddp_adj_new_disc_rec.excluder_flag := p7_a17;
1019 ddp_adj_new_disc_rec.uom_code := p7_a18;
1020 ddp_adj_new_disc_rec.start_date_active := rosetta_g_miss_date_in_map(p7_a19);
1021 ddp_adj_new_disc_rec.end_date_active := rosetta_g_miss_date_in_map(p7_a20);
1022 ddp_adj_new_disc_rec.creation_date := rosetta_g_miss_date_in_map(p7_a21);
1023 ddp_adj_new_disc_rec.created_by := rosetta_g_miss_num_map(p7_a22);
1024 ddp_adj_new_disc_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a23);
1025 ddp_adj_new_disc_rec.last_updated_by := rosetta_g_miss_num_map(p7_a24);
1026 ddp_adj_new_disc_rec.last_update_login := rosetta_g_miss_num_map(p7_a25);
1027 ddp_adj_new_disc_rec.object_version_number := rosetta_g_miss_num_map(p7_a26);
1028 ddp_adj_new_disc_rec.prod_obj_version_number := rosetta_g_miss_num_map(p7_a27);
1029
1030
1031 -- here's the delegated call to the old PL/SQL routine
1032 ozf_adj_new_line_pvt.update_adj_new_disc(p_api_version_number,
1033 p_init_msg_list,
1034 p_commit,
1035 p_validation_level,
1036 x_return_status,
1037 x_msg_count,
1038 x_msg_data,
1039 ddp_adj_new_disc_rec,
1040 x_object_version_number);
1041
1042 -- copy data back from the local variables to OUT or IN-OUT args, if any
1043
1044
1045
1046
1047
1048
1049
1050
1051 end;
1052
1053 end ozf_adj_new_line_pvt_w;