[Home] [Help]
PACKAGE BODY: APPS.AHL_DI_FILEUPLOAD_PVT_W
Source
1 package body ahl_di_fileupload_pvt_w as
2 /* $Header: AHLWFUPB.pls 115.2 2003/09/04 14:08:40 rroy 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
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 procedure upload_item(p_api_version NUMBER
14 , p_init_msg_list VARCHAR2
15 , p_commit VARCHAR2
16 , p_validation_level NUMBER
17 , x_return_status out nocopy VARCHAR2
18 , x_msg_count out nocopy NUMBER
19 , x_msg_data out nocopy VARCHAR2
20 , p7_a0 in out nocopy NUMBER
21 , p7_a1 in out nocopy NUMBER
22 , p7_a2 in out nocopy VARCHAR2
23 , p7_a3 in out nocopy VARCHAR2
24 , p7_a4 in out nocopy NUMBER
25 , p7_a5 in out nocopy VARCHAR2
26 , p7_a6 in out nocopy VARCHAR2
27 , p7_a7 in out nocopy VARCHAR2
28 , p7_a8 in out nocopy VARCHAR2
29 , p7_a9 in out nocopy VARCHAR2
30 , p7_a10 in out nocopy VARCHAR2
31 , p7_a11 in out nocopy VARCHAR2
32 , p7_a12 in out nocopy VARCHAR2
33 , p7_a13 in out nocopy VARCHAR2
34 , p7_a14 in out nocopy VARCHAR2
35 , p7_a15 in out nocopy VARCHAR2
36 , p7_a16 in out nocopy VARCHAR2
37 , p7_a17 in out nocopy VARCHAR2
38 , p7_a18 in out nocopy VARCHAR2
39 , p7_a19 in out nocopy VARCHAR2
40 , p7_a20 in out nocopy VARCHAR2
41 , p7_a21 in out nocopy VARCHAR2
42 , p7_a22 in out nocopy NUMBER
43 )
44
45 as
46 ddp_x_ahl_fileupload_rec ahl_di_fileupload_pvt.ahl_fileupload_rec;
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_x_ahl_fileupload_rec.p_association_id := p7_a0;
59 ddp_x_ahl_fileupload_rec.p_file_id := p7_a1;
60 ddp_x_ahl_fileupload_rec.p_file_name := p7_a2;
61 ddp_x_ahl_fileupload_rec.p_file_description := p7_a3;
62 ddp_x_ahl_fileupload_rec.p_revision_id := p7_a4;
63 ddp_x_ahl_fileupload_rec.p_datatype_code := p7_a5;
64 ddp_x_ahl_fileupload_rec.p_attribute_category := p7_a6;
65 ddp_x_ahl_fileupload_rec.p_attribute1 := p7_a7;
66 ddp_x_ahl_fileupload_rec.p_attribute2 := p7_a8;
67 ddp_x_ahl_fileupload_rec.p_attribute3 := p7_a9;
68 ddp_x_ahl_fileupload_rec.p_attribute4 := p7_a10;
69 ddp_x_ahl_fileupload_rec.p_attribute5 := p7_a11;
70 ddp_x_ahl_fileupload_rec.p_attribute6 := p7_a12;
71 ddp_x_ahl_fileupload_rec.p_attribute7 := p7_a13;
72 ddp_x_ahl_fileupload_rec.p_attribute8 := p7_a14;
73 ddp_x_ahl_fileupload_rec.p_attribute9 := p7_a15;
74 ddp_x_ahl_fileupload_rec.p_attribute10 := p7_a16;
75 ddp_x_ahl_fileupload_rec.p_attribute11 := p7_a17;
76 ddp_x_ahl_fileupload_rec.p_attribute12 := p7_a18;
77 ddp_x_ahl_fileupload_rec.p_attribute13 := p7_a19;
78 ddp_x_ahl_fileupload_rec.p_attribute14 := p7_a20;
79 ddp_x_ahl_fileupload_rec.p_attribute15 := p7_a21;
80 ddp_x_ahl_fileupload_rec.p_x_object_version_number := p7_a22;
81
82 -- here's the delegated call to the old PL/SQL routine
83 ahl_di_fileupload_pvt.upload_item(p_api_version,
84 p_init_msg_list,
85 p_commit,
86 p_validation_level,
87 x_return_status,
88 x_msg_count,
89 x_msg_data,
90 ddp_x_ahl_fileupload_rec);
91
92 -- copy data back from the local variables to OUT or IN-OUT args, if any
93
94
95
96
97
98
99
100 p7_a0 := ddp_x_ahl_fileupload_rec.p_association_id;
101 p7_a1 := ddp_x_ahl_fileupload_rec.p_file_id;
102 p7_a2 := ddp_x_ahl_fileupload_rec.p_file_name;
103 p7_a3 := ddp_x_ahl_fileupload_rec.p_file_description;
104 p7_a4 := ddp_x_ahl_fileupload_rec.p_revision_id;
105 p7_a5 := ddp_x_ahl_fileupload_rec.p_datatype_code;
106 p7_a6 := ddp_x_ahl_fileupload_rec.p_attribute_category;
107 p7_a7 := ddp_x_ahl_fileupload_rec.p_attribute1;
108 p7_a8 := ddp_x_ahl_fileupload_rec.p_attribute2;
109 p7_a9 := ddp_x_ahl_fileupload_rec.p_attribute3;
110 p7_a10 := ddp_x_ahl_fileupload_rec.p_attribute4;
111 p7_a11 := ddp_x_ahl_fileupload_rec.p_attribute5;
112 p7_a12 := ddp_x_ahl_fileupload_rec.p_attribute6;
113 p7_a13 := ddp_x_ahl_fileupload_rec.p_attribute7;
114 p7_a14 := ddp_x_ahl_fileupload_rec.p_attribute8;
115 p7_a15 := ddp_x_ahl_fileupload_rec.p_attribute9;
116 p7_a16 := ddp_x_ahl_fileupload_rec.p_attribute10;
117 p7_a17 := ddp_x_ahl_fileupload_rec.p_attribute11;
118 p7_a18 := ddp_x_ahl_fileupload_rec.p_attribute12;
119 p7_a19 := ddp_x_ahl_fileupload_rec.p_attribute13;
120 p7_a20 := ddp_x_ahl_fileupload_rec.p_attribute14;
121 p7_a21 := ddp_x_ahl_fileupload_rec.p_attribute15;
122 p7_a22 := ddp_x_ahl_fileupload_rec.p_x_object_version_number;
123 end;
124
125 procedure delete_item(p_api_version NUMBER
126 , p_init_msg_list VARCHAR2
127 , p_commit VARCHAR2
128 , p_validation_level NUMBER
129 , x_return_status out nocopy VARCHAR2
130 , x_msg_count out nocopy NUMBER
131 , x_msg_data out nocopy VARCHAR2
132 , p7_a0 NUMBER
133 , p7_a1 NUMBER
134 , p7_a2 VARCHAR2
135 , p7_a3 VARCHAR2
136 , p7_a4 NUMBER
137 , p7_a5 VARCHAR2
138 , p7_a6 VARCHAR2
139 , p7_a7 VARCHAR2
140 , p7_a8 VARCHAR2
141 , p7_a9 VARCHAR2
142 , p7_a10 VARCHAR2
143 , p7_a11 VARCHAR2
144 , p7_a12 VARCHAR2
145 , p7_a13 VARCHAR2
146 , p7_a14 VARCHAR2
147 , p7_a15 VARCHAR2
148 , p7_a16 VARCHAR2
149 , p7_a17 VARCHAR2
150 , p7_a18 VARCHAR2
151 , p7_a19 VARCHAR2
152 , p7_a20 VARCHAR2
153 , p7_a21 VARCHAR2
154 , p7_a22 NUMBER
155 )
156
157 as
158 ddp_x_ahl_fileupload_rec ahl_di_fileupload_pvt.ahl_fileupload_rec;
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_x_ahl_fileupload_rec.p_association_id := p7_a0;
171 ddp_x_ahl_fileupload_rec.p_file_id := p7_a1;
172 ddp_x_ahl_fileupload_rec.p_file_name := p7_a2;
173 ddp_x_ahl_fileupload_rec.p_file_description := p7_a3;
174 ddp_x_ahl_fileupload_rec.p_revision_id := p7_a4;
175 ddp_x_ahl_fileupload_rec.p_datatype_code := p7_a5;
176 ddp_x_ahl_fileupload_rec.p_attribute_category := p7_a6;
177 ddp_x_ahl_fileupload_rec.p_attribute1 := p7_a7;
178 ddp_x_ahl_fileupload_rec.p_attribute2 := p7_a8;
179 ddp_x_ahl_fileupload_rec.p_attribute3 := p7_a9;
180 ddp_x_ahl_fileupload_rec.p_attribute4 := p7_a10;
181 ddp_x_ahl_fileupload_rec.p_attribute5 := p7_a11;
182 ddp_x_ahl_fileupload_rec.p_attribute6 := p7_a12;
183 ddp_x_ahl_fileupload_rec.p_attribute7 := p7_a13;
184 ddp_x_ahl_fileupload_rec.p_attribute8 := p7_a14;
185 ddp_x_ahl_fileupload_rec.p_attribute9 := p7_a15;
186 ddp_x_ahl_fileupload_rec.p_attribute10 := p7_a16;
187 ddp_x_ahl_fileupload_rec.p_attribute11 := p7_a17;
188 ddp_x_ahl_fileupload_rec.p_attribute12 := p7_a18;
189 ddp_x_ahl_fileupload_rec.p_attribute13 := p7_a19;
190 ddp_x_ahl_fileupload_rec.p_attribute14 := p7_a20;
191 ddp_x_ahl_fileupload_rec.p_attribute15 := p7_a21;
192 ddp_x_ahl_fileupload_rec.p_x_object_version_number := p7_a22;
193
194 -- here's the delegated call to the old PL/SQL routine
195 ahl_di_fileupload_pvt.delete_item(p_api_version,
196 p_init_msg_list,
197 p_commit,
198 p_validation_level,
199 x_return_status,
200 x_msg_count,
201 x_msg_data,
202 ddp_x_ahl_fileupload_rec);
203
204 -- copy data back from the local variables to OUT or IN-OUT args, if any
205
206
207
208
209
210
211
212 end;
213
214 procedure process_item(p_api_version NUMBER
215 , p_init_msg_list VARCHAR2
216 , p_commit VARCHAR2
217 , p_validation_level NUMBER
218 , x_return_status out nocopy VARCHAR2
219 , x_msg_count out nocopy NUMBER
220 , x_msg_data out nocopy VARCHAR2
221 , p7_a0 in out nocopy NUMBER
222 , p7_a1 in out nocopy NUMBER
223 , p7_a2 in out nocopy VARCHAR2
224 , p7_a3 in out nocopy VARCHAR2
225 , p7_a4 in out nocopy NUMBER
226 , p7_a5 in out nocopy VARCHAR2
227 , p7_a6 in out nocopy VARCHAR2
228 , p7_a7 in out nocopy VARCHAR2
229 , p7_a8 in out nocopy VARCHAR2
230 , p7_a9 in out nocopy VARCHAR2
231 , p7_a10 in out nocopy VARCHAR2
232 , p7_a11 in out nocopy VARCHAR2
233 , p7_a12 in out nocopy VARCHAR2
234 , p7_a13 in out nocopy VARCHAR2
235 , p7_a14 in out nocopy VARCHAR2
236 , p7_a15 in out nocopy VARCHAR2
237 , p7_a16 in out nocopy VARCHAR2
238 , p7_a17 in out nocopy VARCHAR2
239 , p7_a18 in out nocopy VARCHAR2
240 , p7_a19 in out nocopy VARCHAR2
241 , p7_a20 in out nocopy VARCHAR2
242 , p7_a21 in out nocopy VARCHAR2
243 , p7_a22 in out nocopy NUMBER
244 , p_delete_flag VARCHAR2
245 )
246
247 as
248 ddp_x_ahl_fileupload_rec ahl_di_fileupload_pvt.ahl_fileupload_rec;
249 ddindx binary_integer; indx binary_integer;
250 begin
251
252 -- copy data to the local IN or IN-OUT args, if any
253
254
255
256
257
258
259
260 ddp_x_ahl_fileupload_rec.p_association_id := p7_a0;
261 ddp_x_ahl_fileupload_rec.p_file_id := p7_a1;
262 ddp_x_ahl_fileupload_rec.p_file_name := p7_a2;
263 ddp_x_ahl_fileupload_rec.p_file_description := p7_a3;
264 ddp_x_ahl_fileupload_rec.p_revision_id := p7_a4;
265 ddp_x_ahl_fileupload_rec.p_datatype_code := p7_a5;
266 ddp_x_ahl_fileupload_rec.p_attribute_category := p7_a6;
267 ddp_x_ahl_fileupload_rec.p_attribute1 := p7_a7;
268 ddp_x_ahl_fileupload_rec.p_attribute2 := p7_a8;
269 ddp_x_ahl_fileupload_rec.p_attribute3 := p7_a9;
270 ddp_x_ahl_fileupload_rec.p_attribute4 := p7_a10;
271 ddp_x_ahl_fileupload_rec.p_attribute5 := p7_a11;
272 ddp_x_ahl_fileupload_rec.p_attribute6 := p7_a12;
273 ddp_x_ahl_fileupload_rec.p_attribute7 := p7_a13;
274 ddp_x_ahl_fileupload_rec.p_attribute8 := p7_a14;
275 ddp_x_ahl_fileupload_rec.p_attribute9 := p7_a15;
276 ddp_x_ahl_fileupload_rec.p_attribute10 := p7_a16;
277 ddp_x_ahl_fileupload_rec.p_attribute11 := p7_a17;
278 ddp_x_ahl_fileupload_rec.p_attribute12 := p7_a18;
279 ddp_x_ahl_fileupload_rec.p_attribute13 := p7_a19;
280 ddp_x_ahl_fileupload_rec.p_attribute14 := p7_a20;
281 ddp_x_ahl_fileupload_rec.p_attribute15 := p7_a21;
282 ddp_x_ahl_fileupload_rec.p_x_object_version_number := p7_a22;
283
284
285 -- here's the delegated call to the old PL/SQL routine
286 ahl_di_fileupload_pvt.process_item(p_api_version,
287 p_init_msg_list,
288 p_commit,
289 p_validation_level,
290 x_return_status,
291 x_msg_count,
292 x_msg_data,
293 ddp_x_ahl_fileupload_rec,
294 p_delete_flag);
295
296 -- copy data back from the local variables to OUT or IN-OUT args, if any
297
298
299
300
301
302
303
304 p7_a0 := ddp_x_ahl_fileupload_rec.p_association_id;
305 p7_a1 := ddp_x_ahl_fileupload_rec.p_file_id;
306 p7_a2 := ddp_x_ahl_fileupload_rec.p_file_name;
307 p7_a3 := ddp_x_ahl_fileupload_rec.p_file_description;
308 p7_a4 := ddp_x_ahl_fileupload_rec.p_revision_id;
309 p7_a5 := ddp_x_ahl_fileupload_rec.p_datatype_code;
310 p7_a6 := ddp_x_ahl_fileupload_rec.p_attribute_category;
311 p7_a7 := ddp_x_ahl_fileupload_rec.p_attribute1;
312 p7_a8 := ddp_x_ahl_fileupload_rec.p_attribute2;
313 p7_a9 := ddp_x_ahl_fileupload_rec.p_attribute3;
314 p7_a10 := ddp_x_ahl_fileupload_rec.p_attribute4;
315 p7_a11 := ddp_x_ahl_fileupload_rec.p_attribute5;
316 p7_a12 := ddp_x_ahl_fileupload_rec.p_attribute6;
317 p7_a13 := ddp_x_ahl_fileupload_rec.p_attribute7;
318 p7_a14 := ddp_x_ahl_fileupload_rec.p_attribute8;
319 p7_a15 := ddp_x_ahl_fileupload_rec.p_attribute9;
320 p7_a16 := ddp_x_ahl_fileupload_rec.p_attribute10;
321 p7_a17 := ddp_x_ahl_fileupload_rec.p_attribute11;
322 p7_a18 := ddp_x_ahl_fileupload_rec.p_attribute12;
323 p7_a19 := ddp_x_ahl_fileupload_rec.p_attribute13;
324 p7_a20 := ddp_x_ahl_fileupload_rec.p_attribute14;
325 p7_a21 := ddp_x_ahl_fileupload_rec.p_attribute15;
326 p7_a22 := ddp_x_ahl_fileupload_rec.p_x_object_version_number;
327
328 end;
329
330 end ahl_di_fileupload_pvt_w;