[Home] [Help]
PACKAGE BODY: APPS.AHL_APPR_DEPT_SHIFTS_PUB_W
Source
1 package body ahl_appr_dept_shifts_pub_w as
2 /* $Header: AHLWDSHB.pls 120.2.12020000.2 2012/12/13 05:24:37 shnatu 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 rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6 rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7
8 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9 function rosetta_g_miss_date_in_map(d date) return date as
10 begin
11 if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12 if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13 return d;
14 end;
15
16 procedure create_appr_dept_shifts(p_api_version NUMBER
17 , p_init_msg_list VARCHAR2
18 , p_commit VARCHAR2
19 , p_validation_level NUMBER
20 , p_default VARCHAR2
21 , p_module_type VARCHAR2
22 , x_return_status out nocopy VARCHAR2
23 , x_msg_count out nocopy NUMBER
24 , x_msg_data out nocopy VARCHAR2
25 , p9_a0 in out nocopy NUMBER
26 , p9_a1 in out nocopy NUMBER
27 , p9_a2 in out nocopy VARCHAR2
28 , p9_a3 in out nocopy NUMBER
29 , p9_a4 in out nocopy DATE
30 , p9_a5 in out nocopy NUMBER
31 , p9_a6 in out nocopy DATE
32 , p9_a7 in out nocopy NUMBER
33 , p9_a8 in out nocopy NUMBER
34 , p9_a9 in out nocopy NUMBER
35 , p9_a10 in out nocopy VARCHAR2
36 , p9_a11 in out nocopy VARCHAR2
37 , p9_a12 in out nocopy VARCHAR2
38 , p9_a13 in out nocopy NUMBER
39 , p9_a14 in out nocopy NUMBER
40 , p9_a15 in out nocopy NUMBER
41 , p9_a16 in out nocopy VARCHAR2
42 , p9_a17 in out nocopy VARCHAR2
43 , p9_a18 in out nocopy NUMBER
44 , p9_a19 in out nocopy VARCHAR2
45 , p9_a20 in out nocopy NUMBER
46 , p9_a21 in out nocopy VARCHAR2
47 , p9_a22 in out nocopy VARCHAR2
48 , p9_a23 in out nocopy VARCHAR2
49 , p9_a24 in out nocopy VARCHAR2
50 , p9_a25 in out nocopy VARCHAR2
51 , p9_a26 in out nocopy VARCHAR2
52 , p9_a27 in out nocopy VARCHAR2
53 , p9_a28 in out nocopy VARCHAR2
54 , p9_a29 in out nocopy VARCHAR2
55 , p9_a30 in out nocopy VARCHAR2
56 , p9_a31 in out nocopy VARCHAR2
57 , p9_a32 in out nocopy VARCHAR2
58 , p9_a33 in out nocopy VARCHAR2
59 , p9_a34 in out nocopy VARCHAR2
60 , p9_a35 in out nocopy VARCHAR2
61 , p9_a36 in out nocopy VARCHAR2
62 , p9_a37 in out nocopy VARCHAR2
63 , p9_a38 in out nocopy VARCHAR2
64 )
65
66 as
67 ddp_x_appr_deptshift_rec ahl_appr_dept_shifts_pub.appr_deptshift_rec;
68 ddindx binary_integer; indx binary_integer;
69 begin
70
71 -- copy data to the local IN or IN-OUT args, if any
72
73
74
75
76
77
78
79
80
81 ddp_x_appr_deptshift_rec.ahl_department_shifts_id := p9_a0;
82 ddp_x_appr_deptshift_rec.organization_id := p9_a1;
83 ddp_x_appr_deptshift_rec.organization_name := p9_a2;
84 ddp_x_appr_deptshift_rec.object_version_number := p9_a3;
85 ddp_x_appr_deptshift_rec.last_update_date := rosetta_g_miss_date_in_map(p9_a4);
86 ddp_x_appr_deptshift_rec.last_updated_by := p9_a5;
87 ddp_x_appr_deptshift_rec.creation_date := rosetta_g_miss_date_in_map(p9_a6);
88 ddp_x_appr_deptshift_rec.created_by := p9_a7;
89 ddp_x_appr_deptshift_rec.last_update_login := p9_a8;
90 ddp_x_appr_deptshift_rec.department_id := p9_a9;
91 ddp_x_appr_deptshift_rec.dept_description := p9_a10;
92 ddp_x_appr_deptshift_rec.calendar_code := p9_a11;
93 ddp_x_appr_deptshift_rec.calendar_description := p9_a12;
94 ddp_x_appr_deptshift_rec.bom_workday_patterns_id := p9_a13;
95 ddp_x_appr_deptshift_rec.shift_num := p9_a14;
96 ddp_x_appr_deptshift_rec.seq_num := p9_a15;
97 ddp_x_appr_deptshift_rec.seq_name := p9_a16;
98 ddp_x_appr_deptshift_rec.subinventory := p9_a17;
99 ddp_x_appr_deptshift_rec.inv_locator_id := p9_a18;
100 ddp_x_appr_deptshift_rec.locator_segments := p9_a19;
101 ddp_x_appr_deptshift_rec.max_service_category := p9_a20;
102 ddp_x_appr_deptshift_rec.description := p9_a21;
103 ddp_x_appr_deptshift_rec.attribute_category := p9_a22;
104 ddp_x_appr_deptshift_rec.attribute1 := p9_a23;
105 ddp_x_appr_deptshift_rec.attribute2 := p9_a24;
106 ddp_x_appr_deptshift_rec.attribute3 := p9_a25;
107 ddp_x_appr_deptshift_rec.attribute4 := p9_a26;
108 ddp_x_appr_deptshift_rec.attribute5 := p9_a27;
109 ddp_x_appr_deptshift_rec.attribute6 := p9_a28;
110 ddp_x_appr_deptshift_rec.attribute7 := p9_a29;
111 ddp_x_appr_deptshift_rec.attribute8 := p9_a30;
112 ddp_x_appr_deptshift_rec.attribute9 := p9_a31;
113 ddp_x_appr_deptshift_rec.attribute10 := p9_a32;
114 ddp_x_appr_deptshift_rec.attribute11 := p9_a33;
115 ddp_x_appr_deptshift_rec.attribute12 := p9_a34;
116 ddp_x_appr_deptshift_rec.attribute13 := p9_a35;
117 ddp_x_appr_deptshift_rec.attribute14 := p9_a36;
118 ddp_x_appr_deptshift_rec.attribute15 := p9_a37;
119 ddp_x_appr_deptshift_rec.dml_operation := p9_a38;
120
121 -- here's the delegated call to the old PL/SQL routine
122 ahl_appr_dept_shifts_pub.create_appr_dept_shifts(p_api_version,
123 p_init_msg_list,
124 p_commit,
125 p_validation_level,
126 p_default,
127 p_module_type,
128 x_return_status,
129 x_msg_count,
130 x_msg_data,
131 ddp_x_appr_deptshift_rec);
132
133 -- copy data back from the local variables to OUT or IN-OUT args, if any
134
135
136
137
138
139
140
141
142
143 p9_a0 := ddp_x_appr_deptshift_rec.ahl_department_shifts_id;
144 p9_a1 := ddp_x_appr_deptshift_rec.organization_id;
145 p9_a2 := ddp_x_appr_deptshift_rec.organization_name;
146 p9_a3 := ddp_x_appr_deptshift_rec.object_version_number;
147 p9_a4 := ddp_x_appr_deptshift_rec.last_update_date;
148 p9_a5 := ddp_x_appr_deptshift_rec.last_updated_by;
149 p9_a6 := ddp_x_appr_deptshift_rec.creation_date;
150 p9_a7 := ddp_x_appr_deptshift_rec.created_by;
151 p9_a8 := ddp_x_appr_deptshift_rec.last_update_login;
152 p9_a9 := ddp_x_appr_deptshift_rec.department_id;
153 p9_a10 := ddp_x_appr_deptshift_rec.dept_description;
154 p9_a11 := ddp_x_appr_deptshift_rec.calendar_code;
155 p9_a12 := ddp_x_appr_deptshift_rec.calendar_description;
156 p9_a13 := ddp_x_appr_deptshift_rec.bom_workday_patterns_id;
157 p9_a14 := ddp_x_appr_deptshift_rec.shift_num;
158 p9_a15 := ddp_x_appr_deptshift_rec.seq_num;
159 p9_a16 := ddp_x_appr_deptshift_rec.seq_name;
160 p9_a17 := ddp_x_appr_deptshift_rec.subinventory;
161 p9_a18 := ddp_x_appr_deptshift_rec.inv_locator_id;
162 p9_a19 := ddp_x_appr_deptshift_rec.locator_segments;
163 p9_a20 := ddp_x_appr_deptshift_rec.max_service_category;
164 p9_a21 := ddp_x_appr_deptshift_rec.description;
165 p9_a22 := ddp_x_appr_deptshift_rec.attribute_category;
166 p9_a23 := ddp_x_appr_deptshift_rec.attribute1;
167 p9_a24 := ddp_x_appr_deptshift_rec.attribute2;
168 p9_a25 := ddp_x_appr_deptshift_rec.attribute3;
169 p9_a26 := ddp_x_appr_deptshift_rec.attribute4;
170 p9_a27 := ddp_x_appr_deptshift_rec.attribute5;
171 p9_a28 := ddp_x_appr_deptshift_rec.attribute6;
172 p9_a29 := ddp_x_appr_deptshift_rec.attribute7;
173 p9_a30 := ddp_x_appr_deptshift_rec.attribute8;
174 p9_a31 := ddp_x_appr_deptshift_rec.attribute9;
175 p9_a32 := ddp_x_appr_deptshift_rec.attribute10;
176 p9_a33 := ddp_x_appr_deptshift_rec.attribute11;
177 p9_a34 := ddp_x_appr_deptshift_rec.attribute12;
178 p9_a35 := ddp_x_appr_deptshift_rec.attribute13;
179 p9_a36 := ddp_x_appr_deptshift_rec.attribute14;
180 p9_a37 := ddp_x_appr_deptshift_rec.attribute15;
181 p9_a38 := ddp_x_appr_deptshift_rec.dml_operation;
182 end;
183
184 procedure delete_appr_dept_shifts(p_api_version NUMBER
185 , p_init_msg_list VARCHAR2
186 , p_commit VARCHAR2
187 , p_validation_level NUMBER
188 , p_default VARCHAR2
189 , p_module_type VARCHAR2
190 , x_return_status out nocopy VARCHAR2
191 , x_msg_count out nocopy NUMBER
192 , x_msg_data out nocopy VARCHAR2
193 , p9_a0 in out nocopy NUMBER
194 , p9_a1 in out nocopy NUMBER
195 , p9_a2 in out nocopy VARCHAR2
196 , p9_a3 in out nocopy NUMBER
197 , p9_a4 in out nocopy DATE
198 , p9_a5 in out nocopy NUMBER
199 , p9_a6 in out nocopy DATE
200 , p9_a7 in out nocopy NUMBER
201 , p9_a8 in out nocopy NUMBER
202 , p9_a9 in out nocopy NUMBER
203 , p9_a10 in out nocopy VARCHAR2
204 , p9_a11 in out nocopy VARCHAR2
205 , p9_a12 in out nocopy VARCHAR2
206 , p9_a13 in out nocopy NUMBER
207 , p9_a14 in out nocopy NUMBER
208 , p9_a15 in out nocopy NUMBER
209 , p9_a16 in out nocopy VARCHAR2
210 , p9_a17 in out nocopy VARCHAR2
211 , p9_a18 in out nocopy NUMBER
212 , p9_a19 in out nocopy VARCHAR2
213 , p9_a20 in out nocopy NUMBER
214 , p9_a21 in out nocopy VARCHAR2
215 , p9_a22 in out nocopy VARCHAR2
216 , p9_a23 in out nocopy VARCHAR2
217 , p9_a24 in out nocopy VARCHAR2
218 , p9_a25 in out nocopy VARCHAR2
219 , p9_a26 in out nocopy VARCHAR2
220 , p9_a27 in out nocopy VARCHAR2
221 , p9_a28 in out nocopy VARCHAR2
222 , p9_a29 in out nocopy VARCHAR2
223 , p9_a30 in out nocopy VARCHAR2
224 , p9_a31 in out nocopy VARCHAR2
225 , p9_a32 in out nocopy VARCHAR2
226 , p9_a33 in out nocopy VARCHAR2
227 , p9_a34 in out nocopy VARCHAR2
228 , p9_a35 in out nocopy VARCHAR2
229 , p9_a36 in out nocopy VARCHAR2
230 , p9_a37 in out nocopy VARCHAR2
231 , p9_a38 in out nocopy VARCHAR2
232 )
233
234 as
235 ddp_x_appr_deptshift_rec ahl_appr_dept_shifts_pub.appr_deptshift_rec;
236 ddindx binary_integer; indx binary_integer;
237 begin
238
239 -- copy data to the local IN or IN-OUT args, if any
240
241
242
243
244
245
246
247
248
249 ddp_x_appr_deptshift_rec.ahl_department_shifts_id := p9_a0;
250 ddp_x_appr_deptshift_rec.organization_id := p9_a1;
251 ddp_x_appr_deptshift_rec.organization_name := p9_a2;
252 ddp_x_appr_deptshift_rec.object_version_number := p9_a3;
253 ddp_x_appr_deptshift_rec.last_update_date := rosetta_g_miss_date_in_map(p9_a4);
254 ddp_x_appr_deptshift_rec.last_updated_by := p9_a5;
255 ddp_x_appr_deptshift_rec.creation_date := rosetta_g_miss_date_in_map(p9_a6);
256 ddp_x_appr_deptshift_rec.created_by := p9_a7;
257 ddp_x_appr_deptshift_rec.last_update_login := p9_a8;
258 ddp_x_appr_deptshift_rec.department_id := p9_a9;
259 ddp_x_appr_deptshift_rec.dept_description := p9_a10;
260 ddp_x_appr_deptshift_rec.calendar_code := p9_a11;
261 ddp_x_appr_deptshift_rec.calendar_description := p9_a12;
262 ddp_x_appr_deptshift_rec.bom_workday_patterns_id := p9_a13;
263 ddp_x_appr_deptshift_rec.shift_num := p9_a14;
264 ddp_x_appr_deptshift_rec.seq_num := p9_a15;
265 ddp_x_appr_deptshift_rec.seq_name := p9_a16;
266 ddp_x_appr_deptshift_rec.subinventory := p9_a17;
267 ddp_x_appr_deptshift_rec.inv_locator_id := p9_a18;
268 ddp_x_appr_deptshift_rec.locator_segments := p9_a19;
269 ddp_x_appr_deptshift_rec.max_service_category := p9_a20;
270 ddp_x_appr_deptshift_rec.description := p9_a21;
271 ddp_x_appr_deptshift_rec.attribute_category := p9_a22;
272 ddp_x_appr_deptshift_rec.attribute1 := p9_a23;
273 ddp_x_appr_deptshift_rec.attribute2 := p9_a24;
274 ddp_x_appr_deptshift_rec.attribute3 := p9_a25;
275 ddp_x_appr_deptshift_rec.attribute4 := p9_a26;
276 ddp_x_appr_deptshift_rec.attribute5 := p9_a27;
277 ddp_x_appr_deptshift_rec.attribute6 := p9_a28;
278 ddp_x_appr_deptshift_rec.attribute7 := p9_a29;
279 ddp_x_appr_deptshift_rec.attribute8 := p9_a30;
280 ddp_x_appr_deptshift_rec.attribute9 := p9_a31;
281 ddp_x_appr_deptshift_rec.attribute10 := p9_a32;
282 ddp_x_appr_deptshift_rec.attribute11 := p9_a33;
283 ddp_x_appr_deptshift_rec.attribute12 := p9_a34;
284 ddp_x_appr_deptshift_rec.attribute13 := p9_a35;
285 ddp_x_appr_deptshift_rec.attribute14 := p9_a36;
286 ddp_x_appr_deptshift_rec.attribute15 := p9_a37;
287 ddp_x_appr_deptshift_rec.dml_operation := p9_a38;
288
289 -- here's the delegated call to the old PL/SQL routine
290 ahl_appr_dept_shifts_pub.delete_appr_dept_shifts(p_api_version,
291 p_init_msg_list,
292 p_commit,
293 p_validation_level,
294 p_default,
295 p_module_type,
296 x_return_status,
297 x_msg_count,
298 x_msg_data,
299 ddp_x_appr_deptshift_rec);
300
301 -- copy data back from the local variables to OUT or IN-OUT args, if any
302
303
304
305
306
307
308
309
310
311 p9_a0 := ddp_x_appr_deptshift_rec.ahl_department_shifts_id;
312 p9_a1 := ddp_x_appr_deptshift_rec.organization_id;
313 p9_a2 := ddp_x_appr_deptshift_rec.organization_name;
314 p9_a3 := ddp_x_appr_deptshift_rec.object_version_number;
315 p9_a4 := ddp_x_appr_deptshift_rec.last_update_date;
316 p9_a5 := ddp_x_appr_deptshift_rec.last_updated_by;
317 p9_a6 := ddp_x_appr_deptshift_rec.creation_date;
318 p9_a7 := ddp_x_appr_deptshift_rec.created_by;
319 p9_a8 := ddp_x_appr_deptshift_rec.last_update_login;
320 p9_a9 := ddp_x_appr_deptshift_rec.department_id;
321 p9_a10 := ddp_x_appr_deptshift_rec.dept_description;
322 p9_a11 := ddp_x_appr_deptshift_rec.calendar_code;
323 p9_a12 := ddp_x_appr_deptshift_rec.calendar_description;
324 p9_a13 := ddp_x_appr_deptshift_rec.bom_workday_patterns_id;
325 p9_a14 := ddp_x_appr_deptshift_rec.shift_num;
326 p9_a15 := ddp_x_appr_deptshift_rec.seq_num;
327 p9_a16 := ddp_x_appr_deptshift_rec.seq_name;
328 p9_a17 := ddp_x_appr_deptshift_rec.subinventory;
329 p9_a18 := ddp_x_appr_deptshift_rec.inv_locator_id;
333 p9_a22 := ddp_x_appr_deptshift_rec.attribute_category;
330 p9_a19 := ddp_x_appr_deptshift_rec.locator_segments;
331 p9_a20 := ddp_x_appr_deptshift_rec.max_service_category;
332 p9_a21 := ddp_x_appr_deptshift_rec.description;
334 p9_a23 := ddp_x_appr_deptshift_rec.attribute1;
335 p9_a24 := ddp_x_appr_deptshift_rec.attribute2;
336 p9_a25 := ddp_x_appr_deptshift_rec.attribute3;
337 p9_a26 := ddp_x_appr_deptshift_rec.attribute4;
338 p9_a27 := ddp_x_appr_deptshift_rec.attribute5;
339 p9_a28 := ddp_x_appr_deptshift_rec.attribute6;
340 p9_a29 := ddp_x_appr_deptshift_rec.attribute7;
341 p9_a30 := ddp_x_appr_deptshift_rec.attribute8;
342 p9_a31 := ddp_x_appr_deptshift_rec.attribute9;
343 p9_a32 := ddp_x_appr_deptshift_rec.attribute10;
344 p9_a33 := ddp_x_appr_deptshift_rec.attribute11;
345 p9_a34 := ddp_x_appr_deptshift_rec.attribute12;
346 p9_a35 := ddp_x_appr_deptshift_rec.attribute13;
347 p9_a36 := ddp_x_appr_deptshift_rec.attribute14;
348 p9_a37 := ddp_x_appr_deptshift_rec.attribute15;
349 p9_a38 := ddp_x_appr_deptshift_rec.dml_operation;
350 end;
351
352 procedure edit_appr_dept_shifts(p_api_version NUMBER
353 , p_init_msg_list VARCHAR2
354 , p_commit VARCHAR2
355 , p_validation_level NUMBER
356 , p_default VARCHAR2
357 , p_module_type VARCHAR2
358 , x_return_status out nocopy VARCHAR2
359 , x_msg_count out nocopy NUMBER
360 , x_msg_data out nocopy VARCHAR2
361 , p9_a0 in out nocopy NUMBER
362 , p9_a1 in out nocopy NUMBER
363 , p9_a2 in out nocopy VARCHAR2
364 , p9_a3 in out nocopy NUMBER
365 , p9_a4 in out nocopy DATE
366 , p9_a5 in out nocopy NUMBER
367 , p9_a6 in out nocopy DATE
368 , p9_a7 in out nocopy NUMBER
369 , p9_a8 in out nocopy NUMBER
370 , p9_a9 in out nocopy NUMBER
371 , p9_a10 in out nocopy VARCHAR2
372 , p9_a11 in out nocopy VARCHAR2
373 , p9_a12 in out nocopy VARCHAR2
374 , p9_a13 in out nocopy NUMBER
375 , p9_a14 in out nocopy NUMBER
376 , p9_a15 in out nocopy NUMBER
377 , p9_a16 in out nocopy VARCHAR2
378 , p9_a17 in out nocopy VARCHAR2
379 , p9_a18 in out nocopy NUMBER
380 , p9_a19 in out nocopy VARCHAR2
381 , p9_a20 in out nocopy NUMBER
382 , p9_a21 in out nocopy VARCHAR2
383 , p9_a22 in out nocopy VARCHAR2
384 , p9_a23 in out nocopy VARCHAR2
385 , p9_a24 in out nocopy VARCHAR2
386 , p9_a25 in out nocopy VARCHAR2
387 , p9_a26 in out nocopy VARCHAR2
388 , p9_a27 in out nocopy VARCHAR2
389 , p9_a28 in out nocopy VARCHAR2
390 , p9_a29 in out nocopy VARCHAR2
391 , p9_a30 in out nocopy VARCHAR2
392 , p9_a31 in out nocopy VARCHAR2
393 , p9_a32 in out nocopy VARCHAR2
394 , p9_a33 in out nocopy VARCHAR2
395 , p9_a34 in out nocopy VARCHAR2
396 , p9_a35 in out nocopy VARCHAR2
397 , p9_a36 in out nocopy VARCHAR2
398 , p9_a37 in out nocopy VARCHAR2
399 , p9_a38 in out nocopy VARCHAR2
400 )
401
402 as
403 ddp_x_appr_deptshift_rec ahl_appr_dept_shifts_pub.appr_deptshift_rec;
404 ddindx binary_integer; indx binary_integer;
405 begin
406
407 -- copy data to the local IN or IN-OUT args, if any
408
409
410
411
412
413
414
415
416
417 ddp_x_appr_deptshift_rec.ahl_department_shifts_id := p9_a0;
418 ddp_x_appr_deptshift_rec.organization_id := p9_a1;
419 ddp_x_appr_deptshift_rec.organization_name := p9_a2;
420 ddp_x_appr_deptshift_rec.object_version_number := p9_a3;
421 ddp_x_appr_deptshift_rec.last_update_date := rosetta_g_miss_date_in_map(p9_a4);
422 ddp_x_appr_deptshift_rec.last_updated_by := p9_a5;
423 ddp_x_appr_deptshift_rec.creation_date := rosetta_g_miss_date_in_map(p9_a6);
424 ddp_x_appr_deptshift_rec.created_by := p9_a7;
425 ddp_x_appr_deptshift_rec.last_update_login := p9_a8;
426 ddp_x_appr_deptshift_rec.department_id := p9_a9;
427 ddp_x_appr_deptshift_rec.dept_description := p9_a10;
428 ddp_x_appr_deptshift_rec.calendar_code := p9_a11;
429 ddp_x_appr_deptshift_rec.calendar_description := p9_a12;
430 ddp_x_appr_deptshift_rec.bom_workday_patterns_id := p9_a13;
431 ddp_x_appr_deptshift_rec.shift_num := p9_a14;
432 ddp_x_appr_deptshift_rec.seq_num := p9_a15;
433 ddp_x_appr_deptshift_rec.seq_name := p9_a16;
434 ddp_x_appr_deptshift_rec.subinventory := p9_a17;
435 ddp_x_appr_deptshift_rec.inv_locator_id := p9_a18;
436 ddp_x_appr_deptshift_rec.locator_segments := p9_a19;
437 ddp_x_appr_deptshift_rec.max_service_category := p9_a20;
438 ddp_x_appr_deptshift_rec.description := p9_a21;
439 ddp_x_appr_deptshift_rec.attribute_category := p9_a22;
440 ddp_x_appr_deptshift_rec.attribute1 := p9_a23;
441 ddp_x_appr_deptshift_rec.attribute2 := p9_a24;
442 ddp_x_appr_deptshift_rec.attribute3 := p9_a25;
443 ddp_x_appr_deptshift_rec.attribute4 := p9_a26;
444 ddp_x_appr_deptshift_rec.attribute5 := p9_a27;
445 ddp_x_appr_deptshift_rec.attribute6 := p9_a28;
446 ddp_x_appr_deptshift_rec.attribute7 := p9_a29;
447 ddp_x_appr_deptshift_rec.attribute8 := p9_a30;
448 ddp_x_appr_deptshift_rec.attribute9 := p9_a31;
449 ddp_x_appr_deptshift_rec.attribute10 := p9_a32;
450 ddp_x_appr_deptshift_rec.attribute11 := p9_a33;
451 ddp_x_appr_deptshift_rec.attribute12 := p9_a34;
452 ddp_x_appr_deptshift_rec.attribute13 := p9_a35;
453 ddp_x_appr_deptshift_rec.attribute14 := p9_a36;
454 ddp_x_appr_deptshift_rec.attribute15 := p9_a37;
455 ddp_x_appr_deptshift_rec.dml_operation := p9_a38;
456
457 -- here's the delegated call to the old PL/SQL routine
458 ahl_appr_dept_shifts_pub.edit_appr_dept_shifts(p_api_version,
459 p_init_msg_list,
460 p_commit,
464 x_return_status,
461 p_validation_level,
462 p_default,
463 p_module_type,
465 x_msg_count,
466 x_msg_data,
467 ddp_x_appr_deptshift_rec);
468
469 -- copy data back from the local variables to OUT or IN-OUT args, if any
470
471
472
473
474
475
476
477
478
479 p9_a0 := ddp_x_appr_deptshift_rec.ahl_department_shifts_id;
480 p9_a1 := ddp_x_appr_deptshift_rec.organization_id;
481 p9_a2 := ddp_x_appr_deptshift_rec.organization_name;
482 p9_a3 := ddp_x_appr_deptshift_rec.object_version_number;
483 p9_a4 := ddp_x_appr_deptshift_rec.last_update_date;
484 p9_a5 := ddp_x_appr_deptshift_rec.last_updated_by;
485 p9_a6 := ddp_x_appr_deptshift_rec.creation_date;
486 p9_a7 := ddp_x_appr_deptshift_rec.created_by;
487 p9_a8 := ddp_x_appr_deptshift_rec.last_update_login;
488 p9_a9 := ddp_x_appr_deptshift_rec.department_id;
489 p9_a10 := ddp_x_appr_deptshift_rec.dept_description;
490 p9_a11 := ddp_x_appr_deptshift_rec.calendar_code;
491 p9_a12 := ddp_x_appr_deptshift_rec.calendar_description;
492 p9_a13 := ddp_x_appr_deptshift_rec.bom_workday_patterns_id;
493 p9_a14 := ddp_x_appr_deptshift_rec.shift_num;
494 p9_a15 := ddp_x_appr_deptshift_rec.seq_num;
495 p9_a16 := ddp_x_appr_deptshift_rec.seq_name;
496 p9_a17 := ddp_x_appr_deptshift_rec.subinventory;
497 p9_a18 := ddp_x_appr_deptshift_rec.inv_locator_id;
498 p9_a19 := ddp_x_appr_deptshift_rec.locator_segments;
499 p9_a20 := ddp_x_appr_deptshift_rec.max_service_category;
500 p9_a21 := ddp_x_appr_deptshift_rec.description;
501 p9_a22 := ddp_x_appr_deptshift_rec.attribute_category;
502 p9_a23 := ddp_x_appr_deptshift_rec.attribute1;
503 p9_a24 := ddp_x_appr_deptshift_rec.attribute2;
504 p9_a25 := ddp_x_appr_deptshift_rec.attribute3;
505 p9_a26 := ddp_x_appr_deptshift_rec.attribute4;
506 p9_a27 := ddp_x_appr_deptshift_rec.attribute5;
507 p9_a28 := ddp_x_appr_deptshift_rec.attribute6;
508 p9_a29 := ddp_x_appr_deptshift_rec.attribute7;
509 p9_a30 := ddp_x_appr_deptshift_rec.attribute8;
510 p9_a31 := ddp_x_appr_deptshift_rec.attribute9;
511 p9_a32 := ddp_x_appr_deptshift_rec.attribute10;
512 p9_a33 := ddp_x_appr_deptshift_rec.attribute11;
513 p9_a34 := ddp_x_appr_deptshift_rec.attribute12;
514 p9_a35 := ddp_x_appr_deptshift_rec.attribute13;
515 p9_a36 := ddp_x_appr_deptshift_rec.attribute14;
516 p9_a37 := ddp_x_appr_deptshift_rec.attribute15;
517 p9_a38 := ddp_x_appr_deptshift_rec.dml_operation;
518 end;
519
520 end ahl_appr_dept_shifts_pub_w;