[Home] [Help]
PACKAGE BODY: APPS.AMS_GEO_AREAS_PVT_W
Source
1 package body ams_geo_areas_pvt_w as
2 /* $Header: amswgeob.pls 115.6 2002/11/16 01:47:04 dbiswas 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_geo_area(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 VARCHAR2
27 , x_msg_count OUT NOCOPY NUMBER
28 , x_msg_data OUT NOCOPY VARCHAR2
29 , x_geo_area_id OUT NOCOPY 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 NUMBER := 0-1962.0724
38 , p7_a8 VARCHAR2 := fnd_api.g_miss_char
39 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
40 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
41 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
42 , p7_a12 VARCHAR2 := fnd_api.g_miss_char
43 , p7_a13 VARCHAR2 := fnd_api.g_miss_char
44 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
45 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
46 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
47 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
48 , p7_a18 VARCHAR2 := fnd_api.g_miss_char
49 , p7_a19 VARCHAR2 := fnd_api.g_miss_char
50 , p7_a20 VARCHAR2 := fnd_api.g_miss_char
51 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
52 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
53 , p7_a23 VARCHAR2 := fnd_api.g_miss_char
54 , p7_a24 VARCHAR2 := fnd_api.g_miss_char
55 , p7_a25 VARCHAR2 := fnd_api.g_miss_char
56 , p7_a26 NUMBER := 0-1962.0724
57 )
58 as
59 ddp_geo_area_rec ams_geo_areas_pvt.geo_area_rec_type;
60 ddindx binary_integer; indx binary_integer;
61 begin
62
63 -- copy data to the local IN or IN-OUT args, if any
64
65
66
67
68
69
70
71 ddp_geo_area_rec.activity_geo_area_id := rosetta_g_miss_num_map(p7_a0);
72 ddp_geo_area_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
73 ddp_geo_area_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
74 ddp_geo_area_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
75 ddp_geo_area_rec.created_by := rosetta_g_miss_num_map(p7_a4);
76 ddp_geo_area_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
77 ddp_geo_area_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
78 ddp_geo_area_rec.act_geo_area_used_by_id := rosetta_g_miss_num_map(p7_a7);
79 ddp_geo_area_rec.arc_act_geo_area_used_by := p7_a8;
80 ddp_geo_area_rec.attribute_category := p7_a9;
81 ddp_geo_area_rec.attribute1 := p7_a10;
82 ddp_geo_area_rec.attribute2 := p7_a11;
83 ddp_geo_area_rec.attribute3 := p7_a12;
84 ddp_geo_area_rec.attribute4 := p7_a13;
85 ddp_geo_area_rec.attribute5 := p7_a14;
86 ddp_geo_area_rec.attribute6 := p7_a15;
87 ddp_geo_area_rec.attribute7 := p7_a16;
88 ddp_geo_area_rec.attribute8 := p7_a17;
89 ddp_geo_area_rec.attribute9 := p7_a18;
90 ddp_geo_area_rec.attribute10 := p7_a19;
91 ddp_geo_area_rec.attribute11 := p7_a20;
92 ddp_geo_area_rec.attribute12 := p7_a21;
93 ddp_geo_area_rec.attribute13 := p7_a22;
94 ddp_geo_area_rec.attribute14 := p7_a23;
95 ddp_geo_area_rec.attribute15 := p7_a24;
96 ddp_geo_area_rec.geo_area_type_code := p7_a25;
97 ddp_geo_area_rec.geo_hierarchy_id := rosetta_g_miss_num_map(p7_a26);
98
99
100 -- here's the delegated call to the old PL/SQL routine
101 ams_geo_areas_pvt.create_geo_area(p_api_version,
102 p_init_msg_list,
103 p_commit,
104 p_validation_level,
105 x_return_status,
106 x_msg_count,
107 x_msg_data,
108 ddp_geo_area_rec,
109 x_geo_area_id);
110
111 -- copy data back from the local OUT or IN-OUT args, if any
112
113
114
115
116
117
118
119
120 end;
121
122 procedure update_geo_area(p_api_version NUMBER
123 , p_init_msg_list VARCHAR2
124 , p_commit VARCHAR2
125 , p_validation_level NUMBER
126 , x_return_status OUT NOCOPY VARCHAR2
127 , x_msg_count OUT NOCOPY NUMBER
128 , x_msg_data OUT NOCOPY VARCHAR2
129 , p7_a0 NUMBER := 0-1962.0724
130 , p7_a1 DATE := fnd_api.g_miss_date
131 , p7_a2 NUMBER := 0-1962.0724
132 , p7_a3 DATE := fnd_api.g_miss_date
133 , p7_a4 NUMBER := 0-1962.0724
134 , p7_a5 NUMBER := 0-1962.0724
135 , p7_a6 NUMBER := 0-1962.0724
136 , p7_a7 NUMBER := 0-1962.0724
137 , p7_a8 VARCHAR2 := fnd_api.g_miss_char
138 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
139 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
140 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
141 , p7_a12 VARCHAR2 := fnd_api.g_miss_char
142 , p7_a13 VARCHAR2 := fnd_api.g_miss_char
143 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
144 , p7_a15 VARCHAR2 := fnd_api.g_miss_char
145 , p7_a16 VARCHAR2 := fnd_api.g_miss_char
146 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
147 , p7_a18 VARCHAR2 := fnd_api.g_miss_char
148 , p7_a19 VARCHAR2 := fnd_api.g_miss_char
149 , p7_a20 VARCHAR2 := fnd_api.g_miss_char
150 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
151 , p7_a22 VARCHAR2 := fnd_api.g_miss_char
152 , p7_a23 VARCHAR2 := fnd_api.g_miss_char
153 , p7_a24 VARCHAR2 := fnd_api.g_miss_char
154 , p7_a25 VARCHAR2 := fnd_api.g_miss_char
155 , p7_a26 NUMBER := 0-1962.0724
156 )
157 as
158 ddp_geo_area_rec ams_geo_areas_pvt.geo_area_rec_type;
159 ddindx binary_integer; indx binary_integer;
160 begin
161
162 -- copy data to the local IN or IN-OUT args, if any
163
164
165
166
167
168
169
170 ddp_geo_area_rec.activity_geo_area_id := rosetta_g_miss_num_map(p7_a0);
171 ddp_geo_area_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
172 ddp_geo_area_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
173 ddp_geo_area_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
174 ddp_geo_area_rec.created_by := rosetta_g_miss_num_map(p7_a4);
175 ddp_geo_area_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
176 ddp_geo_area_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
177 ddp_geo_area_rec.act_geo_area_used_by_id := rosetta_g_miss_num_map(p7_a7);
178 ddp_geo_area_rec.arc_act_geo_area_used_by := p7_a8;
179 ddp_geo_area_rec.attribute_category := p7_a9;
180 ddp_geo_area_rec.attribute1 := p7_a10;
181 ddp_geo_area_rec.attribute2 := p7_a11;
182 ddp_geo_area_rec.attribute3 := p7_a12;
183 ddp_geo_area_rec.attribute4 := p7_a13;
184 ddp_geo_area_rec.attribute5 := p7_a14;
185 ddp_geo_area_rec.attribute6 := p7_a15;
186 ddp_geo_area_rec.attribute7 := p7_a16;
187 ddp_geo_area_rec.attribute8 := p7_a17;
188 ddp_geo_area_rec.attribute9 := p7_a18;
189 ddp_geo_area_rec.attribute10 := p7_a19;
190 ddp_geo_area_rec.attribute11 := p7_a20;
191 ddp_geo_area_rec.attribute12 := p7_a21;
192 ddp_geo_area_rec.attribute13 := p7_a22;
193 ddp_geo_area_rec.attribute14 := p7_a23;
194 ddp_geo_area_rec.attribute15 := p7_a24;
195 ddp_geo_area_rec.geo_area_type_code := p7_a25;
196 ddp_geo_area_rec.geo_hierarchy_id := rosetta_g_miss_num_map(p7_a26);
197
198 -- here's the delegated call to the old PL/SQL routine
199 ams_geo_areas_pvt.update_geo_area(p_api_version,
200 p_init_msg_list,
201 p_commit,
202 p_validation_level,
203 x_return_status,
204 x_msg_count,
205 x_msg_data,
206 ddp_geo_area_rec);
207
208 -- copy data back from the local OUT or IN-OUT args, if any
209
210
211
212
213
214
215
216 end;
217
218 procedure validate_geo_area(p_api_version NUMBER
219 , p_init_msg_list VARCHAR2
220 , p_validation_level NUMBER
221 , x_return_status OUT NOCOPY VARCHAR2
222 , x_msg_count OUT NOCOPY NUMBER
223 , x_msg_data OUT NOCOPY VARCHAR2
224 , p6_a0 NUMBER := 0-1962.0724
225 , p6_a1 DATE := fnd_api.g_miss_date
226 , p6_a2 NUMBER := 0-1962.0724
227 , p6_a3 DATE := fnd_api.g_miss_date
228 , p6_a4 NUMBER := 0-1962.0724
229 , p6_a5 NUMBER := 0-1962.0724
230 , p6_a6 NUMBER := 0-1962.0724
231 , p6_a7 NUMBER := 0-1962.0724
232 , p6_a8 VARCHAR2 := fnd_api.g_miss_char
233 , p6_a9 VARCHAR2 := fnd_api.g_miss_char
234 , p6_a10 VARCHAR2 := fnd_api.g_miss_char
235 , p6_a11 VARCHAR2 := fnd_api.g_miss_char
236 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
237 , p6_a13 VARCHAR2 := fnd_api.g_miss_char
238 , p6_a14 VARCHAR2 := fnd_api.g_miss_char
239 , p6_a15 VARCHAR2 := fnd_api.g_miss_char
240 , p6_a16 VARCHAR2 := fnd_api.g_miss_char
241 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
242 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
243 , p6_a19 VARCHAR2 := fnd_api.g_miss_char
244 , p6_a20 VARCHAR2 := fnd_api.g_miss_char
245 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
246 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
247 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
248 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
249 , p6_a25 VARCHAR2 := fnd_api.g_miss_char
250 , p6_a26 NUMBER := 0-1962.0724
251 )
252 as
253 ddp_geo_area_rec ams_geo_areas_pvt.geo_area_rec_type;
254 ddindx binary_integer; indx binary_integer;
255 begin
256
257 -- copy data to the local IN or IN-OUT args, if any
258
259
260
261
262
263
264 ddp_geo_area_rec.activity_geo_area_id := rosetta_g_miss_num_map(p6_a0);
265 ddp_geo_area_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a1);
266 ddp_geo_area_rec.last_updated_by := rosetta_g_miss_num_map(p6_a2);
267 ddp_geo_area_rec.creation_date := rosetta_g_miss_date_in_map(p6_a3);
268 ddp_geo_area_rec.created_by := rosetta_g_miss_num_map(p6_a4);
269 ddp_geo_area_rec.last_update_login := rosetta_g_miss_num_map(p6_a5);
270 ddp_geo_area_rec.object_version_number := rosetta_g_miss_num_map(p6_a6);
271 ddp_geo_area_rec.act_geo_area_used_by_id := rosetta_g_miss_num_map(p6_a7);
272 ddp_geo_area_rec.arc_act_geo_area_used_by := p6_a8;
273 ddp_geo_area_rec.attribute_category := p6_a9;
274 ddp_geo_area_rec.attribute1 := p6_a10;
275 ddp_geo_area_rec.attribute2 := p6_a11;
276 ddp_geo_area_rec.attribute3 := p6_a12;
277 ddp_geo_area_rec.attribute4 := p6_a13;
278 ddp_geo_area_rec.attribute5 := p6_a14;
279 ddp_geo_area_rec.attribute6 := p6_a15;
280 ddp_geo_area_rec.attribute7 := p6_a16;
281 ddp_geo_area_rec.attribute8 := p6_a17;
282 ddp_geo_area_rec.attribute9 := p6_a18;
283 ddp_geo_area_rec.attribute10 := p6_a19;
284 ddp_geo_area_rec.attribute11 := p6_a20;
285 ddp_geo_area_rec.attribute12 := p6_a21;
286 ddp_geo_area_rec.attribute13 := p6_a22;
287 ddp_geo_area_rec.attribute14 := p6_a23;
288 ddp_geo_area_rec.attribute15 := p6_a24;
289 ddp_geo_area_rec.geo_area_type_code := p6_a25;
290 ddp_geo_area_rec.geo_hierarchy_id := rosetta_g_miss_num_map(p6_a26);
291
292 -- here's the delegated call to the old PL/SQL routine
293 ams_geo_areas_pvt.validate_geo_area(p_api_version,
294 p_init_msg_list,
295 p_validation_level,
296 x_return_status,
297 x_msg_count,
298 x_msg_data,
299 ddp_geo_area_rec);
300
301 -- copy data back from the local OUT or IN-OUT args, if any
302
303
304
305
306
307
308 end;
309
310 procedure check_items(p_validation_mode VARCHAR2
311 , x_return_status OUT NOCOPY VARCHAR2
312 , p2_a0 NUMBER := 0-1962.0724
313 , p2_a1 DATE := fnd_api.g_miss_date
314 , p2_a2 NUMBER := 0-1962.0724
315 , p2_a3 DATE := fnd_api.g_miss_date
316 , p2_a4 NUMBER := 0-1962.0724
317 , p2_a5 NUMBER := 0-1962.0724
318 , p2_a6 NUMBER := 0-1962.0724
319 , p2_a7 NUMBER := 0-1962.0724
320 , p2_a8 VARCHAR2 := fnd_api.g_miss_char
321 , p2_a9 VARCHAR2 := fnd_api.g_miss_char
322 , p2_a10 VARCHAR2 := fnd_api.g_miss_char
323 , p2_a11 VARCHAR2 := fnd_api.g_miss_char
324 , p2_a12 VARCHAR2 := fnd_api.g_miss_char
325 , p2_a13 VARCHAR2 := fnd_api.g_miss_char
326 , p2_a14 VARCHAR2 := fnd_api.g_miss_char
327 , p2_a15 VARCHAR2 := fnd_api.g_miss_char
328 , p2_a16 VARCHAR2 := fnd_api.g_miss_char
329 , p2_a17 VARCHAR2 := fnd_api.g_miss_char
330 , p2_a18 VARCHAR2 := fnd_api.g_miss_char
331 , p2_a19 VARCHAR2 := fnd_api.g_miss_char
332 , p2_a20 VARCHAR2 := fnd_api.g_miss_char
333 , p2_a21 VARCHAR2 := fnd_api.g_miss_char
334 , p2_a22 VARCHAR2 := fnd_api.g_miss_char
335 , p2_a23 VARCHAR2 := fnd_api.g_miss_char
336 , p2_a24 VARCHAR2 := fnd_api.g_miss_char
337 , p2_a25 VARCHAR2 := fnd_api.g_miss_char
338 , p2_a26 NUMBER := 0-1962.0724
339 )
340 as
341 ddp_geo_area_rec ams_geo_areas_pvt.geo_area_rec_type;
342 ddindx binary_integer; indx binary_integer;
343 begin
344
345 -- copy data to the local IN or IN-OUT args, if any
346
347
348 ddp_geo_area_rec.activity_geo_area_id := rosetta_g_miss_num_map(p2_a0);
349 ddp_geo_area_rec.last_update_date := rosetta_g_miss_date_in_map(p2_a1);
350 ddp_geo_area_rec.last_updated_by := rosetta_g_miss_num_map(p2_a2);
351 ddp_geo_area_rec.creation_date := rosetta_g_miss_date_in_map(p2_a3);
352 ddp_geo_area_rec.created_by := rosetta_g_miss_num_map(p2_a4);
353 ddp_geo_area_rec.last_update_login := rosetta_g_miss_num_map(p2_a5);
354 ddp_geo_area_rec.object_version_number := rosetta_g_miss_num_map(p2_a6);
355 ddp_geo_area_rec.act_geo_area_used_by_id := rosetta_g_miss_num_map(p2_a7);
356 ddp_geo_area_rec.arc_act_geo_area_used_by := p2_a8;
357 ddp_geo_area_rec.attribute_category := p2_a9;
358 ddp_geo_area_rec.attribute1 := p2_a10;
359 ddp_geo_area_rec.attribute2 := p2_a11;
360 ddp_geo_area_rec.attribute3 := p2_a12;
361 ddp_geo_area_rec.attribute4 := p2_a13;
362 ddp_geo_area_rec.attribute5 := p2_a14;
363 ddp_geo_area_rec.attribute6 := p2_a15;
364 ddp_geo_area_rec.attribute7 := p2_a16;
365 ddp_geo_area_rec.attribute8 := p2_a17;
366 ddp_geo_area_rec.attribute9 := p2_a18;
367 ddp_geo_area_rec.attribute10 := p2_a19;
368 ddp_geo_area_rec.attribute11 := p2_a20;
369 ddp_geo_area_rec.attribute12 := p2_a21;
370 ddp_geo_area_rec.attribute13 := p2_a22;
371 ddp_geo_area_rec.attribute14 := p2_a23;
372 ddp_geo_area_rec.attribute15 := p2_a24;
373 ddp_geo_area_rec.geo_area_type_code := p2_a25;
374 ddp_geo_area_rec.geo_hierarchy_id := rosetta_g_miss_num_map(p2_a26);
375
376 -- here's the delegated call to the old PL/SQL routine
380
377 ams_geo_areas_pvt.check_items(p_validation_mode,
378 x_return_status,
379 ddp_geo_area_rec);
381 -- copy data back from the local OUT or IN-OUT args, if any
382
383
384 end;
385
386 procedure check_geo_area_req_items(p_validation_mode VARCHAR2
387 , x_return_status OUT NOCOPY VARCHAR2
388 , p1_a0 NUMBER := 0-1962.0724
389 , p1_a1 DATE := fnd_api.g_miss_date
390 , p1_a2 NUMBER := 0-1962.0724
391 , p1_a3 DATE := fnd_api.g_miss_date
392 , p1_a4 NUMBER := 0-1962.0724
393 , p1_a5 NUMBER := 0-1962.0724
394 , p1_a6 NUMBER := 0-1962.0724
395 , p1_a7 NUMBER := 0-1962.0724
396 , p1_a8 VARCHAR2 := fnd_api.g_miss_char
397 , p1_a9 VARCHAR2 := fnd_api.g_miss_char
398 , p1_a10 VARCHAR2 := fnd_api.g_miss_char
399 , p1_a11 VARCHAR2 := fnd_api.g_miss_char
400 , p1_a12 VARCHAR2 := fnd_api.g_miss_char
401 , p1_a13 VARCHAR2 := fnd_api.g_miss_char
402 , p1_a14 VARCHAR2 := fnd_api.g_miss_char
403 , p1_a15 VARCHAR2 := fnd_api.g_miss_char
404 , p1_a16 VARCHAR2 := fnd_api.g_miss_char
405 , p1_a17 VARCHAR2 := fnd_api.g_miss_char
406 , p1_a18 VARCHAR2 := fnd_api.g_miss_char
407 , p1_a19 VARCHAR2 := fnd_api.g_miss_char
408 , p1_a20 VARCHAR2 := fnd_api.g_miss_char
409 , p1_a21 VARCHAR2 := fnd_api.g_miss_char
410 , p1_a22 VARCHAR2 := fnd_api.g_miss_char
411 , p1_a23 VARCHAR2 := fnd_api.g_miss_char
412 , p1_a24 VARCHAR2 := fnd_api.g_miss_char
413 , p1_a25 VARCHAR2 := fnd_api.g_miss_char
414 , p1_a26 NUMBER := 0-1962.0724
415 )
416 as
417 ddp_geo_area_rec ams_geo_areas_pvt.geo_area_rec_type;
418 ddindx binary_integer; indx binary_integer;
419 begin
420
421 -- copy data to the local IN or IN-OUT args, if any
422
423 ddp_geo_area_rec.activity_geo_area_id := rosetta_g_miss_num_map(p1_a0);
424 ddp_geo_area_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
425 ddp_geo_area_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
426 ddp_geo_area_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
427 ddp_geo_area_rec.created_by := rosetta_g_miss_num_map(p1_a4);
428 ddp_geo_area_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
429 ddp_geo_area_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
430 ddp_geo_area_rec.act_geo_area_used_by_id := rosetta_g_miss_num_map(p1_a7);
431 ddp_geo_area_rec.arc_act_geo_area_used_by := p1_a8;
432 ddp_geo_area_rec.attribute_category := p1_a9;
433 ddp_geo_area_rec.attribute1 := p1_a10;
434 ddp_geo_area_rec.attribute2 := p1_a11;
435 ddp_geo_area_rec.attribute3 := p1_a12;
436 ddp_geo_area_rec.attribute4 := p1_a13;
437 ddp_geo_area_rec.attribute5 := p1_a14;
438 ddp_geo_area_rec.attribute6 := p1_a15;
439 ddp_geo_area_rec.attribute7 := p1_a16;
440 ddp_geo_area_rec.attribute8 := p1_a17;
441 ddp_geo_area_rec.attribute9 := p1_a18;
442 ddp_geo_area_rec.attribute10 := p1_a19;
443 ddp_geo_area_rec.attribute11 := p1_a20;
444 ddp_geo_area_rec.attribute12 := p1_a21;
445 ddp_geo_area_rec.attribute13 := p1_a22;
446 ddp_geo_area_rec.attribute14 := p1_a23;
447 ddp_geo_area_rec.attribute15 := p1_a24;
448 ddp_geo_area_rec.geo_area_type_code := p1_a25;
449 ddp_geo_area_rec.geo_hierarchy_id := rosetta_g_miss_num_map(p1_a26);
450
451
452 -- here's the delegated call to the old PL/SQL routine
453 ams_geo_areas_pvt.check_geo_area_req_items(p_validation_mode,
454 ddp_geo_area_rec,
455 x_return_status);
456
457 -- copy data back from the local OUT or IN-OUT args, if any
458
459
460 end;
461
462 procedure check_geo_area_uk_items(p_validation_mode VARCHAR2
463 , x_return_status OUT NOCOPY VARCHAR2
464 , p1_a0 NUMBER := 0-1962.0724
465 , p1_a1 DATE := fnd_api.g_miss_date
466 , p1_a2 NUMBER := 0-1962.0724
467 , p1_a3 DATE := fnd_api.g_miss_date
468 , p1_a4 NUMBER := 0-1962.0724
469 , p1_a5 NUMBER := 0-1962.0724
470 , p1_a6 NUMBER := 0-1962.0724
471 , p1_a7 NUMBER := 0-1962.0724
472 , p1_a8 VARCHAR2 := fnd_api.g_miss_char
473 , p1_a9 VARCHAR2 := fnd_api.g_miss_char
474 , p1_a10 VARCHAR2 := fnd_api.g_miss_char
475 , p1_a11 VARCHAR2 := fnd_api.g_miss_char
476 , p1_a12 VARCHAR2 := fnd_api.g_miss_char
477 , p1_a13 VARCHAR2 := fnd_api.g_miss_char
478 , p1_a14 VARCHAR2 := fnd_api.g_miss_char
479 , p1_a15 VARCHAR2 := fnd_api.g_miss_char
480 , p1_a16 VARCHAR2 := fnd_api.g_miss_char
481 , p1_a17 VARCHAR2 := fnd_api.g_miss_char
482 , p1_a18 VARCHAR2 := fnd_api.g_miss_char
483 , p1_a19 VARCHAR2 := fnd_api.g_miss_char
484 , p1_a20 VARCHAR2 := fnd_api.g_miss_char
485 , p1_a21 VARCHAR2 := fnd_api.g_miss_char
486 , p1_a22 VARCHAR2 := fnd_api.g_miss_char
487 , p1_a23 VARCHAR2 := fnd_api.g_miss_char
488 , p1_a24 VARCHAR2 := fnd_api.g_miss_char
489 , p1_a25 VARCHAR2 := fnd_api.g_miss_char
490 , p1_a26 NUMBER := 0-1962.0724
491 )
492 as
493 ddp_geo_area_rec ams_geo_areas_pvt.geo_area_rec_type;
494 ddindx binary_integer; indx binary_integer;
495 begin
496
497 -- copy data to the local IN or IN-OUT args, if any
498
499 ddp_geo_area_rec.activity_geo_area_id := rosetta_g_miss_num_map(p1_a0);
503 ddp_geo_area_rec.created_by := rosetta_g_miss_num_map(p1_a4);
500 ddp_geo_area_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
501 ddp_geo_area_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
502 ddp_geo_area_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
504 ddp_geo_area_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
505 ddp_geo_area_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
506 ddp_geo_area_rec.act_geo_area_used_by_id := rosetta_g_miss_num_map(p1_a7);
507 ddp_geo_area_rec.arc_act_geo_area_used_by := p1_a8;
508 ddp_geo_area_rec.attribute_category := p1_a9;
509 ddp_geo_area_rec.attribute1 := p1_a10;
510 ddp_geo_area_rec.attribute2 := p1_a11;
511 ddp_geo_area_rec.attribute3 := p1_a12;
512 ddp_geo_area_rec.attribute4 := p1_a13;
513 ddp_geo_area_rec.attribute5 := p1_a14;
514 ddp_geo_area_rec.attribute6 := p1_a15;
515 ddp_geo_area_rec.attribute7 := p1_a16;
516 ddp_geo_area_rec.attribute8 := p1_a17;
517 ddp_geo_area_rec.attribute9 := p1_a18;
518 ddp_geo_area_rec.attribute10 := p1_a19;
519 ddp_geo_area_rec.attribute11 := p1_a20;
520 ddp_geo_area_rec.attribute12 := p1_a21;
521 ddp_geo_area_rec.attribute13 := p1_a22;
522 ddp_geo_area_rec.attribute14 := p1_a23;
523 ddp_geo_area_rec.attribute15 := p1_a24;
524 ddp_geo_area_rec.geo_area_type_code := p1_a25;
525 ddp_geo_area_rec.geo_hierarchy_id := rosetta_g_miss_num_map(p1_a26);
526
527
528 -- here's the delegated call to the old PL/SQL routine
529 ams_geo_areas_pvt.check_geo_area_uk_items(p_validation_mode,
530 ddp_geo_area_rec,
531 x_return_status);
532
533 -- copy data back from the local OUT or IN-OUT args, if any
534
535
536 end;
537
538 procedure check_geo_area_fk_items(x_return_status OUT NOCOPY VARCHAR2
539 , p0_a0 NUMBER := 0-1962.0724
540 , p0_a1 DATE := fnd_api.g_miss_date
541 , p0_a2 NUMBER := 0-1962.0724
542 , p0_a3 DATE := fnd_api.g_miss_date
543 , p0_a4 NUMBER := 0-1962.0724
544 , p0_a5 NUMBER := 0-1962.0724
545 , p0_a6 NUMBER := 0-1962.0724
546 , p0_a7 NUMBER := 0-1962.0724
547 , p0_a8 VARCHAR2 := fnd_api.g_miss_char
548 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
549 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
550 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
551 , p0_a12 VARCHAR2 := fnd_api.g_miss_char
552 , p0_a13 VARCHAR2 := fnd_api.g_miss_char
553 , p0_a14 VARCHAR2 := fnd_api.g_miss_char
554 , p0_a15 VARCHAR2 := fnd_api.g_miss_char
555 , p0_a16 VARCHAR2 := fnd_api.g_miss_char
556 , p0_a17 VARCHAR2 := fnd_api.g_miss_char
557 , p0_a18 VARCHAR2 := fnd_api.g_miss_char
558 , p0_a19 VARCHAR2 := fnd_api.g_miss_char
559 , p0_a20 VARCHAR2 := fnd_api.g_miss_char
560 , p0_a21 VARCHAR2 := fnd_api.g_miss_char
561 , p0_a22 VARCHAR2 := fnd_api.g_miss_char
562 , p0_a23 VARCHAR2 := fnd_api.g_miss_char
563 , p0_a24 VARCHAR2 := fnd_api.g_miss_char
564 , p0_a25 VARCHAR2 := fnd_api.g_miss_char
565 , p0_a26 NUMBER := 0-1962.0724
566 )
567 as
568 ddp_geo_area_rec ams_geo_areas_pvt.geo_area_rec_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 ddp_geo_area_rec.activity_geo_area_id := rosetta_g_miss_num_map(p0_a0);
574 ddp_geo_area_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
575 ddp_geo_area_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
576 ddp_geo_area_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
577 ddp_geo_area_rec.created_by := rosetta_g_miss_num_map(p0_a4);
578 ddp_geo_area_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
579 ddp_geo_area_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
580 ddp_geo_area_rec.act_geo_area_used_by_id := rosetta_g_miss_num_map(p0_a7);
581 ddp_geo_area_rec.arc_act_geo_area_used_by := p0_a8;
582 ddp_geo_area_rec.attribute_category := p0_a9;
583 ddp_geo_area_rec.attribute1 := p0_a10;
584 ddp_geo_area_rec.attribute2 := p0_a11;
585 ddp_geo_area_rec.attribute3 := p0_a12;
586 ddp_geo_area_rec.attribute4 := p0_a13;
587 ddp_geo_area_rec.attribute5 := p0_a14;
588 ddp_geo_area_rec.attribute6 := p0_a15;
589 ddp_geo_area_rec.attribute7 := p0_a16;
590 ddp_geo_area_rec.attribute8 := p0_a17;
591 ddp_geo_area_rec.attribute9 := p0_a18;
592 ddp_geo_area_rec.attribute10 := p0_a19;
593 ddp_geo_area_rec.attribute11 := p0_a20;
594 ddp_geo_area_rec.attribute12 := p0_a21;
595 ddp_geo_area_rec.attribute13 := p0_a22;
596 ddp_geo_area_rec.attribute14 := p0_a23;
597 ddp_geo_area_rec.attribute15 := p0_a24;
598 ddp_geo_area_rec.geo_area_type_code := p0_a25;
599 ddp_geo_area_rec.geo_hierarchy_id := rosetta_g_miss_num_map(p0_a26);
600
601
602 -- here's the delegated call to the old PL/SQL routine
603 ams_geo_areas_pvt.check_geo_area_fk_items(ddp_geo_area_rec,
604 x_return_status);
605
606 -- copy data back from the local OUT or IN-OUT args, if any
607
608 end;
609
610 procedure complete_geo_area_rec(p1_a0 OUT NOCOPY NUMBER
611 , p1_a1 OUT NOCOPY DATE
612 , p1_a2 OUT NOCOPY NUMBER
613 , p1_a3 OUT NOCOPY DATE
614 , p1_a4 OUT NOCOPY NUMBER
615 , p1_a5 OUT NOCOPY NUMBER
619 , p1_a9 OUT NOCOPY VARCHAR2
616 , p1_a6 OUT NOCOPY NUMBER
617 , p1_a7 OUT NOCOPY NUMBER
618 , p1_a8 OUT NOCOPY VARCHAR2
620 , p1_a10 OUT NOCOPY VARCHAR2
621 , p1_a11 OUT NOCOPY VARCHAR2
622 , p1_a12 OUT NOCOPY VARCHAR2
623 , p1_a13 OUT NOCOPY VARCHAR2
624 , p1_a14 OUT NOCOPY VARCHAR2
625 , p1_a15 OUT NOCOPY VARCHAR2
626 , p1_a16 OUT NOCOPY VARCHAR2
627 , p1_a17 OUT NOCOPY VARCHAR2
628 , p1_a18 OUT NOCOPY VARCHAR2
629 , p1_a19 OUT NOCOPY VARCHAR2
630 , p1_a20 OUT NOCOPY VARCHAR2
631 , p1_a21 OUT NOCOPY VARCHAR2
632 , p1_a22 OUT NOCOPY VARCHAR2
633 , p1_a23 OUT NOCOPY VARCHAR2
634 , p1_a24 OUT NOCOPY VARCHAR2
635 , p1_a25 OUT NOCOPY VARCHAR2
636 , p1_a26 OUT NOCOPY NUMBER
637 , p0_a0 NUMBER := 0-1962.0724
638 , p0_a1 DATE := fnd_api.g_miss_date
639 , p0_a2 NUMBER := 0-1962.0724
640 , p0_a3 DATE := fnd_api.g_miss_date
641 , p0_a4 NUMBER := 0-1962.0724
642 , p0_a5 NUMBER := 0-1962.0724
643 , p0_a6 NUMBER := 0-1962.0724
644 , p0_a7 NUMBER := 0-1962.0724
645 , p0_a8 VARCHAR2 := fnd_api.g_miss_char
646 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
647 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
648 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
649 , p0_a12 VARCHAR2 := fnd_api.g_miss_char
650 , p0_a13 VARCHAR2 := fnd_api.g_miss_char
651 , p0_a14 VARCHAR2 := fnd_api.g_miss_char
652 , p0_a15 VARCHAR2 := fnd_api.g_miss_char
653 , p0_a16 VARCHAR2 := fnd_api.g_miss_char
654 , p0_a17 VARCHAR2 := fnd_api.g_miss_char
655 , p0_a18 VARCHAR2 := fnd_api.g_miss_char
656 , p0_a19 VARCHAR2 := fnd_api.g_miss_char
657 , p0_a20 VARCHAR2 := fnd_api.g_miss_char
658 , p0_a21 VARCHAR2 := fnd_api.g_miss_char
659 , p0_a22 VARCHAR2 := fnd_api.g_miss_char
660 , p0_a23 VARCHAR2 := fnd_api.g_miss_char
661 , p0_a24 VARCHAR2 := fnd_api.g_miss_char
662 , p0_a25 VARCHAR2 := fnd_api.g_miss_char
663 , p0_a26 NUMBER := 0-1962.0724
664 )
665 as
666 ddp_geo_area_rec ams_geo_areas_pvt.geo_area_rec_type;
667 ddx_complete_rec ams_geo_areas_pvt.geo_area_rec_type;
668 ddindx binary_integer; indx binary_integer;
669 begin
670
671 -- copy data to the local IN or IN-OUT args, if any
672 ddp_geo_area_rec.activity_geo_area_id := rosetta_g_miss_num_map(p0_a0);
673 ddp_geo_area_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
674 ddp_geo_area_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
675 ddp_geo_area_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
676 ddp_geo_area_rec.created_by := rosetta_g_miss_num_map(p0_a4);
677 ddp_geo_area_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
678 ddp_geo_area_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
679 ddp_geo_area_rec.act_geo_area_used_by_id := rosetta_g_miss_num_map(p0_a7);
680 ddp_geo_area_rec.arc_act_geo_area_used_by := p0_a8;
681 ddp_geo_area_rec.attribute_category := p0_a9;
682 ddp_geo_area_rec.attribute1 := p0_a10;
683 ddp_geo_area_rec.attribute2 := p0_a11;
684 ddp_geo_area_rec.attribute3 := p0_a12;
685 ddp_geo_area_rec.attribute4 := p0_a13;
686 ddp_geo_area_rec.attribute5 := p0_a14;
687 ddp_geo_area_rec.attribute6 := p0_a15;
688 ddp_geo_area_rec.attribute7 := p0_a16;
689 ddp_geo_area_rec.attribute8 := p0_a17;
690 ddp_geo_area_rec.attribute9 := p0_a18;
691 ddp_geo_area_rec.attribute10 := p0_a19;
692 ddp_geo_area_rec.attribute11 := p0_a20;
693 ddp_geo_area_rec.attribute12 := p0_a21;
694 ddp_geo_area_rec.attribute13 := p0_a22;
695 ddp_geo_area_rec.attribute14 := p0_a23;
696 ddp_geo_area_rec.attribute15 := p0_a24;
697 ddp_geo_area_rec.geo_area_type_code := p0_a25;
698 ddp_geo_area_rec.geo_hierarchy_id := rosetta_g_miss_num_map(p0_a26);
699
700
701 -- here's the delegated call to the old PL/SQL routine
702 ams_geo_areas_pvt.complete_geo_area_rec(ddp_geo_area_rec,
703 ddx_complete_rec);
704
705 -- copy data back from the local OUT or IN-OUT args, if any
706
707 p1_a0 := rosetta_g_miss_num_map(ddx_complete_rec.activity_geo_area_id);
708 p1_a1 := ddx_complete_rec.last_update_date;
709 p1_a2 := rosetta_g_miss_num_map(ddx_complete_rec.last_updated_by);
710 p1_a3 := ddx_complete_rec.creation_date;
711 p1_a4 := rosetta_g_miss_num_map(ddx_complete_rec.created_by);
712 p1_a5 := rosetta_g_miss_num_map(ddx_complete_rec.last_update_login);
713 p1_a6 := rosetta_g_miss_num_map(ddx_complete_rec.object_version_number);
714 p1_a7 := rosetta_g_miss_num_map(ddx_complete_rec.act_geo_area_used_by_id);
715 p1_a8 := ddx_complete_rec.arc_act_geo_area_used_by;
716 p1_a9 := ddx_complete_rec.attribute_category;
717 p1_a10 := ddx_complete_rec.attribute1;
718 p1_a11 := ddx_complete_rec.attribute2;
719 p1_a12 := ddx_complete_rec.attribute3;
720 p1_a13 := ddx_complete_rec.attribute4;
721 p1_a14 := ddx_complete_rec.attribute5;
722 p1_a15 := ddx_complete_rec.attribute6;
723 p1_a16 := ddx_complete_rec.attribute7;
724 p1_a17 := ddx_complete_rec.attribute8;
725 p1_a18 := ddx_complete_rec.attribute9;
726 p1_a19 := ddx_complete_rec.attribute10;
727 p1_a20 := ddx_complete_rec.attribute11;
728 p1_a21 := ddx_complete_rec.attribute12;
732 p1_a25 := ddx_complete_rec.geo_area_type_code;
729 p1_a22 := ddx_complete_rec.attribute13;
730 p1_a23 := ddx_complete_rec.attribute14;
731 p1_a24 := ddx_complete_rec.attribute15;
733 p1_a26 := rosetta_g_miss_num_map(ddx_complete_rec.geo_hierarchy_id);
734 end;
735
736 procedure init_rec(p0_a0 OUT NOCOPY NUMBER
737 , p0_a1 OUT NOCOPY DATE
738 , p0_a2 OUT NOCOPY NUMBER
739 , p0_a3 OUT NOCOPY DATE
740 , p0_a4 OUT NOCOPY NUMBER
741 , p0_a5 OUT NOCOPY NUMBER
742 , p0_a6 OUT NOCOPY NUMBER
743 , p0_a7 OUT NOCOPY NUMBER
744 , p0_a8 OUT NOCOPY VARCHAR2
745 , p0_a9 OUT NOCOPY VARCHAR2
746 , p0_a10 OUT NOCOPY VARCHAR2
747 , p0_a11 OUT NOCOPY VARCHAR2
748 , p0_a12 OUT NOCOPY VARCHAR2
749 , p0_a13 OUT NOCOPY VARCHAR2
750 , p0_a14 OUT NOCOPY VARCHAR2
751 , p0_a15 OUT NOCOPY VARCHAR2
752 , p0_a16 OUT NOCOPY VARCHAR2
753 , p0_a17 OUT NOCOPY VARCHAR2
754 , p0_a18 OUT NOCOPY VARCHAR2
755 , p0_a19 OUT NOCOPY VARCHAR2
756 , p0_a20 OUT NOCOPY VARCHAR2
757 , p0_a21 OUT NOCOPY VARCHAR2
758 , p0_a22 OUT NOCOPY VARCHAR2
759 , p0_a23 OUT NOCOPY VARCHAR2
760 , p0_a24 OUT NOCOPY VARCHAR2
761 , p0_a25 OUT NOCOPY VARCHAR2
762 , p0_a26 OUT NOCOPY NUMBER
763 )
764 as
765 ddx_geo_area_rec ams_geo_areas_pvt.geo_area_rec_type;
766 ddindx binary_integer; indx binary_integer;
767 begin
768
769 -- copy data to the local IN or IN-OUT args, if any
770
771 -- here's the delegated call to the old PL/SQL routine
772 ams_geo_areas_pvt.init_rec(ddx_geo_area_rec);
773
774 -- copy data back from the local OUT or IN-OUT args, if any
775 p0_a0 := rosetta_g_miss_num_map(ddx_geo_area_rec.activity_geo_area_id);
776 p0_a1 := ddx_geo_area_rec.last_update_date;
777 p0_a2 := rosetta_g_miss_num_map(ddx_geo_area_rec.last_updated_by);
778 p0_a3 := ddx_geo_area_rec.creation_date;
779 p0_a4 := rosetta_g_miss_num_map(ddx_geo_area_rec.created_by);
780 p0_a5 := rosetta_g_miss_num_map(ddx_geo_area_rec.last_update_login);
781 p0_a6 := rosetta_g_miss_num_map(ddx_geo_area_rec.object_version_number);
782 p0_a7 := rosetta_g_miss_num_map(ddx_geo_area_rec.act_geo_area_used_by_id);
783 p0_a8 := ddx_geo_area_rec.arc_act_geo_area_used_by;
784 p0_a9 := ddx_geo_area_rec.attribute_category;
785 p0_a10 := ddx_geo_area_rec.attribute1;
786 p0_a11 := ddx_geo_area_rec.attribute2;
787 p0_a12 := ddx_geo_area_rec.attribute3;
788 p0_a13 := ddx_geo_area_rec.attribute4;
789 p0_a14 := ddx_geo_area_rec.attribute5;
790 p0_a15 := ddx_geo_area_rec.attribute6;
791 p0_a16 := ddx_geo_area_rec.attribute7;
792 p0_a17 := ddx_geo_area_rec.attribute8;
793 p0_a18 := ddx_geo_area_rec.attribute9;
794 p0_a19 := ddx_geo_area_rec.attribute10;
795 p0_a20 := ddx_geo_area_rec.attribute11;
796 p0_a21 := ddx_geo_area_rec.attribute12;
797 p0_a22 := ddx_geo_area_rec.attribute13;
798 p0_a23 := ddx_geo_area_rec.attribute14;
799 p0_a24 := ddx_geo_area_rec.attribute15;
800 p0_a25 := ddx_geo_area_rec.geo_area_type_code;
801 p0_a26 := rosetta_g_miss_num_map(ddx_geo_area_rec.geo_hierarchy_id);
802 end;
803
804 end ams_geo_areas_pvt_w;