[Home] [Help]
PACKAGE BODY: APPS.PVX_PRTNR_PRFLS_PVT_W
Source
1 package body pvx_prtnr_prfls_pvt_w as
2 /* $Header: pvxwppfb.pls 115.14 2003/11/19 07:39:23 rdsharma ship $ */
3 procedure create_prtnr_prfls(p_api_version NUMBER
4 , p_init_msg_list VARCHAR2
5 , p_commit VARCHAR2
6 , p_validation_level NUMBER
7 , x_return_status out nocopy VARCHAR2
8 , x_msg_count out nocopy NUMBER
9 , x_msg_data out nocopy VARCHAR2
10 , p7_a0 NUMBER
11 , p7_a1 DATE
12 , p7_a2 NUMBER
13 , p7_a3 DATE
14 , p7_a4 NUMBER
15 , p7_a5 NUMBER
16 , p7_a6 NUMBER
17 , p7_a7 NUMBER
18 , p7_a8 NUMBER
19 , p7_a9 NUMBER
20 , p7_a10 NUMBER
21 , p7_a11 NUMBER
22 , p7_a12 VARCHAR2
23 , p7_a13 VARCHAR2
24 , p7_a14 VARCHAR2
25 , p7_a15 VARCHAR2
26 , p7_a16 VARCHAR2
27 , p7_a17 VARCHAR2
28 , p7_a18 NUMBER
29 , p7_a19 NUMBER
30 , p7_a20 VARCHAR2
31 , p7_a21 VARCHAR2
32 , p7_a22 NUMBER
33 , p7_a23 VARCHAR2
34 , p7_a24 NUMBER
35 , p7_a25 NUMBER
36 , p7_a26 NUMBER
37 , p7_a27 VARCHAR2
38 , p7_a28 VARCHAR2
39 , p7_a29 VARCHAR2
40 , p7_a30 VARCHAR2
41 , p7_a31 NUMBER
42 , p7_a32 NUMBER
43 , p7_a33 NUMBER
44 , p7_a34 NUMBER
45 , p7_a35 VARCHAR2
46 , x_partner_profile_id out nocopy NUMBER
47 )
48
49 as
50 ddp_prtnr_prfls_rec pvx_prtnr_prfls_pvt.prtnr_prfls_rec_type;
51 ddindx binary_integer; indx binary_integer;
52 begin
53
54 -- copy data to the local IN or IN-OUT args, if any
55
56
57
58
59
60
61
62 ddp_prtnr_prfls_rec.partner_profile_id := p7_a0;
63 ddp_prtnr_prfls_rec.last_update_date := p7_a1;
64 ddp_prtnr_prfls_rec.last_updated_by := p7_a2;
65 ddp_prtnr_prfls_rec.creation_date := p7_a3;
66 ddp_prtnr_prfls_rec.created_by := p7_a4;
67 ddp_prtnr_prfls_rec.last_update_login := p7_a5;
68 ddp_prtnr_prfls_rec.object_version_number := p7_a6;
69 ddp_prtnr_prfls_rec.partner_id := p7_a7;
70 ddp_prtnr_prfls_rec.target_revenue_amt := p7_a8;
71 ddp_prtnr_prfls_rec.actual_revenue_amt := p7_a9;
72 ddp_prtnr_prfls_rec.target_revenue_pct := p7_a10;
73 ddp_prtnr_prfls_rec.actual_revenue_pct := p7_a11;
74 ddp_prtnr_prfls_rec.orig_system_reference := p7_a12;
75 ddp_prtnr_prfls_rec.orig_system_type := p7_a13;
76 ddp_prtnr_prfls_rec.capacity_size := p7_a14;
77 ddp_prtnr_prfls_rec.capacity_amount := p7_a15;
78 ddp_prtnr_prfls_rec.auto_match_allowed_flag := p7_a16;
79 ddp_prtnr_prfls_rec.purchase_method := p7_a17;
80 ddp_prtnr_prfls_rec.cm_id := p7_a18;
81 ddp_prtnr_prfls_rec.ph_support_rep := p7_a19;
82 ddp_prtnr_prfls_rec.lead_sharing_status := p7_a20;
83 ddp_prtnr_prfls_rec.lead_share_appr_flag := p7_a21;
84 ddp_prtnr_prfls_rec.partner_relationship_id := p7_a22;
85 ddp_prtnr_prfls_rec.partner_level := p7_a23;
86 ddp_prtnr_prfls_rec.preferred_vad_id := p7_a24;
87 ddp_prtnr_prfls_rec.partner_group_id := p7_a25;
88 ddp_prtnr_prfls_rec.partner_resource_id := p7_a26;
89 ddp_prtnr_prfls_rec.partner_group_number := p7_a27;
90 ddp_prtnr_prfls_rec.partner_resource_number := p7_a28;
91 ddp_prtnr_prfls_rec.sales_partner_flag := p7_a29;
92 ddp_prtnr_prfls_rec.indirectly_managed_flag := p7_a30;
93 ddp_prtnr_prfls_rec.channel_marketing_manager := p7_a31;
94 ddp_prtnr_prfls_rec.related_partner_id := p7_a32;
95 ddp_prtnr_prfls_rec.max_users := p7_a33;
96 ddp_prtnr_prfls_rec.partner_party_id := p7_a34;
97 ddp_prtnr_prfls_rec.status := p7_a35;
98
99
100 -- here's the delegated call to the old PL/SQL routine
101 pvx_prtnr_prfls_pvt.create_prtnr_prfls(p_api_version,
102 p_init_msg_list,
103 p_commit,
104 p_validation_level,
105 x_return_status,
106 x_msg_count,
107 x_msg_data,
108 ddp_prtnr_prfls_rec,
109 x_partner_profile_id);
110
111 -- copy data back from the local variables to OUT or IN-OUT args, if any
112
113
114
115
116
117
118
119
120 end;
121
122 procedure update_prtnr_prfls(p_api_version NUMBER
123 , p_init_msg_list VARCHAR2
124 , p_commit VARCHAR2
125 , p_validation_level NUMBER
126 , x_return_status out nocopy VARCHAR2
127 , x_msg_count out nocopy NUMBER
128 , x_msg_data out nocopy VARCHAR2
129 , p7_a0 NUMBER
130 , p7_a1 DATE
131 , p7_a2 NUMBER
132 , p7_a3 DATE
133 , p7_a4 NUMBER
134 , p7_a5 NUMBER
135 , p7_a6 NUMBER
136 , p7_a7 NUMBER
137 , p7_a8 NUMBER
138 , p7_a9 NUMBER
139 , p7_a10 NUMBER
140 , p7_a11 NUMBER
141 , p7_a12 VARCHAR2
142 , p7_a13 VARCHAR2
143 , p7_a14 VARCHAR2
144 , p7_a15 VARCHAR2
145 , p7_a16 VARCHAR2
146 , p7_a17 VARCHAR2
147 , p7_a18 NUMBER
148 , p7_a19 NUMBER
149 , p7_a20 VARCHAR2
150 , p7_a21 VARCHAR2
151 , p7_a22 NUMBER
152 , p7_a23 VARCHAR2
153 , p7_a24 NUMBER
154 , p7_a25 NUMBER
155 , p7_a26 NUMBER
156 , p7_a27 VARCHAR2
157 , p7_a28 VARCHAR2
158 , p7_a29 VARCHAR2
159 , p7_a30 VARCHAR2
160 , p7_a31 NUMBER
161 , p7_a32 NUMBER
162 , p7_a33 NUMBER
163 , p7_a34 NUMBER
164 , p7_a35 VARCHAR2
165 )
166
167 as
168 ddp_prtnr_prfls_rec pvx_prtnr_prfls_pvt.prtnr_prfls_rec_type;
169 ddindx binary_integer; indx binary_integer;
170 begin
171
172 -- copy data to the local IN or IN-OUT args, if any
173
174
175
176
177
178
179
180 ddp_prtnr_prfls_rec.partner_profile_id := p7_a0;
181 ddp_prtnr_prfls_rec.last_update_date := p7_a1;
182 ddp_prtnr_prfls_rec.last_updated_by := p7_a2;
183 ddp_prtnr_prfls_rec.creation_date := p7_a3;
184 ddp_prtnr_prfls_rec.created_by := p7_a4;
185 ddp_prtnr_prfls_rec.last_update_login := p7_a5;
186 ddp_prtnr_prfls_rec.object_version_number := p7_a6;
187 ddp_prtnr_prfls_rec.partner_id := p7_a7;
188 ddp_prtnr_prfls_rec.target_revenue_amt := p7_a8;
189 ddp_prtnr_prfls_rec.actual_revenue_amt := p7_a9;
190 ddp_prtnr_prfls_rec.target_revenue_pct := p7_a10;
191 ddp_prtnr_prfls_rec.actual_revenue_pct := p7_a11;
192 ddp_prtnr_prfls_rec.orig_system_reference := p7_a12;
193 ddp_prtnr_prfls_rec.orig_system_type := p7_a13;
194 ddp_prtnr_prfls_rec.capacity_size := p7_a14;
195 ddp_prtnr_prfls_rec.capacity_amount := p7_a15;
196 ddp_prtnr_prfls_rec.auto_match_allowed_flag := p7_a16;
197 ddp_prtnr_prfls_rec.purchase_method := p7_a17;
198 ddp_prtnr_prfls_rec.cm_id := p7_a18;
199 ddp_prtnr_prfls_rec.ph_support_rep := p7_a19;
200 ddp_prtnr_prfls_rec.lead_sharing_status := p7_a20;
201 ddp_prtnr_prfls_rec.lead_share_appr_flag := p7_a21;
202 ddp_prtnr_prfls_rec.partner_relationship_id := p7_a22;
203 ddp_prtnr_prfls_rec.partner_level := p7_a23;
204 ddp_prtnr_prfls_rec.preferred_vad_id := p7_a24;
205 ddp_prtnr_prfls_rec.partner_group_id := p7_a25;
206 ddp_prtnr_prfls_rec.partner_resource_id := p7_a26;
207 ddp_prtnr_prfls_rec.partner_group_number := p7_a27;
208 ddp_prtnr_prfls_rec.partner_resource_number := p7_a28;
209 ddp_prtnr_prfls_rec.sales_partner_flag := p7_a29;
210 ddp_prtnr_prfls_rec.indirectly_managed_flag := p7_a30;
211 ddp_prtnr_prfls_rec.channel_marketing_manager := p7_a31;
212 ddp_prtnr_prfls_rec.related_partner_id := p7_a32;
213 ddp_prtnr_prfls_rec.max_users := p7_a33;
214 ddp_prtnr_prfls_rec.partner_party_id := p7_a34;
215 ddp_prtnr_prfls_rec.status := p7_a35;
216
217 -- here's the delegated call to the old PL/SQL routine
218 pvx_prtnr_prfls_pvt.update_prtnr_prfls(p_api_version,
219 p_init_msg_list,
220 p_commit,
221 p_validation_level,
222 x_return_status,
223 x_msg_count,
224 x_msg_data,
225 ddp_prtnr_prfls_rec);
226
227 -- copy data back from the local variables to OUT or IN-OUT args, if any
228
229
230
231
232
233
234
235 end;
236
237 procedure validate_prtnr_prfls(p_api_version NUMBER
238 , p_init_msg_list VARCHAR2
239 , p_validation_level NUMBER
240 , x_return_status out nocopy VARCHAR2
241 , x_msg_count out nocopy NUMBER
242 , x_msg_data out nocopy VARCHAR2
243 , p6_a0 NUMBER
244 , p6_a1 DATE
245 , p6_a2 NUMBER
246 , p6_a3 DATE
247 , p6_a4 NUMBER
248 , p6_a5 NUMBER
249 , p6_a6 NUMBER
250 , p6_a7 NUMBER
251 , p6_a8 NUMBER
252 , p6_a9 NUMBER
253 , p6_a10 NUMBER
254 , p6_a11 NUMBER
255 , p6_a12 VARCHAR2
256 , p6_a13 VARCHAR2
257 , p6_a14 VARCHAR2
258 , p6_a15 VARCHAR2
259 , p6_a16 VARCHAR2
260 , p6_a17 VARCHAR2
261 , p6_a18 NUMBER
262 , p6_a19 NUMBER
263 , p6_a20 VARCHAR2
264 , p6_a21 VARCHAR2
265 , p6_a22 NUMBER
266 , p6_a23 VARCHAR2
267 , p6_a24 NUMBER
268 , p6_a25 NUMBER
269 , p6_a26 NUMBER
270 , p6_a27 VARCHAR2
271 , p6_a28 VARCHAR2
272 , p6_a29 VARCHAR2
273 , p6_a30 VARCHAR2
274 , p6_a31 NUMBER
275 , p6_a32 NUMBER
276 , p6_a33 NUMBER
277 , p6_a34 NUMBER
278 , p6_a35 VARCHAR2
279 )
280
281 as
282 ddp_prtnr_prfls_rec pvx_prtnr_prfls_pvt.prtnr_prfls_rec_type;
283 ddindx binary_integer; indx binary_integer;
284 begin
285
286 -- copy data to the local IN or IN-OUT args, if any
287
288
289
290
291
292
293 ddp_prtnr_prfls_rec.partner_profile_id := p6_a0;
294 ddp_prtnr_prfls_rec.last_update_date := p6_a1;
295 ddp_prtnr_prfls_rec.last_updated_by := p6_a2;
296 ddp_prtnr_prfls_rec.creation_date := p6_a3;
297 ddp_prtnr_prfls_rec.created_by := p6_a4;
298 ddp_prtnr_prfls_rec.last_update_login := p6_a5;
299 ddp_prtnr_prfls_rec.object_version_number := p6_a6;
300 ddp_prtnr_prfls_rec.partner_id := p6_a7;
301 ddp_prtnr_prfls_rec.target_revenue_amt := p6_a8;
302 ddp_prtnr_prfls_rec.actual_revenue_amt := p6_a9;
303 ddp_prtnr_prfls_rec.target_revenue_pct := p6_a10;
304 ddp_prtnr_prfls_rec.actual_revenue_pct := p6_a11;
305 ddp_prtnr_prfls_rec.orig_system_reference := p6_a12;
306 ddp_prtnr_prfls_rec.orig_system_type := p6_a13;
307 ddp_prtnr_prfls_rec.capacity_size := p6_a14;
308 ddp_prtnr_prfls_rec.capacity_amount := p6_a15;
309 ddp_prtnr_prfls_rec.auto_match_allowed_flag := p6_a16;
310 ddp_prtnr_prfls_rec.purchase_method := p6_a17;
311 ddp_prtnr_prfls_rec.cm_id := p6_a18;
312 ddp_prtnr_prfls_rec.ph_support_rep := p6_a19;
313 ddp_prtnr_prfls_rec.lead_sharing_status := p6_a20;
314 ddp_prtnr_prfls_rec.lead_share_appr_flag := p6_a21;
315 ddp_prtnr_prfls_rec.partner_relationship_id := p6_a22;
316 ddp_prtnr_prfls_rec.partner_level := p6_a23;
317 ddp_prtnr_prfls_rec.preferred_vad_id := p6_a24;
318 ddp_prtnr_prfls_rec.partner_group_id := p6_a25;
319 ddp_prtnr_prfls_rec.partner_resource_id := p6_a26;
320 ddp_prtnr_prfls_rec.partner_group_number := p6_a27;
321 ddp_prtnr_prfls_rec.partner_resource_number := p6_a28;
322 ddp_prtnr_prfls_rec.sales_partner_flag := p6_a29;
323 ddp_prtnr_prfls_rec.indirectly_managed_flag := p6_a30;
324 ddp_prtnr_prfls_rec.channel_marketing_manager := p6_a31;
325 ddp_prtnr_prfls_rec.related_partner_id := p6_a32;
326 ddp_prtnr_prfls_rec.max_users := p6_a33;
327 ddp_prtnr_prfls_rec.partner_party_id := p6_a34;
328 ddp_prtnr_prfls_rec.status := p6_a35;
329
330 -- here's the delegated call to the old PL/SQL routine
331 pvx_prtnr_prfls_pvt.validate_prtnr_prfls(p_api_version,
332 p_init_msg_list,
333 p_validation_level,
334 x_return_status,
335 x_msg_count,
336 x_msg_data,
337 ddp_prtnr_prfls_rec);
338
339 -- copy data back from the local variables to OUT or IN-OUT args, if any
340
341
342
343
344
345
346 end;
347
348 procedure check_prtnr_prfls_items(p_validation_mode VARCHAR2
349 , x_return_status out nocopy VARCHAR2
350 , p2_a0 NUMBER
351 , p2_a1 DATE
352 , p2_a2 NUMBER
353 , p2_a3 DATE
354 , p2_a4 NUMBER
355 , p2_a5 NUMBER
356 , p2_a6 NUMBER
357 , p2_a7 NUMBER
358 , p2_a8 NUMBER
359 , p2_a9 NUMBER
360 , p2_a10 NUMBER
361 , p2_a11 NUMBER
362 , p2_a12 VARCHAR2
363 , p2_a13 VARCHAR2
364 , p2_a14 VARCHAR2
365 , p2_a15 VARCHAR2
366 , p2_a16 VARCHAR2
367 , p2_a17 VARCHAR2
368 , p2_a18 NUMBER
369 , p2_a19 NUMBER
370 , p2_a20 VARCHAR2
371 , p2_a21 VARCHAR2
372 , p2_a22 NUMBER
373 , p2_a23 VARCHAR2
374 , p2_a24 NUMBER
375 , p2_a25 NUMBER
376 , p2_a26 NUMBER
377 , p2_a27 VARCHAR2
378 , p2_a28 VARCHAR2
379 , p2_a29 VARCHAR2
380 , p2_a30 VARCHAR2
381 , p2_a31 NUMBER
382 , p2_a32 NUMBER
383 , p2_a33 NUMBER
384 , p2_a34 NUMBER
385 , p2_a35 VARCHAR2
386 )
387
388 as
389 ddp_prtnr_prfls_rec pvx_prtnr_prfls_pvt.prtnr_prfls_rec_type;
390 ddindx binary_integer; indx binary_integer;
391 begin
392
393 -- copy data to the local IN or IN-OUT args, if any
394
395
396 ddp_prtnr_prfls_rec.partner_profile_id := p2_a0;
397 ddp_prtnr_prfls_rec.last_update_date := p2_a1;
398 ddp_prtnr_prfls_rec.last_updated_by := p2_a2;
399 ddp_prtnr_prfls_rec.creation_date := p2_a3;
400 ddp_prtnr_prfls_rec.created_by := p2_a4;
401 ddp_prtnr_prfls_rec.last_update_login := p2_a5;
402 ddp_prtnr_prfls_rec.object_version_number := p2_a6;
403 ddp_prtnr_prfls_rec.partner_id := p2_a7;
404 ddp_prtnr_prfls_rec.target_revenue_amt := p2_a8;
405 ddp_prtnr_prfls_rec.actual_revenue_amt := p2_a9;
406 ddp_prtnr_prfls_rec.target_revenue_pct := p2_a10;
407 ddp_prtnr_prfls_rec.actual_revenue_pct := p2_a11;
408 ddp_prtnr_prfls_rec.orig_system_reference := p2_a12;
409 ddp_prtnr_prfls_rec.orig_system_type := p2_a13;
410 ddp_prtnr_prfls_rec.capacity_size := p2_a14;
411 ddp_prtnr_prfls_rec.capacity_amount := p2_a15;
412 ddp_prtnr_prfls_rec.auto_match_allowed_flag := p2_a16;
413 ddp_prtnr_prfls_rec.purchase_method := p2_a17;
414 ddp_prtnr_prfls_rec.cm_id := p2_a18;
415 ddp_prtnr_prfls_rec.ph_support_rep := p2_a19;
416 ddp_prtnr_prfls_rec.lead_sharing_status := p2_a20;
417 ddp_prtnr_prfls_rec.lead_share_appr_flag := p2_a21;
418 ddp_prtnr_prfls_rec.partner_relationship_id := p2_a22;
419 ddp_prtnr_prfls_rec.partner_level := p2_a23;
420 ddp_prtnr_prfls_rec.preferred_vad_id := p2_a24;
421 ddp_prtnr_prfls_rec.partner_group_id := p2_a25;
422 ddp_prtnr_prfls_rec.partner_resource_id := p2_a26;
423 ddp_prtnr_prfls_rec.partner_group_number := p2_a27;
424 ddp_prtnr_prfls_rec.partner_resource_number := p2_a28;
425 ddp_prtnr_prfls_rec.sales_partner_flag := p2_a29;
426 ddp_prtnr_prfls_rec.indirectly_managed_flag := p2_a30;
427 ddp_prtnr_prfls_rec.channel_marketing_manager := p2_a31;
428 ddp_prtnr_prfls_rec.related_partner_id := p2_a32;
429 ddp_prtnr_prfls_rec.max_users := p2_a33;
430 ddp_prtnr_prfls_rec.partner_party_id := p2_a34;
431 ddp_prtnr_prfls_rec.status := p2_a35;
432
433 -- here's the delegated call to the old PL/SQL routine
434 pvx_prtnr_prfls_pvt.check_prtnr_prfls_items(p_validation_mode,
435 x_return_status,
436 ddp_prtnr_prfls_rec);
437
438 -- copy data back from the local variables to OUT or IN-OUT args, if any
439
440
441 end;
442
443 procedure check_prtnr_prfls_record(p0_a0 NUMBER
444 , p0_a1 DATE
445 , p0_a2 NUMBER
446 , p0_a3 DATE
447 , p0_a4 NUMBER
451 , p0_a8 NUMBER
448 , p0_a5 NUMBER
449 , p0_a6 NUMBER
450 , p0_a7 NUMBER
452 , p0_a9 NUMBER
453 , p0_a10 NUMBER
454 , p0_a11 NUMBER
455 , p0_a12 VARCHAR2
456 , p0_a13 VARCHAR2
457 , p0_a14 VARCHAR2
458 , p0_a15 VARCHAR2
459 , p0_a16 VARCHAR2
460 , p0_a17 VARCHAR2
461 , p0_a18 NUMBER
462 , p0_a19 NUMBER
463 , p0_a20 VARCHAR2
464 , p0_a21 VARCHAR2
465 , p0_a22 NUMBER
466 , p0_a23 VARCHAR2
467 , p0_a24 NUMBER
468 , p0_a25 NUMBER
469 , p0_a26 NUMBER
470 , p0_a27 VARCHAR2
471 , p0_a28 VARCHAR2
472 , p0_a29 VARCHAR2
473 , p0_a30 VARCHAR2
474 , p0_a31 NUMBER
475 , p0_a32 NUMBER
476 , p0_a33 NUMBER
477 , p0_a34 NUMBER
478 , p0_a35 VARCHAR2
479 , p1_a0 NUMBER
480 , p1_a1 DATE
481 , p1_a2 NUMBER
482 , p1_a3 DATE
483 , p1_a4 NUMBER
484 , p1_a5 NUMBER
485 , p1_a6 NUMBER
486 , p1_a7 NUMBER
487 , p1_a8 NUMBER
488 , p1_a9 NUMBER
489 , p1_a10 NUMBER
490 , p1_a11 NUMBER
491 , p1_a12 VARCHAR2
492 , p1_a13 VARCHAR2
493 , p1_a14 VARCHAR2
494 , p1_a15 VARCHAR2
495 , p1_a16 VARCHAR2
496 , p1_a17 VARCHAR2
497 , p1_a18 NUMBER
498 , p1_a19 NUMBER
499 , p1_a20 VARCHAR2
500 , p1_a21 VARCHAR2
501 , p1_a22 NUMBER
502 , p1_a23 VARCHAR2
503 , p1_a24 NUMBER
504 , p1_a25 NUMBER
505 , p1_a26 NUMBER
506 , p1_a27 VARCHAR2
507 , p1_a28 VARCHAR2
508 , p1_a29 VARCHAR2
509 , p1_a30 VARCHAR2
510 , p1_a31 NUMBER
511 , p1_a32 NUMBER
512 , p1_a33 NUMBER
513 , p1_a34 NUMBER
514 , p1_a35 VARCHAR2
515 , p_mode VARCHAR2
516 , x_return_status out nocopy VARCHAR2
517 )
518
519 as
520 ddp_prtnr_prfls_rec pvx_prtnr_prfls_pvt.prtnr_prfls_rec_type;
521 ddp_complete_rec pvx_prtnr_prfls_pvt.prtnr_prfls_rec_type;
522 ddindx binary_integer; indx binary_integer;
523 begin
524
525 -- copy data to the local IN or IN-OUT args, if any
526 ddp_prtnr_prfls_rec.partner_profile_id := p0_a0;
527 ddp_prtnr_prfls_rec.last_update_date := p0_a1;
528 ddp_prtnr_prfls_rec.last_updated_by := p0_a2;
529 ddp_prtnr_prfls_rec.creation_date := p0_a3;
530 ddp_prtnr_prfls_rec.created_by := p0_a4;
531 ddp_prtnr_prfls_rec.last_update_login := p0_a5;
532 ddp_prtnr_prfls_rec.object_version_number := p0_a6;
533 ddp_prtnr_prfls_rec.partner_id := p0_a7;
534 ddp_prtnr_prfls_rec.target_revenue_amt := p0_a8;
535 ddp_prtnr_prfls_rec.actual_revenue_amt := p0_a9;
536 ddp_prtnr_prfls_rec.target_revenue_pct := p0_a10;
537 ddp_prtnr_prfls_rec.actual_revenue_pct := p0_a11;
538 ddp_prtnr_prfls_rec.orig_system_reference := p0_a12;
539 ddp_prtnr_prfls_rec.orig_system_type := p0_a13;
540 ddp_prtnr_prfls_rec.capacity_size := p0_a14;
541 ddp_prtnr_prfls_rec.capacity_amount := p0_a15;
542 ddp_prtnr_prfls_rec.auto_match_allowed_flag := p0_a16;
543 ddp_prtnr_prfls_rec.purchase_method := p0_a17;
544 ddp_prtnr_prfls_rec.cm_id := p0_a18;
545 ddp_prtnr_prfls_rec.ph_support_rep := p0_a19;
546 ddp_prtnr_prfls_rec.lead_sharing_status := p0_a20;
547 ddp_prtnr_prfls_rec.lead_share_appr_flag := p0_a21;
548 ddp_prtnr_prfls_rec.partner_relationship_id := p0_a22;
549 ddp_prtnr_prfls_rec.partner_level := p0_a23;
550 ddp_prtnr_prfls_rec.preferred_vad_id := p0_a24;
551 ddp_prtnr_prfls_rec.partner_group_id := p0_a25;
552 ddp_prtnr_prfls_rec.partner_resource_id := p0_a26;
553 ddp_prtnr_prfls_rec.partner_group_number := p0_a27;
554 ddp_prtnr_prfls_rec.partner_resource_number := p0_a28;
555 ddp_prtnr_prfls_rec.sales_partner_flag := p0_a29;
556 ddp_prtnr_prfls_rec.indirectly_managed_flag := p0_a30;
557 ddp_prtnr_prfls_rec.channel_marketing_manager := p0_a31;
558 ddp_prtnr_prfls_rec.related_partner_id := p0_a32;
559 ddp_prtnr_prfls_rec.max_users := p0_a33;
560 ddp_prtnr_prfls_rec.partner_party_id := p0_a34;
561 ddp_prtnr_prfls_rec.status := p0_a35;
562
563 ddp_complete_rec.partner_profile_id := p1_a0;
564 ddp_complete_rec.last_update_date := p1_a1;
565 ddp_complete_rec.last_updated_by := p1_a2;
566 ddp_complete_rec.creation_date := p1_a3;
567 ddp_complete_rec.created_by := p1_a4;
568 ddp_complete_rec.last_update_login := p1_a5;
569 ddp_complete_rec.object_version_number := p1_a6;
570 ddp_complete_rec.partner_id := p1_a7;
571 ddp_complete_rec.target_revenue_amt := p1_a8;
572 ddp_complete_rec.actual_revenue_amt := p1_a9;
573 ddp_complete_rec.target_revenue_pct := p1_a10;
574 ddp_complete_rec.actual_revenue_pct := p1_a11;
575 ddp_complete_rec.orig_system_reference := p1_a12;
576 ddp_complete_rec.orig_system_type := p1_a13;
577 ddp_complete_rec.capacity_size := p1_a14;
578 ddp_complete_rec.capacity_amount := p1_a15;
579 ddp_complete_rec.auto_match_allowed_flag := p1_a16;
580 ddp_complete_rec.purchase_method := p1_a17;
581 ddp_complete_rec.cm_id := p1_a18;
582 ddp_complete_rec.ph_support_rep := p1_a19;
583 ddp_complete_rec.lead_sharing_status := p1_a20;
584 ddp_complete_rec.lead_share_appr_flag := p1_a21;
588 ddp_complete_rec.partner_group_id := p1_a25;
585 ddp_complete_rec.partner_relationship_id := p1_a22;
586 ddp_complete_rec.partner_level := p1_a23;
587 ddp_complete_rec.preferred_vad_id := p1_a24;
589 ddp_complete_rec.partner_resource_id := p1_a26;
590 ddp_complete_rec.partner_group_number := p1_a27;
591 ddp_complete_rec.partner_resource_number := p1_a28;
592 ddp_complete_rec.sales_partner_flag := p1_a29;
593 ddp_complete_rec.indirectly_managed_flag := p1_a30;
594 ddp_complete_rec.channel_marketing_manager := p1_a31;
595 ddp_complete_rec.related_partner_id := p1_a32;
596 ddp_complete_rec.max_users := p1_a33;
597 ddp_complete_rec.partner_party_id := p1_a34;
598 ddp_complete_rec.status := p1_a35;
599
600
601
602 -- here's the delegated call to the old PL/SQL routine
603 pvx_prtnr_prfls_pvt.check_prtnr_prfls_record(ddp_prtnr_prfls_rec,
604 ddp_complete_rec,
605 p_mode,
606 x_return_status);
607
608 -- copy data back from the local variables to OUT or IN-OUT args, if any
609
610
611
612 end;
613
614 procedure init_prtnr_prfls_rec(p0_a0 out nocopy NUMBER
615 , p0_a1 out nocopy DATE
616 , p0_a2 out nocopy NUMBER
617 , p0_a3 out nocopy DATE
618 , p0_a4 out nocopy NUMBER
619 , p0_a5 out nocopy NUMBER
620 , p0_a6 out nocopy NUMBER
621 , p0_a7 out nocopy NUMBER
622 , p0_a8 out nocopy NUMBER
623 , p0_a9 out nocopy NUMBER
624 , p0_a10 out nocopy NUMBER
625 , p0_a11 out nocopy NUMBER
626 , p0_a12 out nocopy VARCHAR2
627 , p0_a13 out nocopy VARCHAR2
628 , p0_a14 out nocopy VARCHAR2
629 , p0_a15 out nocopy VARCHAR2
630 , p0_a16 out nocopy VARCHAR2
631 , p0_a17 out nocopy VARCHAR2
632 , p0_a18 out nocopy NUMBER
633 , p0_a19 out nocopy NUMBER
634 , p0_a20 out nocopy VARCHAR2
635 , p0_a21 out nocopy VARCHAR2
636 , p0_a22 out nocopy NUMBER
637 , p0_a23 out nocopy VARCHAR2
638 , p0_a24 out nocopy NUMBER
639 , p0_a25 out nocopy NUMBER
640 , p0_a26 out nocopy NUMBER
641 , p0_a27 out nocopy VARCHAR2
642 , p0_a28 out nocopy VARCHAR2
643 , p0_a29 out nocopy VARCHAR2
644 , p0_a30 out nocopy VARCHAR2
645 , p0_a31 out nocopy NUMBER
646 , p0_a32 out nocopy NUMBER
647 , p0_a33 out nocopy NUMBER
648 , p0_a34 out nocopy NUMBER
649 , p0_a35 out nocopy VARCHAR2
650 )
651
652 as
653 ddx_prtnr_prfls_rec pvx_prtnr_prfls_pvt.prtnr_prfls_rec_type;
654 ddindx binary_integer; indx binary_integer;
655 begin
656
657 -- copy data to the local IN or IN-OUT args, if any
658
659 -- here's the delegated call to the old PL/SQL routine
660 pvx_prtnr_prfls_pvt.init_prtnr_prfls_rec(ddx_prtnr_prfls_rec);
661
662 -- copy data back from the local variables to OUT or IN-OUT args, if any
663 p0_a0 := ddx_prtnr_prfls_rec.partner_profile_id;
664 p0_a1 := ddx_prtnr_prfls_rec.last_update_date;
665 p0_a2 := ddx_prtnr_prfls_rec.last_updated_by;
666 p0_a3 := ddx_prtnr_prfls_rec.creation_date;
667 p0_a4 := ddx_prtnr_prfls_rec.created_by;
668 p0_a5 := ddx_prtnr_prfls_rec.last_update_login;
669 p0_a6 := ddx_prtnr_prfls_rec.object_version_number;
670 p0_a7 := ddx_prtnr_prfls_rec.partner_id;
671 p0_a8 := ddx_prtnr_prfls_rec.target_revenue_amt;
672 p0_a9 := ddx_prtnr_prfls_rec.actual_revenue_amt;
673 p0_a10 := ddx_prtnr_prfls_rec.target_revenue_pct;
674 p0_a11 := ddx_prtnr_prfls_rec.actual_revenue_pct;
675 p0_a12 := ddx_prtnr_prfls_rec.orig_system_reference;
676 p0_a13 := ddx_prtnr_prfls_rec.orig_system_type;
677 p0_a14 := ddx_prtnr_prfls_rec.capacity_size;
678 p0_a15 := ddx_prtnr_prfls_rec.capacity_amount;
679 p0_a16 := ddx_prtnr_prfls_rec.auto_match_allowed_flag;
680 p0_a17 := ddx_prtnr_prfls_rec.purchase_method;
681 p0_a18 := ddx_prtnr_prfls_rec.cm_id;
682 p0_a19 := ddx_prtnr_prfls_rec.ph_support_rep;
683 p0_a20 := ddx_prtnr_prfls_rec.lead_sharing_status;
684 p0_a21 := ddx_prtnr_prfls_rec.lead_share_appr_flag;
685 p0_a22 := ddx_prtnr_prfls_rec.partner_relationship_id;
686 p0_a23 := ddx_prtnr_prfls_rec.partner_level;
687 p0_a24 := ddx_prtnr_prfls_rec.preferred_vad_id;
688 p0_a25 := ddx_prtnr_prfls_rec.partner_group_id;
689 p0_a26 := ddx_prtnr_prfls_rec.partner_resource_id;
690 p0_a27 := ddx_prtnr_prfls_rec.partner_group_number;
691 p0_a28 := ddx_prtnr_prfls_rec.partner_resource_number;
692 p0_a29 := ddx_prtnr_prfls_rec.sales_partner_flag;
693 p0_a30 := ddx_prtnr_prfls_rec.indirectly_managed_flag;
694 p0_a31 := ddx_prtnr_prfls_rec.channel_marketing_manager;
695 p0_a32 := ddx_prtnr_prfls_rec.related_partner_id;
696 p0_a33 := ddx_prtnr_prfls_rec.max_users;
697 p0_a34 := ddx_prtnr_prfls_rec.partner_party_id;
698 p0_a35 := ddx_prtnr_prfls_rec.status;
699 end;
700
701 procedure complete_prtnr_prfls_rec(p0_a0 NUMBER
702 , p0_a1 DATE
703 , p0_a2 NUMBER
704 , p0_a3 DATE
705 , p0_a4 NUMBER
706 , p0_a5 NUMBER
707 , p0_a6 NUMBER
708 , p0_a7 NUMBER
709 , p0_a8 NUMBER
710 , p0_a9 NUMBER
711 , p0_a10 NUMBER
712 , p0_a11 NUMBER
713 , p0_a12 VARCHAR2
714 , p0_a13 VARCHAR2
715 , p0_a14 VARCHAR2
716 , p0_a15 VARCHAR2
720 , p0_a19 NUMBER
717 , p0_a16 VARCHAR2
718 , p0_a17 VARCHAR2
719 , p0_a18 NUMBER
721 , p0_a20 VARCHAR2
722 , p0_a21 VARCHAR2
723 , p0_a22 NUMBER
724 , p0_a23 VARCHAR2
725 , p0_a24 NUMBER
726 , p0_a25 NUMBER
727 , p0_a26 NUMBER
728 , p0_a27 VARCHAR2
729 , p0_a28 VARCHAR2
730 , p0_a29 VARCHAR2
731 , p0_a30 VARCHAR2
732 , p0_a31 NUMBER
733 , p0_a32 NUMBER
734 , p0_a33 NUMBER
735 , p0_a34 NUMBER
736 , p0_a35 VARCHAR2
737 , p1_a0 out nocopy NUMBER
738 , p1_a1 out nocopy DATE
739 , p1_a2 out nocopy NUMBER
740 , p1_a3 out nocopy DATE
741 , p1_a4 out nocopy NUMBER
742 , p1_a5 out nocopy NUMBER
743 , p1_a6 out nocopy NUMBER
744 , p1_a7 out nocopy NUMBER
745 , p1_a8 out nocopy NUMBER
746 , p1_a9 out nocopy NUMBER
747 , p1_a10 out nocopy NUMBER
748 , p1_a11 out nocopy NUMBER
749 , p1_a12 out nocopy VARCHAR2
750 , p1_a13 out nocopy VARCHAR2
751 , p1_a14 out nocopy VARCHAR2
752 , p1_a15 out nocopy VARCHAR2
753 , p1_a16 out nocopy VARCHAR2
754 , p1_a17 out nocopy VARCHAR2
755 , p1_a18 out nocopy NUMBER
756 , p1_a19 out nocopy NUMBER
757 , p1_a20 out nocopy VARCHAR2
758 , p1_a21 out nocopy VARCHAR2
759 , p1_a22 out nocopy NUMBER
760 , p1_a23 out nocopy VARCHAR2
761 , p1_a24 out nocopy NUMBER
762 , p1_a25 out nocopy NUMBER
763 , p1_a26 out nocopy NUMBER
764 , p1_a27 out nocopy VARCHAR2
765 , p1_a28 out nocopy VARCHAR2
766 , p1_a29 out nocopy VARCHAR2
767 , p1_a30 out nocopy VARCHAR2
768 , p1_a31 out nocopy NUMBER
769 , p1_a32 out nocopy NUMBER
770 , p1_a33 out nocopy NUMBER
771 , p1_a34 out nocopy NUMBER
772 , p1_a35 out nocopy VARCHAR2
773 )
774
775 as
776 ddp_prtnr_prfls_rec pvx_prtnr_prfls_pvt.prtnr_prfls_rec_type;
777 ddx_complete_rec pvx_prtnr_prfls_pvt.prtnr_prfls_rec_type;
778 ddindx binary_integer; indx binary_integer;
779 begin
780
781 -- copy data to the local IN or IN-OUT args, if any
782 ddp_prtnr_prfls_rec.partner_profile_id := p0_a0;
783 ddp_prtnr_prfls_rec.last_update_date := p0_a1;
784 ddp_prtnr_prfls_rec.last_updated_by := p0_a2;
785 ddp_prtnr_prfls_rec.creation_date := p0_a3;
786 ddp_prtnr_prfls_rec.created_by := p0_a4;
787 ddp_prtnr_prfls_rec.last_update_login := p0_a5;
788 ddp_prtnr_prfls_rec.object_version_number := p0_a6;
789 ddp_prtnr_prfls_rec.partner_id := p0_a7;
790 ddp_prtnr_prfls_rec.target_revenue_amt := p0_a8;
791 ddp_prtnr_prfls_rec.actual_revenue_amt := p0_a9;
792 ddp_prtnr_prfls_rec.target_revenue_pct := p0_a10;
793 ddp_prtnr_prfls_rec.actual_revenue_pct := p0_a11;
794 ddp_prtnr_prfls_rec.orig_system_reference := p0_a12;
795 ddp_prtnr_prfls_rec.orig_system_type := p0_a13;
796 ddp_prtnr_prfls_rec.capacity_size := p0_a14;
797 ddp_prtnr_prfls_rec.capacity_amount := p0_a15;
798 ddp_prtnr_prfls_rec.auto_match_allowed_flag := p0_a16;
799 ddp_prtnr_prfls_rec.purchase_method := p0_a17;
800 ddp_prtnr_prfls_rec.cm_id := p0_a18;
801 ddp_prtnr_prfls_rec.ph_support_rep := p0_a19;
802 ddp_prtnr_prfls_rec.lead_sharing_status := p0_a20;
803 ddp_prtnr_prfls_rec.lead_share_appr_flag := p0_a21;
804 ddp_prtnr_prfls_rec.partner_relationship_id := p0_a22;
805 ddp_prtnr_prfls_rec.partner_level := p0_a23;
806 ddp_prtnr_prfls_rec.preferred_vad_id := p0_a24;
807 ddp_prtnr_prfls_rec.partner_group_id := p0_a25;
808 ddp_prtnr_prfls_rec.partner_resource_id := p0_a26;
809 ddp_prtnr_prfls_rec.partner_group_number := p0_a27;
810 ddp_prtnr_prfls_rec.partner_resource_number := p0_a28;
811 ddp_prtnr_prfls_rec.sales_partner_flag := p0_a29;
812 ddp_prtnr_prfls_rec.indirectly_managed_flag := p0_a30;
813 ddp_prtnr_prfls_rec.channel_marketing_manager := p0_a31;
814 ddp_prtnr_prfls_rec.related_partner_id := p0_a32;
815 ddp_prtnr_prfls_rec.max_users := p0_a33;
816 ddp_prtnr_prfls_rec.partner_party_id := p0_a34;
817 ddp_prtnr_prfls_rec.status := p0_a35;
818
819
820 -- here's the delegated call to the old PL/SQL routine
821 pvx_prtnr_prfls_pvt.complete_prtnr_prfls_rec(ddp_prtnr_prfls_rec,
822 ddx_complete_rec);
823
824 -- copy data back from the local variables to OUT or IN-OUT args, if any
825
826 p1_a0 := ddx_complete_rec.partner_profile_id;
827 p1_a1 := ddx_complete_rec.last_update_date;
828 p1_a2 := ddx_complete_rec.last_updated_by;
829 p1_a3 := ddx_complete_rec.creation_date;
830 p1_a4 := ddx_complete_rec.created_by;
831 p1_a5 := ddx_complete_rec.last_update_login;
832 p1_a6 := ddx_complete_rec.object_version_number;
833 p1_a7 := ddx_complete_rec.partner_id;
834 p1_a8 := ddx_complete_rec.target_revenue_amt;
835 p1_a9 := ddx_complete_rec.actual_revenue_amt;
836 p1_a10 := ddx_complete_rec.target_revenue_pct;
837 p1_a11 := ddx_complete_rec.actual_revenue_pct;
838 p1_a12 := ddx_complete_rec.orig_system_reference;
839 p1_a13 := ddx_complete_rec.orig_system_type;
840 p1_a14 := ddx_complete_rec.capacity_size;
841 p1_a15 := ddx_complete_rec.capacity_amount;
842 p1_a16 := ddx_complete_rec.auto_match_allowed_flag;
843 p1_a17 := ddx_complete_rec.purchase_method;
844 p1_a18 := ddx_complete_rec.cm_id;
848 p1_a22 := ddx_complete_rec.partner_relationship_id;
845 p1_a19 := ddx_complete_rec.ph_support_rep;
846 p1_a20 := ddx_complete_rec.lead_sharing_status;
847 p1_a21 := ddx_complete_rec.lead_share_appr_flag;
849 p1_a23 := ddx_complete_rec.partner_level;
850 p1_a24 := ddx_complete_rec.preferred_vad_id;
851 p1_a25 := ddx_complete_rec.partner_group_id;
852 p1_a26 := ddx_complete_rec.partner_resource_id;
853 p1_a27 := ddx_complete_rec.partner_group_number;
854 p1_a28 := ddx_complete_rec.partner_resource_number;
855 p1_a29 := ddx_complete_rec.sales_partner_flag;
856 p1_a30 := ddx_complete_rec.indirectly_managed_flag;
857 p1_a31 := ddx_complete_rec.channel_marketing_manager;
858 p1_a32 := ddx_complete_rec.related_partner_id;
859 p1_a33 := ddx_complete_rec.max_users;
860 p1_a34 := ddx_complete_rec.partner_party_id;
861 p1_a35 := ddx_complete_rec.status;
862 end;
863
864 procedure determine_partner_status(p0_a0 NUMBER
865 , p0_a1 DATE
866 , p0_a2 NUMBER
867 , p0_a3 DATE
868 , p0_a4 NUMBER
869 , p0_a5 NUMBER
870 , p0_a6 NUMBER
871 , p0_a7 NUMBER
872 , p0_a8 NUMBER
873 , p0_a9 NUMBER
874 , p0_a10 NUMBER
875 , p0_a11 NUMBER
876 , p0_a12 VARCHAR2
877 , p0_a13 VARCHAR2
878 , p0_a14 VARCHAR2
879 , p0_a15 VARCHAR2
880 , p0_a16 VARCHAR2
881 , p0_a17 VARCHAR2
882 , p0_a18 NUMBER
883 , p0_a19 NUMBER
884 , p0_a20 VARCHAR2
885 , p0_a21 VARCHAR2
886 , p0_a22 NUMBER
887 , p0_a23 VARCHAR2
888 , p0_a24 NUMBER
889 , p0_a25 NUMBER
890 , p0_a26 NUMBER
891 , p0_a27 VARCHAR2
892 , p0_a28 VARCHAR2
893 , p0_a29 VARCHAR2
894 , p0_a30 VARCHAR2
895 , p0_a31 NUMBER
896 , p0_a32 NUMBER
897 , p0_a33 NUMBER
898 , p0_a34 NUMBER
899 , p0_a35 VARCHAR2
900 , x_partner_status out nocopy VARCHAR2
901 )
902
903 as
904 ddp_prtnr_prfls_rec pvx_prtnr_prfls_pvt.prtnr_prfls_rec_type;
905 ddindx binary_integer; indx binary_integer;
906 begin
907
908 -- copy data to the local IN or IN-OUT args, if any
909 ddp_prtnr_prfls_rec.partner_profile_id := p0_a0;
910 ddp_prtnr_prfls_rec.last_update_date := p0_a1;
911 ddp_prtnr_prfls_rec.last_updated_by := p0_a2;
912 ddp_prtnr_prfls_rec.creation_date := p0_a3;
913 ddp_prtnr_prfls_rec.created_by := p0_a4;
914 ddp_prtnr_prfls_rec.last_update_login := p0_a5;
915 ddp_prtnr_prfls_rec.object_version_number := p0_a6;
916 ddp_prtnr_prfls_rec.partner_id := p0_a7;
917 ddp_prtnr_prfls_rec.target_revenue_amt := p0_a8;
918 ddp_prtnr_prfls_rec.actual_revenue_amt := p0_a9;
919 ddp_prtnr_prfls_rec.target_revenue_pct := p0_a10;
920 ddp_prtnr_prfls_rec.actual_revenue_pct := p0_a11;
921 ddp_prtnr_prfls_rec.orig_system_reference := p0_a12;
922 ddp_prtnr_prfls_rec.orig_system_type := p0_a13;
923 ddp_prtnr_prfls_rec.capacity_size := p0_a14;
924 ddp_prtnr_prfls_rec.capacity_amount := p0_a15;
925 ddp_prtnr_prfls_rec.auto_match_allowed_flag := p0_a16;
926 ddp_prtnr_prfls_rec.purchase_method := p0_a17;
927 ddp_prtnr_prfls_rec.cm_id := p0_a18;
928 ddp_prtnr_prfls_rec.ph_support_rep := p0_a19;
929 ddp_prtnr_prfls_rec.lead_sharing_status := p0_a20;
930 ddp_prtnr_prfls_rec.lead_share_appr_flag := p0_a21;
931 ddp_prtnr_prfls_rec.partner_relationship_id := p0_a22;
932 ddp_prtnr_prfls_rec.partner_level := p0_a23;
933 ddp_prtnr_prfls_rec.preferred_vad_id := p0_a24;
934 ddp_prtnr_prfls_rec.partner_group_id := p0_a25;
935 ddp_prtnr_prfls_rec.partner_resource_id := p0_a26;
936 ddp_prtnr_prfls_rec.partner_group_number := p0_a27;
937 ddp_prtnr_prfls_rec.partner_resource_number := p0_a28;
938 ddp_prtnr_prfls_rec.sales_partner_flag := p0_a29;
939 ddp_prtnr_prfls_rec.indirectly_managed_flag := p0_a30;
940 ddp_prtnr_prfls_rec.channel_marketing_manager := p0_a31;
941 ddp_prtnr_prfls_rec.related_partner_id := p0_a32;
942 ddp_prtnr_prfls_rec.max_users := p0_a33;
943 ddp_prtnr_prfls_rec.partner_party_id := p0_a34;
944 ddp_prtnr_prfls_rec.status := p0_a35;
945
946
947 -- here's the delegated call to the old PL/SQL routine
948 pvx_prtnr_prfls_pvt.determine_partner_status(ddp_prtnr_prfls_rec,
949 x_partner_status);
950
951 -- copy data back from the local variables to OUT or IN-OUT args, if any
952
953 end;
954
955 end pvx_prtnr_prfls_pvt_w;