[Home] [Help]
PACKAGE BODY: APPS.OKL_CHECKLIST_PVT_W
Source
1 package body okl_checklist_pvt_w as
2 /* $Header: OKLECKLB.pls 120.4 2006/03/27 10:56:30 pagarg 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 function rosetta_g_miss_num_map(n number) return number as
14 a number := fnd_api.g_miss_num;
15 b number := 0-1962.0724;
16 begin
17 if n=a then return b; end if;
18 if n=b then return a; end if;
19 return n;
20 end;
21
22 procedure create_checklist_hdr(p_api_version NUMBER
23 , p_init_msg_list VARCHAR2
24 , x_return_status out nocopy VARCHAR2
25 , x_msg_count out nocopy NUMBER
26 , x_msg_data out nocopy VARCHAR2
27 , p6_a0 out nocopy NUMBER
28 , p6_a1 out nocopy NUMBER
29 , p6_a2 out nocopy VARCHAR2
30 , p6_a3 out nocopy VARCHAR2
31 , p6_a4 out nocopy VARCHAR2
32 , p6_a5 out nocopy VARCHAR2
33 , p6_a6 out nocopy DATE
34 , p6_a7 out nocopy DATE
35 , p6_a8 out nocopy VARCHAR2
36 , p6_a9 out nocopy VARCHAR2
37 , p6_a10 out nocopy VARCHAR2
38 , p6_a11 out nocopy VARCHAR2
39 , p6_a12 out nocopy VARCHAR2
40 , p6_a13 out nocopy VARCHAR2
41 , p6_a14 out nocopy VARCHAR2
42 , p6_a15 out nocopy VARCHAR2
43 , p6_a16 out nocopy VARCHAR2
44 , p6_a17 out nocopy VARCHAR2
45 , p6_a18 out nocopy VARCHAR2
46 , p6_a19 out nocopy VARCHAR2
47 , p6_a20 out nocopy VARCHAR2
48 , p6_a21 out nocopy VARCHAR2
49 , p6_a22 out nocopy VARCHAR2
50 , p6_a23 out nocopy VARCHAR2
51 , p6_a24 out nocopy VARCHAR2
52 , p6_a25 out nocopy NUMBER
53 , p6_a26 out nocopy NUMBER
54 , p6_a27 out nocopy NUMBER
55 , p6_a28 out nocopy NUMBER
56 , p6_a29 out nocopy DATE
57 , p6_a30 out nocopy NUMBER
58 , p6_a31 out nocopy DATE
59 , p6_a32 out nocopy NUMBER
60 , p6_a33 out nocopy DATE
61 , p6_a34 out nocopy NUMBER
62 , p6_a35 out nocopy VARCHAR2
63 , p6_a36 out nocopy DATE
64 , p6_a37 out nocopy NUMBER
65 , p6_a38 out nocopy VARCHAR2
66 , p6_a39 out nocopy NUMBER
67 , p5_a0 NUMBER := 0-1962.0724
68 , p5_a1 NUMBER := 0-1962.0724
69 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
70 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
71 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
72 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
73 , p5_a6 DATE := fnd_api.g_miss_date
74 , p5_a7 DATE := fnd_api.g_miss_date
75 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
76 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
77 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
78 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
79 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
80 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
81 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
82 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
83 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
84 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
85 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
86 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
87 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
88 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
89 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
90 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
91 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
92 , p5_a25 NUMBER := 0-1962.0724
93 , p5_a26 NUMBER := 0-1962.0724
94 , p5_a27 NUMBER := 0-1962.0724
95 , p5_a28 NUMBER := 0-1962.0724
96 , p5_a29 DATE := fnd_api.g_miss_date
97 , p5_a30 NUMBER := 0-1962.0724
98 , p5_a31 DATE := fnd_api.g_miss_date
99 , p5_a32 NUMBER := 0-1962.0724
100 , p5_a33 DATE := fnd_api.g_miss_date
101 , p5_a34 NUMBER := 0-1962.0724
102 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
103 , p5_a36 DATE := fnd_api.g_miss_date
104 , p5_a37 NUMBER := 0-1962.0724
105 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
106 , p5_a39 NUMBER := 0-1962.0724
107 )
108
109 as
110 ddp_clhv_rec okl_checklist_pvt.clhv_rec_type;
111 ddx_clhv_rec okl_checklist_pvt.clhv_rec_type;
112 ddindx binary_integer; indx binary_integer;
113 begin
114
115 -- copy data to the local IN or IN-OUT args, if any
116
117
118
119
120
121 ddp_clhv_rec.id := rosetta_g_miss_num_map(p5_a0);
122 ddp_clhv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
123 ddp_clhv_rec.checklist_number := p5_a2;
124 ddp_clhv_rec.description := p5_a3;
125 ddp_clhv_rec.short_description := p5_a4;
126 ddp_clhv_rec.checklist_type := p5_a5;
127 ddp_clhv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
128 ddp_clhv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
129 ddp_clhv_rec.status_code := p5_a8;
130 ddp_clhv_rec.attribute_category := p5_a9;
131 ddp_clhv_rec.attribute1 := p5_a10;
132 ddp_clhv_rec.attribute2 := p5_a11;
133 ddp_clhv_rec.attribute3 := p5_a12;
134 ddp_clhv_rec.attribute4 := p5_a13;
135 ddp_clhv_rec.attribute5 := p5_a14;
136 ddp_clhv_rec.attribute6 := p5_a15;
137 ddp_clhv_rec.attribute7 := p5_a16;
138 ddp_clhv_rec.attribute8 := p5_a17;
139 ddp_clhv_rec.attribute9 := p5_a18;
140 ddp_clhv_rec.attribute10 := p5_a19;
141 ddp_clhv_rec.attribute11 := p5_a20;
142 ddp_clhv_rec.attribute12 := p5_a21;
143 ddp_clhv_rec.attribute13 := p5_a22;
144 ddp_clhv_rec.attribute14 := p5_a23;
145 ddp_clhv_rec.attribute15 := p5_a24;
146 ddp_clhv_rec.org_id := rosetta_g_miss_num_map(p5_a25);
147 ddp_clhv_rec.request_id := rosetta_g_miss_num_map(p5_a26);
148 ddp_clhv_rec.program_application_id := rosetta_g_miss_num_map(p5_a27);
149 ddp_clhv_rec.program_id := rosetta_g_miss_num_map(p5_a28);
150 ddp_clhv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
151 ddp_clhv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
152 ddp_clhv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
153 ddp_clhv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
154 ddp_clhv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
155 ddp_clhv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
156 ddp_clhv_rec.checklist_purpose_code := p5_a35;
157 ddp_clhv_rec.decision_date := rosetta_g_miss_date_in_map(p5_a36);
158 ddp_clhv_rec.checklist_obj_id := rosetta_g_miss_num_map(p5_a37);
159 ddp_clhv_rec.checklist_obj_type_code := p5_a38;
160 ddp_clhv_rec.ckl_id := rosetta_g_miss_num_map(p5_a39);
161
162
163 -- here's the delegated call to the old PL/SQL routine
164 okl_checklist_pvt.create_checklist_hdr(p_api_version,
165 p_init_msg_list,
166 x_return_status,
167 x_msg_count,
168 x_msg_data,
169 ddp_clhv_rec,
170 ddx_clhv_rec);
171
172 -- copy data back from the local variables to OUT or IN-OUT args, if any
173
174
175
176
177
178
179 p6_a0 := rosetta_g_miss_num_map(ddx_clhv_rec.id);
180 p6_a1 := rosetta_g_miss_num_map(ddx_clhv_rec.object_version_number);
181 p6_a2 := ddx_clhv_rec.checklist_number;
182 p6_a3 := ddx_clhv_rec.description;
183 p6_a4 := ddx_clhv_rec.short_description;
184 p6_a5 := ddx_clhv_rec.checklist_type;
185 p6_a6 := ddx_clhv_rec.start_date;
186 p6_a7 := ddx_clhv_rec.end_date;
187 p6_a8 := ddx_clhv_rec.status_code;
188 p6_a9 := ddx_clhv_rec.attribute_category;
189 p6_a10 := ddx_clhv_rec.attribute1;
190 p6_a11 := ddx_clhv_rec.attribute2;
191 p6_a12 := ddx_clhv_rec.attribute3;
192 p6_a13 := ddx_clhv_rec.attribute4;
193 p6_a14 := ddx_clhv_rec.attribute5;
194 p6_a15 := ddx_clhv_rec.attribute6;
195 p6_a16 := ddx_clhv_rec.attribute7;
196 p6_a17 := ddx_clhv_rec.attribute8;
197 p6_a18 := ddx_clhv_rec.attribute9;
198 p6_a19 := ddx_clhv_rec.attribute10;
199 p6_a20 := ddx_clhv_rec.attribute11;
200 p6_a21 := ddx_clhv_rec.attribute12;
201 p6_a22 := ddx_clhv_rec.attribute13;
202 p6_a23 := ddx_clhv_rec.attribute14;
203 p6_a24 := ddx_clhv_rec.attribute15;
204 p6_a25 := rosetta_g_miss_num_map(ddx_clhv_rec.org_id);
205 p6_a26 := rosetta_g_miss_num_map(ddx_clhv_rec.request_id);
206 p6_a27 := rosetta_g_miss_num_map(ddx_clhv_rec.program_application_id);
207 p6_a28 := rosetta_g_miss_num_map(ddx_clhv_rec.program_id);
208 p6_a29 := ddx_clhv_rec.program_update_date;
209 p6_a30 := rosetta_g_miss_num_map(ddx_clhv_rec.created_by);
210 p6_a31 := ddx_clhv_rec.creation_date;
211 p6_a32 := rosetta_g_miss_num_map(ddx_clhv_rec.last_updated_by);
212 p6_a33 := ddx_clhv_rec.last_update_date;
213 p6_a34 := rosetta_g_miss_num_map(ddx_clhv_rec.last_update_login);
214 p6_a35 := ddx_clhv_rec.checklist_purpose_code;
215 p6_a36 := ddx_clhv_rec.decision_date;
216 p6_a37 := rosetta_g_miss_num_map(ddx_clhv_rec.checklist_obj_id);
217 p6_a38 := ddx_clhv_rec.checklist_obj_type_code;
218 p6_a39 := rosetta_g_miss_num_map(ddx_clhv_rec.ckl_id);
219 end;
220
221 procedure update_checklist_hdr(p_api_version NUMBER
222 , p_init_msg_list VARCHAR2
223 , x_return_status out nocopy VARCHAR2
224 , x_msg_count out nocopy NUMBER
225 , x_msg_data out nocopy VARCHAR2
226 , p6_a0 out nocopy NUMBER
227 , p6_a1 out nocopy NUMBER
228 , p6_a2 out nocopy VARCHAR2
229 , p6_a3 out nocopy VARCHAR2
230 , p6_a4 out nocopy VARCHAR2
231 , p6_a5 out nocopy VARCHAR2
232 , p6_a6 out nocopy DATE
233 , p6_a7 out nocopy DATE
234 , p6_a8 out nocopy VARCHAR2
235 , p6_a9 out nocopy VARCHAR2
236 , p6_a10 out nocopy VARCHAR2
237 , p6_a11 out nocopy VARCHAR2
238 , p6_a12 out nocopy VARCHAR2
239 , p6_a13 out nocopy VARCHAR2
240 , p6_a14 out nocopy VARCHAR2
241 , p6_a15 out nocopy VARCHAR2
242 , p6_a16 out nocopy VARCHAR2
243 , p6_a17 out nocopy VARCHAR2
244 , p6_a18 out nocopy VARCHAR2
245 , p6_a19 out nocopy VARCHAR2
246 , p6_a20 out nocopy VARCHAR2
247 , p6_a21 out nocopy VARCHAR2
248 , p6_a22 out nocopy VARCHAR2
249 , p6_a23 out nocopy VARCHAR2
250 , p6_a24 out nocopy VARCHAR2
251 , p6_a25 out nocopy NUMBER
252 , p6_a26 out nocopy NUMBER
253 , p6_a27 out nocopy NUMBER
254 , p6_a28 out nocopy NUMBER
255 , p6_a29 out nocopy DATE
256 , p6_a30 out nocopy NUMBER
257 , p6_a31 out nocopy DATE
258 , p6_a32 out nocopy NUMBER
259 , p6_a33 out nocopy DATE
260 , p6_a34 out nocopy NUMBER
261 , p6_a35 out nocopy VARCHAR2
262 , p6_a36 out nocopy DATE
263 , p6_a37 out nocopy NUMBER
264 , p6_a38 out nocopy VARCHAR2
265 , p6_a39 out nocopy NUMBER
266 , p5_a0 NUMBER := 0-1962.0724
267 , p5_a1 NUMBER := 0-1962.0724
268 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
269 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
270 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
271 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
272 , p5_a6 DATE := fnd_api.g_miss_date
273 , p5_a7 DATE := fnd_api.g_miss_date
274 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
275 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
276 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
277 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
278 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
279 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
280 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
281 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
282 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
283 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
284 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
285 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
286 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
287 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
288 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
289 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
290 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
291 , p5_a25 NUMBER := 0-1962.0724
292 , p5_a26 NUMBER := 0-1962.0724
293 , p5_a27 NUMBER := 0-1962.0724
294 , p5_a28 NUMBER := 0-1962.0724
295 , p5_a29 DATE := fnd_api.g_miss_date
296 , p5_a30 NUMBER := 0-1962.0724
297 , p5_a31 DATE := fnd_api.g_miss_date
298 , p5_a32 NUMBER := 0-1962.0724
299 , p5_a33 DATE := fnd_api.g_miss_date
300 , p5_a34 NUMBER := 0-1962.0724
301 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
302 , p5_a36 DATE := fnd_api.g_miss_date
303 , p5_a37 NUMBER := 0-1962.0724
304 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
305 , p5_a39 NUMBER := 0-1962.0724
306 )
307
308 as
309 ddp_clhv_rec okl_checklist_pvt.clhv_rec_type;
310 ddx_clhv_rec okl_checklist_pvt.clhv_rec_type;
311 ddindx binary_integer; indx binary_integer;
312 begin
313
314 -- copy data to the local IN or IN-OUT args, if any
315
316
317
318
319
320 ddp_clhv_rec.id := rosetta_g_miss_num_map(p5_a0);
321 ddp_clhv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
322 ddp_clhv_rec.checklist_number := p5_a2;
323 ddp_clhv_rec.description := p5_a3;
324 ddp_clhv_rec.short_description := p5_a4;
325 ddp_clhv_rec.checklist_type := p5_a5;
326 ddp_clhv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
327 ddp_clhv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
328 ddp_clhv_rec.status_code := p5_a8;
329 ddp_clhv_rec.attribute_category := p5_a9;
330 ddp_clhv_rec.attribute1 := p5_a10;
331 ddp_clhv_rec.attribute2 := p5_a11;
332 ddp_clhv_rec.attribute3 := p5_a12;
333 ddp_clhv_rec.attribute4 := p5_a13;
334 ddp_clhv_rec.attribute5 := p5_a14;
335 ddp_clhv_rec.attribute6 := p5_a15;
336 ddp_clhv_rec.attribute7 := p5_a16;
337 ddp_clhv_rec.attribute8 := p5_a17;
338 ddp_clhv_rec.attribute9 := p5_a18;
339 ddp_clhv_rec.attribute10 := p5_a19;
340 ddp_clhv_rec.attribute11 := p5_a20;
341 ddp_clhv_rec.attribute12 := p5_a21;
342 ddp_clhv_rec.attribute13 := p5_a22;
343 ddp_clhv_rec.attribute14 := p5_a23;
344 ddp_clhv_rec.attribute15 := p5_a24;
345 ddp_clhv_rec.org_id := rosetta_g_miss_num_map(p5_a25);
346 ddp_clhv_rec.request_id := rosetta_g_miss_num_map(p5_a26);
347 ddp_clhv_rec.program_application_id := rosetta_g_miss_num_map(p5_a27);
348 ddp_clhv_rec.program_id := rosetta_g_miss_num_map(p5_a28);
349 ddp_clhv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
350 ddp_clhv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
351 ddp_clhv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
352 ddp_clhv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
353 ddp_clhv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
354 ddp_clhv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
355 ddp_clhv_rec.checklist_purpose_code := p5_a35;
356 ddp_clhv_rec.decision_date := rosetta_g_miss_date_in_map(p5_a36);
357 ddp_clhv_rec.checklist_obj_id := rosetta_g_miss_num_map(p5_a37);
358 ddp_clhv_rec.checklist_obj_type_code := p5_a38;
359 ddp_clhv_rec.ckl_id := rosetta_g_miss_num_map(p5_a39);
360
361
362 -- here's the delegated call to the old PL/SQL routine
363 okl_checklist_pvt.update_checklist_hdr(p_api_version,
364 p_init_msg_list,
365 x_return_status,
366 x_msg_count,
367 x_msg_data,
368 ddp_clhv_rec,
369 ddx_clhv_rec);
370
371 -- copy data back from the local variables to OUT or IN-OUT args, if any
372
373
374
375
376
377
378 p6_a0 := rosetta_g_miss_num_map(ddx_clhv_rec.id);
379 p6_a1 := rosetta_g_miss_num_map(ddx_clhv_rec.object_version_number);
380 p6_a2 := ddx_clhv_rec.checklist_number;
381 p6_a3 := ddx_clhv_rec.description;
382 p6_a4 := ddx_clhv_rec.short_description;
383 p6_a5 := ddx_clhv_rec.checklist_type;
384 p6_a6 := ddx_clhv_rec.start_date;
385 p6_a7 := ddx_clhv_rec.end_date;
386 p6_a8 := ddx_clhv_rec.status_code;
387 p6_a9 := ddx_clhv_rec.attribute_category;
388 p6_a10 := ddx_clhv_rec.attribute1;
389 p6_a11 := ddx_clhv_rec.attribute2;
390 p6_a12 := ddx_clhv_rec.attribute3;
391 p6_a13 := ddx_clhv_rec.attribute4;
392 p6_a14 := ddx_clhv_rec.attribute5;
393 p6_a15 := ddx_clhv_rec.attribute6;
394 p6_a16 := ddx_clhv_rec.attribute7;
395 p6_a17 := ddx_clhv_rec.attribute8;
396 p6_a18 := ddx_clhv_rec.attribute9;
397 p6_a19 := ddx_clhv_rec.attribute10;
398 p6_a20 := ddx_clhv_rec.attribute11;
399 p6_a21 := ddx_clhv_rec.attribute12;
400 p6_a22 := ddx_clhv_rec.attribute13;
401 p6_a23 := ddx_clhv_rec.attribute14;
402 p6_a24 := ddx_clhv_rec.attribute15;
403 p6_a25 := rosetta_g_miss_num_map(ddx_clhv_rec.org_id);
404 p6_a26 := rosetta_g_miss_num_map(ddx_clhv_rec.request_id);
405 p6_a27 := rosetta_g_miss_num_map(ddx_clhv_rec.program_application_id);
406 p6_a28 := rosetta_g_miss_num_map(ddx_clhv_rec.program_id);
407 p6_a29 := ddx_clhv_rec.program_update_date;
408 p6_a30 := rosetta_g_miss_num_map(ddx_clhv_rec.created_by);
409 p6_a31 := ddx_clhv_rec.creation_date;
410 p6_a32 := rosetta_g_miss_num_map(ddx_clhv_rec.last_updated_by);
411 p6_a33 := ddx_clhv_rec.last_update_date;
412 p6_a34 := rosetta_g_miss_num_map(ddx_clhv_rec.last_update_login);
413 p6_a35 := ddx_clhv_rec.checklist_purpose_code;
414 p6_a36 := ddx_clhv_rec.decision_date;
415 p6_a37 := rosetta_g_miss_num_map(ddx_clhv_rec.checklist_obj_id);
416 p6_a38 := ddx_clhv_rec.checklist_obj_type_code;
417 p6_a39 := rosetta_g_miss_num_map(ddx_clhv_rec.ckl_id);
418 end;
419
420 procedure delete_checklist_hdr(p_api_version NUMBER
421 , p_init_msg_list VARCHAR2
422 , x_return_status out nocopy VARCHAR2
423 , x_msg_count out nocopy NUMBER
424 , x_msg_data out nocopy VARCHAR2
425 , p5_a0 NUMBER := 0-1962.0724
426 , p5_a1 NUMBER := 0-1962.0724
427 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
428 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
429 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
430 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
431 , p5_a6 DATE := fnd_api.g_miss_date
432 , p5_a7 DATE := fnd_api.g_miss_date
433 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
434 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
435 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
436 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
437 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
438 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
439 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
440 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
441 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
442 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
443 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
444 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
445 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
446 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
447 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
448 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
449 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
450 , p5_a25 NUMBER := 0-1962.0724
451 , p5_a26 NUMBER := 0-1962.0724
452 , p5_a27 NUMBER := 0-1962.0724
453 , p5_a28 NUMBER := 0-1962.0724
454 , p5_a29 DATE := fnd_api.g_miss_date
455 , p5_a30 NUMBER := 0-1962.0724
456 , p5_a31 DATE := fnd_api.g_miss_date
457 , p5_a32 NUMBER := 0-1962.0724
458 , p5_a33 DATE := fnd_api.g_miss_date
459 , p5_a34 NUMBER := 0-1962.0724
460 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
461 , p5_a36 DATE := fnd_api.g_miss_date
462 , p5_a37 NUMBER := 0-1962.0724
463 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
464 , p5_a39 NUMBER := 0-1962.0724
465 )
466
467 as
468 ddp_clhv_rec okl_checklist_pvt.clhv_rec_type;
469 ddindx binary_integer; indx binary_integer;
470 begin
471
472 -- copy data to the local IN or IN-OUT args, if any
473
474
475
476
477
478 ddp_clhv_rec.id := rosetta_g_miss_num_map(p5_a0);
479 ddp_clhv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
480 ddp_clhv_rec.checklist_number := p5_a2;
481 ddp_clhv_rec.description := p5_a3;
482 ddp_clhv_rec.short_description := p5_a4;
483 ddp_clhv_rec.checklist_type := p5_a5;
484 ddp_clhv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
485 ddp_clhv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
486 ddp_clhv_rec.status_code := p5_a8;
487 ddp_clhv_rec.attribute_category := p5_a9;
488 ddp_clhv_rec.attribute1 := p5_a10;
489 ddp_clhv_rec.attribute2 := p5_a11;
490 ddp_clhv_rec.attribute3 := p5_a12;
491 ddp_clhv_rec.attribute4 := p5_a13;
492 ddp_clhv_rec.attribute5 := p5_a14;
493 ddp_clhv_rec.attribute6 := p5_a15;
494 ddp_clhv_rec.attribute7 := p5_a16;
495 ddp_clhv_rec.attribute8 := p5_a17;
496 ddp_clhv_rec.attribute9 := p5_a18;
497 ddp_clhv_rec.attribute10 := p5_a19;
498 ddp_clhv_rec.attribute11 := p5_a20;
499 ddp_clhv_rec.attribute12 := p5_a21;
500 ddp_clhv_rec.attribute13 := p5_a22;
501 ddp_clhv_rec.attribute14 := p5_a23;
502 ddp_clhv_rec.attribute15 := p5_a24;
503 ddp_clhv_rec.org_id := rosetta_g_miss_num_map(p5_a25);
504 ddp_clhv_rec.request_id := rosetta_g_miss_num_map(p5_a26);
505 ddp_clhv_rec.program_application_id := rosetta_g_miss_num_map(p5_a27);
506 ddp_clhv_rec.program_id := rosetta_g_miss_num_map(p5_a28);
507 ddp_clhv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
508 ddp_clhv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
509 ddp_clhv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
510 ddp_clhv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
511 ddp_clhv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
512 ddp_clhv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
513 ddp_clhv_rec.checklist_purpose_code := p5_a35;
514 ddp_clhv_rec.decision_date := rosetta_g_miss_date_in_map(p5_a36);
515 ddp_clhv_rec.checklist_obj_id := rosetta_g_miss_num_map(p5_a37);
516 ddp_clhv_rec.checklist_obj_type_code := p5_a38;
517 ddp_clhv_rec.ckl_id := rosetta_g_miss_num_map(p5_a39);
518
519 -- here's the delegated call to the old PL/SQL routine
520 okl_checklist_pvt.delete_checklist_hdr(p_api_version,
521 p_init_msg_list,
522 x_return_status,
523 x_msg_count,
524 x_msg_data,
525 ddp_clhv_rec);
526
527 -- copy data back from the local variables to OUT or IN-OUT args, if any
528
529
530
531
532
533 end;
534
535 procedure create_checklist_dtl(p_api_version NUMBER
536 , p_init_msg_list VARCHAR2
537 , x_return_status out nocopy VARCHAR2
538 , x_msg_count out nocopy NUMBER
539 , x_msg_data out nocopy VARCHAR2
540 , p5_a0 JTF_NUMBER_TABLE
541 , p5_a1 JTF_NUMBER_TABLE
542 , p5_a2 JTF_NUMBER_TABLE
543 , p5_a3 JTF_VARCHAR2_TABLE_100
544 , p5_a4 JTF_VARCHAR2_TABLE_100
545 , p5_a5 JTF_VARCHAR2_TABLE_500
546 , p5_a6 JTF_VARCHAR2_TABLE_500
547 , p5_a7 JTF_VARCHAR2_TABLE_500
548 , p5_a8 JTF_VARCHAR2_TABLE_500
549 , p5_a9 JTF_VARCHAR2_TABLE_500
550 , p5_a10 JTF_VARCHAR2_TABLE_500
551 , p5_a11 JTF_VARCHAR2_TABLE_500
552 , p5_a12 JTF_VARCHAR2_TABLE_500
553 , p5_a13 JTF_VARCHAR2_TABLE_500
554 , p5_a14 JTF_VARCHAR2_TABLE_500
555 , p5_a15 JTF_VARCHAR2_TABLE_500
556 , p5_a16 JTF_VARCHAR2_TABLE_500
557 , p5_a17 JTF_VARCHAR2_TABLE_500
558 , p5_a18 JTF_VARCHAR2_TABLE_500
559 , p5_a19 JTF_VARCHAR2_TABLE_500
560 , p5_a20 JTF_NUMBER_TABLE
561 , p5_a21 JTF_NUMBER_TABLE
562 , p5_a22 JTF_NUMBER_TABLE
563 , p5_a23 JTF_NUMBER_TABLE
564 , p5_a24 JTF_DATE_TABLE
565 , p5_a25 JTF_NUMBER_TABLE
566 , p5_a26 JTF_DATE_TABLE
567 , p5_a27 JTF_NUMBER_TABLE
568 , p5_a28 JTF_DATE_TABLE
569 , p5_a29 JTF_NUMBER_TABLE
570 , p5_a30 JTF_VARCHAR2_TABLE_100
571 , p5_a31 JTF_VARCHAR2_TABLE_100
572 , p5_a32 JTF_VARCHAR2_TABLE_500
573 , p5_a33 JTF_VARCHAR2_TABLE_500
574 , p5_a34 JTF_NUMBER_TABLE
575 , p5_a35 JTF_NUMBER_TABLE
576 , p5_a36 JTF_VARCHAR2_TABLE_100
577 , p5_a37 JTF_VARCHAR2_TABLE_2000
578 , p5_a38 JTF_VARCHAR2_TABLE_100
579 , p5_a39 JTF_VARCHAR2_TABLE_100
580 , p6_a0 out nocopy JTF_NUMBER_TABLE
581 , p6_a1 out nocopy JTF_NUMBER_TABLE
582 , p6_a2 out nocopy JTF_NUMBER_TABLE
583 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
584 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
585 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_500
586 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_500
587 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_500
588 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_500
589 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_500
590 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_500
591 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
592 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
593 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
594 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
595 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
596 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
597 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
598 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
599 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
600 , p6_a20 out nocopy JTF_NUMBER_TABLE
601 , p6_a21 out nocopy JTF_NUMBER_TABLE
602 , p6_a22 out nocopy JTF_NUMBER_TABLE
603 , p6_a23 out nocopy JTF_NUMBER_TABLE
604 , p6_a24 out nocopy JTF_DATE_TABLE
605 , p6_a25 out nocopy JTF_NUMBER_TABLE
606 , p6_a26 out nocopy JTF_DATE_TABLE
607 , p6_a27 out nocopy JTF_NUMBER_TABLE
608 , p6_a28 out nocopy JTF_DATE_TABLE
609 , p6_a29 out nocopy JTF_NUMBER_TABLE
610 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_100
611 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_100
612 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
613 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
614 , p6_a34 out nocopy JTF_NUMBER_TABLE
615 , p6_a35 out nocopy JTF_NUMBER_TABLE
616 , p6_a36 out nocopy JTF_VARCHAR2_TABLE_100
617 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_2000
618 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
619 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
620 )
621
622 as
623 ddp_cldv_tbl okl_checklist_pvt.cldv_tbl_type;
624 ddx_cldv_tbl okl_checklist_pvt.cldv_tbl_type;
625 ddindx binary_integer; indx binary_integer;
626 begin
627
628 -- copy data to the local IN or IN-OUT args, if any
629
630
631
632
633
634 okl_cld_pvt_w.rosetta_table_copy_in_p2(ddp_cldv_tbl, p5_a0
635 , p5_a1
636 , p5_a2
637 , p5_a3
638 , p5_a4
639 , p5_a5
640 , p5_a6
641 , p5_a7
642 , p5_a8
643 , p5_a9
644 , p5_a10
645 , p5_a11
646 , p5_a12
647 , p5_a13
648 , p5_a14
649 , p5_a15
650 , p5_a16
651 , p5_a17
652 , p5_a18
653 , p5_a19
654 , p5_a20
655 , p5_a21
656 , p5_a22
657 , p5_a23
658 , p5_a24
659 , p5_a25
660 , p5_a26
661 , p5_a27
662 , p5_a28
663 , p5_a29
664 , p5_a30
665 , p5_a31
666 , p5_a32
667 , p5_a33
668 , p5_a34
669 , p5_a35
670 , p5_a36
671 , p5_a37
672 , p5_a38
673 , p5_a39
674 );
675
676
677 -- here's the delegated call to the old PL/SQL routine
678 okl_checklist_pvt.create_checklist_dtl(p_api_version,
679 p_init_msg_list,
680 x_return_status,
681 x_msg_count,
682 x_msg_data,
683 ddp_cldv_tbl,
684 ddx_cldv_tbl);
685
686 -- copy data back from the local variables to OUT or IN-OUT args, if any
687
688
689
690
691
692
693 okl_cld_pvt_w.rosetta_table_copy_out_p2(ddx_cldv_tbl, p6_a0
694 , p6_a1
695 , p6_a2
696 , p6_a3
697 , p6_a4
698 , p6_a5
699 , p6_a6
700 , p6_a7
701 , p6_a8
702 , p6_a9
703 , p6_a10
704 , p6_a11
705 , p6_a12
706 , p6_a13
707 , p6_a14
708 , p6_a15
709 , p6_a16
710 , p6_a17
711 , p6_a18
712 , p6_a19
713 , p6_a20
714 , p6_a21
715 , p6_a22
716 , p6_a23
717 , p6_a24
718 , p6_a25
719 , p6_a26
720 , p6_a27
721 , p6_a28
722 , p6_a29
723 , p6_a30
724 , p6_a31
725 , p6_a32
726 , p6_a33
727 , p6_a34
728 , p6_a35
729 , p6_a36
730 , p6_a37
731 , p6_a38
732 , p6_a39
733 );
734 end;
735
736 procedure update_checklist_dtl(p_api_version NUMBER
737 , p_init_msg_list VARCHAR2
738 , x_return_status out nocopy VARCHAR2
739 , x_msg_count out nocopy NUMBER
740 , x_msg_data out nocopy VARCHAR2
741 , p5_a0 JTF_NUMBER_TABLE
742 , p5_a1 JTF_NUMBER_TABLE
743 , p5_a2 JTF_NUMBER_TABLE
744 , p5_a3 JTF_VARCHAR2_TABLE_100
745 , p5_a4 JTF_VARCHAR2_TABLE_100
746 , p5_a5 JTF_VARCHAR2_TABLE_500
747 , p5_a6 JTF_VARCHAR2_TABLE_500
748 , p5_a7 JTF_VARCHAR2_TABLE_500
749 , p5_a8 JTF_VARCHAR2_TABLE_500
750 , p5_a9 JTF_VARCHAR2_TABLE_500
751 , p5_a10 JTF_VARCHAR2_TABLE_500
752 , p5_a11 JTF_VARCHAR2_TABLE_500
753 , p5_a12 JTF_VARCHAR2_TABLE_500
754 , p5_a13 JTF_VARCHAR2_TABLE_500
755 , p5_a14 JTF_VARCHAR2_TABLE_500
756 , p5_a15 JTF_VARCHAR2_TABLE_500
757 , p5_a16 JTF_VARCHAR2_TABLE_500
758 , p5_a17 JTF_VARCHAR2_TABLE_500
759 , p5_a18 JTF_VARCHAR2_TABLE_500
760 , p5_a19 JTF_VARCHAR2_TABLE_500
761 , p5_a20 JTF_NUMBER_TABLE
762 , p5_a21 JTF_NUMBER_TABLE
763 , p5_a22 JTF_NUMBER_TABLE
764 , p5_a23 JTF_NUMBER_TABLE
765 , p5_a24 JTF_DATE_TABLE
766 , p5_a25 JTF_NUMBER_TABLE
767 , p5_a26 JTF_DATE_TABLE
768 , p5_a27 JTF_NUMBER_TABLE
769 , p5_a28 JTF_DATE_TABLE
770 , p5_a29 JTF_NUMBER_TABLE
771 , p5_a30 JTF_VARCHAR2_TABLE_100
772 , p5_a31 JTF_VARCHAR2_TABLE_100
773 , p5_a32 JTF_VARCHAR2_TABLE_500
774 , p5_a33 JTF_VARCHAR2_TABLE_500
775 , p5_a34 JTF_NUMBER_TABLE
776 , p5_a35 JTF_NUMBER_TABLE
777 , p5_a36 JTF_VARCHAR2_TABLE_100
778 , p5_a37 JTF_VARCHAR2_TABLE_2000
779 , p5_a38 JTF_VARCHAR2_TABLE_100
780 , p5_a39 JTF_VARCHAR2_TABLE_100
781 , p6_a0 out nocopy JTF_NUMBER_TABLE
782 , p6_a1 out nocopy JTF_NUMBER_TABLE
783 , p6_a2 out nocopy JTF_NUMBER_TABLE
784 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
785 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
786 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_500
787 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_500
788 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_500
789 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_500
790 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_500
791 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_500
792 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
793 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
794 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
795 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
796 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
797 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
798 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
799 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
800 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
801 , p6_a20 out nocopy JTF_NUMBER_TABLE
802 , p6_a21 out nocopy JTF_NUMBER_TABLE
803 , p6_a22 out nocopy JTF_NUMBER_TABLE
804 , p6_a23 out nocopy JTF_NUMBER_TABLE
805 , p6_a24 out nocopy JTF_DATE_TABLE
806 , p6_a25 out nocopy JTF_NUMBER_TABLE
807 , p6_a26 out nocopy JTF_DATE_TABLE
808 , p6_a27 out nocopy JTF_NUMBER_TABLE
809 , p6_a28 out nocopy JTF_DATE_TABLE
810 , p6_a29 out nocopy JTF_NUMBER_TABLE
811 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_100
812 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_100
813 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
814 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
815 , p6_a34 out nocopy JTF_NUMBER_TABLE
816 , p6_a35 out nocopy JTF_NUMBER_TABLE
817 , p6_a36 out nocopy JTF_VARCHAR2_TABLE_100
818 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_2000
819 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
820 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
821 )
822
823 as
824 ddp_cldv_tbl okl_checklist_pvt.cldv_tbl_type;
825 ddx_cldv_tbl okl_checklist_pvt.cldv_tbl_type;
826 ddindx binary_integer; indx binary_integer;
827 begin
828
829 -- copy data to the local IN or IN-OUT args, if any
830
831
832
833
834
835 okl_cld_pvt_w.rosetta_table_copy_in_p2(ddp_cldv_tbl, p5_a0
836 , p5_a1
837 , p5_a2
838 , p5_a3
839 , p5_a4
840 , p5_a5
841 , p5_a6
842 , p5_a7
843 , p5_a8
844 , p5_a9
845 , p5_a10
846 , p5_a11
847 , p5_a12
848 , p5_a13
849 , p5_a14
850 , p5_a15
851 , p5_a16
852 , p5_a17
853 , p5_a18
854 , p5_a19
855 , p5_a20
856 , p5_a21
857 , p5_a22
858 , p5_a23
859 , p5_a24
860 , p5_a25
861 , p5_a26
862 , p5_a27
863 , p5_a28
864 , p5_a29
865 , p5_a30
866 , p5_a31
867 , p5_a32
868 , p5_a33
869 , p5_a34
870 , p5_a35
871 , p5_a36
872 , p5_a37
873 , p5_a38
874 , p5_a39
875 );
876
877
878 -- here's the delegated call to the old PL/SQL routine
879 okl_checklist_pvt.update_checklist_dtl(p_api_version,
880 p_init_msg_list,
881 x_return_status,
882 x_msg_count,
883 x_msg_data,
884 ddp_cldv_tbl,
885 ddx_cldv_tbl);
886
887 -- copy data back from the local variables to OUT or IN-OUT args, if any
888
889
890
891
892
893
894 okl_cld_pvt_w.rosetta_table_copy_out_p2(ddx_cldv_tbl, p6_a0
895 , p6_a1
896 , p6_a2
897 , p6_a3
898 , p6_a4
899 , p6_a5
900 , p6_a6
901 , p6_a7
902 , p6_a8
903 , p6_a9
904 , p6_a10
905 , p6_a11
906 , p6_a12
907 , p6_a13
908 , p6_a14
909 , p6_a15
910 , p6_a16
911 , p6_a17
912 , p6_a18
913 , p6_a19
914 , p6_a20
915 , p6_a21
916 , p6_a22
917 , p6_a23
918 , p6_a24
919 , p6_a25
920 , p6_a26
921 , p6_a27
922 , p6_a28
923 , p6_a29
924 , p6_a30
925 , p6_a31
926 , p6_a32
927 , p6_a33
928 , p6_a34
929 , p6_a35
930 , p6_a36
931 , p6_a37
932 , p6_a38
933 , p6_a39
934 );
935 end;
936
937 procedure delete_checklist_dtl(p_api_version NUMBER
938 , p_init_msg_list VARCHAR2
939 , x_return_status out nocopy VARCHAR2
940 , x_msg_count out nocopy NUMBER
941 , x_msg_data out nocopy VARCHAR2
942 , p5_a0 JTF_NUMBER_TABLE
943 , p5_a1 JTF_NUMBER_TABLE
944 , p5_a2 JTF_NUMBER_TABLE
945 , p5_a3 JTF_VARCHAR2_TABLE_100
946 , p5_a4 JTF_VARCHAR2_TABLE_100
947 , p5_a5 JTF_VARCHAR2_TABLE_500
948 , p5_a6 JTF_VARCHAR2_TABLE_500
949 , p5_a7 JTF_VARCHAR2_TABLE_500
950 , p5_a8 JTF_VARCHAR2_TABLE_500
951 , p5_a9 JTF_VARCHAR2_TABLE_500
952 , p5_a10 JTF_VARCHAR2_TABLE_500
953 , p5_a11 JTF_VARCHAR2_TABLE_500
954 , p5_a12 JTF_VARCHAR2_TABLE_500
955 , p5_a13 JTF_VARCHAR2_TABLE_500
956 , p5_a14 JTF_VARCHAR2_TABLE_500
957 , p5_a15 JTF_VARCHAR2_TABLE_500
958 , p5_a16 JTF_VARCHAR2_TABLE_500
959 , p5_a17 JTF_VARCHAR2_TABLE_500
960 , p5_a18 JTF_VARCHAR2_TABLE_500
961 , p5_a19 JTF_VARCHAR2_TABLE_500
962 , p5_a20 JTF_NUMBER_TABLE
963 , p5_a21 JTF_NUMBER_TABLE
964 , p5_a22 JTF_NUMBER_TABLE
965 , p5_a23 JTF_NUMBER_TABLE
966 , p5_a24 JTF_DATE_TABLE
967 , p5_a25 JTF_NUMBER_TABLE
968 , p5_a26 JTF_DATE_TABLE
969 , p5_a27 JTF_NUMBER_TABLE
970 , p5_a28 JTF_DATE_TABLE
971 , p5_a29 JTF_NUMBER_TABLE
972 , p5_a30 JTF_VARCHAR2_TABLE_100
973 , p5_a31 JTF_VARCHAR2_TABLE_100
974 , p5_a32 JTF_VARCHAR2_TABLE_500
975 , p5_a33 JTF_VARCHAR2_TABLE_500
976 , p5_a34 JTF_NUMBER_TABLE
977 , p5_a35 JTF_NUMBER_TABLE
978 , p5_a36 JTF_VARCHAR2_TABLE_100
979 , p5_a37 JTF_VARCHAR2_TABLE_2000
980 , p5_a38 JTF_VARCHAR2_TABLE_100
981 , p5_a39 JTF_VARCHAR2_TABLE_100
982 )
983
984 as
985 ddp_cldv_tbl okl_checklist_pvt.cldv_tbl_type;
986 ddindx binary_integer; indx binary_integer;
987 begin
988
989 -- copy data to the local IN or IN-OUT args, if any
990
991
992
993
994
995 okl_cld_pvt_w.rosetta_table_copy_in_p2(ddp_cldv_tbl, p5_a0
996 , p5_a1
997 , p5_a2
998 , p5_a3
999 , p5_a4
1000 , p5_a5
1001 , p5_a6
1002 , p5_a7
1003 , p5_a8
1004 , p5_a9
1005 , p5_a10
1006 , p5_a11
1007 , p5_a12
1008 , p5_a13
1009 , p5_a14
1010 , p5_a15
1011 , p5_a16
1012 , p5_a17
1013 , p5_a18
1014 , p5_a19
1015 , p5_a20
1016 , p5_a21
1017 , p5_a22
1018 , p5_a23
1019 , p5_a24
1020 , p5_a25
1021 , p5_a26
1022 , p5_a27
1023 , p5_a28
1024 , p5_a29
1025 , p5_a30
1026 , p5_a31
1027 , p5_a32
1028 , p5_a33
1029 , p5_a34
1030 , p5_a35
1031 , p5_a36
1032 , p5_a37
1033 , p5_a38
1034 , p5_a39
1035 );
1036
1037 -- here's the delegated call to the old PL/SQL routine
1038 okl_checklist_pvt.delete_checklist_dtl(p_api_version,
1039 p_init_msg_list,
1040 x_return_status,
1041 x_msg_count,
1042 x_msg_data,
1043 ddp_cldv_tbl);
1044
1045 -- copy data back from the local variables to OUT or IN-OUT args, if any
1046
1047
1048
1049
1050
1051 end;
1052
1053 procedure create_checklist_inst_hdr(p_api_version NUMBER
1054 , p_init_msg_list VARCHAR2
1055 , x_return_status out nocopy VARCHAR2
1056 , x_msg_count out nocopy NUMBER
1057 , x_msg_data out nocopy VARCHAR2
1058 , p6_a0 out nocopy NUMBER
1059 , p6_a1 out nocopy NUMBER
1060 , p6_a2 out nocopy VARCHAR2
1061 , p6_a3 out nocopy VARCHAR2
1062 , p6_a4 out nocopy VARCHAR2
1063 , p6_a5 out nocopy VARCHAR2
1064 , p6_a6 out nocopy DATE
1065 , p6_a7 out nocopy DATE
1066 , p6_a8 out nocopy VARCHAR2
1067 , p6_a9 out nocopy VARCHAR2
1068 , p6_a10 out nocopy VARCHAR2
1069 , p6_a11 out nocopy VARCHAR2
1070 , p6_a12 out nocopy VARCHAR2
1071 , p6_a13 out nocopy VARCHAR2
1072 , p6_a14 out nocopy VARCHAR2
1073 , p6_a15 out nocopy VARCHAR2
1074 , p6_a16 out nocopy VARCHAR2
1075 , p6_a17 out nocopy VARCHAR2
1076 , p6_a18 out nocopy VARCHAR2
1077 , p6_a19 out nocopy VARCHAR2
1078 , p6_a20 out nocopy VARCHAR2
1079 , p6_a21 out nocopy VARCHAR2
1080 , p6_a22 out nocopy VARCHAR2
1081 , p6_a23 out nocopy VARCHAR2
1082 , p6_a24 out nocopy VARCHAR2
1083 , p6_a25 out nocopy NUMBER
1084 , p6_a26 out nocopy NUMBER
1085 , p6_a27 out nocopy NUMBER
1086 , p6_a28 out nocopy NUMBER
1087 , p6_a29 out nocopy DATE
1088 , p6_a30 out nocopy NUMBER
1089 , p6_a31 out nocopy DATE
1090 , p6_a32 out nocopy NUMBER
1091 , p6_a33 out nocopy DATE
1092 , p6_a34 out nocopy NUMBER
1093 , p6_a35 out nocopy VARCHAR2
1094 , p6_a36 out nocopy DATE
1095 , p6_a37 out nocopy NUMBER
1096 , p6_a38 out nocopy VARCHAR2
1097 , p6_a39 out nocopy NUMBER
1098 , p5_a0 NUMBER := 0-1962.0724
1099 , p5_a1 NUMBER := 0-1962.0724
1100 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1101 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1102 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1103 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1104 , p5_a6 DATE := fnd_api.g_miss_date
1105 , p5_a7 DATE := fnd_api.g_miss_date
1106 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1107 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
1108 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1109 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1110 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1111 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1112 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1113 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1114 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1115 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1116 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1117 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1118 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1119 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1120 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1121 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1122 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1123 , p5_a25 NUMBER := 0-1962.0724
1124 , p5_a26 NUMBER := 0-1962.0724
1125 , p5_a27 NUMBER := 0-1962.0724
1126 , p5_a28 NUMBER := 0-1962.0724
1127 , p5_a29 DATE := fnd_api.g_miss_date
1128 , p5_a30 NUMBER := 0-1962.0724
1129 , p5_a31 DATE := fnd_api.g_miss_date
1130 , p5_a32 NUMBER := 0-1962.0724
1131 , p5_a33 DATE := fnd_api.g_miss_date
1132 , p5_a34 NUMBER := 0-1962.0724
1133 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
1134 , p5_a36 DATE := fnd_api.g_miss_date
1135 , p5_a37 NUMBER := 0-1962.0724
1136 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
1137 , p5_a39 NUMBER := 0-1962.0724
1138 )
1139
1140 as
1141 ddp_clhv_rec okl_checklist_pvt.clhv_rec_type;
1142 ddx_clhv_rec okl_checklist_pvt.clhv_rec_type;
1143 ddindx binary_integer; indx binary_integer;
1144 begin
1145
1146 -- copy data to the local IN or IN-OUT args, if any
1147
1148
1149
1150
1151
1152 ddp_clhv_rec.id := rosetta_g_miss_num_map(p5_a0);
1153 ddp_clhv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1154 ddp_clhv_rec.checklist_number := p5_a2;
1155 ddp_clhv_rec.description := p5_a3;
1156 ddp_clhv_rec.short_description := p5_a4;
1157 ddp_clhv_rec.checklist_type := p5_a5;
1158 ddp_clhv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
1159 ddp_clhv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
1160 ddp_clhv_rec.status_code := p5_a8;
1161 ddp_clhv_rec.attribute_category := p5_a9;
1162 ddp_clhv_rec.attribute1 := p5_a10;
1163 ddp_clhv_rec.attribute2 := p5_a11;
1164 ddp_clhv_rec.attribute3 := p5_a12;
1165 ddp_clhv_rec.attribute4 := p5_a13;
1166 ddp_clhv_rec.attribute5 := p5_a14;
1167 ddp_clhv_rec.attribute6 := p5_a15;
1168 ddp_clhv_rec.attribute7 := p5_a16;
1169 ddp_clhv_rec.attribute8 := p5_a17;
1170 ddp_clhv_rec.attribute9 := p5_a18;
1171 ddp_clhv_rec.attribute10 := p5_a19;
1172 ddp_clhv_rec.attribute11 := p5_a20;
1173 ddp_clhv_rec.attribute12 := p5_a21;
1174 ddp_clhv_rec.attribute13 := p5_a22;
1175 ddp_clhv_rec.attribute14 := p5_a23;
1176 ddp_clhv_rec.attribute15 := p5_a24;
1177 ddp_clhv_rec.org_id := rosetta_g_miss_num_map(p5_a25);
1178 ddp_clhv_rec.request_id := rosetta_g_miss_num_map(p5_a26);
1179 ddp_clhv_rec.program_application_id := rosetta_g_miss_num_map(p5_a27);
1180 ddp_clhv_rec.program_id := rosetta_g_miss_num_map(p5_a28);
1181 ddp_clhv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
1182 ddp_clhv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
1183 ddp_clhv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
1184 ddp_clhv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
1185 ddp_clhv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
1186 ddp_clhv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
1187 ddp_clhv_rec.checklist_purpose_code := p5_a35;
1188 ddp_clhv_rec.decision_date := rosetta_g_miss_date_in_map(p5_a36);
1189 ddp_clhv_rec.checklist_obj_id := rosetta_g_miss_num_map(p5_a37);
1190 ddp_clhv_rec.checklist_obj_type_code := p5_a38;
1191 ddp_clhv_rec.ckl_id := rosetta_g_miss_num_map(p5_a39);
1192
1193
1194 -- here's the delegated call to the old PL/SQL routine
1195 okl_checklist_pvt.create_checklist_inst_hdr(p_api_version,
1196 p_init_msg_list,
1197 x_return_status,
1198 x_msg_count,
1199 x_msg_data,
1200 ddp_clhv_rec,
1201 ddx_clhv_rec);
1202
1203 -- copy data back from the local variables to OUT or IN-OUT args, if any
1204
1205
1206
1207
1208
1209
1210 p6_a0 := rosetta_g_miss_num_map(ddx_clhv_rec.id);
1211 p6_a1 := rosetta_g_miss_num_map(ddx_clhv_rec.object_version_number);
1212 p6_a2 := ddx_clhv_rec.checklist_number;
1213 p6_a3 := ddx_clhv_rec.description;
1214 p6_a4 := ddx_clhv_rec.short_description;
1215 p6_a5 := ddx_clhv_rec.checklist_type;
1216 p6_a6 := ddx_clhv_rec.start_date;
1217 p6_a7 := ddx_clhv_rec.end_date;
1218 p6_a8 := ddx_clhv_rec.status_code;
1219 p6_a9 := ddx_clhv_rec.attribute_category;
1220 p6_a10 := ddx_clhv_rec.attribute1;
1221 p6_a11 := ddx_clhv_rec.attribute2;
1222 p6_a12 := ddx_clhv_rec.attribute3;
1223 p6_a13 := ddx_clhv_rec.attribute4;
1224 p6_a14 := ddx_clhv_rec.attribute5;
1225 p6_a15 := ddx_clhv_rec.attribute6;
1226 p6_a16 := ddx_clhv_rec.attribute7;
1227 p6_a17 := ddx_clhv_rec.attribute8;
1228 p6_a18 := ddx_clhv_rec.attribute9;
1229 p6_a19 := ddx_clhv_rec.attribute10;
1230 p6_a20 := ddx_clhv_rec.attribute11;
1231 p6_a21 := ddx_clhv_rec.attribute12;
1232 p6_a22 := ddx_clhv_rec.attribute13;
1233 p6_a23 := ddx_clhv_rec.attribute14;
1234 p6_a24 := ddx_clhv_rec.attribute15;
1235 p6_a25 := rosetta_g_miss_num_map(ddx_clhv_rec.org_id);
1236 p6_a26 := rosetta_g_miss_num_map(ddx_clhv_rec.request_id);
1237 p6_a27 := rosetta_g_miss_num_map(ddx_clhv_rec.program_application_id);
1238 p6_a28 := rosetta_g_miss_num_map(ddx_clhv_rec.program_id);
1239 p6_a29 := ddx_clhv_rec.program_update_date;
1240 p6_a30 := rosetta_g_miss_num_map(ddx_clhv_rec.created_by);
1241 p6_a31 := ddx_clhv_rec.creation_date;
1242 p6_a32 := rosetta_g_miss_num_map(ddx_clhv_rec.last_updated_by);
1243 p6_a33 := ddx_clhv_rec.last_update_date;
1244 p6_a34 := rosetta_g_miss_num_map(ddx_clhv_rec.last_update_login);
1245 p6_a35 := ddx_clhv_rec.checklist_purpose_code;
1246 p6_a36 := ddx_clhv_rec.decision_date;
1247 p6_a37 := rosetta_g_miss_num_map(ddx_clhv_rec.checklist_obj_id);
1248 p6_a38 := ddx_clhv_rec.checklist_obj_type_code;
1249 p6_a39 := rosetta_g_miss_num_map(ddx_clhv_rec.ckl_id);
1250 end;
1251
1252 procedure update_checklist_inst_hdr(p_api_version NUMBER
1253 , p_init_msg_list VARCHAR2
1254 , x_return_status out nocopy VARCHAR2
1255 , x_msg_count out nocopy NUMBER
1256 , x_msg_data out nocopy VARCHAR2
1257 , p6_a0 out nocopy NUMBER
1258 , p6_a1 out nocopy NUMBER
1259 , p6_a2 out nocopy VARCHAR2
1260 , p6_a3 out nocopy VARCHAR2
1261 , p6_a4 out nocopy VARCHAR2
1262 , p6_a5 out nocopy VARCHAR2
1263 , p6_a6 out nocopy DATE
1264 , p6_a7 out nocopy DATE
1265 , p6_a8 out nocopy VARCHAR2
1266 , p6_a9 out nocopy VARCHAR2
1267 , p6_a10 out nocopy VARCHAR2
1268 , p6_a11 out nocopy VARCHAR2
1269 , p6_a12 out nocopy VARCHAR2
1270 , p6_a13 out nocopy VARCHAR2
1271 , p6_a14 out nocopy VARCHAR2
1272 , p6_a15 out nocopy VARCHAR2
1273 , p6_a16 out nocopy VARCHAR2
1274 , p6_a17 out nocopy VARCHAR2
1275 , p6_a18 out nocopy VARCHAR2
1276 , p6_a19 out nocopy VARCHAR2
1277 , p6_a20 out nocopy VARCHAR2
1278 , p6_a21 out nocopy VARCHAR2
1279 , p6_a22 out nocopy VARCHAR2
1280 , p6_a23 out nocopy VARCHAR2
1281 , p6_a24 out nocopy VARCHAR2
1282 , p6_a25 out nocopy NUMBER
1283 , p6_a26 out nocopy NUMBER
1284 , p6_a27 out nocopy NUMBER
1285 , p6_a28 out nocopy NUMBER
1286 , p6_a29 out nocopy DATE
1287 , p6_a30 out nocopy NUMBER
1288 , p6_a31 out nocopy DATE
1289 , p6_a32 out nocopy NUMBER
1290 , p6_a33 out nocopy DATE
1291 , p6_a34 out nocopy NUMBER
1292 , p6_a35 out nocopy VARCHAR2
1293 , p6_a36 out nocopy DATE
1294 , p6_a37 out nocopy NUMBER
1295 , p6_a38 out nocopy VARCHAR2
1296 , p6_a39 out nocopy NUMBER
1297 , p5_a0 NUMBER := 0-1962.0724
1298 , p5_a1 NUMBER := 0-1962.0724
1299 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1300 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1301 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1302 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1303 , p5_a6 DATE := fnd_api.g_miss_date
1304 , p5_a7 DATE := fnd_api.g_miss_date
1305 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1306 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
1307 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1308 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1309 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1310 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1311 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1312 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1313 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1314 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1315 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1316 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1317 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1318 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1319 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1320 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1321 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1322 , p5_a25 NUMBER := 0-1962.0724
1323 , p5_a26 NUMBER := 0-1962.0724
1324 , p5_a27 NUMBER := 0-1962.0724
1325 , p5_a28 NUMBER := 0-1962.0724
1326 , p5_a29 DATE := fnd_api.g_miss_date
1327 , p5_a30 NUMBER := 0-1962.0724
1328 , p5_a31 DATE := fnd_api.g_miss_date
1329 , p5_a32 NUMBER := 0-1962.0724
1330 , p5_a33 DATE := fnd_api.g_miss_date
1331 , p5_a34 NUMBER := 0-1962.0724
1332 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
1333 , p5_a36 DATE := fnd_api.g_miss_date
1334 , p5_a37 NUMBER := 0-1962.0724
1335 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
1336 , p5_a39 NUMBER := 0-1962.0724
1337 )
1338
1339 as
1340 ddp_clhv_rec okl_checklist_pvt.clhv_rec_type;
1341 ddx_clhv_rec okl_checklist_pvt.clhv_rec_type;
1342 ddindx binary_integer; indx binary_integer;
1343 begin
1344
1345 -- copy data to the local IN or IN-OUT args, if any
1346
1347
1348
1349
1350
1351 ddp_clhv_rec.id := rosetta_g_miss_num_map(p5_a0);
1352 ddp_clhv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1353 ddp_clhv_rec.checklist_number := p5_a2;
1354 ddp_clhv_rec.description := p5_a3;
1355 ddp_clhv_rec.short_description := p5_a4;
1356 ddp_clhv_rec.checklist_type := p5_a5;
1357 ddp_clhv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
1358 ddp_clhv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
1359 ddp_clhv_rec.status_code := p5_a8;
1360 ddp_clhv_rec.attribute_category := p5_a9;
1361 ddp_clhv_rec.attribute1 := p5_a10;
1362 ddp_clhv_rec.attribute2 := p5_a11;
1363 ddp_clhv_rec.attribute3 := p5_a12;
1364 ddp_clhv_rec.attribute4 := p5_a13;
1365 ddp_clhv_rec.attribute5 := p5_a14;
1366 ddp_clhv_rec.attribute6 := p5_a15;
1367 ddp_clhv_rec.attribute7 := p5_a16;
1368 ddp_clhv_rec.attribute8 := p5_a17;
1369 ddp_clhv_rec.attribute9 := p5_a18;
1370 ddp_clhv_rec.attribute10 := p5_a19;
1371 ddp_clhv_rec.attribute11 := p5_a20;
1372 ddp_clhv_rec.attribute12 := p5_a21;
1373 ddp_clhv_rec.attribute13 := p5_a22;
1374 ddp_clhv_rec.attribute14 := p5_a23;
1375 ddp_clhv_rec.attribute15 := p5_a24;
1376 ddp_clhv_rec.org_id := rosetta_g_miss_num_map(p5_a25);
1377 ddp_clhv_rec.request_id := rosetta_g_miss_num_map(p5_a26);
1378 ddp_clhv_rec.program_application_id := rosetta_g_miss_num_map(p5_a27);
1379 ddp_clhv_rec.program_id := rosetta_g_miss_num_map(p5_a28);
1380 ddp_clhv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
1381 ddp_clhv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
1382 ddp_clhv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
1383 ddp_clhv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
1384 ddp_clhv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
1385 ddp_clhv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
1386 ddp_clhv_rec.checklist_purpose_code := p5_a35;
1387 ddp_clhv_rec.decision_date := rosetta_g_miss_date_in_map(p5_a36);
1388 ddp_clhv_rec.checklist_obj_id := rosetta_g_miss_num_map(p5_a37);
1389 ddp_clhv_rec.checklist_obj_type_code := p5_a38;
1390 ddp_clhv_rec.ckl_id := rosetta_g_miss_num_map(p5_a39);
1391
1392
1393 -- here's the delegated call to the old PL/SQL routine
1394 okl_checklist_pvt.update_checklist_inst_hdr(p_api_version,
1395 p_init_msg_list,
1396 x_return_status,
1397 x_msg_count,
1398 x_msg_data,
1399 ddp_clhv_rec,
1400 ddx_clhv_rec);
1401
1402 -- copy data back from the local variables to OUT or IN-OUT args, if any
1403
1404
1405
1406
1407
1408
1409 p6_a0 := rosetta_g_miss_num_map(ddx_clhv_rec.id);
1410 p6_a1 := rosetta_g_miss_num_map(ddx_clhv_rec.object_version_number);
1411 p6_a2 := ddx_clhv_rec.checklist_number;
1412 p6_a3 := ddx_clhv_rec.description;
1413 p6_a4 := ddx_clhv_rec.short_description;
1414 p6_a5 := ddx_clhv_rec.checklist_type;
1415 p6_a6 := ddx_clhv_rec.start_date;
1416 p6_a7 := ddx_clhv_rec.end_date;
1417 p6_a8 := ddx_clhv_rec.status_code;
1418 p6_a9 := ddx_clhv_rec.attribute_category;
1419 p6_a10 := ddx_clhv_rec.attribute1;
1420 p6_a11 := ddx_clhv_rec.attribute2;
1421 p6_a12 := ddx_clhv_rec.attribute3;
1422 p6_a13 := ddx_clhv_rec.attribute4;
1423 p6_a14 := ddx_clhv_rec.attribute5;
1424 p6_a15 := ddx_clhv_rec.attribute6;
1425 p6_a16 := ddx_clhv_rec.attribute7;
1426 p6_a17 := ddx_clhv_rec.attribute8;
1427 p6_a18 := ddx_clhv_rec.attribute9;
1428 p6_a19 := ddx_clhv_rec.attribute10;
1429 p6_a20 := ddx_clhv_rec.attribute11;
1430 p6_a21 := ddx_clhv_rec.attribute12;
1431 p6_a22 := ddx_clhv_rec.attribute13;
1432 p6_a23 := ddx_clhv_rec.attribute14;
1433 p6_a24 := ddx_clhv_rec.attribute15;
1434 p6_a25 := rosetta_g_miss_num_map(ddx_clhv_rec.org_id);
1435 p6_a26 := rosetta_g_miss_num_map(ddx_clhv_rec.request_id);
1436 p6_a27 := rosetta_g_miss_num_map(ddx_clhv_rec.program_application_id);
1437 p6_a28 := rosetta_g_miss_num_map(ddx_clhv_rec.program_id);
1438 p6_a29 := ddx_clhv_rec.program_update_date;
1439 p6_a30 := rosetta_g_miss_num_map(ddx_clhv_rec.created_by);
1440 p6_a31 := ddx_clhv_rec.creation_date;
1441 p6_a32 := rosetta_g_miss_num_map(ddx_clhv_rec.last_updated_by);
1442 p6_a33 := ddx_clhv_rec.last_update_date;
1443 p6_a34 := rosetta_g_miss_num_map(ddx_clhv_rec.last_update_login);
1444 p6_a35 := ddx_clhv_rec.checklist_purpose_code;
1445 p6_a36 := ddx_clhv_rec.decision_date;
1446 p6_a37 := rosetta_g_miss_num_map(ddx_clhv_rec.checklist_obj_id);
1447 p6_a38 := ddx_clhv_rec.checklist_obj_type_code;
1448 p6_a39 := rosetta_g_miss_num_map(ddx_clhv_rec.ckl_id);
1449 end;
1450
1451 procedure delete_checklist_inst_hdr(p_api_version NUMBER
1452 , p_init_msg_list VARCHAR2
1453 , x_return_status out nocopy VARCHAR2
1454 , x_msg_count out nocopy NUMBER
1455 , x_msg_data out nocopy VARCHAR2
1456 , p5_a0 NUMBER := 0-1962.0724
1457 , p5_a1 NUMBER := 0-1962.0724
1458 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1459 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1460 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1461 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1462 , p5_a6 DATE := fnd_api.g_miss_date
1463 , p5_a7 DATE := fnd_api.g_miss_date
1464 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1465 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
1466 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1467 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1468 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1469 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1470 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1471 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1472 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1473 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1474 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1475 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1476 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1477 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1478 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1479 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1480 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1481 , p5_a25 NUMBER := 0-1962.0724
1482 , p5_a26 NUMBER := 0-1962.0724
1483 , p5_a27 NUMBER := 0-1962.0724
1484 , p5_a28 NUMBER := 0-1962.0724
1485 , p5_a29 DATE := fnd_api.g_miss_date
1486 , p5_a30 NUMBER := 0-1962.0724
1487 , p5_a31 DATE := fnd_api.g_miss_date
1488 , p5_a32 NUMBER := 0-1962.0724
1489 , p5_a33 DATE := fnd_api.g_miss_date
1490 , p5_a34 NUMBER := 0-1962.0724
1491 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
1492 , p5_a36 DATE := fnd_api.g_miss_date
1493 , p5_a37 NUMBER := 0-1962.0724
1494 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
1495 , p5_a39 NUMBER := 0-1962.0724
1496 )
1497
1498 as
1499 ddp_clhv_rec okl_checklist_pvt.clhv_rec_type;
1500 ddindx binary_integer; indx binary_integer;
1501 begin
1502
1503 -- copy data to the local IN or IN-OUT args, if any
1504
1505
1506
1507
1508
1509 ddp_clhv_rec.id := rosetta_g_miss_num_map(p5_a0);
1510 ddp_clhv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1511 ddp_clhv_rec.checklist_number := p5_a2;
1512 ddp_clhv_rec.description := p5_a3;
1513 ddp_clhv_rec.short_description := p5_a4;
1514 ddp_clhv_rec.checklist_type := p5_a5;
1515 ddp_clhv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
1516 ddp_clhv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
1517 ddp_clhv_rec.status_code := p5_a8;
1518 ddp_clhv_rec.attribute_category := p5_a9;
1519 ddp_clhv_rec.attribute1 := p5_a10;
1520 ddp_clhv_rec.attribute2 := p5_a11;
1521 ddp_clhv_rec.attribute3 := p5_a12;
1522 ddp_clhv_rec.attribute4 := p5_a13;
1523 ddp_clhv_rec.attribute5 := p5_a14;
1524 ddp_clhv_rec.attribute6 := p5_a15;
1525 ddp_clhv_rec.attribute7 := p5_a16;
1526 ddp_clhv_rec.attribute8 := p5_a17;
1527 ddp_clhv_rec.attribute9 := p5_a18;
1528 ddp_clhv_rec.attribute10 := p5_a19;
1529 ddp_clhv_rec.attribute11 := p5_a20;
1530 ddp_clhv_rec.attribute12 := p5_a21;
1531 ddp_clhv_rec.attribute13 := p5_a22;
1532 ddp_clhv_rec.attribute14 := p5_a23;
1533 ddp_clhv_rec.attribute15 := p5_a24;
1534 ddp_clhv_rec.org_id := rosetta_g_miss_num_map(p5_a25);
1535 ddp_clhv_rec.request_id := rosetta_g_miss_num_map(p5_a26);
1536 ddp_clhv_rec.program_application_id := rosetta_g_miss_num_map(p5_a27);
1537 ddp_clhv_rec.program_id := rosetta_g_miss_num_map(p5_a28);
1538 ddp_clhv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
1539 ddp_clhv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
1540 ddp_clhv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
1541 ddp_clhv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
1542 ddp_clhv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
1543 ddp_clhv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
1544 ddp_clhv_rec.checklist_purpose_code := p5_a35;
1545 ddp_clhv_rec.decision_date := rosetta_g_miss_date_in_map(p5_a36);
1546 ddp_clhv_rec.checklist_obj_id := rosetta_g_miss_num_map(p5_a37);
1547 ddp_clhv_rec.checklist_obj_type_code := p5_a38;
1548 ddp_clhv_rec.ckl_id := rosetta_g_miss_num_map(p5_a39);
1549
1550 -- here's the delegated call to the old PL/SQL routine
1551 okl_checklist_pvt.delete_checklist_inst_hdr(p_api_version,
1552 p_init_msg_list,
1553 x_return_status,
1554 x_msg_count,
1555 x_msg_data,
1556 ddp_clhv_rec);
1557
1558 -- copy data back from the local variables to OUT or IN-OUT args, if any
1559
1560
1561
1562
1563
1564 end;
1565
1566 procedure create_checklist_inst_dtl(p_api_version NUMBER
1567 , p_init_msg_list VARCHAR2
1568 , x_return_status out nocopy VARCHAR2
1569 , x_msg_count out nocopy NUMBER
1570 , x_msg_data out nocopy VARCHAR2
1571 , p5_a0 JTF_NUMBER_TABLE
1572 , p5_a1 JTF_NUMBER_TABLE
1573 , p5_a2 JTF_NUMBER_TABLE
1574 , p5_a3 JTF_VARCHAR2_TABLE_100
1575 , p5_a4 JTF_VARCHAR2_TABLE_100
1576 , p5_a5 JTF_VARCHAR2_TABLE_500
1577 , p5_a6 JTF_VARCHAR2_TABLE_500
1578 , p5_a7 JTF_VARCHAR2_TABLE_500
1579 , p5_a8 JTF_VARCHAR2_TABLE_500
1580 , p5_a9 JTF_VARCHAR2_TABLE_500
1581 , p5_a10 JTF_VARCHAR2_TABLE_500
1582 , p5_a11 JTF_VARCHAR2_TABLE_500
1583 , p5_a12 JTF_VARCHAR2_TABLE_500
1584 , p5_a13 JTF_VARCHAR2_TABLE_500
1585 , p5_a14 JTF_VARCHAR2_TABLE_500
1586 , p5_a15 JTF_VARCHAR2_TABLE_500
1587 , p5_a16 JTF_VARCHAR2_TABLE_500
1588 , p5_a17 JTF_VARCHAR2_TABLE_500
1589 , p5_a18 JTF_VARCHAR2_TABLE_500
1590 , p5_a19 JTF_VARCHAR2_TABLE_500
1591 , p5_a20 JTF_NUMBER_TABLE
1592 , p5_a21 JTF_NUMBER_TABLE
1593 , p5_a22 JTF_NUMBER_TABLE
1594 , p5_a23 JTF_NUMBER_TABLE
1595 , p5_a24 JTF_DATE_TABLE
1596 , p5_a25 JTF_NUMBER_TABLE
1597 , p5_a26 JTF_DATE_TABLE
1598 , p5_a27 JTF_NUMBER_TABLE
1599 , p5_a28 JTF_DATE_TABLE
1600 , p5_a29 JTF_NUMBER_TABLE
1601 , p5_a30 JTF_VARCHAR2_TABLE_100
1602 , p5_a31 JTF_VARCHAR2_TABLE_100
1603 , p5_a32 JTF_VARCHAR2_TABLE_500
1604 , p5_a33 JTF_VARCHAR2_TABLE_500
1605 , p5_a34 JTF_NUMBER_TABLE
1606 , p5_a35 JTF_NUMBER_TABLE
1607 , p5_a36 JTF_VARCHAR2_TABLE_100
1608 , p5_a37 JTF_VARCHAR2_TABLE_2000
1609 , p5_a38 JTF_VARCHAR2_TABLE_100
1610 , p5_a39 JTF_VARCHAR2_TABLE_100
1611 , p6_a0 out nocopy JTF_NUMBER_TABLE
1612 , p6_a1 out nocopy JTF_NUMBER_TABLE
1613 , p6_a2 out nocopy JTF_NUMBER_TABLE
1614 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1615 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
1616 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_500
1617 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_500
1618 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_500
1619 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_500
1620 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_500
1621 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_500
1622 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
1623 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
1624 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
1625 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
1626 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
1627 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
1628 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
1629 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
1630 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
1631 , p6_a20 out nocopy JTF_NUMBER_TABLE
1632 , p6_a21 out nocopy JTF_NUMBER_TABLE
1633 , p6_a22 out nocopy JTF_NUMBER_TABLE
1634 , p6_a23 out nocopy JTF_NUMBER_TABLE
1635 , p6_a24 out nocopy JTF_DATE_TABLE
1636 , p6_a25 out nocopy JTF_NUMBER_TABLE
1637 , p6_a26 out nocopy JTF_DATE_TABLE
1638 , p6_a27 out nocopy JTF_NUMBER_TABLE
1639 , p6_a28 out nocopy JTF_DATE_TABLE
1640 , p6_a29 out nocopy JTF_NUMBER_TABLE
1641 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_100
1642 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_100
1643 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
1644 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
1645 , p6_a34 out nocopy JTF_NUMBER_TABLE
1646 , p6_a35 out nocopy JTF_NUMBER_TABLE
1647 , p6_a36 out nocopy JTF_VARCHAR2_TABLE_100
1648 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_2000
1649 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
1650 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
1651 )
1652
1653 as
1654 ddp_cldv_tbl okl_checklist_pvt.cldv_tbl_type;
1655 ddx_cldv_tbl okl_checklist_pvt.cldv_tbl_type;
1656 ddindx binary_integer; indx binary_integer;
1657 begin
1658
1659 -- copy data to the local IN or IN-OUT args, if any
1660
1661
1662
1663
1664
1665 okl_cld_pvt_w.rosetta_table_copy_in_p2(ddp_cldv_tbl, p5_a0
1666 , p5_a1
1667 , p5_a2
1668 , p5_a3
1669 , p5_a4
1670 , p5_a5
1671 , p5_a6
1672 , p5_a7
1673 , p5_a8
1674 , p5_a9
1675 , p5_a10
1676 , p5_a11
1677 , p5_a12
1678 , p5_a13
1679 , p5_a14
1680 , p5_a15
1681 , p5_a16
1682 , p5_a17
1683 , p5_a18
1684 , p5_a19
1685 , p5_a20
1686 , p5_a21
1687 , p5_a22
1688 , p5_a23
1689 , p5_a24
1690 , p5_a25
1691 , p5_a26
1692 , p5_a27
1693 , p5_a28
1694 , p5_a29
1695 , p5_a30
1696 , p5_a31
1697 , p5_a32
1698 , p5_a33
1699 , p5_a34
1700 , p5_a35
1701 , p5_a36
1702 , p5_a37
1703 , p5_a38
1704 , p5_a39
1705 );
1706
1707
1708 -- here's the delegated call to the old PL/SQL routine
1709 okl_checklist_pvt.create_checklist_inst_dtl(p_api_version,
1710 p_init_msg_list,
1711 x_return_status,
1712 x_msg_count,
1713 x_msg_data,
1714 ddp_cldv_tbl,
1715 ddx_cldv_tbl);
1716
1717 -- copy data back from the local variables to OUT or IN-OUT args, if any
1718
1719
1720
1721
1722
1723
1724 okl_cld_pvt_w.rosetta_table_copy_out_p2(ddx_cldv_tbl, p6_a0
1725 , p6_a1
1726 , p6_a2
1727 , p6_a3
1728 , p6_a4
1729 , p6_a5
1730 , p6_a6
1731 , p6_a7
1732 , p6_a8
1733 , p6_a9
1734 , p6_a10
1735 , p6_a11
1736 , p6_a12
1737 , p6_a13
1738 , p6_a14
1739 , p6_a15
1740 , p6_a16
1741 , p6_a17
1742 , p6_a18
1743 , p6_a19
1744 , p6_a20
1745 , p6_a21
1746 , p6_a22
1747 , p6_a23
1748 , p6_a24
1749 , p6_a25
1750 , p6_a26
1751 , p6_a27
1752 , p6_a28
1753 , p6_a29
1754 , p6_a30
1755 , p6_a31
1756 , p6_a32
1757 , p6_a33
1758 , p6_a34
1759 , p6_a35
1760 , p6_a36
1761 , p6_a37
1762 , p6_a38
1763 , p6_a39
1764 );
1765 end;
1766
1767 procedure update_checklist_inst_dtl(p_api_version NUMBER
1768 , p_init_msg_list VARCHAR2
1769 , x_return_status out nocopy VARCHAR2
1770 , x_msg_count out nocopy NUMBER
1771 , x_msg_data out nocopy VARCHAR2
1772 , p5_a0 JTF_NUMBER_TABLE
1773 , p5_a1 JTF_NUMBER_TABLE
1774 , p5_a2 JTF_NUMBER_TABLE
1775 , p5_a3 JTF_VARCHAR2_TABLE_100
1776 , p5_a4 JTF_VARCHAR2_TABLE_100
1777 , p5_a5 JTF_VARCHAR2_TABLE_500
1778 , p5_a6 JTF_VARCHAR2_TABLE_500
1779 , p5_a7 JTF_VARCHAR2_TABLE_500
1780 , p5_a8 JTF_VARCHAR2_TABLE_500
1781 , p5_a9 JTF_VARCHAR2_TABLE_500
1782 , p5_a10 JTF_VARCHAR2_TABLE_500
1783 , p5_a11 JTF_VARCHAR2_TABLE_500
1784 , p5_a12 JTF_VARCHAR2_TABLE_500
1785 , p5_a13 JTF_VARCHAR2_TABLE_500
1786 , p5_a14 JTF_VARCHAR2_TABLE_500
1787 , p5_a15 JTF_VARCHAR2_TABLE_500
1788 , p5_a16 JTF_VARCHAR2_TABLE_500
1789 , p5_a17 JTF_VARCHAR2_TABLE_500
1790 , p5_a18 JTF_VARCHAR2_TABLE_500
1791 , p5_a19 JTF_VARCHAR2_TABLE_500
1792 , p5_a20 JTF_NUMBER_TABLE
1793 , p5_a21 JTF_NUMBER_TABLE
1794 , p5_a22 JTF_NUMBER_TABLE
1795 , p5_a23 JTF_NUMBER_TABLE
1796 , p5_a24 JTF_DATE_TABLE
1797 , p5_a25 JTF_NUMBER_TABLE
1798 , p5_a26 JTF_DATE_TABLE
1799 , p5_a27 JTF_NUMBER_TABLE
1800 , p5_a28 JTF_DATE_TABLE
1801 , p5_a29 JTF_NUMBER_TABLE
1802 , p5_a30 JTF_VARCHAR2_TABLE_100
1803 , p5_a31 JTF_VARCHAR2_TABLE_100
1804 , p5_a32 JTF_VARCHAR2_TABLE_500
1805 , p5_a33 JTF_VARCHAR2_TABLE_500
1806 , p5_a34 JTF_NUMBER_TABLE
1807 , p5_a35 JTF_NUMBER_TABLE
1808 , p5_a36 JTF_VARCHAR2_TABLE_100
1809 , p5_a37 JTF_VARCHAR2_TABLE_2000
1810 , p5_a38 JTF_VARCHAR2_TABLE_100
1811 , p5_a39 JTF_VARCHAR2_TABLE_100
1812 , p6_a0 out nocopy JTF_NUMBER_TABLE
1813 , p6_a1 out nocopy JTF_NUMBER_TABLE
1814 , p6_a2 out nocopy JTF_NUMBER_TABLE
1815 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1816 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
1817 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_500
1818 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_500
1819 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_500
1820 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_500
1821 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_500
1822 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_500
1823 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
1824 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
1825 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
1826 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
1827 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
1828 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
1829 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
1830 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
1831 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
1832 , p6_a20 out nocopy JTF_NUMBER_TABLE
1833 , p6_a21 out nocopy JTF_NUMBER_TABLE
1834 , p6_a22 out nocopy JTF_NUMBER_TABLE
1835 , p6_a23 out nocopy JTF_NUMBER_TABLE
1836 , p6_a24 out nocopy JTF_DATE_TABLE
1837 , p6_a25 out nocopy JTF_NUMBER_TABLE
1838 , p6_a26 out nocopy JTF_DATE_TABLE
1839 , p6_a27 out nocopy JTF_NUMBER_TABLE
1840 , p6_a28 out nocopy JTF_DATE_TABLE
1841 , p6_a29 out nocopy JTF_NUMBER_TABLE
1842 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_100
1843 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_100
1844 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
1845 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
1846 , p6_a34 out nocopy JTF_NUMBER_TABLE
1847 , p6_a35 out nocopy JTF_NUMBER_TABLE
1848 , p6_a36 out nocopy JTF_VARCHAR2_TABLE_100
1849 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_2000
1850 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_100
1851 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
1852 )
1853
1854 as
1855 ddp_cldv_tbl okl_checklist_pvt.cldv_tbl_type;
1856 ddx_cldv_tbl okl_checklist_pvt.cldv_tbl_type;
1857 ddindx binary_integer; indx binary_integer;
1858 begin
1859
1860 -- copy data to the local IN or IN-OUT args, if any
1861
1862
1863
1864
1865
1866 okl_cld_pvt_w.rosetta_table_copy_in_p2(ddp_cldv_tbl, p5_a0
1867 , p5_a1
1868 , p5_a2
1869 , p5_a3
1870 , p5_a4
1871 , p5_a5
1872 , p5_a6
1873 , p5_a7
1874 , p5_a8
1875 , p5_a9
1876 , p5_a10
1877 , p5_a11
1878 , p5_a12
1879 , p5_a13
1880 , p5_a14
1881 , p5_a15
1882 , p5_a16
1883 , p5_a17
1884 , p5_a18
1885 , p5_a19
1886 , p5_a20
1887 , p5_a21
1888 , p5_a22
1889 , p5_a23
1890 , p5_a24
1891 , p5_a25
1892 , p5_a26
1893 , p5_a27
1894 , p5_a28
1895 , p5_a29
1896 , p5_a30
1897 , p5_a31
1898 , p5_a32
1899 , p5_a33
1900 , p5_a34
1901 , p5_a35
1902 , p5_a36
1903 , p5_a37
1904 , p5_a38
1905 , p5_a39
1906 );
1907
1908
1909 -- here's the delegated call to the old PL/SQL routine
1910 okl_checklist_pvt.update_checklist_inst_dtl(p_api_version,
1911 p_init_msg_list,
1912 x_return_status,
1913 x_msg_count,
1914 x_msg_data,
1915 ddp_cldv_tbl,
1916 ddx_cldv_tbl);
1917
1918 -- copy data back from the local variables to OUT or IN-OUT args, if any
1919
1920
1921
1922
1923
1924
1925 okl_cld_pvt_w.rosetta_table_copy_out_p2(ddx_cldv_tbl, p6_a0
1926 , p6_a1
1927 , p6_a2
1928 , p6_a3
1929 , p6_a4
1930 , p6_a5
1931 , p6_a6
1932 , p6_a7
1933 , p6_a8
1934 , p6_a9
1935 , p6_a10
1936 , p6_a11
1937 , p6_a12
1938 , p6_a13
1939 , p6_a14
1940 , p6_a15
1941 , p6_a16
1942 , p6_a17
1943 , p6_a18
1944 , p6_a19
1945 , p6_a20
1946 , p6_a21
1947 , p6_a22
1948 , p6_a23
1949 , p6_a24
1950 , p6_a25
1951 , p6_a26
1952 , p6_a27
1953 , p6_a28
1954 , p6_a29
1955 , p6_a30
1956 , p6_a31
1957 , p6_a32
1958 , p6_a33
1959 , p6_a34
1960 , p6_a35
1961 , p6_a36
1962 , p6_a37
1963 , p6_a38
1964 , p6_a39
1965 );
1966 end;
1967
1968 procedure delete_checklist_inst_dtl(p_api_version NUMBER
1969 , p_init_msg_list VARCHAR2
1970 , x_return_status out nocopy VARCHAR2
1971 , x_msg_count out nocopy NUMBER
1972 , x_msg_data out nocopy VARCHAR2
1973 , p5_a0 JTF_NUMBER_TABLE
1974 , p5_a1 JTF_NUMBER_TABLE
1975 , p5_a2 JTF_NUMBER_TABLE
1976 , p5_a3 JTF_VARCHAR2_TABLE_100
1977 , p5_a4 JTF_VARCHAR2_TABLE_100
1978 , p5_a5 JTF_VARCHAR2_TABLE_500
1979 , p5_a6 JTF_VARCHAR2_TABLE_500
1980 , p5_a7 JTF_VARCHAR2_TABLE_500
1981 , p5_a8 JTF_VARCHAR2_TABLE_500
1982 , p5_a9 JTF_VARCHAR2_TABLE_500
1983 , p5_a10 JTF_VARCHAR2_TABLE_500
1984 , p5_a11 JTF_VARCHAR2_TABLE_500
1985 , p5_a12 JTF_VARCHAR2_TABLE_500
1986 , p5_a13 JTF_VARCHAR2_TABLE_500
1987 , p5_a14 JTF_VARCHAR2_TABLE_500
1988 , p5_a15 JTF_VARCHAR2_TABLE_500
1989 , p5_a16 JTF_VARCHAR2_TABLE_500
1990 , p5_a17 JTF_VARCHAR2_TABLE_500
1991 , p5_a18 JTF_VARCHAR2_TABLE_500
1992 , p5_a19 JTF_VARCHAR2_TABLE_500
1993 , p5_a20 JTF_NUMBER_TABLE
1994 , p5_a21 JTF_NUMBER_TABLE
1995 , p5_a22 JTF_NUMBER_TABLE
1996 , p5_a23 JTF_NUMBER_TABLE
1997 , p5_a24 JTF_DATE_TABLE
1998 , p5_a25 JTF_NUMBER_TABLE
1999 , p5_a26 JTF_DATE_TABLE
2000 , p5_a27 JTF_NUMBER_TABLE
2001 , p5_a28 JTF_DATE_TABLE
2002 , p5_a29 JTF_NUMBER_TABLE
2003 , p5_a30 JTF_VARCHAR2_TABLE_100
2004 , p5_a31 JTF_VARCHAR2_TABLE_100
2005 , p5_a32 JTF_VARCHAR2_TABLE_500
2006 , p5_a33 JTF_VARCHAR2_TABLE_500
2007 , p5_a34 JTF_NUMBER_TABLE
2008 , p5_a35 JTF_NUMBER_TABLE
2009 , p5_a36 JTF_VARCHAR2_TABLE_100
2010 , p5_a37 JTF_VARCHAR2_TABLE_2000
2011 , p5_a38 JTF_VARCHAR2_TABLE_100
2012 , p5_a39 JTF_VARCHAR2_TABLE_100
2013 )
2014
2015 as
2016 ddp_cldv_tbl okl_checklist_pvt.cldv_tbl_type;
2017 ddindx binary_integer; indx binary_integer;
2018 begin
2019
2020 -- copy data to the local IN or IN-OUT args, if any
2021
2022
2023
2024
2025
2026 okl_cld_pvt_w.rosetta_table_copy_in_p2(ddp_cldv_tbl, p5_a0
2027 , p5_a1
2028 , p5_a2
2029 , p5_a3
2030 , p5_a4
2031 , p5_a5
2032 , p5_a6
2033 , p5_a7
2034 , p5_a8
2035 , p5_a9
2036 , p5_a10
2037 , p5_a11
2038 , p5_a12
2039 , p5_a13
2040 , p5_a14
2041 , p5_a15
2042 , p5_a16
2043 , p5_a17
2044 , p5_a18
2045 , p5_a19
2046 , p5_a20
2047 , p5_a21
2048 , p5_a22
2049 , p5_a23
2050 , p5_a24
2051 , p5_a25
2052 , p5_a26
2053 , p5_a27
2054 , p5_a28
2055 , p5_a29
2056 , p5_a30
2057 , p5_a31
2058 , p5_a32
2059 , p5_a33
2060 , p5_a34
2061 , p5_a35
2062 , p5_a36
2063 , p5_a37
2064 , p5_a38
2065 , p5_a39
2066 );
2067
2068 -- here's the delegated call to the old PL/SQL routine
2069 okl_checklist_pvt.delete_checklist_inst_dtl(p_api_version,
2070 p_init_msg_list,
2071 x_return_status,
2072 x_msg_count,
2073 x_msg_data,
2074 ddp_cldv_tbl);
2075
2076 -- copy data back from the local variables to OUT or IN-OUT args, if any
2077
2078
2079
2080
2081
2082 end;
2083
2084 end okl_checklist_pvt_w;