eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.HZ_DSS_GROUPS_PUB_W

Source


1 package body hz_dss_groups_pub_w as
2   /* $Header: ARHPDGJB.pls 120.2 2005/06/18 04:28:01 jhuang 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_group_1(p_init_msg_list  VARCHAR2
23     , x_return_status out nocopy  VARCHAR2
24     , x_msg_count out nocopy  NUMBER
25     , x_msg_data out nocopy  VARCHAR2
26     , p1_a0  VARCHAR2 := fnd_api.g_miss_char
27     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
28     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
29     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
30     , p1_a4  VARCHAR2 := fnd_api.g_miss_char
31     , p1_a5  VARCHAR2 := fnd_api.g_miss_char
32   )
33 
34   as
35     ddp_dss_group hz_dss_groups_pub.dss_group_rec_type;
36     ddindx binary_integer; indx binary_integer;
37   begin
38 
39     -- copy data to the local IN or IN-OUT args, if any
40 
41     ddp_dss_group.dss_group_code := p1_a0;
42     ddp_dss_group.order_before_group_code := p1_a1;
43     ddp_dss_group.bes_enable_flag := p1_a2;
44     ddp_dss_group.status := p1_a3;
45     ddp_dss_group.dss_group_name := p1_a4;
46     ddp_dss_group.description := p1_a5;
47 
48 
49 
50 
51     -- here's the delegated call to the old PL/SQL routine
52     hz_dss_groups_pub.create_group(p_init_msg_list,
53       ddp_dss_group,
54       x_return_status,
55       x_msg_count,
56       x_msg_data);
57 
58     -- copy data back from the local variables to OUT or IN-OUT args, if any
59 
60 
61 
62 
63   end;
64 
65   procedure update_group_2(p_init_msg_list  VARCHAR2
66     , x_object_version_number in out nocopy  NUMBER
67     , x_return_status out nocopy  VARCHAR2
68     , x_msg_count out nocopy  NUMBER
69     , x_msg_data out nocopy  VARCHAR2
70     , p1_a0  VARCHAR2 := fnd_api.g_miss_char
71     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
72     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
73     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
74     , p1_a4  VARCHAR2 := fnd_api.g_miss_char
75     , p1_a5  VARCHAR2 := fnd_api.g_miss_char
76   )
77 
78   as
79     ddp_dss_group hz_dss_groups_pub.dss_group_rec_type;
80     ddindx binary_integer; indx binary_integer;
81   begin
82 
83     -- copy data to the local IN or IN-OUT args, if any
84 
85     ddp_dss_group.dss_group_code := p1_a0;
86     ddp_dss_group.order_before_group_code := p1_a1;
87     ddp_dss_group.bes_enable_flag := p1_a2;
88     ddp_dss_group.status := p1_a3;
89     ddp_dss_group.dss_group_name := p1_a4;
90     ddp_dss_group.description := p1_a5;
91 
92 
93 
94 
95 
96     -- here's the delegated call to the old PL/SQL routine
97     hz_dss_groups_pub.update_group(p_init_msg_list,
98       ddp_dss_group,
99       x_object_version_number,
100       x_return_status,
101       x_msg_count,
102       x_msg_data);
103 
104     -- copy data back from the local variables to OUT or IN-OUT args, if any
105 
106 
107 
108 
109 
110   end;
111 
112   procedure create_secured_criterion_3(p_init_msg_list  VARCHAR2
113     , x_secured_item_id out nocopy  NUMBER
114     , x_return_status out nocopy  VARCHAR2
115     , x_msg_count out nocopy  NUMBER
116     , x_msg_data out nocopy  VARCHAR2
117     , p1_a0  NUMBER := 0-1962.0724
118     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
119     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
120     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
121     , p1_a4  VARCHAR2 := fnd_api.g_miss_char
122     , p1_a5  VARCHAR2 := fnd_api.g_miss_char
123     , p1_a6  VARCHAR2 := fnd_api.g_miss_char
124     , p1_a7  VARCHAR2 := fnd_api.g_miss_char
125     , p1_a8  VARCHAR2 := fnd_api.g_miss_char
126   )
127 
128   as
129     ddp_dss_secured_criterion hz_dss_groups_pub.dss_secured_criterion_type;
130     ddindx binary_integer; indx binary_integer;
131   begin
132 
133     -- copy data to the local IN or IN-OUT args, if any
134 
135     ddp_dss_secured_criterion.secured_item_id := rosetta_g_miss_num_map(p1_a0);
136     ddp_dss_secured_criterion.dss_group_code := p1_a1;
137     ddp_dss_secured_criterion.owner_table_name := p1_a2;
138     ddp_dss_secured_criterion.owner_table_id1 := p1_a3;
139     ddp_dss_secured_criterion.owner_table_id2 := p1_a4;
140     ddp_dss_secured_criterion.owner_table_id3 := p1_a5;
141     ddp_dss_secured_criterion.owner_table_id4 := p1_a6;
142     ddp_dss_secured_criterion.owner_table_id5 := p1_a7;
143     ddp_dss_secured_criterion.status := p1_a8;
144 
145 
146 
147 
148 
149     -- here's the delegated call to the old PL/SQL routine
150     hz_dss_groups_pub.create_secured_criterion(p_init_msg_list,
151       ddp_dss_secured_criterion,
152       x_secured_item_id,
153       x_return_status,
154       x_msg_count,
155       x_msg_data);
156 
157     -- copy data back from the local variables to OUT or IN-OUT args, if any
158 
159 
160 
161 
162 
163   end;
164 
165   procedure create_secured_module_4(p_init_msg_list  VARCHAR2
166     , x_secured_item_id out nocopy  NUMBER
167     , x_return_status out nocopy  VARCHAR2
168     , x_msg_count out nocopy  NUMBER
169     , x_msg_data out nocopy  VARCHAR2
170     , p1_a0  NUMBER := 0-1962.0724
171     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
172     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
173     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
174   )
175 
176   as
177     ddp_dss_secured_module hz_dss_groups_pub.dss_secured_module_type;
178     ddindx binary_integer; indx binary_integer;
179   begin
180 
181     -- copy data to the local IN or IN-OUT args, if any
182 
183     ddp_dss_secured_module.secured_item_id := rosetta_g_miss_num_map(p1_a0);
184     ddp_dss_secured_module.dss_group_code := p1_a1;
185     ddp_dss_secured_module.created_by_module := p1_a2;
186     ddp_dss_secured_module.status := p1_a3;
187 
188 
189 
190 
191 
192     -- here's the delegated call to the old PL/SQL routine
193     hz_dss_groups_pub.create_secured_module(p_init_msg_list,
194       ddp_dss_secured_module,
195       x_secured_item_id,
196       x_return_status,
197       x_msg_count,
198       x_msg_data);
199 
200     -- copy data back from the local variables to OUT or IN-OUT args, if any
201 
202 
203 
204 
205 
206   end;
207 
208   procedure update_secured_module_5(p_init_msg_list  VARCHAR2
209     , x_object_version_number in out nocopy  NUMBER
210     , x_return_status out nocopy  VARCHAR2
211     , x_msg_count out nocopy  NUMBER
212     , x_msg_data out nocopy  VARCHAR2
213     , p1_a0  NUMBER := 0-1962.0724
214     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
215     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
216     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
217   )
218 
219   as
220     ddp_dss_secured_module hz_dss_groups_pub.dss_secured_module_type;
221     ddindx binary_integer; indx binary_integer;
222   begin
223 
224     -- copy data to the local IN or IN-OUT args, if any
225 
226     ddp_dss_secured_module.secured_item_id := rosetta_g_miss_num_map(p1_a0);
227     ddp_dss_secured_module.dss_group_code := p1_a1;
228     ddp_dss_secured_module.created_by_module := p1_a2;
229     ddp_dss_secured_module.status := p1_a3;
230 
231 
232 
233 
234 
235     -- here's the delegated call to the old PL/SQL routine
236     hz_dss_groups_pub.update_secured_module(p_init_msg_list,
237       ddp_dss_secured_module,
238       x_object_version_number,
239       x_return_status,
240       x_msg_count,
241       x_msg_data);
242 
243     -- copy data back from the local variables to OUT or IN-OUT args, if any
244 
245 
246 
247 
248 
249   end;
250 
251   procedure create_secured_classificati_6(p_init_msg_list  VARCHAR2
252     , x_secured_item_id out nocopy  NUMBER
253     , x_return_status out nocopy  VARCHAR2
254     , x_msg_count out nocopy  NUMBER
255     , x_msg_data out nocopy  VARCHAR2
256     , p1_a0  NUMBER := 0-1962.0724
257     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
258     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
259     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
260     , p1_a4  VARCHAR2 := fnd_api.g_miss_char
261   )
262 
263   as
264     ddp_dss_secured_class hz_dss_groups_pub.dss_secured_class_type;
265     ddindx binary_integer; indx binary_integer;
266   begin
267 
268     -- copy data to the local IN or IN-OUT args, if any
269 
270     ddp_dss_secured_class.secured_item_id := rosetta_g_miss_num_map(p1_a0);
271     ddp_dss_secured_class.dss_group_code := p1_a1;
272     ddp_dss_secured_class.class_category := p1_a2;
273     ddp_dss_secured_class.class_code := p1_a3;
274     ddp_dss_secured_class.status := p1_a4;
275 
276 
277 
278 
279 
280     -- here's the delegated call to the old PL/SQL routine
281     hz_dss_groups_pub.create_secured_classification(p_init_msg_list,
282       ddp_dss_secured_class,
283       x_secured_item_id,
284       x_return_status,
285       x_msg_count,
286       x_msg_data);
287 
288     -- copy data back from the local variables to OUT or IN-OUT args, if any
289 
290 
291 
292 
293 
294   end;
295 
296   procedure update_secured_criterion_7(p_init_msg_list  VARCHAR2
297     , x_object_version_number in out nocopy  NUMBER
298     , x_return_status out nocopy  VARCHAR2
299     , x_msg_count out nocopy  NUMBER
300     , x_msg_data out nocopy  VARCHAR2
301     , p1_a0  NUMBER := 0-1962.0724
302     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
303     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
304     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
305     , p1_a4  VARCHAR2 := fnd_api.g_miss_char
306     , p1_a5  VARCHAR2 := fnd_api.g_miss_char
307     , p1_a6  VARCHAR2 := fnd_api.g_miss_char
308     , p1_a7  VARCHAR2 := fnd_api.g_miss_char
309     , p1_a8  VARCHAR2 := fnd_api.g_miss_char
310   )
311 
312   as
313     ddp_dss_secured_criterion hz_dss_groups_pub.dss_secured_criterion_type;
314     ddindx binary_integer; indx binary_integer;
315   begin
316 
317     -- copy data to the local IN or IN-OUT args, if any
318 
319     ddp_dss_secured_criterion.secured_item_id := rosetta_g_miss_num_map(p1_a0);
320     ddp_dss_secured_criterion.dss_group_code := p1_a1;
321     ddp_dss_secured_criterion.owner_table_name := p1_a2;
322     ddp_dss_secured_criterion.owner_table_id1 := p1_a3;
323     ddp_dss_secured_criterion.owner_table_id2 := p1_a4;
324     ddp_dss_secured_criterion.owner_table_id3 := p1_a5;
325     ddp_dss_secured_criterion.owner_table_id4 := p1_a6;
326     ddp_dss_secured_criterion.owner_table_id5 := p1_a7;
327     ddp_dss_secured_criterion.status := p1_a8;
328 
329 
330 
331 
332 
333     -- here's the delegated call to the old PL/SQL routine
334     hz_dss_groups_pub.update_secured_criterion(p_init_msg_list,
335       ddp_dss_secured_criterion,
336       x_object_version_number,
337       x_return_status,
338       x_msg_count,
339       x_msg_data);
340 
341     -- copy data back from the local variables to OUT or IN-OUT args, if any
342 
343 
344 
345 
346 
347   end;
348 
349   procedure update_secured_classificati_8(p_init_msg_list  VARCHAR2
350     , x_object_version_number in out nocopy  NUMBER
351     , x_return_status out nocopy  VARCHAR2
352     , x_msg_count out nocopy  NUMBER
353     , x_msg_data out nocopy  VARCHAR2
354     , p1_a0  NUMBER := 0-1962.0724
355     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
356     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
357     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
358     , p1_a4  VARCHAR2 := fnd_api.g_miss_char
359   )
360 
361   as
362     ddp_dss_secured_class hz_dss_groups_pub.dss_secured_class_type;
363     ddindx binary_integer; indx binary_integer;
364   begin
365 
366     -- copy data to the local IN or IN-OUT args, if any
367 
368     ddp_dss_secured_class.secured_item_id := rosetta_g_miss_num_map(p1_a0);
369     ddp_dss_secured_class.dss_group_code := p1_a1;
370     ddp_dss_secured_class.class_category := p1_a2;
371     ddp_dss_secured_class.class_code := p1_a3;
372     ddp_dss_secured_class.status := p1_a4;
373 
374 
375 
376 
377 
378     -- here's the delegated call to the old PL/SQL routine
379     hz_dss_groups_pub.update_secured_classification(p_init_msg_list,
380       ddp_dss_secured_class,
381       x_object_version_number,
382       x_return_status,
383       x_msg_count,
384       x_msg_data);
385 
386     -- copy data back from the local variables to OUT or IN-OUT args, if any
387 
388 
389 
390 
391 
392   end;
393 
394   procedure create_secured_rel_type_9(p_init_msg_list  VARCHAR2
395     , x_secured_item_id out nocopy  NUMBER
396     , x_return_status out nocopy  VARCHAR2
397     , x_msg_count out nocopy  NUMBER
398     , x_msg_data out nocopy  VARCHAR2
399     , p1_a0  NUMBER := 0-1962.0724
400     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
401     , p1_a2  NUMBER := 0-1962.0724
402     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
403   )
404 
405   as
406     ddp_dss_secured_rel_type hz_dss_groups_pub.dss_secured_rel_type;
407     ddindx binary_integer; indx binary_integer;
408   begin
409 
410     -- copy data to the local IN or IN-OUT args, if any
411 
412     ddp_dss_secured_rel_type.secured_item_id := rosetta_g_miss_num_map(p1_a0);
413     ddp_dss_secured_rel_type.dss_group_code := p1_a1;
414     ddp_dss_secured_rel_type.relationship_type_id := rosetta_g_miss_num_map(p1_a2);
415     ddp_dss_secured_rel_type.status := p1_a3;
416 
417 
418 
419 
420 
421     -- here's the delegated call to the old PL/SQL routine
422     hz_dss_groups_pub.create_secured_rel_type(p_init_msg_list,
423       ddp_dss_secured_rel_type,
424       x_secured_item_id,
425       x_return_status,
426       x_msg_count,
427       x_msg_data);
428 
429     -- copy data back from the local variables to OUT or IN-OUT args, if any
430 
431 
432 
433 
434 
435   end;
436 
437   procedure update_secured_rel_type_10(p_init_msg_list  VARCHAR2
438     , x_object_version_number in out nocopy  NUMBER
439     , x_return_status out nocopy  VARCHAR2
440     , x_msg_count out nocopy  NUMBER
441     , x_msg_data out nocopy  VARCHAR2
442     , p1_a0  NUMBER := 0-1962.0724
443     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
444     , p1_a2  NUMBER := 0-1962.0724
448   as
445     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
446   )
447 
449     ddp_dss_secured_rel_type hz_dss_groups_pub.dss_secured_rel_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 
455     ddp_dss_secured_rel_type.secured_item_id := rosetta_g_miss_num_map(p1_a0);
456     ddp_dss_secured_rel_type.dss_group_code := p1_a1;
457     ddp_dss_secured_rel_type.relationship_type_id := rosetta_g_miss_num_map(p1_a2);
458     ddp_dss_secured_rel_type.status := p1_a3;
459 
460 
461 
462 
463 
464     -- here's the delegated call to the old PL/SQL routine
465     hz_dss_groups_pub.update_secured_rel_type(p_init_msg_list,
466       ddp_dss_secured_rel_type,
467       x_object_version_number,
468       x_return_status,
469       x_msg_count,
470       x_msg_data);
471 
472     -- copy data back from the local variables to OUT or IN-OUT args, if any
473 
474 
475 
476 
477 
478   end;
479 
480   procedure create_assignment_11(p_init_msg_list  VARCHAR2
481     , x_assignment_id out nocopy  NUMBER
482     , x_return_status out nocopy  VARCHAR2
483     , x_msg_count out nocopy  NUMBER
484     , x_msg_data out nocopy  VARCHAR2
485     , p1_a0  VARCHAR2 := fnd_api.g_miss_char
486     , p1_a1  VARCHAR2 := fnd_api.g_miss_char
487     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
488     , p1_a3  VARCHAR2 := fnd_api.g_miss_char
489     , p1_a4  VARCHAR2 := fnd_api.g_miss_char
490     , p1_a5  VARCHAR2 := fnd_api.g_miss_char
491     , p1_a6  VARCHAR2 := fnd_api.g_miss_char
492     , p1_a7  VARCHAR2 := fnd_api.g_miss_char
493     , p1_a8  VARCHAR2 := fnd_api.g_miss_char
494   )
495 
496   as
497     ddp_dss_assignment hz_dss_groups_pub.dss_assignment_type;
498     ddindx binary_integer; indx binary_integer;
499   begin
500 
501     -- copy data to the local IN or IN-OUT args, if any
502 
503     ddp_dss_assignment.dss_group_code := p1_a0;
504     ddp_dss_assignment.assignment_id := p1_a1;
505     ddp_dss_assignment.owner_table_name := p1_a2;
506     ddp_dss_assignment.owner_table_id1 := p1_a3;
507     ddp_dss_assignment.owner_table_id2 := p1_a4;
508     ddp_dss_assignment.owner_table_id3 := p1_a5;
509     ddp_dss_assignment.owner_table_id4 := p1_a6;
510     ddp_dss_assignment.owner_table_id5 := p1_a7;
511     ddp_dss_assignment.status := p1_a8;
512 
513 
514 
515 
516 
517     -- here's the delegated call to the old PL/SQL routine
518     hz_dss_groups_pub.create_assignment(p_init_msg_list,
519       ddp_dss_assignment,
520       x_assignment_id,
521       x_return_status,
522       x_msg_count,
523       x_msg_data);
524 
525     -- copy data back from the local variables to OUT or IN-OUT args, if any
526 
527 
528 
529 
530 
531   end;
532 
533   procedure create_secured_entity_12(p_init_msg_list  VARCHAR2
534     , x_dss_instance_set_id out nocopy  NUMBER
535     , x_return_status out nocopy  VARCHAR2
536     , x_msg_count out nocopy  NUMBER
537     , x_msg_data out nocopy  VARCHAR2
538     , p1_a0  VARCHAR2 := fnd_api.g_miss_char
539     , p1_a1  NUMBER := 0-1962.0724
540     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
541   )
542 
543   as
544     ddp_dss_secured_entity hz_dss_groups_pub.dss_secured_entity_type;
545     ddindx binary_integer; indx binary_integer;
546   begin
547 
548     -- copy data to the local IN or IN-OUT args, if any
549 
550     ddp_dss_secured_entity.dss_group_code := p1_a0;
551     ddp_dss_secured_entity.entity_id := rosetta_g_miss_num_map(p1_a1);
552     ddp_dss_secured_entity.status := p1_a2;
553 
554 
555 
556 
557 
558     -- here's the delegated call to the old PL/SQL routine
559     hz_dss_groups_pub.create_secured_entity(p_init_msg_list,
560       ddp_dss_secured_entity,
561       x_dss_instance_set_id,
562       x_return_status,
563       x_msg_count,
564       x_msg_data);
565 
566     -- copy data back from the local variables to OUT or IN-OUT args, if any
567 
568 
569 
570 
571 
572   end;
573 
574   procedure update_secured_entity_13(p_init_msg_list  VARCHAR2
575     , x_object_version_number in out nocopy  NUMBER
576     , x_return_status out nocopy  VARCHAR2
577     , x_msg_count out nocopy  NUMBER
578     , x_msg_data out nocopy  VARCHAR2
579     , p1_a0  VARCHAR2 := fnd_api.g_miss_char
580     , p1_a1  NUMBER := 0-1962.0724
581     , p1_a2  VARCHAR2 := fnd_api.g_miss_char
582   )
583 
584   as
585     ddp_dss_secured_entity hz_dss_groups_pub.dss_secured_entity_type;
586     ddindx binary_integer; indx binary_integer;
587   begin
588 
589     -- copy data to the local IN or IN-OUT args, if any
590 
591     ddp_dss_secured_entity.dss_group_code := p1_a0;
592     ddp_dss_secured_entity.entity_id := rosetta_g_miss_num_map(p1_a1);
593     ddp_dss_secured_entity.status := p1_a2;
594 
595 
596 
597 
598 
599     -- here's the delegated call to the old PL/SQL routine
600     hz_dss_groups_pub.update_secured_entity(p_init_msg_list,
601       ddp_dss_secured_entity,
602       x_object_version_number,
603       x_return_status,
604       x_msg_count,
605       x_msg_data);
606 
607     -- copy data back from the local variables to OUT or IN-OUT args, if any
608 
609 
610 
611 
612 
613   end;
614 
615 end hz_dss_groups_pub_w;