[Home] [Help]
PACKAGE BODY: APPS.LNS_PARTICIPANTS_PUB_W
Source
1 package body lns_participants_pub_w as
2 /* $Header: LNS_PART_PUBJ_B.pls 120.6 2011/08/22 10:38:46 gparuchu ship $ */
3 procedure validateparticipant(p0_a0 NUMBER
4 , p0_a1 NUMBER
5 , p0_a2 NUMBER
6 , p0_a3 VARCHAR2
7 , p0_a4 DATE
8 , p0_a5 DATE
9 , p0_a6 NUMBER
10 , p0_a7 NUMBER
11 , p0_a8 NUMBER
12 , p0_a9 VARCHAR2
13 , p0_a10 VARCHAR2
14 , p0_a11 VARCHAR2
15 , p0_a12 VARCHAR2
16 , p0_a13 VARCHAR2
17 , p0_a14 VARCHAR2
18 , p0_a15 VARCHAR2
19 , p0_a16 VARCHAR2
20 , p0_a17 VARCHAR2
21 , p0_a18 VARCHAR2
22 , p0_a19 VARCHAR2
23 , p0_a20 VARCHAR2
24 , p0_a21 VARCHAR2
25 , p0_a22 VARCHAR2
26 , p0_a23 VARCHAR2
27 , p0_a24 VARCHAR2
28 , p0_a25 VARCHAR2
29 , p0_a26 VARCHAR2
30 , p0_a27 VARCHAR2
31 , p0_a28 VARCHAR2
32 , p0_a29 VARCHAR2
33 , p0_a30 NUMBER
34 , p0_a31 NUMBER
35 , p0_a32 NUMBER
36 , p0_a33 NUMBER
37 , p0_a34 VARCHAR2
38 , p0_a35 VARCHAR2
39 , p0_a36 VARCHAR2
40 , p_mode VARCHAR2
41 , x_return_status out nocopy VARCHAR2
42 , x_msg_count out nocopy NUMBER
43 , x_msg_data out nocopy VARCHAR2
44 )
45
46 as
47 ddp_loan_participant_rec lns_participants_pub.loan_participant_rec_type;
48 ddindx binary_integer; indx binary_integer;
49 begin
50
51 -- copy data to the local IN or IN-OUT args, if any
52 ddp_loan_participant_rec.participant_id := p0_a0;
53 ddp_loan_participant_rec.loan_id := p0_a1;
54 ddp_loan_participant_rec.hz_party_id := p0_a2;
55 ddp_loan_participant_rec.loan_participant_type := p0_a3;
56 ddp_loan_participant_rec.start_date_active := p0_a4;
57 ddp_loan_participant_rec.end_date_active := p0_a5;
58 ddp_loan_participant_rec.cust_account_id := p0_a6;
59 ddp_loan_participant_rec.bill_to_acct_site_id := p0_a7;
60 ddp_loan_participant_rec.object_version_number := p0_a8;
61 ddp_loan_participant_rec.attribute_category := p0_a9;
62 ddp_loan_participant_rec.attribute1 := p0_a10;
63 ddp_loan_participant_rec.attribute2 := p0_a11;
64 ddp_loan_participant_rec.attribute3 := p0_a12;
65 ddp_loan_participant_rec.attribute4 := p0_a13;
66 ddp_loan_participant_rec.attribute5 := p0_a14;
67 ddp_loan_participant_rec.attribute6 := p0_a15;
68 ddp_loan_participant_rec.attribute7 := p0_a16;
69 ddp_loan_participant_rec.attribute8 := p0_a17;
70 ddp_loan_participant_rec.attribute9 := p0_a18;
71 ddp_loan_participant_rec.attribute10 := p0_a19;
72 ddp_loan_participant_rec.attribute11 := p0_a20;
73 ddp_loan_participant_rec.attribute12 := p0_a21;
74 ddp_loan_participant_rec.attribute13 := p0_a22;
75 ddp_loan_participant_rec.attribute14 := p0_a23;
76 ddp_loan_participant_rec.attribute15 := p0_a24;
77 ddp_loan_participant_rec.attribute16 := p0_a25;
78 ddp_loan_participant_rec.attribute17 := p0_a26;
79 ddp_loan_participant_rec.attribute18 := p0_a27;
80 ddp_loan_participant_rec.attribute19 := p0_a28;
81 ddp_loan_participant_rec.attribute20 := p0_a29;
82 ddp_loan_participant_rec.contact_rel_party_id := p0_a30;
83 ddp_loan_participant_rec.contact_pers_party_id := p0_a31;
84 ddp_loan_participant_rec.credit_request_id := p0_a32;
85 ddp_loan_participant_rec.case_folder_id := p0_a33;
86 ddp_loan_participant_rec.review_type := p0_a34;
87 ddp_loan_participant_rec.credit_classification := p0_a35;
88 ddp_loan_participant_rec.access_level := p0_a36;
89
90
91
92
93
94 -- here's the delegated call to the old PL/SQL routine
95 lns_participants_pub.validateparticipant(ddp_loan_participant_rec,
96 p_mode,
97 x_return_status,
98 x_msg_count,
99 x_msg_data);
100
101 -- copy data back from the local variables to OUT or IN-OUT args, if any
102
103
104
105
106 end;
107
108 procedure createparticipant(p_init_msg_list VARCHAR2
109 , p_validation_level NUMBER
110 , p2_a0 NUMBER
111 , p2_a1 NUMBER
112 , p2_a2 NUMBER
113 , p2_a3 VARCHAR2
114 , p2_a4 DATE
115 , p2_a5 DATE
116 , p2_a6 NUMBER
117 , p2_a7 NUMBER
118 , p2_a8 NUMBER
119 , p2_a9 VARCHAR2
120 , p2_a10 VARCHAR2
121 , p2_a11 VARCHAR2
122 , p2_a12 VARCHAR2
123 , p2_a13 VARCHAR2
124 , p2_a14 VARCHAR2
125 , p2_a15 VARCHAR2
126 , p2_a16 VARCHAR2
127 , p2_a17 VARCHAR2
128 , p2_a18 VARCHAR2
129 , p2_a19 VARCHAR2
130 , p2_a20 VARCHAR2
131 , p2_a21 VARCHAR2
132 , p2_a22 VARCHAR2
133 , p2_a23 VARCHAR2
134 , p2_a24 VARCHAR2
135 , p2_a25 VARCHAR2
136 , p2_a26 VARCHAR2
137 , p2_a27 VARCHAR2
138 , p2_a28 VARCHAR2
139 , p2_a29 VARCHAR2
140 , p2_a30 NUMBER
141 , p2_a31 NUMBER
142 , p2_a32 NUMBER
143 , p2_a33 NUMBER
144 , p2_a34 VARCHAR2
145 , p2_a35 VARCHAR2
146 , p2_a36 VARCHAR2
147 , x_participant_id out nocopy NUMBER
148 , x_return_status out nocopy VARCHAR2
149 , x_msg_count out nocopy NUMBER
150 , x_msg_data out nocopy VARCHAR2
151 )
152
153 as
154 ddp_loan_participant_rec lns_participants_pub.loan_participant_rec_type;
155 ddindx binary_integer; indx binary_integer;
156 begin
157
158 -- copy data to the local IN or IN-OUT args, if any
159
160
161 ddp_loan_participant_rec.participant_id := p2_a0;
162 ddp_loan_participant_rec.loan_id := p2_a1;
163 ddp_loan_participant_rec.hz_party_id := p2_a2;
164 ddp_loan_participant_rec.loan_participant_type := p2_a3;
165 ddp_loan_participant_rec.start_date_active := p2_a4;
166 ddp_loan_participant_rec.end_date_active := p2_a5;
167 ddp_loan_participant_rec.cust_account_id := p2_a6;
168 ddp_loan_participant_rec.bill_to_acct_site_id := p2_a7;
169 ddp_loan_participant_rec.object_version_number := p2_a8;
170 ddp_loan_participant_rec.attribute_category := p2_a9;
171 ddp_loan_participant_rec.attribute1 := p2_a10;
172 ddp_loan_participant_rec.attribute2 := p2_a11;
173 ddp_loan_participant_rec.attribute3 := p2_a12;
174 ddp_loan_participant_rec.attribute4 := p2_a13;
175 ddp_loan_participant_rec.attribute5 := p2_a14;
176 ddp_loan_participant_rec.attribute6 := p2_a15;
177 ddp_loan_participant_rec.attribute7 := p2_a16;
178 ddp_loan_participant_rec.attribute8 := p2_a17;
179 ddp_loan_participant_rec.attribute9 := p2_a18;
180 ddp_loan_participant_rec.attribute10 := p2_a19;
181 ddp_loan_participant_rec.attribute11 := p2_a20;
182 ddp_loan_participant_rec.attribute12 := p2_a21;
183 ddp_loan_participant_rec.attribute13 := p2_a22;
184 ddp_loan_participant_rec.attribute14 := p2_a23;
185 ddp_loan_participant_rec.attribute15 := p2_a24;
186 ddp_loan_participant_rec.attribute16 := p2_a25;
187 ddp_loan_participant_rec.attribute17 := p2_a26;
188 ddp_loan_participant_rec.attribute18 := p2_a27;
189 ddp_loan_participant_rec.attribute19 := p2_a28;
190 ddp_loan_participant_rec.attribute20 := p2_a29;
191 ddp_loan_participant_rec.contact_rel_party_id := p2_a30;
192 ddp_loan_participant_rec.contact_pers_party_id := p2_a31;
193 ddp_loan_participant_rec.credit_request_id := p2_a32;
194 ddp_loan_participant_rec.case_folder_id := p2_a33;
195 ddp_loan_participant_rec.review_type := p2_a34;
196 ddp_loan_participant_rec.credit_classification := p2_a35;
197 ddp_loan_participant_rec.access_level := p2_a36;
198
199
200
201
202
203 -- here's the delegated call to the old PL/SQL routine
204 lns_participants_pub.createparticipant(p_init_msg_list,
205 p_validation_level,
206 ddp_loan_participant_rec,
207 x_participant_id,
208 x_return_status,
209 x_msg_count,
210 x_msg_data);
211
212 -- copy data back from the local variables to OUT or IN-OUT args, if any
213
214
215
216
217
218
219 end;
220
221 procedure updateparticipant(p_init_msg_list VARCHAR2
222 , p_validation_level NUMBER
223 , p2_a0 NUMBER
224 , p2_a1 NUMBER
225 , p2_a2 NUMBER
226 , p2_a3 VARCHAR2
227 , p2_a4 DATE
228 , p2_a5 DATE
229 , p2_a6 NUMBER
230 , p2_a7 NUMBER
231 , p2_a8 NUMBER
232 , p2_a9 VARCHAR2
233 , p2_a10 VARCHAR2
234 , p2_a11 VARCHAR2
235 , p2_a12 VARCHAR2
236 , p2_a13 VARCHAR2
237 , p2_a14 VARCHAR2
238 , p2_a15 VARCHAR2
239 , p2_a16 VARCHAR2
240 , p2_a17 VARCHAR2
241 , p2_a18 VARCHAR2
242 , p2_a19 VARCHAR2
243 , p2_a20 VARCHAR2
244 , p2_a21 VARCHAR2
245 , p2_a22 VARCHAR2
246 , p2_a23 VARCHAR2
247 , p2_a24 VARCHAR2
248 , p2_a25 VARCHAR2
249 , p2_a26 VARCHAR2
250 , p2_a27 VARCHAR2
251 , p2_a28 VARCHAR2
252 , p2_a29 VARCHAR2
253 , p2_a30 NUMBER
254 , p2_a31 NUMBER
255 , p2_a32 NUMBER
256 , p2_a33 NUMBER
257 , p2_a34 VARCHAR2
258 , p2_a35 VARCHAR2
259 , p2_a36 VARCHAR2
260 , x_object_version_number in out nocopy NUMBER
261 , x_return_status out nocopy VARCHAR2
262 , x_msg_count out nocopy NUMBER
263 , x_msg_data out nocopy VARCHAR2
264 )
265
266 as
267 ddp_loan_participant_rec lns_participants_pub.loan_participant_rec_type;
268 ddindx binary_integer; indx binary_integer;
269 begin
270
271 -- copy data to the local IN or IN-OUT args, if any
272
273
274 ddp_loan_participant_rec.participant_id := p2_a0;
275 ddp_loan_participant_rec.loan_id := p2_a1;
276 ddp_loan_participant_rec.hz_party_id := p2_a2;
277 ddp_loan_participant_rec.loan_participant_type := p2_a3;
278 ddp_loan_participant_rec.start_date_active := p2_a4;
279 ddp_loan_participant_rec.end_date_active := p2_a5;
280 ddp_loan_participant_rec.cust_account_id := p2_a6;
281 ddp_loan_participant_rec.bill_to_acct_site_id := p2_a7;
282 ddp_loan_participant_rec.object_version_number := p2_a8;
283 ddp_loan_participant_rec.attribute_category := p2_a9;
284 ddp_loan_participant_rec.attribute1 := p2_a10;
285 ddp_loan_participant_rec.attribute2 := p2_a11;
286 ddp_loan_participant_rec.attribute3 := p2_a12;
287 ddp_loan_participant_rec.attribute4 := p2_a13;
288 ddp_loan_participant_rec.attribute5 := p2_a14;
289 ddp_loan_participant_rec.attribute6 := p2_a15;
290 ddp_loan_participant_rec.attribute7 := p2_a16;
291 ddp_loan_participant_rec.attribute8 := p2_a17;
292 ddp_loan_participant_rec.attribute9 := p2_a18;
293 ddp_loan_participant_rec.attribute10 := p2_a19;
294 ddp_loan_participant_rec.attribute11 := p2_a20;
295 ddp_loan_participant_rec.attribute12 := p2_a21;
296 ddp_loan_participant_rec.attribute13 := p2_a22;
297 ddp_loan_participant_rec.attribute14 := p2_a23;
298 ddp_loan_participant_rec.attribute15 := p2_a24;
299 ddp_loan_participant_rec.attribute16 := p2_a25;
300 ddp_loan_participant_rec.attribute17 := p2_a26;
301 ddp_loan_participant_rec.attribute18 := p2_a27;
302 ddp_loan_participant_rec.attribute19 := p2_a28;
303 ddp_loan_participant_rec.attribute20 := p2_a29;
304 ddp_loan_participant_rec.contact_rel_party_id := p2_a30;
305 ddp_loan_participant_rec.contact_pers_party_id := p2_a31;
306 ddp_loan_participant_rec.credit_request_id := p2_a32;
307 ddp_loan_participant_rec.case_folder_id := p2_a33;
308 ddp_loan_participant_rec.review_type := p2_a34;
309 ddp_loan_participant_rec.credit_classification := p2_a35;
310 ddp_loan_participant_rec.access_level := p2_a36;
311
312
313
314
315
316 -- here's the delegated call to the old PL/SQL routine
317 lns_participants_pub.updateparticipant(p_init_msg_list,
318 p_validation_level,
319 ddp_loan_participant_rec,
320 x_object_version_number,
321 x_return_status,
322 x_msg_count,
323 x_msg_data);
324
325 -- copy data back from the local variables to OUT or IN-OUT args, if any
326
327
328
329
330
331
332 end;
333
334 end lns_participants_pub_w;