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

Source


1 package body ams_competitor_product_pvt_w as
2   /* $Header: amswcprb.pls 120.2 2005/08/04 08:20 appldev ship $ */
3   rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4   rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5 
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_comp_product(p_api_version_number  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_competitor_product_id out nocopy  NUMBER
30     , p7_a0  NUMBER := 0-1962.0724
31     , p7_a1  NUMBER := 0-1962.0724
32     , p7_a2  DATE := fnd_api.g_miss_date
33     , p7_a3  NUMBER := 0-1962.0724
34     , p7_a4  DATE := fnd_api.g_miss_date
35     , p7_a5  NUMBER := 0-1962.0724
36     , p7_a6  NUMBER := 0-1962.0724
37     , p7_a7  NUMBER := 0-1962.0724
38     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
39     , p7_a9  NUMBER := 0-1962.0724
40     , p7_a10  NUMBER := 0-1962.0724
41     , p7_a11  NUMBER := 0-1962.0724
42     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
43     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
44     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
45     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
46     , p7_a16  DATE := fnd_api.g_miss_date
47     , p7_a17  DATE := fnd_api.g_miss_date
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  VARCHAR2 := fnd_api.g_miss_char
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  VARCHAR2 := fnd_api.g_miss_char
57     , p7_a27  VARCHAR2 := fnd_api.g_miss_char
58     , p7_a28  VARCHAR2 := fnd_api.g_miss_char
59     , p7_a29  VARCHAR2 := fnd_api.g_miss_char
60     , p7_a30  VARCHAR2 := fnd_api.g_miss_char
61     , p7_a31  VARCHAR2 := fnd_api.g_miss_char
62     , p7_a32  VARCHAR2 := fnd_api.g_miss_char
63     , p7_a33  VARCHAR2 := fnd_api.g_miss_char
64     , p7_a34  VARCHAR2 := fnd_api.g_miss_char
65     , p7_a35  VARCHAR2 := fnd_api.g_miss_char
66   )
67 
68   as
69     ddp_comp_prod_rec ams_competitor_product_pvt.comp_prod_rec_type;
70     ddindx binary_integer; indx binary_integer;
71   begin
72 
73     -- copy data to the local IN or IN-OUT args, if any
74 
75 
76 
77 
78 
79 
80 
81     ddp_comp_prod_rec.competitor_product_id := rosetta_g_miss_num_map(p7_a0);
82     ddp_comp_prod_rec.object_version_number := rosetta_g_miss_num_map(p7_a1);
83     ddp_comp_prod_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
84     ddp_comp_prod_rec.last_updated_by := rosetta_g_miss_num_map(p7_a3);
85     ddp_comp_prod_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
86     ddp_comp_prod_rec.created_by := rosetta_g_miss_num_map(p7_a5);
87     ddp_comp_prod_rec.last_update_login := rosetta_g_miss_num_map(p7_a6);
88     ddp_comp_prod_rec.competitor_party_id := rosetta_g_miss_num_map(p7_a7);
89     ddp_comp_prod_rec.competitor_product_code := p7_a8;
90     ddp_comp_prod_rec.interest_type_id := rosetta_g_miss_num_map(p7_a9);
91     ddp_comp_prod_rec.inventory_item_id := rosetta_g_miss_num_map(p7_a10);
92     ddp_comp_prod_rec.organization_id := rosetta_g_miss_num_map(p7_a11);
93     ddp_comp_prod_rec.comp_product_url := p7_a12;
94     ddp_comp_prod_rec.original_system_ref := p7_a13;
95     ddp_comp_prod_rec.competitor_product_name := p7_a14;
96     ddp_comp_prod_rec.description := p7_a15;
97     ddp_comp_prod_rec.start_date := rosetta_g_miss_date_in_map(p7_a16);
98     ddp_comp_prod_rec.end_date := rosetta_g_miss_date_in_map(p7_a17);
99     ddp_comp_prod_rec.category_id := rosetta_g_miss_num_map(p7_a18);
100     ddp_comp_prod_rec.category_set_id := rosetta_g_miss_num_map(p7_a19);
101     ddp_comp_prod_rec.context := p7_a20;
102     ddp_comp_prod_rec.attribute1 := p7_a21;
103     ddp_comp_prod_rec.attribute2 := p7_a22;
104     ddp_comp_prod_rec.attribute3 := p7_a23;
105     ddp_comp_prod_rec.attribute4 := p7_a24;
106     ddp_comp_prod_rec.attribute5 := p7_a25;
107     ddp_comp_prod_rec.attribute6 := p7_a26;
108     ddp_comp_prod_rec.attribute7 := p7_a27;
109     ddp_comp_prod_rec.attribute8 := p7_a28;
110     ddp_comp_prod_rec.attribute9 := p7_a29;
111     ddp_comp_prod_rec.attribute10 := p7_a30;
112     ddp_comp_prod_rec.attribute11 := p7_a31;
113     ddp_comp_prod_rec.attribute12 := p7_a32;
114     ddp_comp_prod_rec.attribute13 := p7_a33;
115     ddp_comp_prod_rec.attribute14 := p7_a34;
116     ddp_comp_prod_rec.attribute15 := p7_a35;
117 
118 
119     -- here's the delegated call to the old PL/SQL routine
120     ams_competitor_product_pvt.create_comp_product(p_api_version_number,
121       p_init_msg_list,
122       p_commit,
123       p_validation_level,
124       x_return_status,
125       x_msg_count,
126       x_msg_data,
127       ddp_comp_prod_rec,
128       x_competitor_product_id);
129 
130     -- copy data back from the local variables to OUT or IN-OUT args, if any
131 
132 
133 
134 
135 
136 
137 
138 
139   end;
140 
141   procedure update_comp_product(p_api_version_number  NUMBER
142     , p_init_msg_list  VARCHAR2
143     , p_commit  VARCHAR2
144     , p_validation_level  NUMBER
145     , x_return_status out nocopy  VARCHAR2
146     , x_msg_count out nocopy  NUMBER
147     , x_msg_data out nocopy  VARCHAR2
148     , x_object_version_number out nocopy  NUMBER
149     , p7_a0  NUMBER := 0-1962.0724
150     , p7_a1  NUMBER := 0-1962.0724
151     , p7_a2  DATE := fnd_api.g_miss_date
152     , p7_a3  NUMBER := 0-1962.0724
153     , p7_a4  DATE := fnd_api.g_miss_date
154     , p7_a5  NUMBER := 0-1962.0724
155     , p7_a6  NUMBER := 0-1962.0724
156     , p7_a7  NUMBER := 0-1962.0724
157     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
158     , p7_a9  NUMBER := 0-1962.0724
159     , p7_a10  NUMBER := 0-1962.0724
160     , p7_a11  NUMBER := 0-1962.0724
161     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
162     , p7_a13  VARCHAR2 := fnd_api.g_miss_char
163     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
164     , p7_a15  VARCHAR2 := fnd_api.g_miss_char
165     , p7_a16  DATE := fnd_api.g_miss_date
166     , p7_a17  DATE := fnd_api.g_miss_date
167     , p7_a18  NUMBER := 0-1962.0724
168     , p7_a19  NUMBER := 0-1962.0724
169     , p7_a20  VARCHAR2 := fnd_api.g_miss_char
170     , p7_a21  VARCHAR2 := fnd_api.g_miss_char
171     , p7_a22  VARCHAR2 := fnd_api.g_miss_char
172     , p7_a23  VARCHAR2 := fnd_api.g_miss_char
173     , p7_a24  VARCHAR2 := fnd_api.g_miss_char
174     , p7_a25  VARCHAR2 := fnd_api.g_miss_char
175     , p7_a26  VARCHAR2 := fnd_api.g_miss_char
176     , p7_a27  VARCHAR2 := fnd_api.g_miss_char
177     , p7_a28  VARCHAR2 := fnd_api.g_miss_char
178     , p7_a29  VARCHAR2 := fnd_api.g_miss_char
179     , p7_a30  VARCHAR2 := fnd_api.g_miss_char
180     , p7_a31  VARCHAR2 := fnd_api.g_miss_char
181     , p7_a32  VARCHAR2 := fnd_api.g_miss_char
182     , p7_a33  VARCHAR2 := fnd_api.g_miss_char
183     , p7_a34  VARCHAR2 := fnd_api.g_miss_char
184     , p7_a35  VARCHAR2 := fnd_api.g_miss_char
185   )
186 
187   as
188     ddp_comp_prod_rec ams_competitor_product_pvt.comp_prod_rec_type;
189     ddindx binary_integer; indx binary_integer;
190   begin
191 
192     -- copy data to the local IN or IN-OUT args, if any
193 
194 
195 
196 
197 
198 
199 
200     ddp_comp_prod_rec.competitor_product_id := rosetta_g_miss_num_map(p7_a0);
201     ddp_comp_prod_rec.object_version_number := rosetta_g_miss_num_map(p7_a1);
202     ddp_comp_prod_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
203     ddp_comp_prod_rec.last_updated_by := rosetta_g_miss_num_map(p7_a3);
204     ddp_comp_prod_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
205     ddp_comp_prod_rec.created_by := rosetta_g_miss_num_map(p7_a5);
206     ddp_comp_prod_rec.last_update_login := rosetta_g_miss_num_map(p7_a6);
207     ddp_comp_prod_rec.competitor_party_id := rosetta_g_miss_num_map(p7_a7);
208     ddp_comp_prod_rec.competitor_product_code := p7_a8;
209     ddp_comp_prod_rec.interest_type_id := rosetta_g_miss_num_map(p7_a9);
210     ddp_comp_prod_rec.inventory_item_id := rosetta_g_miss_num_map(p7_a10);
211     ddp_comp_prod_rec.organization_id := rosetta_g_miss_num_map(p7_a11);
212     ddp_comp_prod_rec.comp_product_url := p7_a12;
213     ddp_comp_prod_rec.original_system_ref := p7_a13;
214     ddp_comp_prod_rec.competitor_product_name := p7_a14;
215     ddp_comp_prod_rec.description := p7_a15;
216     ddp_comp_prod_rec.start_date := rosetta_g_miss_date_in_map(p7_a16);
217     ddp_comp_prod_rec.end_date := rosetta_g_miss_date_in_map(p7_a17);
218     ddp_comp_prod_rec.category_id := rosetta_g_miss_num_map(p7_a18);
219     ddp_comp_prod_rec.category_set_id := rosetta_g_miss_num_map(p7_a19);
220     ddp_comp_prod_rec.context := p7_a20;
221     ddp_comp_prod_rec.attribute1 := p7_a21;
222     ddp_comp_prod_rec.attribute2 := p7_a22;
223     ddp_comp_prod_rec.attribute3 := p7_a23;
224     ddp_comp_prod_rec.attribute4 := p7_a24;
225     ddp_comp_prod_rec.attribute5 := p7_a25;
226     ddp_comp_prod_rec.attribute6 := p7_a26;
227     ddp_comp_prod_rec.attribute7 := p7_a27;
228     ddp_comp_prod_rec.attribute8 := p7_a28;
229     ddp_comp_prod_rec.attribute9 := p7_a29;
230     ddp_comp_prod_rec.attribute10 := p7_a30;
231     ddp_comp_prod_rec.attribute11 := p7_a31;
232     ddp_comp_prod_rec.attribute12 := p7_a32;
233     ddp_comp_prod_rec.attribute13 := p7_a33;
234     ddp_comp_prod_rec.attribute14 := p7_a34;
235     ddp_comp_prod_rec.attribute15 := p7_a35;
236 
237 
238     -- here's the delegated call to the old PL/SQL routine
239     ams_competitor_product_pvt.update_comp_product(p_api_version_number,
240       p_init_msg_list,
241       p_commit,
242       p_validation_level,
243       x_return_status,
244       x_msg_count,
245       x_msg_data,
246       ddp_comp_prod_rec,
247       x_object_version_number);
248 
249     -- copy data back from the local variables to OUT or IN-OUT args, if any
250 
251 
252 
253 
254 
255 
256 
257 
258   end;
259 
260   procedure validate_comp_prod(p_api_version_number  NUMBER
261     , p_init_msg_list  VARCHAR2
262     , p_validation_level  NUMBER
263     , p_validation_mode  VARCHAR2
264     , x_return_status out nocopy  VARCHAR2
265     , x_msg_count out nocopy  NUMBER
266     , x_msg_data out nocopy  VARCHAR2
267     , p4_a0  NUMBER := 0-1962.0724
268     , p4_a1  NUMBER := 0-1962.0724
269     , p4_a2  DATE := fnd_api.g_miss_date
270     , p4_a3  NUMBER := 0-1962.0724
271     , p4_a4  DATE := fnd_api.g_miss_date
272     , p4_a5  NUMBER := 0-1962.0724
273     , p4_a6  NUMBER := 0-1962.0724
274     , p4_a7  NUMBER := 0-1962.0724
275     , p4_a8  VARCHAR2 := fnd_api.g_miss_char
276     , p4_a9  NUMBER := 0-1962.0724
277     , p4_a10  NUMBER := 0-1962.0724
278     , p4_a11  NUMBER := 0-1962.0724
279     , p4_a12  VARCHAR2 := fnd_api.g_miss_char
280     , p4_a13  VARCHAR2 := fnd_api.g_miss_char
281     , p4_a14  VARCHAR2 := fnd_api.g_miss_char
282     , p4_a15  VARCHAR2 := fnd_api.g_miss_char
283     , p4_a16  DATE := fnd_api.g_miss_date
284     , p4_a17  DATE := fnd_api.g_miss_date
285     , p4_a18  NUMBER := 0-1962.0724
286     , p4_a19  NUMBER := 0-1962.0724
287     , p4_a20  VARCHAR2 := fnd_api.g_miss_char
288     , p4_a21  VARCHAR2 := fnd_api.g_miss_char
289     , p4_a22  VARCHAR2 := fnd_api.g_miss_char
290     , p4_a23  VARCHAR2 := fnd_api.g_miss_char
294     , p4_a27  VARCHAR2 := fnd_api.g_miss_char
291     , p4_a24  VARCHAR2 := fnd_api.g_miss_char
292     , p4_a25  VARCHAR2 := fnd_api.g_miss_char
293     , p4_a26  VARCHAR2 := fnd_api.g_miss_char
295     , p4_a28  VARCHAR2 := fnd_api.g_miss_char
296     , p4_a29  VARCHAR2 := fnd_api.g_miss_char
297     , p4_a30  VARCHAR2 := fnd_api.g_miss_char
298     , p4_a31  VARCHAR2 := fnd_api.g_miss_char
299     , p4_a32  VARCHAR2 := fnd_api.g_miss_char
300     , p4_a33  VARCHAR2 := fnd_api.g_miss_char
301     , p4_a34  VARCHAR2 := fnd_api.g_miss_char
302     , p4_a35  VARCHAR2 := fnd_api.g_miss_char
303   )
304 
305   as
306     ddp_comp_prod_rec ams_competitor_product_pvt.comp_prod_rec_type;
307     ddindx binary_integer; indx binary_integer;
308   begin
309 
310     -- copy data to the local IN or IN-OUT args, if any
311 
312 
313 
314 
315     ddp_comp_prod_rec.competitor_product_id := rosetta_g_miss_num_map(p4_a0);
316     ddp_comp_prod_rec.object_version_number := rosetta_g_miss_num_map(p4_a1);
317     ddp_comp_prod_rec.last_update_date := rosetta_g_miss_date_in_map(p4_a2);
318     ddp_comp_prod_rec.last_updated_by := rosetta_g_miss_num_map(p4_a3);
319     ddp_comp_prod_rec.creation_date := rosetta_g_miss_date_in_map(p4_a4);
320     ddp_comp_prod_rec.created_by := rosetta_g_miss_num_map(p4_a5);
321     ddp_comp_prod_rec.last_update_login := rosetta_g_miss_num_map(p4_a6);
322     ddp_comp_prod_rec.competitor_party_id := rosetta_g_miss_num_map(p4_a7);
323     ddp_comp_prod_rec.competitor_product_code := p4_a8;
324     ddp_comp_prod_rec.interest_type_id := rosetta_g_miss_num_map(p4_a9);
325     ddp_comp_prod_rec.inventory_item_id := rosetta_g_miss_num_map(p4_a10);
326     ddp_comp_prod_rec.organization_id := rosetta_g_miss_num_map(p4_a11);
327     ddp_comp_prod_rec.comp_product_url := p4_a12;
328     ddp_comp_prod_rec.original_system_ref := p4_a13;
329     ddp_comp_prod_rec.competitor_product_name := p4_a14;
330     ddp_comp_prod_rec.description := p4_a15;
331     ddp_comp_prod_rec.start_date := rosetta_g_miss_date_in_map(p4_a16);
332     ddp_comp_prod_rec.end_date := rosetta_g_miss_date_in_map(p4_a17);
333     ddp_comp_prod_rec.category_id := rosetta_g_miss_num_map(p4_a18);
334     ddp_comp_prod_rec.category_set_id := rosetta_g_miss_num_map(p4_a19);
335     ddp_comp_prod_rec.context := p4_a20;
336     ddp_comp_prod_rec.attribute1 := p4_a21;
337     ddp_comp_prod_rec.attribute2 := p4_a22;
338     ddp_comp_prod_rec.attribute3 := p4_a23;
339     ddp_comp_prod_rec.attribute4 := p4_a24;
340     ddp_comp_prod_rec.attribute5 := p4_a25;
341     ddp_comp_prod_rec.attribute6 := p4_a26;
342     ddp_comp_prod_rec.attribute7 := p4_a27;
343     ddp_comp_prod_rec.attribute8 := p4_a28;
344     ddp_comp_prod_rec.attribute9 := p4_a29;
345     ddp_comp_prod_rec.attribute10 := p4_a30;
346     ddp_comp_prod_rec.attribute11 := p4_a31;
347     ddp_comp_prod_rec.attribute12 := p4_a32;
348     ddp_comp_prod_rec.attribute13 := p4_a33;
349     ddp_comp_prod_rec.attribute14 := p4_a34;
350     ddp_comp_prod_rec.attribute15 := p4_a35;
351 
352 
353 
354 
355     -- here's the delegated call to the old PL/SQL routine
356     ams_competitor_product_pvt.validate_comp_prod(p_api_version_number,
357       p_init_msg_list,
358       p_validation_level,
359       p_validation_mode,
360       ddp_comp_prod_rec,
361       x_return_status,
362       x_msg_count,
363       x_msg_data);
364 
365     -- copy data back from the local variables to OUT or IN-OUT args, if any
366 
367 
368 
369 
370 
371 
372 
373   end;
374 
375 end ams_competitor_product_pvt_w;