DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_DEAL_PARTIES_PVT_W

Source


1 package body okl_deal_parties_pvt_w as
2   /* $Header: OKLEDPRB.pls 120.0 2007/07/03 09:03:28 rviriyal noship $ */
3   procedure process_label_holder(p_api_version  NUMBER
4     , p_init_msg_list  VARCHAR2
5     , x_return_status out nocopy  VARCHAR2
6     , x_msg_count out nocopy  NUMBER
7     , x_msg_data out nocopy  VARCHAR2
8     , p5_a0  NUMBER
9     , p5_a1  NUMBER
10     , p5_a2  VARCHAR2
11     , p5_a3  NUMBER
12     , p5_a4  VARCHAR2
13     , p5_a5  VARCHAR2
14     , p5_a6  NUMBER
15     , p5_a7  NUMBER
16     , p5_a8  NUMBER
17     , p5_a9  NUMBER
18     , p5_a10  NUMBER
19     , p5_a11  NUMBER
20     , p5_a12  NUMBER
21     , p5_a13  VARCHAR2
22     , p5_a14  VARCHAR2
23     , p5_a15  VARCHAR2
24     , p5_a16  VARCHAR2
25     , p5_a17  VARCHAR2
26     , p5_a18  VARCHAR2
27     , p5_a19  VARCHAR2
28     , p5_a20  VARCHAR2
29     , p5_a21  VARCHAR2
30     , p5_a22  VARCHAR2
31     , p5_a23  VARCHAR2
32     , p5_a24  VARCHAR2
33     , p5_a25  VARCHAR2
34     , p5_a26  VARCHAR2
35     , p5_a27  VARCHAR2
36     , p5_a28  VARCHAR2
37     , p5_a29  VARCHAR2
38     , p5_a30  VARCHAR2
39     , p5_a31  VARCHAR2
40     , p5_a32  VARCHAR2
41     , p5_a33  VARCHAR2
42     , p5_a34  VARCHAR2
43     , p5_a35  VARCHAR2
44     , p5_a36  VARCHAR2
45     , p5_a37  VARCHAR2
46     , p5_a38  VARCHAR2
47     , p6_a0 out nocopy  NUMBER
48     , p6_a1 out nocopy  NUMBER
49     , p6_a2 out nocopy  VARCHAR2
50     , p6_a3 out nocopy  NUMBER
51     , p6_a4 out nocopy  VARCHAR2
52     , p6_a5 out nocopy  VARCHAR2
53     , p6_a6 out nocopy  NUMBER
54     , p6_a7 out nocopy  NUMBER
55     , p6_a8 out nocopy  NUMBER
56     , p6_a9 out nocopy  NUMBER
57     , p6_a10 out nocopy  NUMBER
58     , p6_a11 out nocopy  NUMBER
59     , p6_a12 out nocopy  NUMBER
60     , p6_a13 out nocopy  VARCHAR2
61     , p6_a14 out nocopy  VARCHAR2
62     , p6_a15 out nocopy  VARCHAR2
63     , p6_a16 out nocopy  VARCHAR2
64     , p6_a17 out nocopy  VARCHAR2
65     , p6_a18 out nocopy  VARCHAR2
66     , p6_a19 out nocopy  VARCHAR2
67     , p6_a20 out nocopy  VARCHAR2
68     , p6_a21 out nocopy  VARCHAR2
69     , p6_a22 out nocopy  VARCHAR2
70     , p6_a23 out nocopy  VARCHAR2
71     , p6_a24 out nocopy  VARCHAR2
72     , p6_a25 out nocopy  VARCHAR2
73     , p6_a26 out nocopy  VARCHAR2
74     , p6_a27 out nocopy  VARCHAR2
75     , p6_a28 out nocopy  VARCHAR2
76     , p6_a29 out nocopy  VARCHAR2
77     , p6_a30 out nocopy  VARCHAR2
78     , p6_a31 out nocopy  VARCHAR2
79     , p6_a32 out nocopy  VARCHAR2
80     , p6_a33 out nocopy  VARCHAR2
81     , p6_a34 out nocopy  VARCHAR2
82     , p6_a35 out nocopy  VARCHAR2
83     , p6_a36 out nocopy  VARCHAR2
84     , p6_a37 out nocopy  VARCHAR2
85     , p6_a38 out nocopy  VARCHAR2
86   )
87 
88   as
89     ddp_rgpv_rec okl_deal_parties_pvt.party_role_rec_type;
90     ddx_rgpv_rec okl_deal_parties_pvt.party_role_rec_type;
91     ddindx binary_integer; indx binary_integer;
92   begin
93 
94     -- copy data to the local IN or IN-OUT args, if any
95 
96 
97 
98 
99 
100     ddp_rgpv_rec.chr_id := p5_a0;
101     ddp_rgpv_rec.party_role_id := p5_a1;
102     ddp_rgpv_rec.party_role := p5_a2;
103     ddp_rgpv_rec.party_id := p5_a3;
104     ddp_rgpv_rec.party_name := p5_a4;
105     ddp_rgpv_rec.party_site_number := p5_a5;
106     ddp_rgpv_rec.rgp_id := p5_a6;
107     ddp_rgpv_rec.rgp_lalabl_lalogo_id := p5_a7;
111     ddp_rgpv_rec.rul_lagrnp_id := p5_a11;
108     ddp_rgpv_rec.rgp_lagrdt_lagrnp_id := p5_a8;
109     ddp_rgpv_rec.rgp_lagrdt_lagrnt_id := p5_a9;
110     ddp_rgpv_rec.rul_lalogo_id := p5_a10;
112     ddp_rgpv_rec.rul_lagrnt_id := p5_a12;
113     ddp_rgpv_rec.lalogo_rule_information1 := p5_a13;
114     ddp_rgpv_rec.rul_lagrnp_object1_id1 := p5_a14;
115     ddp_rgpv_rec.rul_lagrnp_object1_id2 := p5_a15;
116     ddp_rgpv_rec.lagrnp_rule_info_cat := p5_a16;
117     ddp_rgpv_rec.lagrnp_rule_information1 := p5_a17;
118     ddp_rgpv_rec.lagrnt_rule_info_cat := p5_a18;
119     ddp_rgpv_rec.lagrnt_rule_information1 := p5_a19;
120     ddp_rgpv_rec.lagrnt_rule_information2 := p5_a20;
121     ddp_rgpv_rec.lagrnt_rule_information3 := p5_a21;
122     ddp_rgpv_rec.lagrnt_rule_information4 := p5_a22;
123     ddp_rgpv_rec.attribute_category := p5_a23;
124     ddp_rgpv_rec.attribute1 := p5_a24;
125     ddp_rgpv_rec.attribute2 := p5_a25;
126     ddp_rgpv_rec.attribute3 := p5_a26;
127     ddp_rgpv_rec.attribute4 := p5_a27;
128     ddp_rgpv_rec.attribute5 := p5_a28;
129     ddp_rgpv_rec.attribute6 := p5_a29;
130     ddp_rgpv_rec.attribute7 := p5_a30;
131     ddp_rgpv_rec.attribute8 := p5_a31;
132     ddp_rgpv_rec.attribute9 := p5_a32;
133     ddp_rgpv_rec.attribute10 := p5_a33;
134     ddp_rgpv_rec.attribute11 := p5_a34;
135     ddp_rgpv_rec.attribute12 := p5_a35;
136     ddp_rgpv_rec.attribute13 := p5_a36;
137     ddp_rgpv_rec.attribute14 := p5_a37;
138     ddp_rgpv_rec.attribute15 := p5_a38;
139 
140 
141     -- here's the delegated call to the old PL/SQL routine
142     okl_deal_parties_pvt.process_label_holder(p_api_version,
143       p_init_msg_list,
144       x_return_status,
145       x_msg_count,
146       x_msg_data,
147       ddp_rgpv_rec,
148       ddx_rgpv_rec);
149 
150     -- copy data back from the local variables to OUT or IN-OUT args, if any
151 
152 
153 
154 
155 
156 
157     p6_a0 := ddx_rgpv_rec.chr_id;
158     p6_a1 := ddx_rgpv_rec.party_role_id;
159     p6_a2 := ddx_rgpv_rec.party_role;
160     p6_a3 := ddx_rgpv_rec.party_id;
161     p6_a4 := ddx_rgpv_rec.party_name;
162     p6_a5 := ddx_rgpv_rec.party_site_number;
163     p6_a6 := ddx_rgpv_rec.rgp_id;
164     p6_a7 := ddx_rgpv_rec.rgp_lalabl_lalogo_id;
165     p6_a8 := ddx_rgpv_rec.rgp_lagrdt_lagrnp_id;
166     p6_a9 := ddx_rgpv_rec.rgp_lagrdt_lagrnt_id;
167     p6_a10 := ddx_rgpv_rec.rul_lalogo_id;
168     p6_a11 := ddx_rgpv_rec.rul_lagrnp_id;
169     p6_a12 := ddx_rgpv_rec.rul_lagrnt_id;
170     p6_a13 := ddx_rgpv_rec.lalogo_rule_information1;
171     p6_a14 := ddx_rgpv_rec.rul_lagrnp_object1_id1;
172     p6_a15 := ddx_rgpv_rec.rul_lagrnp_object1_id2;
173     p6_a16 := ddx_rgpv_rec.lagrnp_rule_info_cat;
174     p6_a17 := ddx_rgpv_rec.lagrnp_rule_information1;
175     p6_a18 := ddx_rgpv_rec.lagrnt_rule_info_cat;
176     p6_a19 := ddx_rgpv_rec.lagrnt_rule_information1;
177     p6_a20 := ddx_rgpv_rec.lagrnt_rule_information2;
178     p6_a21 := ddx_rgpv_rec.lagrnt_rule_information3;
179     p6_a22 := ddx_rgpv_rec.lagrnt_rule_information4;
180     p6_a23 := ddx_rgpv_rec.attribute_category;
181     p6_a24 := ddx_rgpv_rec.attribute1;
182     p6_a25 := ddx_rgpv_rec.attribute2;
183     p6_a26 := ddx_rgpv_rec.attribute3;
184     p6_a27 := ddx_rgpv_rec.attribute4;
185     p6_a28 := ddx_rgpv_rec.attribute5;
186     p6_a29 := ddx_rgpv_rec.attribute6;
187     p6_a30 := ddx_rgpv_rec.attribute7;
188     p6_a31 := ddx_rgpv_rec.attribute8;
189     p6_a32 := ddx_rgpv_rec.attribute9;
190     p6_a33 := ddx_rgpv_rec.attribute10;
191     p6_a34 := ddx_rgpv_rec.attribute11;
192     p6_a35 := ddx_rgpv_rec.attribute12;
193     p6_a36 := ddx_rgpv_rec.attribute13;
194     p6_a37 := ddx_rgpv_rec.attribute14;
195     p6_a38 := ddx_rgpv_rec.attribute15;
196   end;
197 
198   procedure load_guarantor(p_api_version  NUMBER
199     , p_init_msg_list  VARCHAR2
200     , x_return_status out nocopy  VARCHAR2
201     , x_msg_count out nocopy  NUMBER
202     , x_msg_data out nocopy  VARCHAR2
203     , p_chr_id  NUMBER
204     , p_party_id  NUMBER
205     , p7_a0 out nocopy  NUMBER
206     , p7_a1 out nocopy  NUMBER
207     , p7_a2 out nocopy  VARCHAR2
208     , p7_a3 out nocopy  NUMBER
209     , p7_a4 out nocopy  VARCHAR2
210     , p7_a5 out nocopy  VARCHAR2
211     , p7_a6 out nocopy  NUMBER
212     , p7_a7 out nocopy  NUMBER
213     , p7_a8 out nocopy  NUMBER
214     , p7_a9 out nocopy  NUMBER
215     , p7_a10 out nocopy  NUMBER
216     , p7_a11 out nocopy  NUMBER
217     , p7_a12 out nocopy  NUMBER
218     , p7_a13 out nocopy  VARCHAR2
219     , p7_a14 out nocopy  VARCHAR2
220     , p7_a15 out nocopy  VARCHAR2
221     , p7_a16 out nocopy  VARCHAR2
222     , p7_a17 out nocopy  VARCHAR2
223     , p7_a18 out nocopy  VARCHAR2
224     , p7_a19 out nocopy  VARCHAR2
225     , p7_a20 out nocopy  VARCHAR2
226     , p7_a21 out nocopy  VARCHAR2
227     , p7_a22 out nocopy  VARCHAR2
228     , p7_a23 out nocopy  VARCHAR2
229     , p7_a24 out nocopy  VARCHAR2
230     , p7_a25 out nocopy  VARCHAR2
231     , p7_a26 out nocopy  VARCHAR2
232     , p7_a27 out nocopy  VARCHAR2
233     , p7_a28 out nocopy  VARCHAR2
234     , p7_a29 out nocopy  VARCHAR2
235     , p7_a30 out nocopy  VARCHAR2
236     , p7_a31 out nocopy  VARCHAR2
237     , p7_a32 out nocopy  VARCHAR2
238     , p7_a33 out nocopy  VARCHAR2
239     , p7_a34 out nocopy  VARCHAR2
240     , p7_a35 out nocopy  VARCHAR2
241     , p7_a36 out nocopy  VARCHAR2
242     , p7_a37 out nocopy  VARCHAR2
243     , p7_a38 out nocopy  VARCHAR2
244   )
245 
246   as
247     ddx_party_role_rec okl_deal_parties_pvt.party_role_rec_type;
248     ddindx binary_integer; indx binary_integer;
249   begin
250 
254 
251     -- copy data to the local IN or IN-OUT args, if any
252 
253 
255 
256 
257 
258 
259 
260     -- here's the delegated call to the old PL/SQL routine
261     okl_deal_parties_pvt.load_guarantor(p_api_version,
262       p_init_msg_list,
263       x_return_status,
264       x_msg_count,
265       x_msg_data,
266       p_chr_id,
267       p_party_id,
268       ddx_party_role_rec);
269 
270     -- copy data back from the local variables to OUT or IN-OUT args, if any
271 
272 
273 
274 
275 
276 
277 
278     p7_a0 := ddx_party_role_rec.chr_id;
279     p7_a1 := ddx_party_role_rec.party_role_id;
280     p7_a2 := ddx_party_role_rec.party_role;
281     p7_a3 := ddx_party_role_rec.party_id;
282     p7_a4 := ddx_party_role_rec.party_name;
283     p7_a5 := ddx_party_role_rec.party_site_number;
284     p7_a6 := ddx_party_role_rec.rgp_id;
285     p7_a7 := ddx_party_role_rec.rgp_lalabl_lalogo_id;
286     p7_a8 := ddx_party_role_rec.rgp_lagrdt_lagrnp_id;
287     p7_a9 := ddx_party_role_rec.rgp_lagrdt_lagrnt_id;
288     p7_a10 := ddx_party_role_rec.rul_lalogo_id;
289     p7_a11 := ddx_party_role_rec.rul_lagrnp_id;
290     p7_a12 := ddx_party_role_rec.rul_lagrnt_id;
291     p7_a13 := ddx_party_role_rec.lalogo_rule_information1;
292     p7_a14 := ddx_party_role_rec.rul_lagrnp_object1_id1;
293     p7_a15 := ddx_party_role_rec.rul_lagrnp_object1_id2;
294     p7_a16 := ddx_party_role_rec.lagrnp_rule_info_cat;
295     p7_a17 := ddx_party_role_rec.lagrnp_rule_information1;
296     p7_a18 := ddx_party_role_rec.lagrnt_rule_info_cat;
297     p7_a19 := ddx_party_role_rec.lagrnt_rule_information1;
298     p7_a20 := ddx_party_role_rec.lagrnt_rule_information2;
299     p7_a21 := ddx_party_role_rec.lagrnt_rule_information3;
300     p7_a22 := ddx_party_role_rec.lagrnt_rule_information4;
301     p7_a23 := ddx_party_role_rec.attribute_category;
302     p7_a24 := ddx_party_role_rec.attribute1;
303     p7_a25 := ddx_party_role_rec.attribute2;
304     p7_a26 := ddx_party_role_rec.attribute3;
305     p7_a27 := ddx_party_role_rec.attribute4;
306     p7_a28 := ddx_party_role_rec.attribute5;
307     p7_a29 := ddx_party_role_rec.attribute6;
308     p7_a30 := ddx_party_role_rec.attribute7;
309     p7_a31 := ddx_party_role_rec.attribute8;
310     p7_a32 := ddx_party_role_rec.attribute9;
311     p7_a33 := ddx_party_role_rec.attribute10;
312     p7_a34 := ddx_party_role_rec.attribute11;
313     p7_a35 := ddx_party_role_rec.attribute12;
314     p7_a36 := ddx_party_role_rec.attribute13;
315     p7_a37 := ddx_party_role_rec.attribute14;
316     p7_a38 := ddx_party_role_rec.attribute15;
317   end;
318 
319   procedure process_guarantor(p_api_version  NUMBER
320     , p_init_msg_list  VARCHAR2
321     , x_return_status out nocopy  VARCHAR2
322     , x_msg_count out nocopy  NUMBER
323     , x_msg_data out nocopy  VARCHAR2
324     , p5_a0  NUMBER
325     , p5_a1  NUMBER
326     , p5_a2  VARCHAR2
327     , p5_a3  NUMBER
328     , p5_a4  VARCHAR2
329     , p5_a5  VARCHAR2
330     , p5_a6  NUMBER
331     , p5_a7  NUMBER
332     , p5_a8  NUMBER
333     , p5_a9  NUMBER
334     , p5_a10  NUMBER
335     , p5_a11  NUMBER
336     , p5_a12  NUMBER
337     , p5_a13  VARCHAR2
338     , p5_a14  VARCHAR2
339     , p5_a15  VARCHAR2
340     , p5_a16  VARCHAR2
341     , p5_a17  VARCHAR2
342     , p5_a18  VARCHAR2
343     , p5_a19  VARCHAR2
344     , p5_a20  VARCHAR2
345     , p5_a21  VARCHAR2
346     , p5_a22  VARCHAR2
347     , p5_a23  VARCHAR2
348     , p5_a24  VARCHAR2
349     , p5_a25  VARCHAR2
350     , p5_a26  VARCHAR2
351     , p5_a27  VARCHAR2
352     , p5_a28  VARCHAR2
353     , p5_a29  VARCHAR2
354     , p5_a30  VARCHAR2
355     , p5_a31  VARCHAR2
356     , p5_a32  VARCHAR2
357     , p5_a33  VARCHAR2
358     , p5_a34  VARCHAR2
359     , p5_a35  VARCHAR2
360     , p5_a36  VARCHAR2
361     , p5_a37  VARCHAR2
362     , p5_a38  VARCHAR2
363     , p6_a0 out nocopy  NUMBER
364     , p6_a1 out nocopy  NUMBER
365     , p6_a2 out nocopy  VARCHAR2
366     , p6_a3 out nocopy  NUMBER
367     , p6_a4 out nocopy  VARCHAR2
368     , p6_a5 out nocopy  VARCHAR2
369     , p6_a6 out nocopy  NUMBER
370     , p6_a7 out nocopy  NUMBER
371     , p6_a8 out nocopy  NUMBER
372     , p6_a9 out nocopy  NUMBER
373     , p6_a10 out nocopy  NUMBER
374     , p6_a11 out nocopy  NUMBER
375     , p6_a12 out nocopy  NUMBER
376     , p6_a13 out nocopy  VARCHAR2
377     , p6_a14 out nocopy  VARCHAR2
378     , p6_a15 out nocopy  VARCHAR2
379     , p6_a16 out nocopy  VARCHAR2
380     , p6_a17 out nocopy  VARCHAR2
381     , p6_a18 out nocopy  VARCHAR2
382     , p6_a19 out nocopy  VARCHAR2
383     , p6_a20 out nocopy  VARCHAR2
384     , p6_a21 out nocopy  VARCHAR2
385     , p6_a22 out nocopy  VARCHAR2
386     , p6_a23 out nocopy  VARCHAR2
387     , p6_a24 out nocopy  VARCHAR2
388     , p6_a25 out nocopy  VARCHAR2
389     , p6_a26 out nocopy  VARCHAR2
390     , p6_a27 out nocopy  VARCHAR2
391     , p6_a28 out nocopy  VARCHAR2
392     , p6_a29 out nocopy  VARCHAR2
393     , p6_a30 out nocopy  VARCHAR2
394     , p6_a31 out nocopy  VARCHAR2
395     , p6_a32 out nocopy  VARCHAR2
396     , p6_a33 out nocopy  VARCHAR2
397     , p6_a34 out nocopy  VARCHAR2
398     , p6_a35 out nocopy  VARCHAR2
399     , p6_a36 out nocopy  VARCHAR2
400     , p6_a37 out nocopy  VARCHAR2
401     , p6_a38 out nocopy  VARCHAR2
402   )
403 
404   as
405     ddp_rgpv_rec okl_deal_parties_pvt.party_role_rec_type;
406     ddx_rgpv_rec okl_deal_parties_pvt.party_role_rec_type;
407     ddindx binary_integer; indx binary_integer;
408   begin
409 
410     -- copy data to the local IN or IN-OUT args, if any
411 
412 
413 
414 
415 
416     ddp_rgpv_rec.chr_id := p5_a0;
417     ddp_rgpv_rec.party_role_id := p5_a1;
418     ddp_rgpv_rec.party_role := p5_a2;
419     ddp_rgpv_rec.party_id := p5_a3;
420     ddp_rgpv_rec.party_name := p5_a4;
421     ddp_rgpv_rec.party_site_number := p5_a5;
422     ddp_rgpv_rec.rgp_id := p5_a6;
423     ddp_rgpv_rec.rgp_lalabl_lalogo_id := p5_a7;
424     ddp_rgpv_rec.rgp_lagrdt_lagrnp_id := p5_a8;
425     ddp_rgpv_rec.rgp_lagrdt_lagrnt_id := p5_a9;
426     ddp_rgpv_rec.rul_lalogo_id := p5_a10;
427     ddp_rgpv_rec.rul_lagrnp_id := p5_a11;
428     ddp_rgpv_rec.rul_lagrnt_id := p5_a12;
429     ddp_rgpv_rec.lalogo_rule_information1 := p5_a13;
430     ddp_rgpv_rec.rul_lagrnp_object1_id1 := p5_a14;
431     ddp_rgpv_rec.rul_lagrnp_object1_id2 := p5_a15;
432     ddp_rgpv_rec.lagrnp_rule_info_cat := p5_a16;
433     ddp_rgpv_rec.lagrnp_rule_information1 := p5_a17;
434     ddp_rgpv_rec.lagrnt_rule_info_cat := p5_a18;
435     ddp_rgpv_rec.lagrnt_rule_information1 := p5_a19;
436     ddp_rgpv_rec.lagrnt_rule_information2 := p5_a20;
437     ddp_rgpv_rec.lagrnt_rule_information3 := p5_a21;
438     ddp_rgpv_rec.lagrnt_rule_information4 := p5_a22;
439     ddp_rgpv_rec.attribute_category := p5_a23;
440     ddp_rgpv_rec.attribute1 := p5_a24;
441     ddp_rgpv_rec.attribute2 := p5_a25;
442     ddp_rgpv_rec.attribute3 := p5_a26;
443     ddp_rgpv_rec.attribute4 := p5_a27;
444     ddp_rgpv_rec.attribute5 := p5_a28;
445     ddp_rgpv_rec.attribute6 := p5_a29;
446     ddp_rgpv_rec.attribute7 := p5_a30;
447     ddp_rgpv_rec.attribute8 := p5_a31;
448     ddp_rgpv_rec.attribute9 := p5_a32;
449     ddp_rgpv_rec.attribute10 := p5_a33;
450     ddp_rgpv_rec.attribute11 := p5_a34;
451     ddp_rgpv_rec.attribute12 := p5_a35;
452     ddp_rgpv_rec.attribute13 := p5_a36;
453     ddp_rgpv_rec.attribute14 := p5_a37;
454     ddp_rgpv_rec.attribute15 := p5_a38;
455 
456 
457     -- here's the delegated call to the old PL/SQL routine
458     okl_deal_parties_pvt.process_guarantor(p_api_version,
459       p_init_msg_list,
460       x_return_status,
461       x_msg_count,
462       x_msg_data,
463       ddp_rgpv_rec,
464       ddx_rgpv_rec);
465 
466     -- copy data back from the local variables to OUT or IN-OUT args, if any
467 
468 
469 
470 
471 
472 
473     p6_a0 := ddx_rgpv_rec.chr_id;
474     p6_a1 := ddx_rgpv_rec.party_role_id;
475     p6_a2 := ddx_rgpv_rec.party_role;
476     p6_a3 := ddx_rgpv_rec.party_id;
477     p6_a4 := ddx_rgpv_rec.party_name;
478     p6_a5 := ddx_rgpv_rec.party_site_number;
479     p6_a6 := ddx_rgpv_rec.rgp_id;
480     p6_a7 := ddx_rgpv_rec.rgp_lalabl_lalogo_id;
481     p6_a8 := ddx_rgpv_rec.rgp_lagrdt_lagrnp_id;
482     p6_a9 := ddx_rgpv_rec.rgp_lagrdt_lagrnt_id;
483     p6_a10 := ddx_rgpv_rec.rul_lalogo_id;
484     p6_a11 := ddx_rgpv_rec.rul_lagrnp_id;
485     p6_a12 := ddx_rgpv_rec.rul_lagrnt_id;
486     p6_a13 := ddx_rgpv_rec.lalogo_rule_information1;
487     p6_a14 := ddx_rgpv_rec.rul_lagrnp_object1_id1;
488     p6_a15 := ddx_rgpv_rec.rul_lagrnp_object1_id2;
489     p6_a16 := ddx_rgpv_rec.lagrnp_rule_info_cat;
490     p6_a17 := ddx_rgpv_rec.lagrnp_rule_information1;
491     p6_a18 := ddx_rgpv_rec.lagrnt_rule_info_cat;
492     p6_a19 := ddx_rgpv_rec.lagrnt_rule_information1;
493     p6_a20 := ddx_rgpv_rec.lagrnt_rule_information2;
494     p6_a21 := ddx_rgpv_rec.lagrnt_rule_information3;
495     p6_a22 := ddx_rgpv_rec.lagrnt_rule_information4;
496     p6_a23 := ddx_rgpv_rec.attribute_category;
497     p6_a24 := ddx_rgpv_rec.attribute1;
498     p6_a25 := ddx_rgpv_rec.attribute2;
499     p6_a26 := ddx_rgpv_rec.attribute3;
500     p6_a27 := ddx_rgpv_rec.attribute4;
501     p6_a28 := ddx_rgpv_rec.attribute5;
502     p6_a29 := ddx_rgpv_rec.attribute6;
503     p6_a30 := ddx_rgpv_rec.attribute7;
504     p6_a31 := ddx_rgpv_rec.attribute8;
505     p6_a32 := ddx_rgpv_rec.attribute9;
506     p6_a33 := ddx_rgpv_rec.attribute10;
507     p6_a34 := ddx_rgpv_rec.attribute11;
508     p6_a35 := ddx_rgpv_rec.attribute12;
509     p6_a36 := ddx_rgpv_rec.attribute13;
510     p6_a37 := ddx_rgpv_rec.attribute14;
511     p6_a38 := ddx_rgpv_rec.attribute15;
512   end;
513 
514 end okl_deal_parties_pvt_w;