DBA Data[Home] [Help]

PACKAGE BODY: APPS.OZF_OFFER_ADJ_TIER_PVT_W

Source


1 package body ozf_offer_adj_tier_pvt_w as
2   /* $Header: ozfwoatb.pls 120.2 2005/09/20 17:35 rssharma ship $ */
3   rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4   rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5 
6   -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7   function rosetta_g_miss_date_in_map(d date) return date as
8   begin
9     if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10     return d;
11   end;
12 
13   function rosetta_g_miss_num_map(n number) return number as
14     a number := fnd_api.g_miss_num;
15     b number := 0-1962.0724;
16   begin
17     if n=a then return b; end if;
18     if n=b then return a; end if;
19     return n;
20   end;
21 
22   procedure rosetta_table_copy_in_p2(t out nocopy ozf_offer_adj_tier_pvt.offadj_tier_tbl_type, a0 JTF_NUMBER_TABLE
23     , a1 JTF_NUMBER_TABLE
24     , a2 JTF_NUMBER_TABLE
25     , a3 JTF_NUMBER_TABLE
26     , a4 JTF_VARCHAR2_TABLE_100
27     , a5 JTF_NUMBER_TABLE
28     , a6 JTF_NUMBER_TABLE
29     , a7 JTF_NUMBER_TABLE
30     , a8 JTF_DATE_TABLE
31     , a9 JTF_NUMBER_TABLE
32     , a10 JTF_DATE_TABLE
33     , a11 JTF_NUMBER_TABLE
34     , a12 JTF_NUMBER_TABLE
35     , a13 JTF_NUMBER_TABLE
36     ) as
37     ddindx binary_integer; indx binary_integer;
38   begin
39   if a0 is not null and a0.count > 0 then
40       if a0.count > 0 then
41         indx := a0.first;
42         ddindx := 1;
43         while true loop
44           t(ddindx).offer_adjst_tier_id := rosetta_g_miss_num_map(a0(indx));
45           t(ddindx).offer_adjustment_id := rosetta_g_miss_num_map(a1(indx));
46           t(ddindx).volume_offer_tiers_id := rosetta_g_miss_num_map(a2(indx));
47           t(ddindx).qp_list_header_id := rosetta_g_miss_num_map(a3(indx));
48           t(ddindx).discount_type_code := a4(indx);
49           t(ddindx).original_discount := rosetta_g_miss_num_map(a5(indx));
50           t(ddindx).modified_discount := rosetta_g_miss_num_map(a6(indx));
51           t(ddindx).offer_discount_line_id := rosetta_g_miss_num_map(a7(indx));
52           t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a8(indx));
53           t(ddindx).last_updated_by := rosetta_g_miss_num_map(a9(indx));
54           t(ddindx).creation_date := rosetta_g_miss_date_in_map(a10(indx));
55           t(ddindx).created_by := rosetta_g_miss_num_map(a11(indx));
56           t(ddindx).last_update_login := rosetta_g_miss_num_map(a12(indx));
57           t(ddindx).object_version_number := rosetta_g_miss_num_map(a13(indx));
58           ddindx := ddindx+1;
59           if a0.last =indx
60             then exit;
61           end if;
62           indx := a0.next(indx);
63         end loop;
64       end if;
65    end if;
66   end rosetta_table_copy_in_p2;
67   procedure rosetta_table_copy_out_p2(t ozf_offer_adj_tier_pvt.offadj_tier_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
68     , a1 out nocopy JTF_NUMBER_TABLE
69     , a2 out nocopy JTF_NUMBER_TABLE
70     , a3 out nocopy JTF_NUMBER_TABLE
71     , a4 out nocopy JTF_VARCHAR2_TABLE_100
72     , a5 out nocopy JTF_NUMBER_TABLE
73     , a6 out nocopy JTF_NUMBER_TABLE
74     , a7 out nocopy JTF_NUMBER_TABLE
75     , a8 out nocopy JTF_DATE_TABLE
76     , a9 out nocopy JTF_NUMBER_TABLE
77     , a10 out nocopy JTF_DATE_TABLE
78     , a11 out nocopy JTF_NUMBER_TABLE
79     , a12 out nocopy JTF_NUMBER_TABLE
80     , a13 out nocopy JTF_NUMBER_TABLE
81     ) as
82     ddindx binary_integer; indx binary_integer;
83   begin
84   if t is null or t.count = 0 then
85     a0 := JTF_NUMBER_TABLE();
86     a1 := JTF_NUMBER_TABLE();
87     a2 := JTF_NUMBER_TABLE();
88     a3 := JTF_NUMBER_TABLE();
89     a4 := JTF_VARCHAR2_TABLE_100();
90     a5 := JTF_NUMBER_TABLE();
91     a6 := JTF_NUMBER_TABLE();
92     a7 := JTF_NUMBER_TABLE();
93     a8 := JTF_DATE_TABLE();
94     a9 := JTF_NUMBER_TABLE();
95     a10 := JTF_DATE_TABLE();
96     a11 := JTF_NUMBER_TABLE();
97     a12 := JTF_NUMBER_TABLE();
98     a13 := JTF_NUMBER_TABLE();
99   else
100       a0 := JTF_NUMBER_TABLE();
101       a1 := JTF_NUMBER_TABLE();
102       a2 := JTF_NUMBER_TABLE();
103       a3 := JTF_NUMBER_TABLE();
104       a4 := JTF_VARCHAR2_TABLE_100();
105       a5 := JTF_NUMBER_TABLE();
106       a6 := JTF_NUMBER_TABLE();
107       a7 := JTF_NUMBER_TABLE();
108       a8 := JTF_DATE_TABLE();
109       a9 := JTF_NUMBER_TABLE();
110       a10 := JTF_DATE_TABLE();
111       a11 := JTF_NUMBER_TABLE();
112       a12 := JTF_NUMBER_TABLE();
113       a13 := JTF_NUMBER_TABLE();
114       if t.count > 0 then
115         a0.extend(t.count);
116         a1.extend(t.count);
117         a2.extend(t.count);
118         a3.extend(t.count);
119         a4.extend(t.count);
120         a5.extend(t.count);
121         a6.extend(t.count);
122         a7.extend(t.count);
123         a8.extend(t.count);
124         a9.extend(t.count);
125         a10.extend(t.count);
126         a11.extend(t.count);
127         a12.extend(t.count);
128         a13.extend(t.count);
129         ddindx := t.first;
130         indx := 1;
131         while true loop
132           a0(indx) := rosetta_g_miss_num_map(t(ddindx).offer_adjst_tier_id);
133           a1(indx) := rosetta_g_miss_num_map(t(ddindx).offer_adjustment_id);
134           a2(indx) := rosetta_g_miss_num_map(t(ddindx).volume_offer_tiers_id);
135           a3(indx) := rosetta_g_miss_num_map(t(ddindx).qp_list_header_id);
136           a4(indx) := t(ddindx).discount_type_code;
137           a5(indx) := rosetta_g_miss_num_map(t(ddindx).original_discount);
138           a6(indx) := rosetta_g_miss_num_map(t(ddindx).modified_discount);
139           a7(indx) := rosetta_g_miss_num_map(t(ddindx).offer_discount_line_id);
140           a8(indx) := t(ddindx).last_update_date;
141           a9(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
142           a10(indx) := t(ddindx).creation_date;
143           a11(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
144           a12(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
145           a13(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
146           indx := indx+1;
147           if t.last =ddindx
148             then exit;
149           end if;
150           ddindx := t.next(ddindx);
151         end loop;
152       end if;
153    end if;
154   end rosetta_table_copy_out_p2;
155 
156   procedure create_offer_adj_tier(p_api_version_number  NUMBER
157     , p_init_msg_list  VARCHAR2
158     , p_commit  VARCHAR2
159     , p_validation_level  NUMBER
160     , x_return_status out nocopy  VARCHAR2
161     , x_msg_count out nocopy  NUMBER
162     , x_msg_data out nocopy  VARCHAR2
163     , x_offer_adjst_tier_id out nocopy  NUMBER
164     , p7_a0  NUMBER := 0-1962.0724
165     , p7_a1  NUMBER := 0-1962.0724
166     , p7_a2  NUMBER := 0-1962.0724
167     , p7_a3  NUMBER := 0-1962.0724
168     , p7_a4  VARCHAR2 := fnd_api.g_miss_char
169     , p7_a5  NUMBER := 0-1962.0724
170     , p7_a6  NUMBER := 0-1962.0724
171     , p7_a7  NUMBER := 0-1962.0724
172     , p7_a8  DATE := fnd_api.g_miss_date
173     , p7_a9  NUMBER := 0-1962.0724
174     , p7_a10  DATE := fnd_api.g_miss_date
175     , p7_a11  NUMBER := 0-1962.0724
176     , p7_a12  NUMBER := 0-1962.0724
177     , p7_a13  NUMBER := 0-1962.0724
178   )
179 
180   as
181     ddp_offadj_tier_rec ozf_offer_adj_tier_pvt.offadj_tier_rec_type;
182     ddindx binary_integer; indx binary_integer;
183   begin
184 
185     -- copy data to the local IN or IN-OUT args, if any
186 
187 
188 
189 
190 
191 
192 
193     ddp_offadj_tier_rec.offer_adjst_tier_id := rosetta_g_miss_num_map(p7_a0);
194     ddp_offadj_tier_rec.offer_adjustment_id := rosetta_g_miss_num_map(p7_a1);
195     ddp_offadj_tier_rec.volume_offer_tiers_id := rosetta_g_miss_num_map(p7_a2);
196     ddp_offadj_tier_rec.qp_list_header_id := rosetta_g_miss_num_map(p7_a3);
197     ddp_offadj_tier_rec.discount_type_code := p7_a4;
198     ddp_offadj_tier_rec.original_discount := rosetta_g_miss_num_map(p7_a5);
199     ddp_offadj_tier_rec.modified_discount := rosetta_g_miss_num_map(p7_a6);
200     ddp_offadj_tier_rec.offer_discount_line_id := rosetta_g_miss_num_map(p7_a7);
201     ddp_offadj_tier_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a8);
202     ddp_offadj_tier_rec.last_updated_by := rosetta_g_miss_num_map(p7_a9);
203     ddp_offadj_tier_rec.creation_date := rosetta_g_miss_date_in_map(p7_a10);
204     ddp_offadj_tier_rec.created_by := rosetta_g_miss_num_map(p7_a11);
205     ddp_offadj_tier_rec.last_update_login := rosetta_g_miss_num_map(p7_a12);
206     ddp_offadj_tier_rec.object_version_number := rosetta_g_miss_num_map(p7_a13);
207 
208 
209     -- here's the delegated call to the old PL/SQL routine
210     ozf_offer_adj_tier_pvt.create_offer_adj_tier(p_api_version_number,
211       p_init_msg_list,
212       p_commit,
213       p_validation_level,
214       x_return_status,
215       x_msg_count,
216       x_msg_data,
217       ddp_offadj_tier_rec,
218       x_offer_adjst_tier_id);
219 
220     -- copy data back from the local variables to OUT or IN-OUT args, if any
221 
222 
223 
224 
225 
226 
227 
228 
229   end;
230 
231   procedure update_offer_adj_tier(p_api_version_number  NUMBER
232     , p_init_msg_list  VARCHAR2
233     , p_commit  VARCHAR2
234     , p_validation_level  NUMBER
235     , x_return_status out nocopy  VARCHAR2
236     , x_msg_count out nocopy  NUMBER
237     , x_msg_data out nocopy  VARCHAR2
238     , x_object_version_number out nocopy  NUMBER
239     , p7_a0  NUMBER := 0-1962.0724
240     , p7_a1  NUMBER := 0-1962.0724
241     , p7_a2  NUMBER := 0-1962.0724
242     , p7_a3  NUMBER := 0-1962.0724
243     , p7_a4  VARCHAR2 := fnd_api.g_miss_char
244     , p7_a5  NUMBER := 0-1962.0724
245     , p7_a6  NUMBER := 0-1962.0724
246     , p7_a7  NUMBER := 0-1962.0724
247     , p7_a8  DATE := fnd_api.g_miss_date
248     , p7_a9  NUMBER := 0-1962.0724
249     , p7_a10  DATE := fnd_api.g_miss_date
250     , p7_a11  NUMBER := 0-1962.0724
251     , p7_a12  NUMBER := 0-1962.0724
252     , p7_a13  NUMBER := 0-1962.0724
253   )
254 
255   as
256     ddp_offadj_tier_rec ozf_offer_adj_tier_pvt.offadj_tier_rec_type;
257     ddindx binary_integer; indx binary_integer;
258   begin
259 
260     -- copy data to the local IN or IN-OUT args, if any
261 
262 
263 
264 
265 
266 
267 
268     ddp_offadj_tier_rec.offer_adjst_tier_id := rosetta_g_miss_num_map(p7_a0);
269     ddp_offadj_tier_rec.offer_adjustment_id := rosetta_g_miss_num_map(p7_a1);
270     ddp_offadj_tier_rec.volume_offer_tiers_id := rosetta_g_miss_num_map(p7_a2);
271     ddp_offadj_tier_rec.qp_list_header_id := rosetta_g_miss_num_map(p7_a3);
272     ddp_offadj_tier_rec.discount_type_code := p7_a4;
273     ddp_offadj_tier_rec.original_discount := rosetta_g_miss_num_map(p7_a5);
274     ddp_offadj_tier_rec.modified_discount := rosetta_g_miss_num_map(p7_a6);
275     ddp_offadj_tier_rec.offer_discount_line_id := rosetta_g_miss_num_map(p7_a7);
276     ddp_offadj_tier_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a8);
277     ddp_offadj_tier_rec.last_updated_by := rosetta_g_miss_num_map(p7_a9);
278     ddp_offadj_tier_rec.creation_date := rosetta_g_miss_date_in_map(p7_a10);
279     ddp_offadj_tier_rec.created_by := rosetta_g_miss_num_map(p7_a11);
280     ddp_offadj_tier_rec.last_update_login := rosetta_g_miss_num_map(p7_a12);
281     ddp_offadj_tier_rec.object_version_number := rosetta_g_miss_num_map(p7_a13);
282 
283 
284     -- here's the delegated call to the old PL/SQL routine
285     ozf_offer_adj_tier_pvt.update_offer_adj_tier(p_api_version_number,
286       p_init_msg_list,
287       p_commit,
288       p_validation_level,
289       x_return_status,
290       x_msg_count,
291       x_msg_data,
292       ddp_offadj_tier_rec,
293       x_object_version_number);
294 
295     -- copy data back from the local variables to OUT or IN-OUT args, if any
296 
297 
298 
299 
300 
301 
302 
303 
304   end;
305 
306   procedure validate_offer_adj_tier(p_api_version_number  NUMBER
307     , p_init_msg_list  VARCHAR2
308     , p_validation_level  NUMBER
309     , p_validation_mode  VARCHAR2
310     , x_return_status out nocopy  VARCHAR2
311     , x_msg_count out nocopy  NUMBER
312     , x_msg_data out nocopy  VARCHAR2
313     , p3_a0  NUMBER := 0-1962.0724
314     , p3_a1  NUMBER := 0-1962.0724
315     , p3_a2  NUMBER := 0-1962.0724
316     , p3_a3  NUMBER := 0-1962.0724
317     , p3_a4  VARCHAR2 := fnd_api.g_miss_char
318     , p3_a5  NUMBER := 0-1962.0724
319     , p3_a6  NUMBER := 0-1962.0724
320     , p3_a7  NUMBER := 0-1962.0724
321     , p3_a8  DATE := fnd_api.g_miss_date
322     , p3_a9  NUMBER := 0-1962.0724
323     , p3_a10  DATE := fnd_api.g_miss_date
324     , p3_a11  NUMBER := 0-1962.0724
325     , p3_a12  NUMBER := 0-1962.0724
326     , p3_a13  NUMBER := 0-1962.0724
327   )
328 
329   as
330     ddp_offadj_tier_rec ozf_offer_adj_tier_pvt.offadj_tier_rec_type;
331     ddindx binary_integer; indx binary_integer;
332   begin
333 
334     -- copy data to the local IN or IN-OUT args, if any
335 
336 
337 
338     ddp_offadj_tier_rec.offer_adjst_tier_id := rosetta_g_miss_num_map(p3_a0);
339     ddp_offadj_tier_rec.offer_adjustment_id := rosetta_g_miss_num_map(p3_a1);
340     ddp_offadj_tier_rec.volume_offer_tiers_id := rosetta_g_miss_num_map(p3_a2);
341     ddp_offadj_tier_rec.qp_list_header_id := rosetta_g_miss_num_map(p3_a3);
342     ddp_offadj_tier_rec.discount_type_code := p3_a4;
343     ddp_offadj_tier_rec.original_discount := rosetta_g_miss_num_map(p3_a5);
344     ddp_offadj_tier_rec.modified_discount := rosetta_g_miss_num_map(p3_a6);
345     ddp_offadj_tier_rec.offer_discount_line_id := rosetta_g_miss_num_map(p3_a7);
346     ddp_offadj_tier_rec.last_update_date := rosetta_g_miss_date_in_map(p3_a8);
347     ddp_offadj_tier_rec.last_updated_by := rosetta_g_miss_num_map(p3_a9);
348     ddp_offadj_tier_rec.creation_date := rosetta_g_miss_date_in_map(p3_a10);
349     ddp_offadj_tier_rec.created_by := rosetta_g_miss_num_map(p3_a11);
350     ddp_offadj_tier_rec.last_update_login := rosetta_g_miss_num_map(p3_a12);
351     ddp_offadj_tier_rec.object_version_number := rosetta_g_miss_num_map(p3_a13);
352 
353 
354 
355 
356 
357     -- here's the delegated call to the old PL/SQL routine
358     ozf_offer_adj_tier_pvt.validate_offer_adj_tier(p_api_version_number,
359       p_init_msg_list,
360       p_validation_level,
361       ddp_offadj_tier_rec,
362       p_validation_mode,
363       x_return_status,
364       x_msg_count,
365       x_msg_data);
366 
367     -- copy data back from the local variables to OUT or IN-OUT args, if any
368 
369 
370 
371 
372 
373 
374 
375   end;
376 
377   procedure check_offadj_tier_items(p_validation_mode  VARCHAR2
378     , x_return_status out nocopy  VARCHAR2
379     , p0_a0  NUMBER := 0-1962.0724
380     , p0_a1  NUMBER := 0-1962.0724
381     , p0_a2  NUMBER := 0-1962.0724
382     , p0_a3  NUMBER := 0-1962.0724
383     , p0_a4  VARCHAR2 := fnd_api.g_miss_char
384     , p0_a5  NUMBER := 0-1962.0724
385     , p0_a6  NUMBER := 0-1962.0724
386     , p0_a7  NUMBER := 0-1962.0724
387     , p0_a8  DATE := fnd_api.g_miss_date
388     , p0_a9  NUMBER := 0-1962.0724
389     , p0_a10  DATE := fnd_api.g_miss_date
390     , p0_a11  NUMBER := 0-1962.0724
391     , p0_a12  NUMBER := 0-1962.0724
392     , p0_a13  NUMBER := 0-1962.0724
393   )
394 
395   as
396     ddp_offadj_tier_rec ozf_offer_adj_tier_pvt.offadj_tier_rec_type;
397     ddindx binary_integer; indx binary_integer;
398   begin
399 
400     -- copy data to the local IN or IN-OUT args, if any
401     ddp_offadj_tier_rec.offer_adjst_tier_id := rosetta_g_miss_num_map(p0_a0);
402     ddp_offadj_tier_rec.offer_adjustment_id := rosetta_g_miss_num_map(p0_a1);
403     ddp_offadj_tier_rec.volume_offer_tiers_id := rosetta_g_miss_num_map(p0_a2);
404     ddp_offadj_tier_rec.qp_list_header_id := rosetta_g_miss_num_map(p0_a3);
405     ddp_offadj_tier_rec.discount_type_code := p0_a4;
406     ddp_offadj_tier_rec.original_discount := rosetta_g_miss_num_map(p0_a5);
407     ddp_offadj_tier_rec.modified_discount := rosetta_g_miss_num_map(p0_a6);
408     ddp_offadj_tier_rec.offer_discount_line_id := rosetta_g_miss_num_map(p0_a7);
409     ddp_offadj_tier_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a8);
410     ddp_offadj_tier_rec.last_updated_by := rosetta_g_miss_num_map(p0_a9);
411     ddp_offadj_tier_rec.creation_date := rosetta_g_miss_date_in_map(p0_a10);
412     ddp_offadj_tier_rec.created_by := rosetta_g_miss_num_map(p0_a11);
413     ddp_offadj_tier_rec.last_update_login := rosetta_g_miss_num_map(p0_a12);
414     ddp_offadj_tier_rec.object_version_number := rosetta_g_miss_num_map(p0_a13);
415 
416 
417 
418     -- here's the delegated call to the old PL/SQL routine
419     ozf_offer_adj_tier_pvt.check_offadj_tier_items(ddp_offadj_tier_rec,
420       p_validation_mode,
421       x_return_status);
422 
423     -- copy data back from the local variables to OUT or IN-OUT args, if any
424 
425 
426   end;
427 
428   procedure validate_offadj_tier_rec(p_api_version_number  NUMBER
429     , p_init_msg_list  VARCHAR2
430     , x_return_status out nocopy  VARCHAR2
431     , x_msg_count out nocopy  NUMBER
432     , x_msg_data out nocopy  VARCHAR2
433     , p5_a0  NUMBER := 0-1962.0724
434     , p5_a1  NUMBER := 0-1962.0724
435     , p5_a2  NUMBER := 0-1962.0724
436     , p5_a3  NUMBER := 0-1962.0724
437     , p5_a4  VARCHAR2 := fnd_api.g_miss_char
438     , p5_a5  NUMBER := 0-1962.0724
439     , p5_a6  NUMBER := 0-1962.0724
440     , p5_a7  NUMBER := 0-1962.0724
441     , p5_a8  DATE := fnd_api.g_miss_date
442     , p5_a9  NUMBER := 0-1962.0724
443     , p5_a10  DATE := fnd_api.g_miss_date
444     , p5_a11  NUMBER := 0-1962.0724
445     , p5_a12  NUMBER := 0-1962.0724
446     , p5_a13  NUMBER := 0-1962.0724
447   )
448 
449   as
450     ddp_offadj_tier_rec ozf_offer_adj_tier_pvt.offadj_tier_rec_type;
451     ddindx binary_integer; indx binary_integer;
452   begin
453 
454     -- copy data to the local IN or IN-OUT args, if any
455 
456 
457 
458 
459 
460     ddp_offadj_tier_rec.offer_adjst_tier_id := rosetta_g_miss_num_map(p5_a0);
461     ddp_offadj_tier_rec.offer_adjustment_id := rosetta_g_miss_num_map(p5_a1);
462     ddp_offadj_tier_rec.volume_offer_tiers_id := rosetta_g_miss_num_map(p5_a2);
463     ddp_offadj_tier_rec.qp_list_header_id := rosetta_g_miss_num_map(p5_a3);
464     ddp_offadj_tier_rec.discount_type_code := p5_a4;
465     ddp_offadj_tier_rec.original_discount := rosetta_g_miss_num_map(p5_a5);
466     ddp_offadj_tier_rec.modified_discount := rosetta_g_miss_num_map(p5_a6);
467     ddp_offadj_tier_rec.offer_discount_line_id := rosetta_g_miss_num_map(p5_a7);
468     ddp_offadj_tier_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
469     ddp_offadj_tier_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
470     ddp_offadj_tier_rec.creation_date := rosetta_g_miss_date_in_map(p5_a10);
471     ddp_offadj_tier_rec.created_by := rosetta_g_miss_num_map(p5_a11);
472     ddp_offadj_tier_rec.last_update_login := rosetta_g_miss_num_map(p5_a12);
473     ddp_offadj_tier_rec.object_version_number := rosetta_g_miss_num_map(p5_a13);
474 
475     -- here's the delegated call to the old PL/SQL routine
476     ozf_offer_adj_tier_pvt.validate_offadj_tier_rec(p_api_version_number,
477       p_init_msg_list,
478       x_return_status,
479       x_msg_count,
480       x_msg_data,
481       ddp_offadj_tier_rec);
482 
483     -- copy data back from the local variables to OUT or IN-OUT args, if any
484 
485 
486 
487 
488 
489   end;
490 
491 end ozf_offer_adj_tier_pvt_w;