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.PV_ENTYRLS_PUB_W

Source


1 package body pv_entyrls_pub_w as
2   /* $Header: pvrwerab.pls 120.0 2005/05/27 15:39:19 appldev 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   function rosetta_g_miss_num_map(n number) return number as
7     a number := fnd_api.g_miss_num;
8     b number := 0-1962.0724;
9   begin
10     if n=a then return b; end if;
11     if n=b then return a; end if;
12     return n;
13   end;
14 
15   -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
16   function rosetta_g_miss_date_in_map(d date) return date as
17   begin
18     if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
19     return d;
20   end;
21 
22   procedure create_entyrls(p_api_version_number  NUMBER
23     , p_init_msg_list  VARCHAR2
24     , p_commit  VARCHAR2
25     , p_validation_level  NUMBER
26     , p_identity_resource_id  NUMBER
27     , x_entity_rule_applied_id out nocopy  NUMBER
28     , x_return_status out nocopy  VARCHAR2
29     , x_msg_count out nocopy  NUMBER
30     , x_msg_data out nocopy  VARCHAR2
31     , p5_a0  NUMBER := 0-1962.0724
32     , p5_a1  DATE := fnd_api.g_miss_date
33     , p5_a2  NUMBER := 0-1962.0724
34     , p5_a3  DATE := fnd_api.g_miss_date
35     , p5_a4  NUMBER := 0-1962.0724
36     , p5_a5  NUMBER := 0-1962.0724
37     , p5_a6  NUMBER := 0-1962.0724
38     , p5_a7  NUMBER := 0-1962.0724
39     , p5_a8  NUMBER := 0-1962.0724
40     , p5_a9  NUMBER := 0-1962.0724
41     , p5_a10  DATE := fnd_api.g_miss_date
42     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
43     , p5_a12  NUMBER := 0-1962.0724
44     , p5_a13  NUMBER := 0-1962.0724
45     , p5_a14  NUMBER := 0-1962.0724
46     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
47     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
48     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
49     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
50     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
51     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
52     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
53     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
54     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
55     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
56     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
57     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
58     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
59     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
60     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
61     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
62     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
63     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
64     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
65     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
66     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
67   )
68 
69   as
70     ddp_entyrls_rec pv_rule_rectype_pub.entyrls_rec_type;
71     ddindx binary_integer; indx binary_integer;
72   begin
73 
74     -- copy data to the local IN or IN-OUT args, if any
75 
76 
77 
78 
79 
80     ddp_entyrls_rec.entity_rule_applied_id := rosetta_g_miss_num_map(p5_a0);
81     ddp_entyrls_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a1);
82     ddp_entyrls_rec.last_updated_by := rosetta_g_miss_num_map(p5_a2);
83     ddp_entyrls_rec.creation_date := rosetta_g_miss_date_in_map(p5_a3);
84     ddp_entyrls_rec.created_by := rosetta_g_miss_num_map(p5_a4);
85     ddp_entyrls_rec.last_update_login := rosetta_g_miss_num_map(p5_a5);
86     ddp_entyrls_rec.object_version_number := rosetta_g_miss_num_map(p5_a6);
87     ddp_entyrls_rec.request_id := rosetta_g_miss_num_map(p5_a7);
88     ddp_entyrls_rec.program_application_id := rosetta_g_miss_num_map(p5_a8);
89     ddp_entyrls_rec.program_id := rosetta_g_miss_num_map(p5_a9);
90     ddp_entyrls_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a10);
91     ddp_entyrls_rec.entity := p5_a11;
92     ddp_entyrls_rec.entity_id := rosetta_g_miss_num_map(p5_a12);
93     ddp_entyrls_rec.process_rule_id := rosetta_g_miss_num_map(p5_a13);
94     ddp_entyrls_rec.parent_process_rule_id := rosetta_g_miss_num_map(p5_a14);
95     ddp_entyrls_rec.latest_flag := p5_a15;
96     ddp_entyrls_rec.action_value := p5_a16;
97     ddp_entyrls_rec.process_type := p5_a17;
98     ddp_entyrls_rec.winning_rule_flag := p5_a18;
99     ddp_entyrls_rec.attribute_category := p5_a19;
100     ddp_entyrls_rec.attribute1 := p5_a20;
101     ddp_entyrls_rec.attribute2 := p5_a21;
102     ddp_entyrls_rec.attribute3 := p5_a22;
103     ddp_entyrls_rec.attribute4 := p5_a23;
104     ddp_entyrls_rec.attribute5 := p5_a24;
105     ddp_entyrls_rec.attribute6 := p5_a25;
106     ddp_entyrls_rec.attribute7 := p5_a26;
107     ddp_entyrls_rec.attribute8 := p5_a27;
108     ddp_entyrls_rec.attribute9 := p5_a28;
109     ddp_entyrls_rec.attribute10 := p5_a29;
110     ddp_entyrls_rec.attribute11 := p5_a30;
111     ddp_entyrls_rec.attribute12 := p5_a31;
112     ddp_entyrls_rec.attribute13 := p5_a32;
113     ddp_entyrls_rec.attribute14 := p5_a33;
114     ddp_entyrls_rec.attribute15 := p5_a34;
115     ddp_entyrls_rec.process_status := p5_a35;
116 
117 
118 
119 
120 
121     -- here's the delegated call to the old PL/SQL routine
122     pv_entyrls_pub.create_entyrls(p_api_version_number,
123       p_init_msg_list,
124       p_commit,
125       p_validation_level,
126       p_identity_resource_id,
127       ddp_entyrls_rec,
128       x_entity_rule_applied_id,
129       x_return_status,
130       x_msg_count,
131       x_msg_data);
132 
133     -- copy data back from the local variables to OUT or IN-OUT args, if any
134 
135 
136 
137 
138 
139 
140 
141 
142 
143   end;
144 
145   procedure update_entyrls(p_api_version_number  NUMBER
146     , p_init_msg_list  VARCHAR2
147     , p_commit  VARCHAR2
148     , p_validation_level  NUMBER
149     , p_identity_resource_id  NUMBER
150     , x_return_status out nocopy  VARCHAR2
151     , x_msg_count out nocopy  NUMBER
152     , x_msg_data out nocopy  VARCHAR2
153     , p5_a0  NUMBER := 0-1962.0724
154     , p5_a1  DATE := fnd_api.g_miss_date
155     , p5_a2  NUMBER := 0-1962.0724
156     , p5_a3  DATE := fnd_api.g_miss_date
157     , p5_a4  NUMBER := 0-1962.0724
158     , p5_a5  NUMBER := 0-1962.0724
159     , p5_a6  NUMBER := 0-1962.0724
160     , p5_a7  NUMBER := 0-1962.0724
161     , p5_a8  NUMBER := 0-1962.0724
162     , p5_a9  NUMBER := 0-1962.0724
163     , p5_a10  DATE := fnd_api.g_miss_date
164     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
165     , p5_a12  NUMBER := 0-1962.0724
166     , p5_a13  NUMBER := 0-1962.0724
167     , p5_a14  NUMBER := 0-1962.0724
168     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
169     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
170     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
171     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
172     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
173     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
174     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
175     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
176     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
177     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
178     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
179     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
180     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
181     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
182     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
183     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
184     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
185     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
186     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
187     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
188     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
189   )
190 
191   as
192     ddp_entyrls_rec pv_rule_rectype_pub.entyrls_rec_type;
193     ddindx binary_integer; indx binary_integer;
194   begin
195 
196     -- copy data to the local IN or IN-OUT args, if any
197 
198 
199 
200 
201 
202     ddp_entyrls_rec.entity_rule_applied_id := rosetta_g_miss_num_map(p5_a0);
203     ddp_entyrls_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a1);
204     ddp_entyrls_rec.last_updated_by := rosetta_g_miss_num_map(p5_a2);
205     ddp_entyrls_rec.creation_date := rosetta_g_miss_date_in_map(p5_a3);
206     ddp_entyrls_rec.created_by := rosetta_g_miss_num_map(p5_a4);
207     ddp_entyrls_rec.last_update_login := rosetta_g_miss_num_map(p5_a5);
208     ddp_entyrls_rec.object_version_number := rosetta_g_miss_num_map(p5_a6);
209     ddp_entyrls_rec.request_id := rosetta_g_miss_num_map(p5_a7);
210     ddp_entyrls_rec.program_application_id := rosetta_g_miss_num_map(p5_a8);
211     ddp_entyrls_rec.program_id := rosetta_g_miss_num_map(p5_a9);
212     ddp_entyrls_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a10);
213     ddp_entyrls_rec.entity := p5_a11;
214     ddp_entyrls_rec.entity_id := rosetta_g_miss_num_map(p5_a12);
215     ddp_entyrls_rec.process_rule_id := rosetta_g_miss_num_map(p5_a13);
216     ddp_entyrls_rec.parent_process_rule_id := rosetta_g_miss_num_map(p5_a14);
217     ddp_entyrls_rec.latest_flag := p5_a15;
218     ddp_entyrls_rec.action_value := p5_a16;
219     ddp_entyrls_rec.process_type := p5_a17;
220     ddp_entyrls_rec.winning_rule_flag := p5_a18;
221     ddp_entyrls_rec.attribute_category := p5_a19;
222     ddp_entyrls_rec.attribute1 := p5_a20;
223     ddp_entyrls_rec.attribute2 := p5_a21;
224     ddp_entyrls_rec.attribute3 := p5_a22;
225     ddp_entyrls_rec.attribute4 := p5_a23;
226     ddp_entyrls_rec.attribute5 := p5_a24;
227     ddp_entyrls_rec.attribute6 := p5_a25;
228     ddp_entyrls_rec.attribute7 := p5_a26;
229     ddp_entyrls_rec.attribute8 := p5_a27;
230     ddp_entyrls_rec.attribute9 := p5_a28;
231     ddp_entyrls_rec.attribute10 := p5_a29;
232     ddp_entyrls_rec.attribute11 := p5_a30;
233     ddp_entyrls_rec.attribute12 := p5_a31;
234     ddp_entyrls_rec.attribute13 := p5_a32;
235     ddp_entyrls_rec.attribute14 := p5_a33;
236     ddp_entyrls_rec.attribute15 := p5_a34;
237     ddp_entyrls_rec.process_status := p5_a35;
238 
239 
240 
241 
242     -- here's the delegated call to the old PL/SQL routine
243     pv_entyrls_pub.update_entyrls(p_api_version_number,
244       p_init_msg_list,
245       p_commit,
246       p_validation_level,
247       p_identity_resource_id,
248       ddp_entyrls_rec,
249       x_return_status,
250       x_msg_count,
251       x_msg_data);
252 
253     -- copy data back from the local variables to OUT or IN-OUT args, if any
254 
255 
256 
257 
258 
259 
260 
261 
262   end;
263 
264   procedure delete_entyrls(p_api_version_number  NUMBER
265     , p_init_msg_list  VARCHAR2
266     , p_commit  VARCHAR2
267     , p_validation_level  NUMBER
268     , p_identity_resource_id  NUMBER
269     , x_return_status out nocopy  VARCHAR2
270     , x_msg_count out nocopy  NUMBER
271     , x_msg_data out nocopy  VARCHAR2
272     , p5_a0  NUMBER := 0-1962.0724
273     , p5_a1  DATE := fnd_api.g_miss_date
274     , p5_a2  NUMBER := 0-1962.0724
275     , p5_a3  DATE := fnd_api.g_miss_date
276     , p5_a4  NUMBER := 0-1962.0724
277     , p5_a5  NUMBER := 0-1962.0724
278     , p5_a6  NUMBER := 0-1962.0724
279     , p5_a7  NUMBER := 0-1962.0724
280     , p5_a8  NUMBER := 0-1962.0724
281     , p5_a9  NUMBER := 0-1962.0724
282     , p5_a10  DATE := fnd_api.g_miss_date
283     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
284     , p5_a12  NUMBER := 0-1962.0724
285     , p5_a13  NUMBER := 0-1962.0724
286     , p5_a14  NUMBER := 0-1962.0724
287     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
288     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
289     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
290     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
291     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
292     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
293     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
294     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
295     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
296     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
297     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
298     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
299     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
300     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
301     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
302     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
303     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
304     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
305     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
306     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
307     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
308   )
309 
310   as
311     ddp_entyrls_rec pv_rule_rectype_pub.entyrls_rec_type;
312     ddindx binary_integer; indx binary_integer;
313   begin
314 
315     -- copy data to the local IN or IN-OUT args, if any
316 
317 
318 
319 
320 
321     ddp_entyrls_rec.entity_rule_applied_id := rosetta_g_miss_num_map(p5_a0);
322     ddp_entyrls_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a1);
323     ddp_entyrls_rec.last_updated_by := rosetta_g_miss_num_map(p5_a2);
324     ddp_entyrls_rec.creation_date := rosetta_g_miss_date_in_map(p5_a3);
325     ddp_entyrls_rec.created_by := rosetta_g_miss_num_map(p5_a4);
326     ddp_entyrls_rec.last_update_login := rosetta_g_miss_num_map(p5_a5);
327     ddp_entyrls_rec.object_version_number := rosetta_g_miss_num_map(p5_a6);
328     ddp_entyrls_rec.request_id := rosetta_g_miss_num_map(p5_a7);
329     ddp_entyrls_rec.program_application_id := rosetta_g_miss_num_map(p5_a8);
330     ddp_entyrls_rec.program_id := rosetta_g_miss_num_map(p5_a9);
331     ddp_entyrls_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a10);
332     ddp_entyrls_rec.entity := p5_a11;
333     ddp_entyrls_rec.entity_id := rosetta_g_miss_num_map(p5_a12);
334     ddp_entyrls_rec.process_rule_id := rosetta_g_miss_num_map(p5_a13);
335     ddp_entyrls_rec.parent_process_rule_id := rosetta_g_miss_num_map(p5_a14);
336     ddp_entyrls_rec.latest_flag := p5_a15;
337     ddp_entyrls_rec.action_value := p5_a16;
338     ddp_entyrls_rec.process_type := p5_a17;
339     ddp_entyrls_rec.winning_rule_flag := p5_a18;
340     ddp_entyrls_rec.attribute_category := p5_a19;
341     ddp_entyrls_rec.attribute1 := p5_a20;
342     ddp_entyrls_rec.attribute2 := p5_a21;
343     ddp_entyrls_rec.attribute3 := p5_a22;
344     ddp_entyrls_rec.attribute4 := p5_a23;
345     ddp_entyrls_rec.attribute5 := p5_a24;
346     ddp_entyrls_rec.attribute6 := p5_a25;
347     ddp_entyrls_rec.attribute7 := p5_a26;
348     ddp_entyrls_rec.attribute8 := p5_a27;
349     ddp_entyrls_rec.attribute9 := p5_a28;
350     ddp_entyrls_rec.attribute10 := p5_a29;
351     ddp_entyrls_rec.attribute11 := p5_a30;
352     ddp_entyrls_rec.attribute12 := p5_a31;
353     ddp_entyrls_rec.attribute13 := p5_a32;
354     ddp_entyrls_rec.attribute14 := p5_a33;
355     ddp_entyrls_rec.attribute15 := p5_a34;
356     ddp_entyrls_rec.process_status := p5_a35;
357 
358 
359 
360 
361     -- here's the delegated call to the old PL/SQL routine
362     pv_entyrls_pub.delete_entyrls(p_api_version_number,
363       p_init_msg_list,
364       p_commit,
365       p_validation_level,
366       p_identity_resource_id,
367       ddp_entyrls_rec,
368       x_return_status,
369       x_msg_count,
370       x_msg_data);
371 
372     -- copy data back from the local variables to OUT or IN-OUT args, if any
373 
374 
375 
376 
377 
378 
379 
380 
381   end;
382 
383 end pv_entyrls_pub_w;