eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.JTF_LOC_POSTAL_CODES_PVT_W

Source


1 package body jtf_loc_postal_codes_pvt_w as
2   /* $Header: jtfwlopb.pls 120.2 2005/08/18 22:56:01 stopiwal 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   function rosetta_g_miss_num_map(n number) return number as
7     a number := fnd_api.g_miss_num;
8     b number := 0-1962.0724;
9   begin
10     if n=a then return b; end if;
11     if n=b then return a; end if;
12     return n;
13   end;
14 
15   -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
16   function rosetta_g_miss_date_in_map(d date) return date as
17   begin
18     if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
19     return d;
20   end;
21 
22   procedure create_postal_code(p_api_version  NUMBER
23     , p_init_msg_list  VARCHAR2
24     , p_commit  VARCHAR2
25     , p_validation_level  NUMBER
26     , x_return_status OUT NOCOPY /* file.sql.39 change */  VARCHAR2
27     , x_msg_count OUT NOCOPY /* file.sql.39 change */  NUMBER
28     , x_msg_data OUT NOCOPY /* file.sql.39 change */  VARCHAR2
29     , x_postal_code_id OUT NOCOPY /* file.sql.39 change */  NUMBER
30     , p7_a0  NUMBER := 0-1962.0724
31     , p7_a1  DATE := fnd_api.g_miss_date
32     , p7_a2  NUMBER := 0-1962.0724
33     , p7_a3  DATE := fnd_api.g_miss_date
34     , p7_a4  NUMBER := 0-1962.0724
35     , p7_a5  NUMBER := 0-1962.0724
36     , p7_a6  NUMBER := 0-1962.0724
37     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
38     , p7_a8  NUMBER := 0-1962.0724
39     , p7_a9  NUMBER := 0-1962.0724
40     , p7_a10  DATE := fnd_api.g_miss_date
41     , p7_a11  DATE := fnd_api.g_miss_date
42     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
43     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
44   )
45   as
46     ddp_postal_code_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
47     ddindx binary_integer; indx binary_integer;
48   begin
49 
50     -- copy data to the local IN or IN-OUT args, if any
51 
52 
53 
54 
55 
56 
57 
58     ddp_postal_code_rec.location_postal_code_id := rosetta_g_miss_num_map(p7_a0);
59     ddp_postal_code_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
60     ddp_postal_code_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
61     ddp_postal_code_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
62     ddp_postal_code_rec.created_by := rosetta_g_miss_num_map(p7_a4);
63     ddp_postal_code_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
64     ddp_postal_code_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
65     ddp_postal_code_rec.orig_system_ref := p7_a7;
66     ddp_postal_code_rec.orig_system_id := rosetta_g_miss_num_map(p7_a8);
67     ddp_postal_code_rec.location_area_id := rosetta_g_miss_num_map(p7_a9);
68     ddp_postal_code_rec.start_date_active := rosetta_g_miss_date_in_map(p7_a10);
69     ddp_postal_code_rec.end_date_active := rosetta_g_miss_date_in_map(p7_a11);
70     ddp_postal_code_rec.postal_code_start := p7_a12;
71     ddp_postal_code_rec.postal_code_end := p7_a13;
72 
73 
74     -- here's the delegated call to the old PL/SQL routine
75     jtf_loc_postal_codes_pvt.create_postal_code(p_api_version,
76       p_init_msg_list,
77       p_commit,
78       p_validation_level,
79       x_return_status,
80       x_msg_count,
81       x_msg_data,
82       ddp_postal_code_rec,
83       x_postal_code_id);
84 
85     -- copy data back from the local OUT NOCOPY /* file.sql.39 change */ or IN-OUT args, if any
86 
87 
88 
89 
90 
91 
92 
93 
94   end;
95 
96   procedure update_postal_code(p_api_version  NUMBER
97     , p_init_msg_list  VARCHAR2
98     , p_commit  VARCHAR2
99     , p_validation_level  NUMBER
100     , x_return_status OUT NOCOPY /* file.sql.39 change */  VARCHAR2
101     , x_msg_count OUT NOCOPY /* file.sql.39 change */  NUMBER
102     , x_msg_data OUT NOCOPY /* file.sql.39 change */  VARCHAR2
103     , p_remove_flag  VARCHAR2
104     , p7_a0  NUMBER := 0-1962.0724
105     , p7_a1  DATE := fnd_api.g_miss_date
106     , p7_a2  NUMBER := 0-1962.0724
107     , p7_a3  DATE := fnd_api.g_miss_date
108     , p7_a4  NUMBER := 0-1962.0724
109     , p7_a5  NUMBER := 0-1962.0724
110     , p7_a6  NUMBER := 0-1962.0724
111     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
112     , p7_a8  NUMBER := 0-1962.0724
113     , p7_a9  NUMBER := 0-1962.0724
114     , p7_a10  DATE := fnd_api.g_miss_date
115     , p7_a11  DATE := fnd_api.g_miss_date
116     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
117     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
118   )
119   as
120     ddp_postal_code_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
121     ddindx binary_integer; indx binary_integer;
122   begin
123 
124     -- copy data to the local IN or IN-OUT args, if any
125 
126 
127 
128 
129 
130 
131 
132     ddp_postal_code_rec.location_postal_code_id := rosetta_g_miss_num_map(p7_a0);
133     ddp_postal_code_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
134     ddp_postal_code_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
135     ddp_postal_code_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
136     ddp_postal_code_rec.created_by := rosetta_g_miss_num_map(p7_a4);
137     ddp_postal_code_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
138     ddp_postal_code_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
139     ddp_postal_code_rec.orig_system_ref := p7_a7;
140     ddp_postal_code_rec.orig_system_id := rosetta_g_miss_num_map(p7_a8);
141     ddp_postal_code_rec.location_area_id := rosetta_g_miss_num_map(p7_a9);
142     ddp_postal_code_rec.start_date_active := rosetta_g_miss_date_in_map(p7_a10);
143     ddp_postal_code_rec.end_date_active := rosetta_g_miss_date_in_map(p7_a11);
144     ddp_postal_code_rec.postal_code_start := p7_a12;
145     ddp_postal_code_rec.postal_code_end := p7_a13;
146 
147 
148     -- here's the delegated call to the old PL/SQL routine
149     jtf_loc_postal_codes_pvt.update_postal_code(p_api_version,
150       p_init_msg_list,
151       p_commit,
152       p_validation_level,
153       x_return_status,
154       x_msg_count,
155       x_msg_data,
156       ddp_postal_code_rec,
157       p_remove_flag);
158 
159     -- copy data back from the local OUT NOCOPY /* file.sql.39 change */ or IN-OUT args, if any
160 
161 
162 
163 
164 
165 
166 
167 
168   end;
169 
170   procedure validate_postal_code(p_api_version  NUMBER
171     , p_init_msg_list  VARCHAR2
172     , p_validation_level  NUMBER
173     , x_return_status OUT NOCOPY /* file.sql.39 change */  VARCHAR2
174     , x_msg_count OUT NOCOPY /* file.sql.39 change */  NUMBER
175     , x_msg_data OUT NOCOPY /* file.sql.39 change */  VARCHAR2
176     , p6_a0  NUMBER := 0-1962.0724
177     , p6_a1  DATE := fnd_api.g_miss_date
178     , p6_a2  NUMBER := 0-1962.0724
179     , p6_a3  DATE := fnd_api.g_miss_date
180     , p6_a4  NUMBER := 0-1962.0724
181     , p6_a5  NUMBER := 0-1962.0724
182     , p6_a6  NUMBER := 0-1962.0724
183     , p6_a7  VARCHAR2 := fnd_api.g_miss_char
184     , p6_a8  NUMBER := 0-1962.0724
185     , p6_a9  NUMBER := 0-1962.0724
186     , p6_a10  DATE := fnd_api.g_miss_date
187     , p6_a11  DATE := fnd_api.g_miss_date
188     , p6_a12  VARCHAR2 := fnd_api.g_miss_char
189     , p6_a13  VARCHAR2 := fnd_api.g_miss_char
190   )
191   as
192     ddp_postal_code_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
193     ddindx binary_integer; indx binary_integer;
194   begin
195 
196     -- copy data to the local IN or IN-OUT args, if any
197 
198 
199 
200 
201 
202 
203     ddp_postal_code_rec.location_postal_code_id := rosetta_g_miss_num_map(p6_a0);
204     ddp_postal_code_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a1);
205     ddp_postal_code_rec.last_updated_by := rosetta_g_miss_num_map(p6_a2);
206     ddp_postal_code_rec.creation_date := rosetta_g_miss_date_in_map(p6_a3);
207     ddp_postal_code_rec.created_by := rosetta_g_miss_num_map(p6_a4);
208     ddp_postal_code_rec.last_update_login := rosetta_g_miss_num_map(p6_a5);
209     ddp_postal_code_rec.object_version_number := rosetta_g_miss_num_map(p6_a6);
210     ddp_postal_code_rec.orig_system_ref := p6_a7;
211     ddp_postal_code_rec.orig_system_id := rosetta_g_miss_num_map(p6_a8);
212     ddp_postal_code_rec.location_area_id := rosetta_g_miss_num_map(p6_a9);
213     ddp_postal_code_rec.start_date_active := rosetta_g_miss_date_in_map(p6_a10);
214     ddp_postal_code_rec.end_date_active := rosetta_g_miss_date_in_map(p6_a11);
215     ddp_postal_code_rec.postal_code_start := p6_a12;
216     ddp_postal_code_rec.postal_code_end := p6_a13;
217 
218     -- here's the delegated call to the old PL/SQL routine
219     jtf_loc_postal_codes_pvt.validate_postal_code(p_api_version,
220       p_init_msg_list,
221       p_validation_level,
222       x_return_status,
223       x_msg_count,
224       x_msg_data,
225       ddp_postal_code_rec);
226 
227     -- copy data back from the local OUT NOCOPY /* file.sql.39 change */ or IN-OUT args, if any
228 
229 
230 
231 
232 
233 
234   end;
235 
236   procedure check_items(p_validation_mode  VARCHAR2
237     , x_return_status OUT NOCOPY /* file.sql.39 change */  VARCHAR2
238     , p2_a0  NUMBER := 0-1962.0724
239     , p2_a1  DATE := fnd_api.g_miss_date
240     , p2_a2  NUMBER := 0-1962.0724
241     , p2_a3  DATE := fnd_api.g_miss_date
242     , p2_a4  NUMBER := 0-1962.0724
243     , p2_a5  NUMBER := 0-1962.0724
244     , p2_a6  NUMBER := 0-1962.0724
245     , p2_a7  VARCHAR2 := fnd_api.g_miss_char
246     , p2_a8  NUMBER := 0-1962.0724
247     , p2_a9  NUMBER := 0-1962.0724
248     , p2_a10  DATE := fnd_api.g_miss_date
249     , p2_a11  DATE := fnd_api.g_miss_date
250     , p2_a12  VARCHAR2 := fnd_api.g_miss_char
251     , p2_a13  VARCHAR2 := fnd_api.g_miss_char
252   )
253   as
254     ddp_postal_code_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
255     ddindx binary_integer; indx binary_integer;
256   begin
257 
258     -- copy data to the local IN or IN-OUT args, if any
259 
260 
261     ddp_postal_code_rec.location_postal_code_id := rosetta_g_miss_num_map(p2_a0);
262     ddp_postal_code_rec.last_update_date := rosetta_g_miss_date_in_map(p2_a1);
263     ddp_postal_code_rec.last_updated_by := rosetta_g_miss_num_map(p2_a2);
264     ddp_postal_code_rec.creation_date := rosetta_g_miss_date_in_map(p2_a3);
265     ddp_postal_code_rec.created_by := rosetta_g_miss_num_map(p2_a4);
266     ddp_postal_code_rec.last_update_login := rosetta_g_miss_num_map(p2_a5);
267     ddp_postal_code_rec.object_version_number := rosetta_g_miss_num_map(p2_a6);
268     ddp_postal_code_rec.orig_system_ref := p2_a7;
269     ddp_postal_code_rec.orig_system_id := rosetta_g_miss_num_map(p2_a8);
270     ddp_postal_code_rec.location_area_id := rosetta_g_miss_num_map(p2_a9);
271     ddp_postal_code_rec.start_date_active := rosetta_g_miss_date_in_map(p2_a10);
272     ddp_postal_code_rec.end_date_active := rosetta_g_miss_date_in_map(p2_a11);
273     ddp_postal_code_rec.postal_code_start := p2_a12;
274     ddp_postal_code_rec.postal_code_end := p2_a13;
275 
276     -- here's the delegated call to the old PL/SQL routine
277     jtf_loc_postal_codes_pvt.check_items(p_validation_mode,
278       x_return_status,
279       ddp_postal_code_rec);
280 
281     -- copy data back from the local OUT NOCOPY /* file.sql.39 change */ or IN-OUT args, if any
282 
283 
284   end;
285 
286   procedure check_req_items(p_validation_mode  VARCHAR2
287     , x_return_status OUT NOCOPY /* file.sql.39 change */  VARCHAR2
288     , p1_a0  NUMBER := 0-1962.0724
289     , p1_a1  DATE := fnd_api.g_miss_date
290     , p1_a2  NUMBER := 0-1962.0724
291     , p1_a3  DATE := fnd_api.g_miss_date
292     , p1_a4  NUMBER := 0-1962.0724
293     , p1_a5  NUMBER := 0-1962.0724
294     , p1_a6  NUMBER := 0-1962.0724
295     , p1_a7  VARCHAR2 := fnd_api.g_miss_char
296     , p1_a8  NUMBER := 0-1962.0724
297     , p1_a9  NUMBER := 0-1962.0724
298     , p1_a10  DATE := fnd_api.g_miss_date
299     , p1_a11  DATE := fnd_api.g_miss_date
300     , p1_a12  VARCHAR2 := fnd_api.g_miss_char
301     , p1_a13  VARCHAR2 := fnd_api.g_miss_char
302   )
303   as
304     ddp_postal_code_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
305     ddindx binary_integer; indx binary_integer;
306   begin
307 
308     -- copy data to the local IN or IN-OUT args, if any
309 
310     ddp_postal_code_rec.location_postal_code_id := rosetta_g_miss_num_map(p1_a0);
311     ddp_postal_code_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
312     ddp_postal_code_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
313     ddp_postal_code_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
314     ddp_postal_code_rec.created_by := rosetta_g_miss_num_map(p1_a4);
315     ddp_postal_code_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
316     ddp_postal_code_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
317     ddp_postal_code_rec.orig_system_ref := p1_a7;
318     ddp_postal_code_rec.orig_system_id := rosetta_g_miss_num_map(p1_a8);
319     ddp_postal_code_rec.location_area_id := rosetta_g_miss_num_map(p1_a9);
320     ddp_postal_code_rec.start_date_active := rosetta_g_miss_date_in_map(p1_a10);
321     ddp_postal_code_rec.end_date_active := rosetta_g_miss_date_in_map(p1_a11);
322     ddp_postal_code_rec.postal_code_start := p1_a12;
323     ddp_postal_code_rec.postal_code_end := p1_a13;
324 
325 
326     -- here's the delegated call to the old PL/SQL routine
327     jtf_loc_postal_codes_pvt.check_req_items(p_validation_mode,
328       ddp_postal_code_rec,
329       x_return_status);
330 
331     -- copy data back from the local OUT NOCOPY /* file.sql.39 change */ or IN-OUT args, if any
332 
333 
334   end;
335 
336   procedure check_fk_items(x_return_status OUT NOCOPY /* file.sql.39 change */  VARCHAR2
337     , p0_a0  NUMBER := 0-1962.0724
338     , p0_a1  DATE := fnd_api.g_miss_date
339     , p0_a2  NUMBER := 0-1962.0724
340     , p0_a3  DATE := fnd_api.g_miss_date
341     , p0_a4  NUMBER := 0-1962.0724
342     , p0_a5  NUMBER := 0-1962.0724
343     , p0_a6  NUMBER := 0-1962.0724
344     , p0_a7  VARCHAR2 := fnd_api.g_miss_char
345     , p0_a8  NUMBER := 0-1962.0724
346     , p0_a9  NUMBER := 0-1962.0724
347     , p0_a10  DATE := fnd_api.g_miss_date
348     , p0_a11  DATE := fnd_api.g_miss_date
349     , p0_a12  VARCHAR2 := fnd_api.g_miss_char
350     , p0_a13  VARCHAR2 := fnd_api.g_miss_char
351   )
352   as
353     ddp_postal_code_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
354     ddindx binary_integer; indx binary_integer;
355   begin
356 
357     -- copy data to the local IN or IN-OUT args, if any
358     ddp_postal_code_rec.location_postal_code_id := rosetta_g_miss_num_map(p0_a0);
359     ddp_postal_code_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
360     ddp_postal_code_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
361     ddp_postal_code_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
365     ddp_postal_code_rec.orig_system_ref := p0_a7;
362     ddp_postal_code_rec.created_by := rosetta_g_miss_num_map(p0_a4);
363     ddp_postal_code_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
364     ddp_postal_code_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
366     ddp_postal_code_rec.orig_system_id := rosetta_g_miss_num_map(p0_a8);
367     ddp_postal_code_rec.location_area_id := rosetta_g_miss_num_map(p0_a9);
368     ddp_postal_code_rec.start_date_active := rosetta_g_miss_date_in_map(p0_a10);
369     ddp_postal_code_rec.end_date_active := rosetta_g_miss_date_in_map(p0_a11);
370     ddp_postal_code_rec.postal_code_start := p0_a12;
371     ddp_postal_code_rec.postal_code_end := p0_a13;
372 
373 
374     -- here's the delegated call to the old PL/SQL routine
375     jtf_loc_postal_codes_pvt.check_fk_items(ddp_postal_code_rec,
376       x_return_status);
377 
378     -- copy data back from the local OUT NOCOPY /* file.sql.39 change */ or IN-OUT args, if any
379 
380   end;
381 
382   procedure check_record(x_return_status OUT NOCOPY /* file.sql.39 change */  VARCHAR2
383     , p0_a0  NUMBER := 0-1962.0724
384     , p0_a1  DATE := fnd_api.g_miss_date
385     , p0_a2  NUMBER := 0-1962.0724
386     , p0_a3  DATE := fnd_api.g_miss_date
387     , p0_a4  NUMBER := 0-1962.0724
388     , p0_a5  NUMBER := 0-1962.0724
389     , p0_a6  NUMBER := 0-1962.0724
390     , p0_a7  VARCHAR2 := fnd_api.g_miss_char
391     , p0_a8  NUMBER := 0-1962.0724
392     , p0_a9  NUMBER := 0-1962.0724
393     , p0_a10  DATE := fnd_api.g_miss_date
394     , p0_a11  DATE := fnd_api.g_miss_date
395     , p0_a12  VARCHAR2 := fnd_api.g_miss_char
396     , p0_a13  VARCHAR2 := fnd_api.g_miss_char
397     , p1_a0  NUMBER := 0-1962.0724
398     , p1_a1  DATE := fnd_api.g_miss_date
399     , p1_a2  NUMBER := 0-1962.0724
400     , p1_a3  DATE := fnd_api.g_miss_date
401     , p1_a4  NUMBER := 0-1962.0724
402     , p1_a5  NUMBER := 0-1962.0724
403     , p1_a6  NUMBER := 0-1962.0724
404     , p1_a7  VARCHAR2 := fnd_api.g_miss_char
405     , p1_a8  NUMBER := 0-1962.0724
406     , p1_a9  NUMBER := 0-1962.0724
407     , p1_a10  DATE := fnd_api.g_miss_date
408     , p1_a11  DATE := fnd_api.g_miss_date
409     , p1_a12  VARCHAR2 := fnd_api.g_miss_char
410     , p1_a13  VARCHAR2 := fnd_api.g_miss_char
411   )
412   as
413     ddp_postal_code_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
414     ddp_complete_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
415     ddindx binary_integer; indx binary_integer;
416   begin
417 
418     -- copy data to the local IN or IN-OUT args, if any
419     ddp_postal_code_rec.location_postal_code_id := rosetta_g_miss_num_map(p0_a0);
420     ddp_postal_code_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
421     ddp_postal_code_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
422     ddp_postal_code_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
423     ddp_postal_code_rec.created_by := rosetta_g_miss_num_map(p0_a4);
424     ddp_postal_code_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
425     ddp_postal_code_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
426     ddp_postal_code_rec.orig_system_ref := p0_a7;
427     ddp_postal_code_rec.orig_system_id := rosetta_g_miss_num_map(p0_a8);
428     ddp_postal_code_rec.location_area_id := rosetta_g_miss_num_map(p0_a9);
429     ddp_postal_code_rec.start_date_active := rosetta_g_miss_date_in_map(p0_a10);
430     ddp_postal_code_rec.end_date_active := rosetta_g_miss_date_in_map(p0_a11);
431     ddp_postal_code_rec.postal_code_start := p0_a12;
432     ddp_postal_code_rec.postal_code_end := p0_a13;
433 
434     ddp_complete_rec.location_postal_code_id := rosetta_g_miss_num_map(p1_a0);
435     ddp_complete_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
436     ddp_complete_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
437     ddp_complete_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
438     ddp_complete_rec.created_by := rosetta_g_miss_num_map(p1_a4);
439     ddp_complete_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
440     ddp_complete_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
441     ddp_complete_rec.orig_system_ref := p1_a7;
442     ddp_complete_rec.orig_system_id := rosetta_g_miss_num_map(p1_a8);
443     ddp_complete_rec.location_area_id := rosetta_g_miss_num_map(p1_a9);
444     ddp_complete_rec.start_date_active := rosetta_g_miss_date_in_map(p1_a10);
445     ddp_complete_rec.end_date_active := rosetta_g_miss_date_in_map(p1_a11);
446     ddp_complete_rec.postal_code_start := p1_a12;
447     ddp_complete_rec.postal_code_end := p1_a13;
448 
449 
450     -- here's the delegated call to the old PL/SQL routine
451     jtf_loc_postal_codes_pvt.check_record(ddp_postal_code_rec,
452       ddp_complete_rec,
453       x_return_status);
454 
455     -- copy data back from the local OUT NOCOPY /* file.sql.39 change */ or IN-OUT args, if any
456 
457 
458   end;
459 
460   procedure complete_rec(p1_a0 OUT NOCOPY /* file.sql.39 change */  NUMBER
461     , p1_a1 OUT NOCOPY /* file.sql.39 change */  DATE
462     , p1_a2 OUT NOCOPY /* file.sql.39 change */  NUMBER
463     , p1_a3 OUT NOCOPY /* file.sql.39 change */  DATE
464     , p1_a4 OUT NOCOPY /* file.sql.39 change */  NUMBER
465     , p1_a5 OUT NOCOPY /* file.sql.39 change */  NUMBER
466     , p1_a6 OUT NOCOPY /* file.sql.39 change */  NUMBER
467     , p1_a7 OUT NOCOPY /* file.sql.39 change */  VARCHAR2
471     , p1_a11 OUT NOCOPY /* file.sql.39 change */  DATE
468     , p1_a8 OUT NOCOPY /* file.sql.39 change */  NUMBER
469     , p1_a9 OUT NOCOPY /* file.sql.39 change */  NUMBER
470     , p1_a10 OUT NOCOPY /* file.sql.39 change */  DATE
472     , p1_a12 OUT NOCOPY /* file.sql.39 change */  VARCHAR2
473     , p1_a13 OUT NOCOPY /* file.sql.39 change */  VARCHAR2
474     , p0_a0  NUMBER := 0-1962.0724
475     , p0_a1  DATE := fnd_api.g_miss_date
476     , p0_a2  NUMBER := 0-1962.0724
477     , p0_a3  DATE := fnd_api.g_miss_date
478     , p0_a4  NUMBER := 0-1962.0724
479     , p0_a5  NUMBER := 0-1962.0724
480     , p0_a6  NUMBER := 0-1962.0724
481     , p0_a7  VARCHAR2 := fnd_api.g_miss_char
482     , p0_a8  NUMBER := 0-1962.0724
483     , p0_a9  NUMBER := 0-1962.0724
484     , p0_a10  DATE := fnd_api.g_miss_date
485     , p0_a11  DATE := fnd_api.g_miss_date
486     , p0_a12  VARCHAR2 := fnd_api.g_miss_char
487     , p0_a13  VARCHAR2 := fnd_api.g_miss_char
488   )
489   as
490     ddp_postal_code_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
491     ddx_complete_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
492     ddindx binary_integer; indx binary_integer;
493   begin
494 
495     -- copy data to the local IN or IN-OUT args, if any
496     ddp_postal_code_rec.location_postal_code_id := rosetta_g_miss_num_map(p0_a0);
497     ddp_postal_code_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
498     ddp_postal_code_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
499     ddp_postal_code_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
500     ddp_postal_code_rec.created_by := rosetta_g_miss_num_map(p0_a4);
501     ddp_postal_code_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
502     ddp_postal_code_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
503     ddp_postal_code_rec.orig_system_ref := p0_a7;
504     ddp_postal_code_rec.orig_system_id := rosetta_g_miss_num_map(p0_a8);
505     ddp_postal_code_rec.location_area_id := rosetta_g_miss_num_map(p0_a9);
506     ddp_postal_code_rec.start_date_active := rosetta_g_miss_date_in_map(p0_a10);
507     ddp_postal_code_rec.end_date_active := rosetta_g_miss_date_in_map(p0_a11);
508     ddp_postal_code_rec.postal_code_start := p0_a12;
509     ddp_postal_code_rec.postal_code_end := p0_a13;
510 
511 
512     -- here's the delegated call to the old PL/SQL routine
513     jtf_loc_postal_codes_pvt.complete_rec(ddp_postal_code_rec,
514       ddx_complete_rec);
515 
516     -- copy data back from the local OUT NOCOPY /* file.sql.39 change */ or IN-OUT args, if any
517 
518     p1_a0 := rosetta_g_miss_num_map(ddx_complete_rec.location_postal_code_id);
519     p1_a1 := ddx_complete_rec.last_update_date;
520     p1_a2 := rosetta_g_miss_num_map(ddx_complete_rec.last_updated_by);
521     p1_a3 := ddx_complete_rec.creation_date;
522     p1_a4 := rosetta_g_miss_num_map(ddx_complete_rec.created_by);
523     p1_a5 := rosetta_g_miss_num_map(ddx_complete_rec.last_update_login);
524     p1_a6 := rosetta_g_miss_num_map(ddx_complete_rec.object_version_number);
525     p1_a7 := ddx_complete_rec.orig_system_ref;
526     p1_a8 := rosetta_g_miss_num_map(ddx_complete_rec.orig_system_id);
527     p1_a9 := rosetta_g_miss_num_map(ddx_complete_rec.location_area_id);
528     p1_a10 := ddx_complete_rec.start_date_active;
529     p1_a11 := ddx_complete_rec.end_date_active;
530     p1_a12 := ddx_complete_rec.postal_code_start;
531     p1_a13 := ddx_complete_rec.postal_code_end;
532   end;
533 
534   procedure init_rec(p0_a0 OUT NOCOPY /* file.sql.39 change */  NUMBER
535     , p0_a1 OUT NOCOPY /* file.sql.39 change */  DATE
536     , p0_a2 OUT NOCOPY /* file.sql.39 change */  NUMBER
537     , p0_a3 OUT NOCOPY /* file.sql.39 change */  DATE
538     , p0_a4 OUT NOCOPY /* file.sql.39 change */  NUMBER
539     , p0_a5 OUT NOCOPY /* file.sql.39 change */  NUMBER
540     , p0_a6 OUT NOCOPY /* file.sql.39 change */  NUMBER
541     , p0_a7 OUT NOCOPY /* file.sql.39 change */  VARCHAR2
542     , p0_a8 OUT NOCOPY /* file.sql.39 change */  NUMBER
543     , p0_a9 OUT NOCOPY /* file.sql.39 change */  NUMBER
544     , p0_a10 OUT NOCOPY /* file.sql.39 change */  DATE
545     , p0_a11 OUT NOCOPY /* file.sql.39 change */  DATE
546     , p0_a12 OUT NOCOPY /* file.sql.39 change */  VARCHAR2
547     , p0_a13 OUT NOCOPY /* file.sql.39 change */  VARCHAR2
548   )
549   as
550     ddx_postal_code_rec jtf_loc_postal_codes_pvt.postal_code_rec_type;
551     ddindx binary_integer; indx binary_integer;
552   begin
553 
554     -- copy data to the local IN or IN-OUT args, if any
555 
556     -- here's the delegated call to the old PL/SQL routine
557     jtf_loc_postal_codes_pvt.init_rec(ddx_postal_code_rec);
558 
559     -- copy data back from the local OUT NOCOPY /* file.sql.39 change */ or IN-OUT args, if any
560     p0_a0 := rosetta_g_miss_num_map(ddx_postal_code_rec.location_postal_code_id);
561     p0_a1 := ddx_postal_code_rec.last_update_date;
562     p0_a2 := rosetta_g_miss_num_map(ddx_postal_code_rec.last_updated_by);
563     p0_a3 := ddx_postal_code_rec.creation_date;
564     p0_a4 := rosetta_g_miss_num_map(ddx_postal_code_rec.created_by);
565     p0_a5 := rosetta_g_miss_num_map(ddx_postal_code_rec.last_update_login);
566     p0_a6 := rosetta_g_miss_num_map(ddx_postal_code_rec.object_version_number);
567     p0_a7 := ddx_postal_code_rec.orig_system_ref;
568     p0_a8 := rosetta_g_miss_num_map(ddx_postal_code_rec.orig_system_id);
569     p0_a9 := rosetta_g_miss_num_map(ddx_postal_code_rec.location_area_id);
570     p0_a10 := ddx_postal_code_rec.start_date_active;
571     p0_a11 := ddx_postal_code_rec.end_date_active;
572     p0_a12 := ddx_postal_code_rec.postal_code_start;
573     p0_a13 := ddx_postal_code_rec.postal_code_end;
574   end;
575 
576 end jtf_loc_postal_codes_pvt_w;