[Home] [Help]
PACKAGE BODY: APPS.AMS_THLDACT_PVT_W
Source
1 package body ams_thldact_pvt_w as
2 /* $Header: amswthab.pls 115.1 2003/07/03 14:24:42 cgoyal 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_thldact(p_api_version NUMBER
23 , p_init_msg_list VARCHAR2
24 , p_commit VARCHAR2
25 , p_validation_level NUMBER
26 , x_return_status out nocopy VARCHAR2
27 , x_msg_count out nocopy NUMBER
28 , x_msg_data out nocopy VARCHAR2
29 , x_trigger_action_id out nocopy NUMBER
30 , p7_a0 NUMBER := 0-1962.0724
31 , p7_a1 DATE := fnd_api.g_miss_date
32 , p7_a2 NUMBER := 0-1962.0724
33 , p7_a3 DATE := fnd_api.g_miss_date
34 , p7_a4 NUMBER := 0-1962.0724
35 , p7_a5 NUMBER := 0-1962.0724
36 , p7_a6 NUMBER := 0-1962.0724
37 , p7_a7 NUMBER := 0-1962.0724
38 , p7_a8 NUMBER := 0-1962.0724
39 , p7_a9 NUMBER := 0-1962.0724
40 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
41 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
42 , p7_a12 VARCHAR2 := fnd_api.g_miss_char
43 , p7_a13 NUMBER := 0-1962.0724
44 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
45 , p7_a15 NUMBER := 0-1962.0724
46 , p7_a16 NUMBER := 0-1962.0724
47 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
48 , p7_a18 NUMBER := 0-1962.0724
49 , p7_a19 NUMBER := 0-1962.0724
50 , p7_a20 VARCHAR2 := fnd_api.g_miss_char
51 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
52 , p7_a22 NUMBER := 0-1962.0724
53 , p7_a23 VARCHAR2 := fnd_api.g_miss_char
54 , p7_a24 VARCHAR2 := fnd_api.g_miss_char
55 , p7_a25 VARCHAR2 := fnd_api.g_miss_char
56 , p7_a26 NUMBER := 0-1962.0724
57 )
58
59 as
60 ddp_thldact_rec ams_thldact_pvt.thldact_rec_type;
61 ddindx binary_integer; indx binary_integer;
62 begin
63
64 -- copy data to the local IN or IN-OUT args, if any
65
66
67
68
69
70
71
72 ddp_thldact_rec.trigger_action_id := rosetta_g_miss_num_map(p7_a0);
73 ddp_thldact_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
74 ddp_thldact_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
75 ddp_thldact_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
76 ddp_thldact_rec.created_by := rosetta_g_miss_num_map(p7_a4);
77 ddp_thldact_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
78 ddp_thldact_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
79 ddp_thldact_rec.process_id := rosetta_g_miss_num_map(p7_a7);
80 ddp_thldact_rec.trigger_id := rosetta_g_miss_num_map(p7_a8);
81 ddp_thldact_rec.order_number := rosetta_g_miss_num_map(p7_a9);
82 ddp_thldact_rec.notify_flag := p7_a10;
83 ddp_thldact_rec.generate_list_flag := p7_a11;
84 ddp_thldact_rec.action_need_approval_flag := p7_a12;
85 ddp_thldact_rec.action_approver_user_id := rosetta_g_miss_num_map(p7_a13);
86 ddp_thldact_rec.execute_action_type := p7_a14;
87 ddp_thldact_rec.list_header_id := rosetta_g_miss_num_map(p7_a15);
88 ddp_thldact_rec.list_connected_to_id := rosetta_g_miss_num_map(p7_a16);
89 ddp_thldact_rec.arc_list_connected_to := p7_a17;
90 ddp_thldact_rec.deliverable_id := rosetta_g_miss_num_map(p7_a18);
91 ddp_thldact_rec.activity_offer_id := rosetta_g_miss_num_map(p7_a19);
92 ddp_thldact_rec.dscript_name := p7_a20;
93 ddp_thldact_rec.program_to_call := p7_a21;
94 ddp_thldact_rec.cover_letter_id := rosetta_g_miss_num_map(p7_a22);
95 ddp_thldact_rec.mail_subject := p7_a23;
96 ddp_thldact_rec.mail_sender_name := p7_a24;
97 ddp_thldact_rec.from_fax_no := p7_a25;
98 ddp_thldact_rec.action_for_id := rosetta_g_miss_num_map(p7_a26);
99
100
101 -- here's the delegated call to the old PL/SQL routine
102 ams_thldact_pvt.create_thldact(p_api_version,
103 p_init_msg_list,
104 p_commit,
105 p_validation_level,
106 x_return_status,
107 x_msg_count,
108 x_msg_data,
109 ddp_thldact_rec,
110 x_trigger_action_id);
111
112 -- copy data back from the local variables to OUT or IN-OUT args, if any
113
114
115
116
117
118
119
120
121 end;
122
123 procedure update_thldact(p_api_version NUMBER
124 , p_init_msg_list VARCHAR2
125 , p_commit VARCHAR2
126 , p_validation_level NUMBER
127 , x_return_status out nocopy VARCHAR2
128 , x_msg_count out nocopy NUMBER
129 , x_msg_data out nocopy VARCHAR2
130 , p7_a0 NUMBER := 0-1962.0724
131 , p7_a1 DATE := fnd_api.g_miss_date
132 , p7_a2 NUMBER := 0-1962.0724
133 , p7_a3 DATE := fnd_api.g_miss_date
134 , p7_a4 NUMBER := 0-1962.0724
135 , p7_a5 NUMBER := 0-1962.0724
136 , p7_a6 NUMBER := 0-1962.0724
137 , p7_a7 NUMBER := 0-1962.0724
138 , p7_a8 NUMBER := 0-1962.0724
139 , p7_a9 NUMBER := 0-1962.0724
140 , p7_a10 VARCHAR2 := fnd_api.g_miss_char
141 , p7_a11 VARCHAR2 := fnd_api.g_miss_char
142 , p7_a12 VARCHAR2 := fnd_api.g_miss_char
143 , p7_a13 NUMBER := 0-1962.0724
144 , p7_a14 VARCHAR2 := fnd_api.g_miss_char
145 , p7_a15 NUMBER := 0-1962.0724
146 , p7_a16 NUMBER := 0-1962.0724
147 , p7_a17 VARCHAR2 := fnd_api.g_miss_char
148 , p7_a18 NUMBER := 0-1962.0724
149 , p7_a19 NUMBER := 0-1962.0724
150 , p7_a20 VARCHAR2 := fnd_api.g_miss_char
151 , p7_a21 VARCHAR2 := fnd_api.g_miss_char
152 , p7_a22 NUMBER := 0-1962.0724
153 , p7_a23 VARCHAR2 := fnd_api.g_miss_char
154 , p7_a24 VARCHAR2 := fnd_api.g_miss_char
155 , p7_a25 VARCHAR2 := fnd_api.g_miss_char
156 , p7_a26 NUMBER := 0-1962.0724
157 )
158
159 as
160 ddp_thldact_rec ams_thldact_pvt.thldact_rec_type;
161 ddindx binary_integer; indx binary_integer;
162 begin
163
164 -- copy data to the local IN or IN-OUT args, if any
165
166
167
168
169
170
171
172 ddp_thldact_rec.trigger_action_id := rosetta_g_miss_num_map(p7_a0);
173 ddp_thldact_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a1);
174 ddp_thldact_rec.last_updated_by := rosetta_g_miss_num_map(p7_a2);
175 ddp_thldact_rec.creation_date := rosetta_g_miss_date_in_map(p7_a3);
176 ddp_thldact_rec.created_by := rosetta_g_miss_num_map(p7_a4);
177 ddp_thldact_rec.last_update_login := rosetta_g_miss_num_map(p7_a5);
178 ddp_thldact_rec.object_version_number := rosetta_g_miss_num_map(p7_a6);
179 ddp_thldact_rec.process_id := rosetta_g_miss_num_map(p7_a7);
180 ddp_thldact_rec.trigger_id := rosetta_g_miss_num_map(p7_a8);
181 ddp_thldact_rec.order_number := rosetta_g_miss_num_map(p7_a9);
182 ddp_thldact_rec.notify_flag := p7_a10;
183 ddp_thldact_rec.generate_list_flag := p7_a11;
184 ddp_thldact_rec.action_need_approval_flag := p7_a12;
185 ddp_thldact_rec.action_approver_user_id := rosetta_g_miss_num_map(p7_a13);
186 ddp_thldact_rec.execute_action_type := p7_a14;
187 ddp_thldact_rec.list_header_id := rosetta_g_miss_num_map(p7_a15);
188 ddp_thldact_rec.list_connected_to_id := rosetta_g_miss_num_map(p7_a16);
189 ddp_thldact_rec.arc_list_connected_to := p7_a17;
190 ddp_thldact_rec.deliverable_id := rosetta_g_miss_num_map(p7_a18);
191 ddp_thldact_rec.activity_offer_id := rosetta_g_miss_num_map(p7_a19);
192 ddp_thldact_rec.dscript_name := p7_a20;
193 ddp_thldact_rec.program_to_call := p7_a21;
194 ddp_thldact_rec.cover_letter_id := rosetta_g_miss_num_map(p7_a22);
195 ddp_thldact_rec.mail_subject := p7_a23;
196 ddp_thldact_rec.mail_sender_name := p7_a24;
197 ddp_thldact_rec.from_fax_no := p7_a25;
198 ddp_thldact_rec.action_for_id := rosetta_g_miss_num_map(p7_a26);
199
200 -- here's the delegated call to the old PL/SQL routine
201 ams_thldact_pvt.update_thldact(p_api_version,
202 p_init_msg_list,
203 p_commit,
204 p_validation_level,
205 x_return_status,
206 x_msg_count,
207 x_msg_data,
208 ddp_thldact_rec);
209
210 -- copy data back from the local variables to OUT or IN-OUT args, if any
211
212
213
214
215
216
217
218 end;
219
220 procedure validate_thldact(p_api_version NUMBER
221 , p_init_msg_list VARCHAR2
222 , p_validation_level NUMBER
223 , x_return_status out nocopy VARCHAR2
224 , x_msg_count out nocopy NUMBER
225 , x_msg_data out nocopy VARCHAR2
226 , p6_a0 NUMBER := 0-1962.0724
227 , p6_a1 DATE := fnd_api.g_miss_date
228 , p6_a2 NUMBER := 0-1962.0724
229 , p6_a3 DATE := fnd_api.g_miss_date
230 , p6_a4 NUMBER := 0-1962.0724
231 , p6_a5 NUMBER := 0-1962.0724
232 , p6_a6 NUMBER := 0-1962.0724
233 , p6_a7 NUMBER := 0-1962.0724
234 , p6_a8 NUMBER := 0-1962.0724
235 , p6_a9 NUMBER := 0-1962.0724
236 , p6_a10 VARCHAR2 := fnd_api.g_miss_char
237 , p6_a11 VARCHAR2 := fnd_api.g_miss_char
238 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
239 , p6_a13 NUMBER := 0-1962.0724
240 , p6_a14 VARCHAR2 := fnd_api.g_miss_char
241 , p6_a15 NUMBER := 0-1962.0724
242 , p6_a16 NUMBER := 0-1962.0724
243 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
244 , p6_a18 NUMBER := 0-1962.0724
245 , p6_a19 NUMBER := 0-1962.0724
246 , p6_a20 VARCHAR2 := fnd_api.g_miss_char
247 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
248 , p6_a22 NUMBER := 0-1962.0724
249 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
250 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
251 , p6_a25 VARCHAR2 := fnd_api.g_miss_char
252 , p6_a26 NUMBER := 0-1962.0724
253 )
254
255 as
256 ddp_thldact_rec ams_thldact_pvt.thldact_rec_type;
257 ddindx binary_integer; indx binary_integer;
258 begin
259
260 -- copy data to the local IN or IN-OUT args, if any
261
262
263
264
265
266
267 ddp_thldact_rec.trigger_action_id := rosetta_g_miss_num_map(p6_a0);
268 ddp_thldact_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a1);
269 ddp_thldact_rec.last_updated_by := rosetta_g_miss_num_map(p6_a2);
270 ddp_thldact_rec.creation_date := rosetta_g_miss_date_in_map(p6_a3);
271 ddp_thldact_rec.created_by := rosetta_g_miss_num_map(p6_a4);
272 ddp_thldact_rec.last_update_login := rosetta_g_miss_num_map(p6_a5);
273 ddp_thldact_rec.object_version_number := rosetta_g_miss_num_map(p6_a6);
274 ddp_thldact_rec.process_id := rosetta_g_miss_num_map(p6_a7);
275 ddp_thldact_rec.trigger_id := rosetta_g_miss_num_map(p6_a8);
276 ddp_thldact_rec.order_number := rosetta_g_miss_num_map(p6_a9);
277 ddp_thldact_rec.notify_flag := p6_a10;
278 ddp_thldact_rec.generate_list_flag := p6_a11;
279 ddp_thldact_rec.action_need_approval_flag := p6_a12;
280 ddp_thldact_rec.action_approver_user_id := rosetta_g_miss_num_map(p6_a13);
281 ddp_thldact_rec.execute_action_type := p6_a14;
282 ddp_thldact_rec.list_header_id := rosetta_g_miss_num_map(p6_a15);
283 ddp_thldact_rec.list_connected_to_id := rosetta_g_miss_num_map(p6_a16);
284 ddp_thldact_rec.arc_list_connected_to := p6_a17;
285 ddp_thldact_rec.deliverable_id := rosetta_g_miss_num_map(p6_a18);
286 ddp_thldact_rec.activity_offer_id := rosetta_g_miss_num_map(p6_a19);
287 ddp_thldact_rec.dscript_name := p6_a20;
288 ddp_thldact_rec.program_to_call := p6_a21;
289 ddp_thldact_rec.cover_letter_id := rosetta_g_miss_num_map(p6_a22);
290 ddp_thldact_rec.mail_subject := p6_a23;
291 ddp_thldact_rec.mail_sender_name := p6_a24;
292 ddp_thldact_rec.from_fax_no := p6_a25;
293 ddp_thldact_rec.action_for_id := rosetta_g_miss_num_map(p6_a26);
294
295 -- here's the delegated call to the old PL/SQL routine
296 ams_thldact_pvt.validate_thldact(p_api_version,
297 p_init_msg_list,
298 p_validation_level,
299 x_return_status,
300 x_msg_count,
301 x_msg_data,
302 ddp_thldact_rec);
303
304 -- copy data back from the local variables to OUT or IN-OUT args, if any
305
306
307
308
309
310
311 end;
312
313 procedure check_thldact_items(p_validation_mode VARCHAR2
314 , x_return_status out nocopy VARCHAR2
315 , p0_a0 NUMBER := 0-1962.0724
316 , p0_a1 DATE := fnd_api.g_miss_date
317 , p0_a2 NUMBER := 0-1962.0724
318 , p0_a3 DATE := fnd_api.g_miss_date
319 , p0_a4 NUMBER := 0-1962.0724
320 , p0_a5 NUMBER := 0-1962.0724
321 , p0_a6 NUMBER := 0-1962.0724
322 , p0_a7 NUMBER := 0-1962.0724
323 , p0_a8 NUMBER := 0-1962.0724
324 , p0_a9 NUMBER := 0-1962.0724
325 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
326 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
327 , p0_a12 VARCHAR2 := fnd_api.g_miss_char
328 , p0_a13 NUMBER := 0-1962.0724
329 , p0_a14 VARCHAR2 := fnd_api.g_miss_char
330 , p0_a15 NUMBER := 0-1962.0724
331 , p0_a16 NUMBER := 0-1962.0724
332 , p0_a17 VARCHAR2 := fnd_api.g_miss_char
333 , p0_a18 NUMBER := 0-1962.0724
334 , p0_a19 NUMBER := 0-1962.0724
335 , p0_a20 VARCHAR2 := fnd_api.g_miss_char
336 , p0_a21 VARCHAR2 := fnd_api.g_miss_char
337 , p0_a22 NUMBER := 0-1962.0724
338 , p0_a23 VARCHAR2 := fnd_api.g_miss_char
339 , p0_a24 VARCHAR2 := fnd_api.g_miss_char
340 , p0_a25 VARCHAR2 := fnd_api.g_miss_char
341 , p0_a26 NUMBER := 0-1962.0724
342 )
343
344 as
345 ddp_thldact_rec ams_thldact_pvt.thldact_rec_type;
346 ddindx binary_integer; indx binary_integer;
347 begin
348
349 -- copy data to the local IN or IN-OUT args, if any
350 ddp_thldact_rec.trigger_action_id := rosetta_g_miss_num_map(p0_a0);
351 ddp_thldact_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
352 ddp_thldact_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
353 ddp_thldact_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
354 ddp_thldact_rec.created_by := rosetta_g_miss_num_map(p0_a4);
355 ddp_thldact_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
356 ddp_thldact_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
357 ddp_thldact_rec.process_id := rosetta_g_miss_num_map(p0_a7);
358 ddp_thldact_rec.trigger_id := rosetta_g_miss_num_map(p0_a8);
359 ddp_thldact_rec.order_number := rosetta_g_miss_num_map(p0_a9);
360 ddp_thldact_rec.notify_flag := p0_a10;
361 ddp_thldact_rec.generate_list_flag := p0_a11;
362 ddp_thldact_rec.action_need_approval_flag := p0_a12;
363 ddp_thldact_rec.action_approver_user_id := rosetta_g_miss_num_map(p0_a13);
364 ddp_thldact_rec.execute_action_type := p0_a14;
365 ddp_thldact_rec.list_header_id := rosetta_g_miss_num_map(p0_a15);
366 ddp_thldact_rec.list_connected_to_id := rosetta_g_miss_num_map(p0_a16);
367 ddp_thldact_rec.arc_list_connected_to := p0_a17;
368 ddp_thldact_rec.deliverable_id := rosetta_g_miss_num_map(p0_a18);
369 ddp_thldact_rec.activity_offer_id := rosetta_g_miss_num_map(p0_a19);
370 ddp_thldact_rec.dscript_name := p0_a20;
371 ddp_thldact_rec.program_to_call := p0_a21;
372 ddp_thldact_rec.cover_letter_id := rosetta_g_miss_num_map(p0_a22);
373 ddp_thldact_rec.mail_subject := p0_a23;
374 ddp_thldact_rec.mail_sender_name := p0_a24;
375 ddp_thldact_rec.from_fax_no := p0_a25;
376 ddp_thldact_rec.action_for_id := rosetta_g_miss_num_map(p0_a26);
377
378
379
380 -- here's the delegated call to the old PL/SQL routine
381 ams_thldact_pvt.check_thldact_items(ddp_thldact_rec,
382 p_validation_mode,
383 x_return_status);
384
385 -- copy data back from the local variables to OUT or IN-OUT args, if any
386
387
388 end;
389
390 procedure check_thldact_record(x_return_status out nocopy VARCHAR2
391 , p0_a0 NUMBER := 0-1962.0724
392 , p0_a1 DATE := fnd_api.g_miss_date
393 , p0_a2 NUMBER := 0-1962.0724
394 , p0_a3 DATE := fnd_api.g_miss_date
395 , p0_a4 NUMBER := 0-1962.0724
396 , p0_a5 NUMBER := 0-1962.0724
397 , p0_a6 NUMBER := 0-1962.0724
398 , p0_a7 NUMBER := 0-1962.0724
399 , p0_a8 NUMBER := 0-1962.0724
400 , p0_a9 NUMBER := 0-1962.0724
401 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
402 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
403 , p0_a12 VARCHAR2 := fnd_api.g_miss_char
404 , p0_a13 NUMBER := 0-1962.0724
405 , p0_a14 VARCHAR2 := fnd_api.g_miss_char
406 , p0_a15 NUMBER := 0-1962.0724
407 , p0_a16 NUMBER := 0-1962.0724
408 , p0_a17 VARCHAR2 := fnd_api.g_miss_char
409 , p0_a18 NUMBER := 0-1962.0724
410 , p0_a19 NUMBER := 0-1962.0724
411 , p0_a20 VARCHAR2 := fnd_api.g_miss_char
412 , p0_a21 VARCHAR2 := fnd_api.g_miss_char
413 , p0_a22 NUMBER := 0-1962.0724
414 , p0_a23 VARCHAR2 := fnd_api.g_miss_char
415 , p0_a24 VARCHAR2 := fnd_api.g_miss_char
416 , p0_a25 VARCHAR2 := fnd_api.g_miss_char
417 , p0_a26 NUMBER := 0-1962.0724
418 , p1_a0 NUMBER := 0-1962.0724
419 , p1_a1 DATE := fnd_api.g_miss_date
420 , p1_a2 NUMBER := 0-1962.0724
421 , p1_a3 DATE := fnd_api.g_miss_date
422 , p1_a4 NUMBER := 0-1962.0724
423 , p1_a5 NUMBER := 0-1962.0724
424 , p1_a6 NUMBER := 0-1962.0724
425 , p1_a7 NUMBER := 0-1962.0724
426 , p1_a8 NUMBER := 0-1962.0724
427 , p1_a9 NUMBER := 0-1962.0724
431 , p1_a13 NUMBER := 0-1962.0724
428 , p1_a10 VARCHAR2 := fnd_api.g_miss_char
429 , p1_a11 VARCHAR2 := fnd_api.g_miss_char
430 , p1_a12 VARCHAR2 := fnd_api.g_miss_char
432 , p1_a14 VARCHAR2 := fnd_api.g_miss_char
433 , p1_a15 NUMBER := 0-1962.0724
434 , p1_a16 NUMBER := 0-1962.0724
435 , p1_a17 VARCHAR2 := fnd_api.g_miss_char
436 , p1_a18 NUMBER := 0-1962.0724
437 , p1_a19 NUMBER := 0-1962.0724
438 , p1_a20 VARCHAR2 := fnd_api.g_miss_char
439 , p1_a21 VARCHAR2 := fnd_api.g_miss_char
440 , p1_a22 NUMBER := 0-1962.0724
441 , p1_a23 VARCHAR2 := fnd_api.g_miss_char
442 , p1_a24 VARCHAR2 := fnd_api.g_miss_char
443 , p1_a25 VARCHAR2 := fnd_api.g_miss_char
444 , p1_a26 NUMBER := 0-1962.0724
445 )
446
447 as
448 ddp_thldact_rec ams_thldact_pvt.thldact_rec_type;
449 ddp_complete_rec ams_thldact_pvt.thldact_rec_type;
450 ddindx binary_integer; indx binary_integer;
451 begin
452
453 -- copy data to the local IN or IN-OUT args, if any
454 ddp_thldact_rec.trigger_action_id := rosetta_g_miss_num_map(p0_a0);
455 ddp_thldact_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
456 ddp_thldact_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
457 ddp_thldact_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
458 ddp_thldact_rec.created_by := rosetta_g_miss_num_map(p0_a4);
459 ddp_thldact_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
460 ddp_thldact_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
461 ddp_thldact_rec.process_id := rosetta_g_miss_num_map(p0_a7);
462 ddp_thldact_rec.trigger_id := rosetta_g_miss_num_map(p0_a8);
463 ddp_thldact_rec.order_number := rosetta_g_miss_num_map(p0_a9);
464 ddp_thldact_rec.notify_flag := p0_a10;
465 ddp_thldact_rec.generate_list_flag := p0_a11;
466 ddp_thldact_rec.action_need_approval_flag := p0_a12;
467 ddp_thldact_rec.action_approver_user_id := rosetta_g_miss_num_map(p0_a13);
468 ddp_thldact_rec.execute_action_type := p0_a14;
469 ddp_thldact_rec.list_header_id := rosetta_g_miss_num_map(p0_a15);
470 ddp_thldact_rec.list_connected_to_id := rosetta_g_miss_num_map(p0_a16);
471 ddp_thldact_rec.arc_list_connected_to := p0_a17;
472 ddp_thldact_rec.deliverable_id := rosetta_g_miss_num_map(p0_a18);
473 ddp_thldact_rec.activity_offer_id := rosetta_g_miss_num_map(p0_a19);
474 ddp_thldact_rec.dscript_name := p0_a20;
475 ddp_thldact_rec.program_to_call := p0_a21;
476 ddp_thldact_rec.cover_letter_id := rosetta_g_miss_num_map(p0_a22);
477 ddp_thldact_rec.mail_subject := p0_a23;
478 ddp_thldact_rec.mail_sender_name := p0_a24;
479 ddp_thldact_rec.from_fax_no := p0_a25;
480 ddp_thldact_rec.action_for_id := rosetta_g_miss_num_map(p0_a26);
481
482 ddp_complete_rec.trigger_action_id := rosetta_g_miss_num_map(p1_a0);
483 ddp_complete_rec.last_update_date := rosetta_g_miss_date_in_map(p1_a1);
484 ddp_complete_rec.last_updated_by := rosetta_g_miss_num_map(p1_a2);
485 ddp_complete_rec.creation_date := rosetta_g_miss_date_in_map(p1_a3);
486 ddp_complete_rec.created_by := rosetta_g_miss_num_map(p1_a4);
487 ddp_complete_rec.last_update_login := rosetta_g_miss_num_map(p1_a5);
488 ddp_complete_rec.object_version_number := rosetta_g_miss_num_map(p1_a6);
489 ddp_complete_rec.process_id := rosetta_g_miss_num_map(p1_a7);
490 ddp_complete_rec.trigger_id := rosetta_g_miss_num_map(p1_a8);
491 ddp_complete_rec.order_number := rosetta_g_miss_num_map(p1_a9);
492 ddp_complete_rec.notify_flag := p1_a10;
493 ddp_complete_rec.generate_list_flag := p1_a11;
494 ddp_complete_rec.action_need_approval_flag := p1_a12;
495 ddp_complete_rec.action_approver_user_id := rosetta_g_miss_num_map(p1_a13);
496 ddp_complete_rec.execute_action_type := p1_a14;
497 ddp_complete_rec.list_header_id := rosetta_g_miss_num_map(p1_a15);
498 ddp_complete_rec.list_connected_to_id := rosetta_g_miss_num_map(p1_a16);
499 ddp_complete_rec.arc_list_connected_to := p1_a17;
500 ddp_complete_rec.deliverable_id := rosetta_g_miss_num_map(p1_a18);
501 ddp_complete_rec.activity_offer_id := rosetta_g_miss_num_map(p1_a19);
502 ddp_complete_rec.dscript_name := p1_a20;
503 ddp_complete_rec.program_to_call := p1_a21;
504 ddp_complete_rec.cover_letter_id := rosetta_g_miss_num_map(p1_a22);
505 ddp_complete_rec.mail_subject := p1_a23;
506 ddp_complete_rec.mail_sender_name := p1_a24;
507 ddp_complete_rec.from_fax_no := p1_a25;
508 ddp_complete_rec.action_for_id := rosetta_g_miss_num_map(p1_a26);
509
510
511 -- here's the delegated call to the old PL/SQL routine
512 ams_thldact_pvt.check_thldact_record(ddp_thldact_rec,
513 ddp_complete_rec,
514 x_return_status);
515
516 -- copy data back from the local variables to OUT or IN-OUT args, if any
517
518
519 end;
520
521 procedure init_thldact_rec(p0_a0 out nocopy NUMBER
522 , p0_a1 out nocopy DATE
523 , p0_a2 out nocopy NUMBER
524 , p0_a3 out nocopy DATE
525 , p0_a4 out nocopy NUMBER
526 , p0_a5 out nocopy NUMBER
527 , p0_a6 out nocopy NUMBER
528 , p0_a7 out nocopy NUMBER
529 , p0_a8 out nocopy NUMBER
530 , p0_a9 out nocopy NUMBER
531 , p0_a10 out nocopy VARCHAR2
532 , p0_a11 out nocopy VARCHAR2
533 , p0_a12 out nocopy VARCHAR2
534 , p0_a13 out nocopy NUMBER
535 , p0_a14 out nocopy VARCHAR2
536 , p0_a15 out nocopy NUMBER
537 , p0_a16 out nocopy NUMBER
538 , p0_a17 out nocopy VARCHAR2
539 , p0_a18 out nocopy NUMBER
540 , p0_a19 out nocopy NUMBER
541 , p0_a20 out nocopy VARCHAR2
542 , p0_a21 out nocopy VARCHAR2
543 , p0_a22 out nocopy NUMBER
544 , p0_a23 out nocopy VARCHAR2
545 , p0_a24 out nocopy VARCHAR2
546 , p0_a25 out nocopy VARCHAR2
547 , p0_a26 out nocopy NUMBER
548 )
549
550 as
551 ddx_thldact_rec ams_thldact_pvt.thldact_rec_type;
552 ddindx binary_integer; indx binary_integer;
553 begin
554
555 -- copy data to the local IN or IN-OUT args, if any
556
557 -- here's the delegated call to the old PL/SQL routine
558 ams_thldact_pvt.init_thldact_rec(ddx_thldact_rec);
559
560 -- copy data back from the local variables to OUT or IN-OUT args, if any
561 p0_a0 := rosetta_g_miss_num_map(ddx_thldact_rec.trigger_action_id);
562 p0_a1 := ddx_thldact_rec.last_update_date;
563 p0_a2 := rosetta_g_miss_num_map(ddx_thldact_rec.last_updated_by);
564 p0_a3 := ddx_thldact_rec.creation_date;
565 p0_a4 := rosetta_g_miss_num_map(ddx_thldact_rec.created_by);
566 p0_a5 := rosetta_g_miss_num_map(ddx_thldact_rec.last_update_login);
567 p0_a6 := rosetta_g_miss_num_map(ddx_thldact_rec.object_version_number);
568 p0_a7 := rosetta_g_miss_num_map(ddx_thldact_rec.process_id);
569 p0_a8 := rosetta_g_miss_num_map(ddx_thldact_rec.trigger_id);
570 p0_a9 := rosetta_g_miss_num_map(ddx_thldact_rec.order_number);
571 p0_a10 := ddx_thldact_rec.notify_flag;
572 p0_a11 := ddx_thldact_rec.generate_list_flag;
573 p0_a12 := ddx_thldact_rec.action_need_approval_flag;
574 p0_a13 := rosetta_g_miss_num_map(ddx_thldact_rec.action_approver_user_id);
575 p0_a14 := ddx_thldact_rec.execute_action_type;
576 p0_a15 := rosetta_g_miss_num_map(ddx_thldact_rec.list_header_id);
577 p0_a16 := rosetta_g_miss_num_map(ddx_thldact_rec.list_connected_to_id);
578 p0_a17 := ddx_thldact_rec.arc_list_connected_to;
579 p0_a18 := rosetta_g_miss_num_map(ddx_thldact_rec.deliverable_id);
580 p0_a19 := rosetta_g_miss_num_map(ddx_thldact_rec.activity_offer_id);
581 p0_a20 := ddx_thldact_rec.dscript_name;
582 p0_a21 := ddx_thldact_rec.program_to_call;
583 p0_a22 := rosetta_g_miss_num_map(ddx_thldact_rec.cover_letter_id);
584 p0_a23 := ddx_thldact_rec.mail_subject;
585 p0_a24 := ddx_thldact_rec.mail_sender_name;
586 p0_a25 := ddx_thldact_rec.from_fax_no;
587 p0_a26 := rosetta_g_miss_num_map(ddx_thldact_rec.action_for_id);
588 end;
589
590 procedure complete_thldact_rec(p1_a0 out nocopy NUMBER
591 , p1_a1 out nocopy DATE
592 , p1_a2 out nocopy NUMBER
593 , p1_a3 out nocopy DATE
594 , p1_a4 out nocopy NUMBER
595 , p1_a5 out nocopy NUMBER
596 , p1_a6 out nocopy NUMBER
597 , p1_a7 out nocopy NUMBER
598 , p1_a8 out nocopy NUMBER
599 , p1_a9 out nocopy NUMBER
600 , p1_a10 out nocopy VARCHAR2
601 , p1_a11 out nocopy VARCHAR2
602 , p1_a12 out nocopy VARCHAR2
603 , p1_a13 out nocopy NUMBER
604 , p1_a14 out nocopy VARCHAR2
605 , p1_a15 out nocopy NUMBER
606 , p1_a16 out nocopy NUMBER
607 , p1_a17 out nocopy VARCHAR2
608 , p1_a18 out nocopy NUMBER
609 , p1_a19 out nocopy NUMBER
610 , p1_a20 out nocopy VARCHAR2
611 , p1_a21 out nocopy VARCHAR2
612 , p1_a22 out nocopy NUMBER
613 , p1_a23 out nocopy VARCHAR2
614 , p1_a24 out nocopy VARCHAR2
615 , p1_a25 out nocopy VARCHAR2
616 , p1_a26 out nocopy NUMBER
617 , p0_a0 NUMBER := 0-1962.0724
618 , p0_a1 DATE := fnd_api.g_miss_date
619 , p0_a2 NUMBER := 0-1962.0724
620 , p0_a3 DATE := fnd_api.g_miss_date
621 , p0_a4 NUMBER := 0-1962.0724
622 , p0_a5 NUMBER := 0-1962.0724
623 , p0_a6 NUMBER := 0-1962.0724
624 , p0_a7 NUMBER := 0-1962.0724
625 , p0_a8 NUMBER := 0-1962.0724
626 , p0_a9 NUMBER := 0-1962.0724
627 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
628 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
629 , p0_a12 VARCHAR2 := fnd_api.g_miss_char
630 , p0_a13 NUMBER := 0-1962.0724
631 , p0_a14 VARCHAR2 := fnd_api.g_miss_char
632 , p0_a15 NUMBER := 0-1962.0724
633 , p0_a16 NUMBER := 0-1962.0724
634 , p0_a17 VARCHAR2 := fnd_api.g_miss_char
635 , p0_a18 NUMBER := 0-1962.0724
639 , p0_a22 NUMBER := 0-1962.0724
636 , p0_a19 NUMBER := 0-1962.0724
637 , p0_a20 VARCHAR2 := fnd_api.g_miss_char
638 , p0_a21 VARCHAR2 := fnd_api.g_miss_char
640 , p0_a23 VARCHAR2 := fnd_api.g_miss_char
641 , p0_a24 VARCHAR2 := fnd_api.g_miss_char
642 , p0_a25 VARCHAR2 := fnd_api.g_miss_char
643 , p0_a26 NUMBER := 0-1962.0724
644 )
645
646 as
647 ddp_thldact_rec ams_thldact_pvt.thldact_rec_type;
648 ddx_complete_rec ams_thldact_pvt.thldact_rec_type;
649 ddindx binary_integer; indx binary_integer;
650 begin
651
652 -- copy data to the local IN or IN-OUT args, if any
653 ddp_thldact_rec.trigger_action_id := rosetta_g_miss_num_map(p0_a0);
654 ddp_thldact_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a1);
655 ddp_thldact_rec.last_updated_by := rosetta_g_miss_num_map(p0_a2);
656 ddp_thldact_rec.creation_date := rosetta_g_miss_date_in_map(p0_a3);
657 ddp_thldact_rec.created_by := rosetta_g_miss_num_map(p0_a4);
658 ddp_thldact_rec.last_update_login := rosetta_g_miss_num_map(p0_a5);
659 ddp_thldact_rec.object_version_number := rosetta_g_miss_num_map(p0_a6);
660 ddp_thldact_rec.process_id := rosetta_g_miss_num_map(p0_a7);
661 ddp_thldact_rec.trigger_id := rosetta_g_miss_num_map(p0_a8);
662 ddp_thldact_rec.order_number := rosetta_g_miss_num_map(p0_a9);
663 ddp_thldact_rec.notify_flag := p0_a10;
664 ddp_thldact_rec.generate_list_flag := p0_a11;
665 ddp_thldact_rec.action_need_approval_flag := p0_a12;
666 ddp_thldact_rec.action_approver_user_id := rosetta_g_miss_num_map(p0_a13);
667 ddp_thldact_rec.execute_action_type := p0_a14;
668 ddp_thldact_rec.list_header_id := rosetta_g_miss_num_map(p0_a15);
669 ddp_thldact_rec.list_connected_to_id := rosetta_g_miss_num_map(p0_a16);
670 ddp_thldact_rec.arc_list_connected_to := p0_a17;
671 ddp_thldact_rec.deliverable_id := rosetta_g_miss_num_map(p0_a18);
672 ddp_thldact_rec.activity_offer_id := rosetta_g_miss_num_map(p0_a19);
673 ddp_thldact_rec.dscript_name := p0_a20;
674 ddp_thldact_rec.program_to_call := p0_a21;
675 ddp_thldact_rec.cover_letter_id := rosetta_g_miss_num_map(p0_a22);
676 ddp_thldact_rec.mail_subject := p0_a23;
677 ddp_thldact_rec.mail_sender_name := p0_a24;
678 ddp_thldact_rec.from_fax_no := p0_a25;
679 ddp_thldact_rec.action_for_id := rosetta_g_miss_num_map(p0_a26);
680
681
682 -- here's the delegated call to the old PL/SQL routine
683 ams_thldact_pvt.complete_thldact_rec(ddp_thldact_rec,
684 ddx_complete_rec);
685
686 -- copy data back from the local variables to OUT or IN-OUT args, if any
687
688 p1_a0 := rosetta_g_miss_num_map(ddx_complete_rec.trigger_action_id);
689 p1_a1 := ddx_complete_rec.last_update_date;
690 p1_a2 := rosetta_g_miss_num_map(ddx_complete_rec.last_updated_by);
691 p1_a3 := ddx_complete_rec.creation_date;
692 p1_a4 := rosetta_g_miss_num_map(ddx_complete_rec.created_by);
693 p1_a5 := rosetta_g_miss_num_map(ddx_complete_rec.last_update_login);
694 p1_a6 := rosetta_g_miss_num_map(ddx_complete_rec.object_version_number);
695 p1_a7 := rosetta_g_miss_num_map(ddx_complete_rec.process_id);
696 p1_a8 := rosetta_g_miss_num_map(ddx_complete_rec.trigger_id);
697 p1_a9 := rosetta_g_miss_num_map(ddx_complete_rec.order_number);
698 p1_a10 := ddx_complete_rec.notify_flag;
699 p1_a11 := ddx_complete_rec.generate_list_flag;
700 p1_a12 := ddx_complete_rec.action_need_approval_flag;
701 p1_a13 := rosetta_g_miss_num_map(ddx_complete_rec.action_approver_user_id);
702 p1_a14 := ddx_complete_rec.execute_action_type;
703 p1_a15 := rosetta_g_miss_num_map(ddx_complete_rec.list_header_id);
704 p1_a16 := rosetta_g_miss_num_map(ddx_complete_rec.list_connected_to_id);
705 p1_a17 := ddx_complete_rec.arc_list_connected_to;
706 p1_a18 := rosetta_g_miss_num_map(ddx_complete_rec.deliverable_id);
707 p1_a19 := rosetta_g_miss_num_map(ddx_complete_rec.activity_offer_id);
708 p1_a20 := ddx_complete_rec.dscript_name;
709 p1_a21 := ddx_complete_rec.program_to_call;
710 p1_a22 := rosetta_g_miss_num_map(ddx_complete_rec.cover_letter_id);
711 p1_a23 := ddx_complete_rec.mail_subject;
712 p1_a24 := ddx_complete_rec.mail_sender_name;
713 p1_a25 := ddx_complete_rec.from_fax_no;
714 p1_a26 := rosetta_g_miss_num_map(ddx_complete_rec.action_for_id);
715 end;
716
717 end ams_thldact_pvt_w;