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