[Home] [Help]
PACKAGE BODY: APPS.PV_ENTY_ATTR_VALIDATIONS_PVT_W
Source
1 package body pv_enty_attr_validations_pvt_w as
2 /* $Header: pvxwatvb.pls 115.0 2002/12/07 03:07:45 amaram 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_enty_attr_validation(p_api_version_number 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_enty_attr_validation_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 DATE := fnd_api.g_miss_date
38 , p7_a8 NUMBER := 0-1962.0724
39 , p7_a9 NUMBER := 0-1962.0724
40 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
41 )
42
43 as
44 ddp_enty_attr_validation_rec pv_enty_attr_validations_pvt.enty_attr_validation_rec_type;
45 ddindx binary_integer; indx binary_integer;
46 begin
47
48 -- copy data to the local IN or IN-OUT args, if any
49
50
51
52
53
54
55
56 ddp_enty_attr_validation_rec.validation_id := rosetta_g_miss_num_map(p7_a0);
57 ddp_enty_attr_validation_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
58 ddp_enty_attr_validation_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
59 ddp_enty_attr_validation_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
60 ddp_enty_attr_validation_rec.created_by := rosetta_g_miss_num_map(p7_a4);
61 ddp_enty_attr_validation_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
62 ddp_enty_attr_validation_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
63 ddp_enty_attr_validation_rec.validation_date := rosetta_g_miss_date_in_map(p7_a7);
64 ddp_enty_attr_validation_rec.validated_by_resource_id := rosetta_g_miss_num_map(p7_a8);
65 ddp_enty_attr_validation_rec.validation_document_id := rosetta_g_miss_num_map(p7_a9);
66 ddp_enty_attr_validation_rec.validation_note := p7_a10;
67
68
69 -- here's the delegated call to the old PL/SQL routine
70 pv_enty_attr_validations_pvt.create_enty_attr_validation(p_api_version_number,
71 p_init_msg_list,
72 p_commit,
73 p_validation_level,
74 x_return_status,
75 x_msg_count,
76 x_msg_data,
77 ddp_enty_attr_validation_rec,
78 x_enty_attr_validation_id);
79
80 -- copy data back from the local variables to OUT or IN-OUT args, if any
81
82
83
84
85
86
87
88
89 end;
90
91 procedure update_enty_attr_validation(p_api_version_number NUMBER
92 , p_init_msg_list VARCHAR2
93 , p_commit VARCHAR2
94 , p_validation_level NUMBER
95 , x_return_status out nocopy VARCHAR2
96 , x_msg_count out nocopy NUMBER
97 , x_msg_data out nocopy VARCHAR2
98 , x_object_version_number out nocopy NUMBER
99 , p7_a0 NUMBER := 0-1962.0724
100 , p7_a1 DATE := fnd_api.g_miss_date
101 , p7_a2 NUMBER := 0-1962.0724
102 , p7_a3 DATE := fnd_api.g_miss_date
103 , p7_a4 NUMBER := 0-1962.0724
104 , p7_a5 NUMBER := 0-1962.0724
105 , p7_a6 NUMBER := 0-1962.0724
106 , p7_a7 DATE := fnd_api.g_miss_date
107 , p7_a8 NUMBER := 0-1962.0724
108 , p7_a9 NUMBER := 0-1962.0724
109 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
110 )
111
112 as
113 ddp_enty_attr_validation_rec pv_enty_attr_validations_pvt.enty_attr_validation_rec_type;
114 ddindx binary_integer; indx binary_integer;
115 begin
116
117 -- copy data to the local IN or IN-OUT args, if any
118
119
120
121
122
123
124
125 ddp_enty_attr_validation_rec.validation_id := rosetta_g_miss_num_map(p7_a0);
126 ddp_enty_attr_validation_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
127 ddp_enty_attr_validation_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
128 ddp_enty_attr_validation_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
129 ddp_enty_attr_validation_rec.created_by := rosetta_g_miss_num_map(p7_a4);
130 ddp_enty_attr_validation_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
131 ddp_enty_attr_validation_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
132 ddp_enty_attr_validation_rec.validation_date := rosetta_g_miss_date_in_map(p7_a7);
133 ddp_enty_attr_validation_rec.validated_by_resource_id := rosetta_g_miss_num_map(p7_a8);
134 ddp_enty_attr_validation_rec.validation_document_id := rosetta_g_miss_num_map(p7_a9);
135 ddp_enty_attr_validation_rec.validation_note := p7_a10;
136
137
138 -- here's the delegated call to the old PL/SQL routine
139 pv_enty_attr_validations_pvt.update_enty_attr_validation(p_api_version_number,
140 p_init_msg_list,
141 p_commit,
142 p_validation_level,
143 x_return_status,
144 x_msg_count,
145 x_msg_data,
146 ddp_enty_attr_validation_rec,
147 x_object_version_number);
148
149 -- copy data back from the local variables to OUT or IN-OUT args, if any
150
151
152
153
154
155
156
157
158 end;
159
160 procedure validate_enty_attr_validation(p_api_version_number NUMBER
161 , p_init_msg_list VARCHAR2
162 , p_validation_level NUMBER
163 , p_validation_mode VARCHAR2
164 , x_return_status out nocopy VARCHAR2
165 , x_msg_count out nocopy NUMBER
166 , x_msg_data out nocopy VARCHAR2
167 , p4_a0 NUMBER := 0-1962.0724
168 , p4_a1 DATE := fnd_api.g_miss_date
169 , p4_a2 NUMBER := 0-1962.0724
170 , p4_a3 DATE := fnd_api.g_miss_date
171 , p4_a4 NUMBER := 0-1962.0724
172 , p4_a5 NUMBER := 0-1962.0724
173 , p4_a6 NUMBER := 0-1962.0724
174 , p4_a7 DATE := fnd_api.g_miss_date
175 , p4_a8 NUMBER := 0-1962.0724
176 , p4_a9 NUMBER := 0-1962.0724
177 , p4_a10 VARCHAR2 := fnd_api.g_miss_char
178 )
179
180 as
181 ddp_enty_attr_validation_rec pv_enty_attr_validations_pvt.enty_attr_validation_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 ddp_enty_attr_validation_rec.validation_id := rosetta_g_miss_num_map(p4_a0);
191 ddp_enty_attr_validation_rec.last_update_date := rosetta_g_miss_date_in_map(p4_a1);
192 ddp_enty_attr_validation_rec.last_updated_by := rosetta_g_miss_num_map(p4_a2);
193 ddp_enty_attr_validation_rec.creation_date := rosetta_g_miss_date_in_map(p4_a3);
194 ddp_enty_attr_validation_rec.created_by := rosetta_g_miss_num_map(p4_a4);
195 ddp_enty_attr_validation_rec.last_update_login := rosetta_g_miss_num_map(p4_a5);
196 ddp_enty_attr_validation_rec.object_version_number := rosetta_g_miss_num_map(p4_a6);
197 ddp_enty_attr_validation_rec.validation_date := rosetta_g_miss_date_in_map(p4_a7);
198 ddp_enty_attr_validation_rec.validated_by_resource_id := rosetta_g_miss_num_map(p4_a8);
199 ddp_enty_attr_validation_rec.validation_document_id := rosetta_g_miss_num_map(p4_a9);
200 ddp_enty_attr_validation_rec.validation_note := p4_a10;
201
202
203
204
205 -- here's the delegated call to the old PL/SQL routine
206 pv_enty_attr_validations_pvt.validate_enty_attr_validation(p_api_version_number,
207 p_init_msg_list,
208 p_validation_level,
209 p_validation_mode,
210 ddp_enty_attr_validation_rec,
211 x_return_status,
212 x_msg_count,
213 x_msg_data);
214
215 -- copy data back from the local variables to OUT or IN-OUT args, if any
216
217
218
219
220
221
222
223 end;
224
225 procedure check_enty_attr_vldtn_items(p_validation_mode VARCHAR2
226 , x_return_status out nocopy VARCHAR2
227 , p0_a0 NUMBER := 0-1962.0724
228 , p0_a1 DATE := fnd_api.g_miss_date
229 , p0_a2 NUMBER := 0-1962.0724
230 , p0_a3 DATE := fnd_api.g_miss_date
231 , p0_a4 NUMBER := 0-1962.0724
232 , p0_a5 NUMBER := 0-1962.0724
233 , p0_a6 NUMBER := 0-1962.0724
234 , p0_a7 DATE := fnd_api.g_miss_date
235 , p0_a8 NUMBER := 0-1962.0724
236 , p0_a9 NUMBER := 0-1962.0724
237 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
238 )
239
240 as
241 ddp_enty_attr_validation_rec pv_enty_attr_validations_pvt.enty_attr_validation_rec_type;
242 ddindx binary_integer; indx binary_integer;
243 begin
244
245 -- copy data to the local IN or IN-OUT args, if any
246 ddp_enty_attr_validation_rec.validation_id := rosetta_g_miss_num_map(p0_a0);
247 ddp_enty_attr_validation_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
248 ddp_enty_attr_validation_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
249 ddp_enty_attr_validation_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
250 ddp_enty_attr_validation_rec.created_by := rosetta_g_miss_num_map(p0_a4);
251 ddp_enty_attr_validation_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
252 ddp_enty_attr_validation_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
253 ddp_enty_attr_validation_rec.validation_date := rosetta_g_miss_date_in_map(p0_a7);
254 ddp_enty_attr_validation_rec.validated_by_resource_id := rosetta_g_miss_num_map(p0_a8);
255 ddp_enty_attr_validation_rec.validation_document_id := rosetta_g_miss_num_map(p0_a9);
256 ddp_enty_attr_validation_rec.validation_note := p0_a10;
257
258
259
260 -- here's the delegated call to the old PL/SQL routine
261 pv_enty_attr_validations_pvt.check_enty_attr_vldtn_items(ddp_enty_attr_validation_rec,
262 p_validation_mode,
263 x_return_status);
264
265 -- copy data back from the local variables to OUT or IN-OUT args, if any
266
267
268 end;
269
270 procedure validate_enty_attr_vldtn_rec(p_api_version_number NUMBER
271 , p_init_msg_list VARCHAR2
272 , x_return_status out nocopy VARCHAR2
273 , x_msg_count out nocopy NUMBER
274 , x_msg_data out nocopy VARCHAR2
275 , p_validation_mode VARCHAR2
276 , p5_a0 NUMBER := 0-1962.0724
277 , p5_a1 DATE := fnd_api.g_miss_date
278 , p5_a2 NUMBER := 0-1962.0724
279 , p5_a3 DATE := fnd_api.g_miss_date
280 , p5_a4 NUMBER := 0-1962.0724
281 , p5_a5 NUMBER := 0-1962.0724
282 , p5_a6 NUMBER := 0-1962.0724
283 , p5_a7 DATE := fnd_api.g_miss_date
284 , p5_a8 NUMBER := 0-1962.0724
285 , p5_a9 NUMBER := 0-1962.0724
286 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
287 )
288
289 as
290 ddp_enty_attr_validation_rec pv_enty_attr_validations_pvt.enty_attr_validation_rec_type;
291 ddindx binary_integer; indx binary_integer;
292 begin
293
294 -- copy data to the local IN or IN-OUT args, if any
295
296
297
298
299
300 ddp_enty_attr_validation_rec.validation_id := rosetta_g_miss_num_map(p5_a0);
301 ddp_enty_attr_validation_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a1);
302 ddp_enty_attr_validation_rec.last_updated_by := rosetta_g_miss_num_map(p5_a2);
303 ddp_enty_attr_validation_rec.creation_date := rosetta_g_miss_date_in_map(p5_a3);
304 ddp_enty_attr_validation_rec.created_by := rosetta_g_miss_num_map(p5_a4);
305 ddp_enty_attr_validation_rec.last_update_login := rosetta_g_miss_num_map(p5_a5);
306 ddp_enty_attr_validation_rec.object_version_number := rosetta_g_miss_num_map(p5_a6);
307 ddp_enty_attr_validation_rec.validation_date := rosetta_g_miss_date_in_map(p5_a7);
308 ddp_enty_attr_validation_rec.validated_by_resource_id := rosetta_g_miss_num_map(p5_a8);
309 ddp_enty_attr_validation_rec.validation_document_id := rosetta_g_miss_num_map(p5_a9);
310 ddp_enty_attr_validation_rec.validation_note := p5_a10;
311
312
313 -- here's the delegated call to the old PL/SQL routine
314 pv_enty_attr_validations_pvt.validate_enty_attr_vldtn_rec(p_api_version_number,
315 p_init_msg_list,
316 x_return_status,
317 x_msg_count,
318 x_msg_data,
319 ddp_enty_attr_validation_rec,
320 p_validation_mode);
321
322 -- copy data back from the local variables to OUT or IN-OUT args, if any
323
324
325
326
327
328
329 end;
330
331 end pv_enty_attr_validations_pvt_w;