[Home] [Help]
PACKAGE BODY: APPS.OZF_SUPP_TRADE_PROFILE_PVT_W
Source
1 package body ozf_supp_trade_profile_pvt_w as
2 /* $Header: ozfwstpb.pls 120.0.12010000.3 2008/10/10 09:37:45 kdass 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 rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6 rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7
8 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9 function rosetta_g_miss_date_in_map(d date) return date as
10 begin
11 if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12 if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13 return d;
14 end;
15
16 procedure rosetta_table_copy_in_p3(t out nocopy ozf_supp_trade_profile_pvt.supp_trade_profile_tbl_type, a0 JTF_NUMBER_TABLE
17 , a1 JTF_NUMBER_TABLE
18 , a2 JTF_DATE_TABLE
19 , a3 JTF_NUMBER_TABLE
20 , a4 JTF_DATE_TABLE
21 , a5 JTF_NUMBER_TABLE
22 , a6 JTF_NUMBER_TABLE
23 , a7 JTF_NUMBER_TABLE
24 , a8 JTF_NUMBER_TABLE
25 , a9 JTF_DATE_TABLE
26 , a10 JTF_NUMBER_TABLE
27 , a11 JTF_VARCHAR2_TABLE_100
28 , a12 JTF_NUMBER_TABLE
29 , a13 JTF_NUMBER_TABLE
30 , a14 JTF_NUMBER_TABLE
31 , a15 JTF_NUMBER_TABLE
32 , a16 JTF_NUMBER_TABLE
33 , a17 JTF_NUMBER_TABLE
34 , a18 JTF_VARCHAR2_TABLE_100
35 , a19 JTF_VARCHAR2_TABLE_100
36 , a20 JTF_NUMBER_TABLE
37 , a21 JTF_NUMBER_TABLE
38 , a22 JTF_NUMBER_TABLE
39 , a23 JTF_VARCHAR2_TABLE_100
40 , a24 JTF_NUMBER_TABLE
41 , a25 JTF_NUMBER_TABLE
42 , a26 JTF_VARCHAR2_TABLE_100
43 , a27 JTF_NUMBER_TABLE
44 , a28 JTF_VARCHAR2_TABLE_100
45 , a29 JTF_VARCHAR2_TABLE_100
46 , a30 JTF_NUMBER_TABLE
47 , a31 JTF_VARCHAR2_TABLE_100
48 , a32 JTF_NUMBER_TABLE
49 , a33 JTF_VARCHAR2_TABLE_100
50 , a34 JTF_VARCHAR2_TABLE_200
51 , a35 JTF_VARCHAR2_TABLE_200
52 , a36 JTF_VARCHAR2_TABLE_200
53 , a37 JTF_VARCHAR2_TABLE_200
54 , a38 JTF_VARCHAR2_TABLE_200
55 , a39 JTF_VARCHAR2_TABLE_200
56 , a40 JTF_VARCHAR2_TABLE_200
57 , a41 JTF_VARCHAR2_TABLE_200
58 , a42 JTF_VARCHAR2_TABLE_200
59 , a43 JTF_VARCHAR2_TABLE_200
60 , a44 JTF_VARCHAR2_TABLE_200
61 , a45 JTF_VARCHAR2_TABLE_200
62 , a46 JTF_VARCHAR2_TABLE_200
63 , a47 JTF_VARCHAR2_TABLE_200
64 , a48 JTF_VARCHAR2_TABLE_200
65 , a49 JTF_VARCHAR2_TABLE_200
66 , a50 JTF_VARCHAR2_TABLE_200
67 , a51 JTF_VARCHAR2_TABLE_200
68 , a52 JTF_VARCHAR2_TABLE_200
69 , a53 JTF_VARCHAR2_TABLE_200
70 , a54 JTF_VARCHAR2_TABLE_200
71 , a55 JTF_VARCHAR2_TABLE_200
72 , a56 JTF_VARCHAR2_TABLE_200
73 , a57 JTF_VARCHAR2_TABLE_200
74 , a58 JTF_VARCHAR2_TABLE_200
75 , a59 JTF_VARCHAR2_TABLE_200
76 , a60 JTF_VARCHAR2_TABLE_200
77 , a61 JTF_VARCHAR2_TABLE_200
78 , a62 JTF_VARCHAR2_TABLE_200
79 , a63 JTF_VARCHAR2_TABLE_200
80 , a64 JTF_VARCHAR2_TABLE_100
81 , a65 JTF_VARCHAR2_TABLE_200
82 , a66 JTF_VARCHAR2_TABLE_200
83 , a67 JTF_VARCHAR2_TABLE_200
84 , a68 JTF_VARCHAR2_TABLE_200
85 , a69 JTF_VARCHAR2_TABLE_200
86 , a70 JTF_VARCHAR2_TABLE_200
87 , a71 JTF_VARCHAR2_TABLE_200
88 , a72 JTF_VARCHAR2_TABLE_200
89 , a73 JTF_VARCHAR2_TABLE_200
90 , a74 JTF_VARCHAR2_TABLE_200
91 , a75 JTF_VARCHAR2_TABLE_200
92 , a76 JTF_VARCHAR2_TABLE_200
93 , a77 JTF_VARCHAR2_TABLE_200
94 , a78 JTF_VARCHAR2_TABLE_200
95 , a79 JTF_VARCHAR2_TABLE_200
96 , a80 JTF_VARCHAR2_TABLE_200
97 , a81 JTF_VARCHAR2_TABLE_200
98 , a82 JTF_VARCHAR2_TABLE_200
99 , a83 JTF_VARCHAR2_TABLE_200
100 , a84 JTF_VARCHAR2_TABLE_200
101 , a85 JTF_VARCHAR2_TABLE_200
102 , a86 JTF_VARCHAR2_TABLE_200
103 , a87 JTF_VARCHAR2_TABLE_200
104 , a88 JTF_VARCHAR2_TABLE_200
105 , a89 JTF_VARCHAR2_TABLE_200
106 , a90 JTF_VARCHAR2_TABLE_200
107 , a91 JTF_VARCHAR2_TABLE_200
108 , a92 JTF_VARCHAR2_TABLE_200
109 , a93 JTF_VARCHAR2_TABLE_200
110 , a94 JTF_VARCHAR2_TABLE_200
111 , a95 JTF_NUMBER_TABLE
112 , a96 JTF_NUMBER_TABLE
113 , a97 JTF_VARCHAR2_TABLE_100
114 , a98 JTF_NUMBER_TABLE
115 , a99 JTF_NUMBER_TABLE
116 , a100 JTF_VARCHAR2_TABLE_100
117 , a101 JTF_NUMBER_TABLE
118 ) as
119 ddindx binary_integer; indx binary_integer;
120 begin
121 if a0 is not null and a0.count > 0 then
122 if a0.count > 0 then
123 indx := a0.first;
124 ddindx := 1;
125 while true loop
126 t(ddindx).supp_trade_profile_id := a0(indx);
127 t(ddindx).object_version_number := a1(indx);
128 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a2(indx));
129 t(ddindx).last_updated_by := a3(indx);
130 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a4(indx));
131 t(ddindx).created_by := a5(indx);
132 t(ddindx).last_update_login := a6(indx);
133 t(ddindx).request_id := a7(indx);
134 t(ddindx).program_application_id := a8(indx);
135 t(ddindx).program_update_date := rosetta_g_miss_date_in_map(a9(indx));
136 t(ddindx).program_id := a10(indx);
137 t(ddindx).created_from := a11(indx);
138 t(ddindx).supplier_id := a12(indx);
139 t(ddindx).supplier_site_id := a13(indx);
140 t(ddindx).party_id := a14(indx);
141 t(ddindx).cust_account_id := a15(indx);
142 t(ddindx).cust_acct_site_id := a16(indx);
143 t(ddindx).site_use_id := a17(indx);
144 t(ddindx).pre_approval_flag := a18(indx);
145 t(ddindx).approval_communication := a19(indx);
146 t(ddindx).gl_contra_liability_acct := a20(indx);
147 t(ddindx).gl_cost_adjustment_acct := a21(indx);
148 t(ddindx).default_days_covered := a22(indx);
149 t(ddindx).create_claim_price_increase := a23(indx);
150 t(ddindx).authorization_period := a24(indx);
151 t(ddindx).grace_days := a25(indx);
152 t(ddindx).allow_qty_increase := a26(indx);
153 t(ddindx).qty_increase_tolerance := a27(indx);
154 t(ddindx).request_communication := a28(indx);
155 t(ddindx).claim_communication := a29(indx);
156 t(ddindx).claim_frequency := a30(indx);
157 t(ddindx).claim_frequency_unit := a31(indx);
158 t(ddindx).claim_computation_basis := a32(indx);
159 t(ddindx).attribute_category := a33(indx);
160 t(ddindx).attribute1 := a34(indx);
161 t(ddindx).attribute2 := a35(indx);
162 t(ddindx).attribute3 := a36(indx);
163 t(ddindx).attribute4 := a37(indx);
164 t(ddindx).attribute5 := a38(indx);
165 t(ddindx).attribute6 := a39(indx);
166 t(ddindx).attribute7 := a40(indx);
167 t(ddindx).attribute8 := a41(indx);
168 t(ddindx).attribute9 := a42(indx);
169 t(ddindx).attribute10 := a43(indx);
170 t(ddindx).attribute11 := a44(indx);
171 t(ddindx).attribute12 := a45(indx);
172 t(ddindx).attribute13 := a46(indx);
173 t(ddindx).attribute14 := a47(indx);
174 t(ddindx).attribute15 := a48(indx);
175 t(ddindx).attribute16 := a49(indx);
176 t(ddindx).attribute17 := a50(indx);
177 t(ddindx).attribute18 := a51(indx);
178 t(ddindx).attribute19 := a52(indx);
179 t(ddindx).attribute20 := a53(indx);
180 t(ddindx).attribute21 := a54(indx);
181 t(ddindx).attribute22 := a55(indx);
182 t(ddindx).attribute23 := a56(indx);
183 t(ddindx).attribute24 := a57(indx);
184 t(ddindx).attribute25 := a58(indx);
185 t(ddindx).attribute26 := a59(indx);
186 t(ddindx).attribute27 := a60(indx);
187 t(ddindx).attribute28 := a61(indx);
188 t(ddindx).attribute29 := a62(indx);
189 t(ddindx).attribute30 := a63(indx);
190 t(ddindx).dpp_attribute_category := a64(indx);
191 t(ddindx).dpp_attribute1 := a65(indx);
192 t(ddindx).dpp_attribute2 := a66(indx);
193 t(ddindx).dpp_attribute3 := a67(indx);
194 t(ddindx).dpp_attribute4 := a68(indx);
195 t(ddindx).dpp_attribute5 := a69(indx);
196 t(ddindx).dpp_attribute6 := a70(indx);
197 t(ddindx).dpp_attribute7 := a71(indx);
198 t(ddindx).dpp_attribute8 := a72(indx);
199 t(ddindx).dpp_attribute9 := a73(indx);
200 t(ddindx).dpp_attribute10 := a74(indx);
201 t(ddindx).dpp_attribute11 := a75(indx);
202 t(ddindx).dpp_attribute12 := a76(indx);
203 t(ddindx).dpp_attribute13 := a77(indx);
204 t(ddindx).dpp_attribute14 := a78(indx);
205 t(ddindx).dpp_attribute15 := a79(indx);
206 t(ddindx).dpp_attribute16 := a80(indx);
207 t(ddindx).dpp_attribute17 := a81(indx);
208 t(ddindx).dpp_attribute18 := a82(indx);
209 t(ddindx).dpp_attribute19 := a83(indx);
210 t(ddindx).dpp_attribute20 := a84(indx);
211 t(ddindx).dpp_attribute21 := a85(indx);
212 t(ddindx).dpp_attribute22 := a86(indx);
213 t(ddindx).dpp_attribute23 := a87(indx);
214 t(ddindx).dpp_attribute24 := a88(indx);
215 t(ddindx).dpp_attribute25 := a89(indx);
216 t(ddindx).dpp_attribute26 := a90(indx);
217 t(ddindx).dpp_attribute27 := a91(indx);
218 t(ddindx).dpp_attribute28 := a92(indx);
219 t(ddindx).dpp_attribute29 := a93(indx);
220 t(ddindx).dpp_attribute30 := a94(indx);
221 t(ddindx).org_id := a95(indx);
222 t(ddindx).security_group_id := a96(indx);
223 t(ddindx).claim_currency_code := a97(indx);
224 t(ddindx).min_claim_amt := a98(indx);
225 t(ddindx).min_claim_amt_line_lvl := a99(indx);
226 t(ddindx).auto_debit := a100(indx);
227 t(ddindx).days_before_claiming_debit := a101(indx);
228 ddindx := ddindx+1;
229 if a0.last =indx
230 then exit;
231 end if;
232 indx := a0.next(indx);
233 end loop;
234 end if;
235 end if;
236 end rosetta_table_copy_in_p3;
237 procedure rosetta_table_copy_out_p3(t ozf_supp_trade_profile_pvt.supp_trade_profile_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
238 , a1 out nocopy JTF_NUMBER_TABLE
239 , a2 out nocopy JTF_DATE_TABLE
240 , a3 out nocopy JTF_NUMBER_TABLE
241 , a4 out nocopy JTF_DATE_TABLE
242 , a5 out nocopy JTF_NUMBER_TABLE
243 , a6 out nocopy JTF_NUMBER_TABLE
244 , a7 out nocopy JTF_NUMBER_TABLE
245 , a8 out nocopy JTF_NUMBER_TABLE
246 , a9 out nocopy JTF_DATE_TABLE
247 , a10 out nocopy JTF_NUMBER_TABLE
248 , a11 out nocopy JTF_VARCHAR2_TABLE_100
249 , a12 out nocopy JTF_NUMBER_TABLE
250 , a13 out nocopy JTF_NUMBER_TABLE
251 , a14 out nocopy JTF_NUMBER_TABLE
252 , a15 out nocopy JTF_NUMBER_TABLE
253 , a16 out nocopy JTF_NUMBER_TABLE
254 , a17 out nocopy JTF_NUMBER_TABLE
255 , a18 out nocopy JTF_VARCHAR2_TABLE_100
256 , a19 out nocopy JTF_VARCHAR2_TABLE_100
257 , a20 out nocopy JTF_NUMBER_TABLE
258 , a21 out nocopy JTF_NUMBER_TABLE
259 , a22 out nocopy JTF_NUMBER_TABLE
260 , a23 out nocopy JTF_VARCHAR2_TABLE_100
261 , a24 out nocopy JTF_NUMBER_TABLE
262 , a25 out nocopy JTF_NUMBER_TABLE
263 , a26 out nocopy JTF_VARCHAR2_TABLE_100
264 , a27 out nocopy JTF_NUMBER_TABLE
265 , a28 out nocopy JTF_VARCHAR2_TABLE_100
266 , a29 out nocopy JTF_VARCHAR2_TABLE_100
267 , a30 out nocopy JTF_NUMBER_TABLE
268 , a31 out nocopy JTF_VARCHAR2_TABLE_100
269 , a32 out nocopy JTF_NUMBER_TABLE
270 , a33 out nocopy JTF_VARCHAR2_TABLE_100
271 , a34 out nocopy JTF_VARCHAR2_TABLE_200
272 , a35 out nocopy JTF_VARCHAR2_TABLE_200
273 , a36 out nocopy JTF_VARCHAR2_TABLE_200
274 , a37 out nocopy JTF_VARCHAR2_TABLE_200
275 , a38 out nocopy JTF_VARCHAR2_TABLE_200
276 , a39 out nocopy JTF_VARCHAR2_TABLE_200
277 , a40 out nocopy JTF_VARCHAR2_TABLE_200
278 , a41 out nocopy JTF_VARCHAR2_TABLE_200
279 , a42 out nocopy JTF_VARCHAR2_TABLE_200
280 , a43 out nocopy JTF_VARCHAR2_TABLE_200
281 , a44 out nocopy JTF_VARCHAR2_TABLE_200
282 , a45 out nocopy JTF_VARCHAR2_TABLE_200
283 , a46 out nocopy JTF_VARCHAR2_TABLE_200
284 , a47 out nocopy JTF_VARCHAR2_TABLE_200
285 , a48 out nocopy JTF_VARCHAR2_TABLE_200
286 , a49 out nocopy JTF_VARCHAR2_TABLE_200
287 , a50 out nocopy JTF_VARCHAR2_TABLE_200
288 , a51 out nocopy JTF_VARCHAR2_TABLE_200
289 , a52 out nocopy JTF_VARCHAR2_TABLE_200
290 , a53 out nocopy JTF_VARCHAR2_TABLE_200
291 , a54 out nocopy JTF_VARCHAR2_TABLE_200
292 , a55 out nocopy JTF_VARCHAR2_TABLE_200
293 , a56 out nocopy JTF_VARCHAR2_TABLE_200
294 , a57 out nocopy JTF_VARCHAR2_TABLE_200
295 , a58 out nocopy JTF_VARCHAR2_TABLE_200
296 , a59 out nocopy JTF_VARCHAR2_TABLE_200
297 , a60 out nocopy JTF_VARCHAR2_TABLE_200
298 , a61 out nocopy JTF_VARCHAR2_TABLE_200
299 , a62 out nocopy JTF_VARCHAR2_TABLE_200
300 , a63 out nocopy JTF_VARCHAR2_TABLE_200
301 , a64 out nocopy JTF_VARCHAR2_TABLE_100
302 , a65 out nocopy JTF_VARCHAR2_TABLE_200
303 , a66 out nocopy JTF_VARCHAR2_TABLE_200
304 , a67 out nocopy JTF_VARCHAR2_TABLE_200
305 , a68 out nocopy JTF_VARCHAR2_TABLE_200
306 , a69 out nocopy JTF_VARCHAR2_TABLE_200
307 , a70 out nocopy JTF_VARCHAR2_TABLE_200
308 , a71 out nocopy JTF_VARCHAR2_TABLE_200
309 , a72 out nocopy JTF_VARCHAR2_TABLE_200
310 , a73 out nocopy JTF_VARCHAR2_TABLE_200
311 , a74 out nocopy JTF_VARCHAR2_TABLE_200
312 , a75 out nocopy JTF_VARCHAR2_TABLE_200
313 , a76 out nocopy JTF_VARCHAR2_TABLE_200
314 , a77 out nocopy JTF_VARCHAR2_TABLE_200
315 , a78 out nocopy JTF_VARCHAR2_TABLE_200
316 , a79 out nocopy JTF_VARCHAR2_TABLE_200
317 , a80 out nocopy JTF_VARCHAR2_TABLE_200
318 , a81 out nocopy JTF_VARCHAR2_TABLE_200
319 , a82 out nocopy JTF_VARCHAR2_TABLE_200
320 , a83 out nocopy JTF_VARCHAR2_TABLE_200
321 , a84 out nocopy JTF_VARCHAR2_TABLE_200
322 , a85 out nocopy JTF_VARCHAR2_TABLE_200
323 , a86 out nocopy JTF_VARCHAR2_TABLE_200
324 , a87 out nocopy JTF_VARCHAR2_TABLE_200
325 , a88 out nocopy JTF_VARCHAR2_TABLE_200
326 , a89 out nocopy JTF_VARCHAR2_TABLE_200
327 , a90 out nocopy JTF_VARCHAR2_TABLE_200
328 , a91 out nocopy JTF_VARCHAR2_TABLE_200
329 , a92 out nocopy JTF_VARCHAR2_TABLE_200
330 , a93 out nocopy JTF_VARCHAR2_TABLE_200
331 , a94 out nocopy JTF_VARCHAR2_TABLE_200
332 , a95 out nocopy JTF_NUMBER_TABLE
333 , a96 out nocopy JTF_NUMBER_TABLE
334 , a97 out nocopy JTF_VARCHAR2_TABLE_100
335 , a98 out nocopy JTF_NUMBER_TABLE
336 , a99 out nocopy JTF_NUMBER_TABLE
337 , a100 out nocopy JTF_VARCHAR2_TABLE_100
338 , a101 out nocopy JTF_NUMBER_TABLE
339 ) as
340 ddindx binary_integer; indx binary_integer;
341 begin
342 if t is null or t.count = 0 then
343 a0 := JTF_NUMBER_TABLE();
344 a1 := JTF_NUMBER_TABLE();
345 a2 := JTF_DATE_TABLE();
346 a3 := JTF_NUMBER_TABLE();
347 a4 := JTF_DATE_TABLE();
348 a5 := JTF_NUMBER_TABLE();
349 a6 := JTF_NUMBER_TABLE();
350 a7 := JTF_NUMBER_TABLE();
351 a8 := JTF_NUMBER_TABLE();
352 a9 := JTF_DATE_TABLE();
353 a10 := JTF_NUMBER_TABLE();
354 a11 := JTF_VARCHAR2_TABLE_100();
355 a12 := JTF_NUMBER_TABLE();
356 a13 := JTF_NUMBER_TABLE();
357 a14 := JTF_NUMBER_TABLE();
358 a15 := JTF_NUMBER_TABLE();
359 a16 := JTF_NUMBER_TABLE();
360 a17 := JTF_NUMBER_TABLE();
361 a18 := JTF_VARCHAR2_TABLE_100();
362 a19 := JTF_VARCHAR2_TABLE_100();
363 a20 := JTF_NUMBER_TABLE();
364 a21 := JTF_NUMBER_TABLE();
365 a22 := JTF_NUMBER_TABLE();
366 a23 := JTF_VARCHAR2_TABLE_100();
367 a24 := JTF_NUMBER_TABLE();
368 a25 := JTF_NUMBER_TABLE();
369 a26 := JTF_VARCHAR2_TABLE_100();
370 a27 := JTF_NUMBER_TABLE();
371 a28 := JTF_VARCHAR2_TABLE_100();
372 a29 := JTF_VARCHAR2_TABLE_100();
373 a30 := JTF_NUMBER_TABLE();
374 a31 := JTF_VARCHAR2_TABLE_100();
375 a32 := JTF_NUMBER_TABLE();
376 a33 := JTF_VARCHAR2_TABLE_100();
377 a34 := JTF_VARCHAR2_TABLE_200();
378 a35 := JTF_VARCHAR2_TABLE_200();
379 a36 := JTF_VARCHAR2_TABLE_200();
380 a37 := JTF_VARCHAR2_TABLE_200();
381 a38 := JTF_VARCHAR2_TABLE_200();
382 a39 := JTF_VARCHAR2_TABLE_200();
383 a40 := JTF_VARCHAR2_TABLE_200();
384 a41 := JTF_VARCHAR2_TABLE_200();
385 a42 := JTF_VARCHAR2_TABLE_200();
386 a43 := JTF_VARCHAR2_TABLE_200();
387 a44 := JTF_VARCHAR2_TABLE_200();
388 a45 := JTF_VARCHAR2_TABLE_200();
389 a46 := JTF_VARCHAR2_TABLE_200();
390 a47 := JTF_VARCHAR2_TABLE_200();
391 a48 := JTF_VARCHAR2_TABLE_200();
392 a49 := JTF_VARCHAR2_TABLE_200();
393 a50 := JTF_VARCHAR2_TABLE_200();
394 a51 := JTF_VARCHAR2_TABLE_200();
395 a52 := JTF_VARCHAR2_TABLE_200();
396 a53 := JTF_VARCHAR2_TABLE_200();
397 a54 := JTF_VARCHAR2_TABLE_200();
398 a55 := JTF_VARCHAR2_TABLE_200();
399 a56 := JTF_VARCHAR2_TABLE_200();
400 a57 := JTF_VARCHAR2_TABLE_200();
401 a58 := JTF_VARCHAR2_TABLE_200();
402 a59 := JTF_VARCHAR2_TABLE_200();
403 a60 := JTF_VARCHAR2_TABLE_200();
404 a61 := JTF_VARCHAR2_TABLE_200();
405 a62 := JTF_VARCHAR2_TABLE_200();
406 a63 := JTF_VARCHAR2_TABLE_200();
407 a64 := JTF_VARCHAR2_TABLE_100();
408 a65 := JTF_VARCHAR2_TABLE_200();
409 a66 := JTF_VARCHAR2_TABLE_200();
410 a67 := JTF_VARCHAR2_TABLE_200();
411 a68 := JTF_VARCHAR2_TABLE_200();
412 a69 := JTF_VARCHAR2_TABLE_200();
413 a70 := JTF_VARCHAR2_TABLE_200();
414 a71 := JTF_VARCHAR2_TABLE_200();
415 a72 := JTF_VARCHAR2_TABLE_200();
416 a73 := JTF_VARCHAR2_TABLE_200();
417 a74 := JTF_VARCHAR2_TABLE_200();
418 a75 := JTF_VARCHAR2_TABLE_200();
419 a76 := JTF_VARCHAR2_TABLE_200();
420 a77 := JTF_VARCHAR2_TABLE_200();
421 a78 := JTF_VARCHAR2_TABLE_200();
422 a79 := JTF_VARCHAR2_TABLE_200();
423 a80 := JTF_VARCHAR2_TABLE_200();
424 a81 := JTF_VARCHAR2_TABLE_200();
425 a82 := JTF_VARCHAR2_TABLE_200();
426 a83 := JTF_VARCHAR2_TABLE_200();
427 a84 := JTF_VARCHAR2_TABLE_200();
428 a85 := JTF_VARCHAR2_TABLE_200();
429 a86 := JTF_VARCHAR2_TABLE_200();
430 a87 := JTF_VARCHAR2_TABLE_200();
431 a88 := JTF_VARCHAR2_TABLE_200();
432 a89 := JTF_VARCHAR2_TABLE_200();
433 a90 := JTF_VARCHAR2_TABLE_200();
434 a91 := JTF_VARCHAR2_TABLE_200();
435 a92 := JTF_VARCHAR2_TABLE_200();
436 a93 := JTF_VARCHAR2_TABLE_200();
437 a94 := JTF_VARCHAR2_TABLE_200();
438 a95 := JTF_NUMBER_TABLE();
439 a96 := JTF_NUMBER_TABLE();
440 a97 := JTF_VARCHAR2_TABLE_100();
441 a98 := JTF_NUMBER_TABLE();
442 a99 := JTF_NUMBER_TABLE();
443 a100 := JTF_VARCHAR2_TABLE_100();
444 a101 := JTF_NUMBER_TABLE();
445 else
446 a0 := JTF_NUMBER_TABLE();
447 a1 := JTF_NUMBER_TABLE();
448 a2 := JTF_DATE_TABLE();
449 a3 := JTF_NUMBER_TABLE();
450 a4 := JTF_DATE_TABLE();
451 a5 := JTF_NUMBER_TABLE();
452 a6 := JTF_NUMBER_TABLE();
453 a7 := JTF_NUMBER_TABLE();
454 a8 := JTF_NUMBER_TABLE();
455 a9 := JTF_DATE_TABLE();
456 a10 := JTF_NUMBER_TABLE();
457 a11 := JTF_VARCHAR2_TABLE_100();
458 a12 := JTF_NUMBER_TABLE();
459 a13 := JTF_NUMBER_TABLE();
460 a14 := JTF_NUMBER_TABLE();
461 a15 := JTF_NUMBER_TABLE();
462 a16 := JTF_NUMBER_TABLE();
463 a17 := JTF_NUMBER_TABLE();
464 a18 := JTF_VARCHAR2_TABLE_100();
465 a19 := JTF_VARCHAR2_TABLE_100();
466 a20 := JTF_NUMBER_TABLE();
467 a21 := JTF_NUMBER_TABLE();
468 a22 := JTF_NUMBER_TABLE();
469 a23 := JTF_VARCHAR2_TABLE_100();
470 a24 := JTF_NUMBER_TABLE();
471 a25 := JTF_NUMBER_TABLE();
472 a26 := JTF_VARCHAR2_TABLE_100();
473 a27 := JTF_NUMBER_TABLE();
474 a28 := JTF_VARCHAR2_TABLE_100();
475 a29 := JTF_VARCHAR2_TABLE_100();
476 a30 := JTF_NUMBER_TABLE();
477 a31 := JTF_VARCHAR2_TABLE_100();
478 a32 := JTF_NUMBER_TABLE();
479 a33 := JTF_VARCHAR2_TABLE_100();
480 a34 := JTF_VARCHAR2_TABLE_200();
481 a35 := JTF_VARCHAR2_TABLE_200();
482 a36 := JTF_VARCHAR2_TABLE_200();
483 a37 := JTF_VARCHAR2_TABLE_200();
484 a38 := JTF_VARCHAR2_TABLE_200();
485 a39 := JTF_VARCHAR2_TABLE_200();
486 a40 := JTF_VARCHAR2_TABLE_200();
487 a41 := JTF_VARCHAR2_TABLE_200();
488 a42 := JTF_VARCHAR2_TABLE_200();
489 a43 := JTF_VARCHAR2_TABLE_200();
490 a44 := JTF_VARCHAR2_TABLE_200();
491 a45 := JTF_VARCHAR2_TABLE_200();
492 a46 := JTF_VARCHAR2_TABLE_200();
493 a47 := JTF_VARCHAR2_TABLE_200();
494 a48 := JTF_VARCHAR2_TABLE_200();
495 a49 := JTF_VARCHAR2_TABLE_200();
496 a50 := JTF_VARCHAR2_TABLE_200();
497 a51 := JTF_VARCHAR2_TABLE_200();
498 a52 := JTF_VARCHAR2_TABLE_200();
499 a53 := JTF_VARCHAR2_TABLE_200();
500 a54 := JTF_VARCHAR2_TABLE_200();
501 a55 := JTF_VARCHAR2_TABLE_200();
502 a56 := JTF_VARCHAR2_TABLE_200();
503 a57 := JTF_VARCHAR2_TABLE_200();
504 a58 := JTF_VARCHAR2_TABLE_200();
505 a59 := JTF_VARCHAR2_TABLE_200();
506 a60 := JTF_VARCHAR2_TABLE_200();
507 a61 := JTF_VARCHAR2_TABLE_200();
508 a62 := JTF_VARCHAR2_TABLE_200();
509 a63 := JTF_VARCHAR2_TABLE_200();
510 a64 := JTF_VARCHAR2_TABLE_100();
511 a65 := JTF_VARCHAR2_TABLE_200();
512 a66 := JTF_VARCHAR2_TABLE_200();
513 a67 := JTF_VARCHAR2_TABLE_200();
514 a68 := JTF_VARCHAR2_TABLE_200();
515 a69 := JTF_VARCHAR2_TABLE_200();
516 a70 := JTF_VARCHAR2_TABLE_200();
517 a71 := JTF_VARCHAR2_TABLE_200();
518 a72 := JTF_VARCHAR2_TABLE_200();
519 a73 := JTF_VARCHAR2_TABLE_200();
520 a74 := JTF_VARCHAR2_TABLE_200();
521 a75 := JTF_VARCHAR2_TABLE_200();
522 a76 := JTF_VARCHAR2_TABLE_200();
523 a77 := JTF_VARCHAR2_TABLE_200();
524 a78 := JTF_VARCHAR2_TABLE_200();
525 a79 := JTF_VARCHAR2_TABLE_200();
526 a80 := JTF_VARCHAR2_TABLE_200();
527 a81 := JTF_VARCHAR2_TABLE_200();
528 a82 := JTF_VARCHAR2_TABLE_200();
529 a83 := JTF_VARCHAR2_TABLE_200();
530 a84 := JTF_VARCHAR2_TABLE_200();
531 a85 := JTF_VARCHAR2_TABLE_200();
532 a86 := JTF_VARCHAR2_TABLE_200();
533 a87 := JTF_VARCHAR2_TABLE_200();
534 a88 := JTF_VARCHAR2_TABLE_200();
535 a89 := JTF_VARCHAR2_TABLE_200();
536 a90 := JTF_VARCHAR2_TABLE_200();
537 a91 := JTF_VARCHAR2_TABLE_200();
538 a92 := JTF_VARCHAR2_TABLE_200();
539 a93 := JTF_VARCHAR2_TABLE_200();
540 a94 := JTF_VARCHAR2_TABLE_200();
541 a95 := JTF_NUMBER_TABLE();
542 a96 := JTF_NUMBER_TABLE();
543 a97 := JTF_VARCHAR2_TABLE_100();
544 a98 := JTF_NUMBER_TABLE();
545 a99 := JTF_NUMBER_TABLE();
546 a100 := JTF_VARCHAR2_TABLE_100();
547 a101 := JTF_NUMBER_TABLE();
548 if t.count > 0 then
549 a0.extend(t.count);
550 a1.extend(t.count);
551 a2.extend(t.count);
552 a3.extend(t.count);
553 a4.extend(t.count);
554 a5.extend(t.count);
555 a6.extend(t.count);
556 a7.extend(t.count);
557 a8.extend(t.count);
558 a9.extend(t.count);
559 a10.extend(t.count);
560 a11.extend(t.count);
561 a12.extend(t.count);
562 a13.extend(t.count);
563 a14.extend(t.count);
564 a15.extend(t.count);
565 a16.extend(t.count);
566 a17.extend(t.count);
567 a18.extend(t.count);
568 a19.extend(t.count);
569 a20.extend(t.count);
570 a21.extend(t.count);
571 a22.extend(t.count);
572 a23.extend(t.count);
573 a24.extend(t.count);
574 a25.extend(t.count);
575 a26.extend(t.count);
576 a27.extend(t.count);
577 a28.extend(t.count);
578 a29.extend(t.count);
579 a30.extend(t.count);
580 a31.extend(t.count);
581 a32.extend(t.count);
582 a33.extend(t.count);
583 a34.extend(t.count);
584 a35.extend(t.count);
585 a36.extend(t.count);
586 a37.extend(t.count);
587 a38.extend(t.count);
588 a39.extend(t.count);
589 a40.extend(t.count);
590 a41.extend(t.count);
591 a42.extend(t.count);
592 a43.extend(t.count);
593 a44.extend(t.count);
594 a45.extend(t.count);
595 a46.extend(t.count);
596 a47.extend(t.count);
597 a48.extend(t.count);
598 a49.extend(t.count);
599 a50.extend(t.count);
600 a51.extend(t.count);
601 a52.extend(t.count);
602 a53.extend(t.count);
603 a54.extend(t.count);
604 a55.extend(t.count);
605 a56.extend(t.count);
606 a57.extend(t.count);
607 a58.extend(t.count);
608 a59.extend(t.count);
609 a60.extend(t.count);
610 a61.extend(t.count);
611 a62.extend(t.count);
612 a63.extend(t.count);
613 a64.extend(t.count);
614 a65.extend(t.count);
615 a66.extend(t.count);
616 a67.extend(t.count);
617 a68.extend(t.count);
618 a69.extend(t.count);
619 a70.extend(t.count);
620 a71.extend(t.count);
621 a72.extend(t.count);
622 a73.extend(t.count);
623 a74.extend(t.count);
624 a75.extend(t.count);
625 a76.extend(t.count);
626 a77.extend(t.count);
627 a78.extend(t.count);
628 a79.extend(t.count);
629 a80.extend(t.count);
630 a81.extend(t.count);
631 a82.extend(t.count);
632 a83.extend(t.count);
633 a84.extend(t.count);
634 a85.extend(t.count);
635 a86.extend(t.count);
636 a87.extend(t.count);
637 a88.extend(t.count);
638 a89.extend(t.count);
639 a90.extend(t.count);
640 a91.extend(t.count);
641 a92.extend(t.count);
642 a93.extend(t.count);
643 a94.extend(t.count);
644 a95.extend(t.count);
645 a96.extend(t.count);
646 a97.extend(t.count);
647 a98.extend(t.count);
648 a99.extend(t.count);
649 a100.extend(t.count);
650 a101.extend(t.count);
651 ddindx := t.first;
652 indx := 1;
653 while true loop
654 a0(indx) := t(ddindx).supp_trade_profile_id;
655 a1(indx) := t(ddindx).object_version_number;
656 a2(indx) := t(ddindx).last_update_date;
657 a3(indx) := t(ddindx).last_updated_by;
658 a4(indx) := t(ddindx).creation_date;
659 a5(indx) := t(ddindx).created_by;
660 a6(indx) := t(ddindx).last_update_login;
661 a7(indx) := t(ddindx).request_id;
662 a8(indx) := t(ddindx).program_application_id;
663 a9(indx) := t(ddindx).program_update_date;
664 a10(indx) := t(ddindx).program_id;
665 a11(indx) := t(ddindx).created_from;
666 a12(indx) := t(ddindx).supplier_id;
667 a13(indx) := t(ddindx).supplier_site_id;
668 a14(indx) := t(ddindx).party_id;
669 a15(indx) := t(ddindx).cust_account_id;
670 a16(indx) := t(ddindx).cust_acct_site_id;
671 a17(indx) := t(ddindx).site_use_id;
672 a18(indx) := t(ddindx).pre_approval_flag;
673 a19(indx) := t(ddindx).approval_communication;
674 a20(indx) := t(ddindx).gl_contra_liability_acct;
675 a21(indx) := t(ddindx).gl_cost_adjustment_acct;
676 a22(indx) := t(ddindx).default_days_covered;
677 a23(indx) := t(ddindx).create_claim_price_increase;
678 a24(indx) := t(ddindx).authorization_period;
679 a25(indx) := t(ddindx).grace_days;
680 a26(indx) := t(ddindx).allow_qty_increase;
681 a27(indx) := t(ddindx).qty_increase_tolerance;
682 a28(indx) := t(ddindx).request_communication;
683 a29(indx) := t(ddindx).claim_communication;
684 a30(indx) := t(ddindx).claim_frequency;
685 a31(indx) := t(ddindx).claim_frequency_unit;
686 a32(indx) := t(ddindx).claim_computation_basis;
687 a33(indx) := t(ddindx).attribute_category;
688 a34(indx) := t(ddindx).attribute1;
689 a35(indx) := t(ddindx).attribute2;
690 a36(indx) := t(ddindx).attribute3;
691 a37(indx) := t(ddindx).attribute4;
692 a38(indx) := t(ddindx).attribute5;
693 a39(indx) := t(ddindx).attribute6;
694 a40(indx) := t(ddindx).attribute7;
695 a41(indx) := t(ddindx).attribute8;
696 a42(indx) := t(ddindx).attribute9;
697 a43(indx) := t(ddindx).attribute10;
698 a44(indx) := t(ddindx).attribute11;
699 a45(indx) := t(ddindx).attribute12;
700 a46(indx) := t(ddindx).attribute13;
701 a47(indx) := t(ddindx).attribute14;
702 a48(indx) := t(ddindx).attribute15;
703 a49(indx) := t(ddindx).attribute16;
704 a50(indx) := t(ddindx).attribute17;
705 a51(indx) := t(ddindx).attribute18;
706 a52(indx) := t(ddindx).attribute19;
707 a53(indx) := t(ddindx).attribute20;
708 a54(indx) := t(ddindx).attribute21;
709 a55(indx) := t(ddindx).attribute22;
710 a56(indx) := t(ddindx).attribute23;
711 a57(indx) := t(ddindx).attribute24;
712 a58(indx) := t(ddindx).attribute25;
713 a59(indx) := t(ddindx).attribute26;
714 a60(indx) := t(ddindx).attribute27;
715 a61(indx) := t(ddindx).attribute28;
716 a62(indx) := t(ddindx).attribute29;
717 a63(indx) := t(ddindx).attribute30;
718 a64(indx) := t(ddindx).dpp_attribute_category;
719 a65(indx) := t(ddindx).dpp_attribute1;
720 a66(indx) := t(ddindx).dpp_attribute2;
721 a67(indx) := t(ddindx).dpp_attribute3;
722 a68(indx) := t(ddindx).dpp_attribute4;
723 a69(indx) := t(ddindx).dpp_attribute5;
724 a70(indx) := t(ddindx).dpp_attribute6;
725 a71(indx) := t(ddindx).dpp_attribute7;
726 a72(indx) := t(ddindx).dpp_attribute8;
727 a73(indx) := t(ddindx).dpp_attribute9;
728 a74(indx) := t(ddindx).dpp_attribute10;
729 a75(indx) := t(ddindx).dpp_attribute11;
730 a76(indx) := t(ddindx).dpp_attribute12;
731 a77(indx) := t(ddindx).dpp_attribute13;
732 a78(indx) := t(ddindx).dpp_attribute14;
733 a79(indx) := t(ddindx).dpp_attribute15;
734 a80(indx) := t(ddindx).dpp_attribute16;
735 a81(indx) := t(ddindx).dpp_attribute17;
736 a82(indx) := t(ddindx).dpp_attribute18;
737 a83(indx) := t(ddindx).dpp_attribute19;
738 a84(indx) := t(ddindx).dpp_attribute20;
739 a85(indx) := t(ddindx).dpp_attribute21;
740 a86(indx) := t(ddindx).dpp_attribute22;
741 a87(indx) := t(ddindx).dpp_attribute23;
742 a88(indx) := t(ddindx).dpp_attribute24;
743 a89(indx) := t(ddindx).dpp_attribute25;
744 a90(indx) := t(ddindx).dpp_attribute26;
745 a91(indx) := t(ddindx).dpp_attribute27;
746 a92(indx) := t(ddindx).dpp_attribute28;
747 a93(indx) := t(ddindx).dpp_attribute29;
748 a94(indx) := t(ddindx).dpp_attribute30;
749 a95(indx) := t(ddindx).org_id;
750 a96(indx) := t(ddindx).security_group_id;
751 a97(indx) := t(ddindx).claim_currency_code;
752 a98(indx) := t(ddindx).min_claim_amt;
753 a99(indx) := t(ddindx).min_claim_amt_line_lvl;
754 a100(indx) := t(ddindx).auto_debit;
755 a101(indx) := t(ddindx).days_before_claiming_debit;
756 indx := indx+1;
757 if t.last =ddindx
758 then exit;
759 end if;
760 ddindx := t.next(ddindx);
761 end loop;
762 end if;
763 end if;
764 end rosetta_table_copy_out_p3;
765
766 procedure create_supp_trade_profile(p_api_version_number NUMBER
767 , p_init_msg_list VARCHAR2
768 , p_commit VARCHAR2
769 , p_validation_level NUMBER
770 , x_return_status out nocopy VARCHAR2
771 , x_msg_count out nocopy NUMBER
772 , x_msg_data out nocopy VARCHAR2
773 , p7_a0 NUMBER
774 , p7_a1 NUMBER
775 , p7_a2 DATE
776 , p7_a3 NUMBER
777 , p7_a4 DATE
778 , p7_a5 NUMBER
779 , p7_a6 NUMBER
780 , p7_a7 NUMBER
781 , p7_a8 NUMBER
782 , p7_a9 DATE
783 , p7_a10 NUMBER
784 , p7_a11 VARCHAR2
785 , p7_a12 NUMBER
786 , p7_a13 NUMBER
787 , p7_a14 NUMBER
788 , p7_a15 NUMBER
789 , p7_a16 NUMBER
790 , p7_a17 NUMBER
791 , p7_a18 VARCHAR2
792 , p7_a19 VARCHAR2
793 , p7_a20 NUMBER
794 , p7_a21 NUMBER
795 , p7_a22 NUMBER
796 , p7_a23 VARCHAR2
797 , p7_a24 NUMBER
798 , p7_a25 NUMBER
799 , p7_a26 VARCHAR2
800 , p7_a27 NUMBER
801 , p7_a28 VARCHAR2
802 , p7_a29 VARCHAR2
803 , p7_a30 NUMBER
804 , p7_a31 VARCHAR2
805 , p7_a32 NUMBER
806 , p7_a33 VARCHAR2
807 , p7_a34 VARCHAR2
808 , p7_a35 VARCHAR2
809 , p7_a36 VARCHAR2
810 , p7_a37 VARCHAR2
811 , p7_a38 VARCHAR2
812 , p7_a39 VARCHAR2
813 , p7_a40 VARCHAR2
814 , p7_a41 VARCHAR2
815 , p7_a42 VARCHAR2
816 , p7_a43 VARCHAR2
817 , p7_a44 VARCHAR2
818 , p7_a45 VARCHAR2
819 , p7_a46 VARCHAR2
820 , p7_a47 VARCHAR2
821 , p7_a48 VARCHAR2
822 , p7_a49 VARCHAR2
823 , p7_a50 VARCHAR2
824 , p7_a51 VARCHAR2
825 , p7_a52 VARCHAR2
826 , p7_a53 VARCHAR2
827 , p7_a54 VARCHAR2
828 , p7_a55 VARCHAR2
829 , p7_a56 VARCHAR2
830 , p7_a57 VARCHAR2
831 , p7_a58 VARCHAR2
832 , p7_a59 VARCHAR2
833 , p7_a60 VARCHAR2
834 , p7_a61 VARCHAR2
835 , p7_a62 VARCHAR2
836 , p7_a63 VARCHAR2
837 , p7_a64 VARCHAR2
838 , p7_a65 VARCHAR2
839 , p7_a66 VARCHAR2
840 , p7_a67 VARCHAR2
841 , p7_a68 VARCHAR2
842 , p7_a69 VARCHAR2
843 , p7_a70 VARCHAR2
844 , p7_a71 VARCHAR2
845 , p7_a72 VARCHAR2
846 , p7_a73 VARCHAR2
847 , p7_a74 VARCHAR2
848 , p7_a75 VARCHAR2
849 , p7_a76 VARCHAR2
850 , p7_a77 VARCHAR2
851 , p7_a78 VARCHAR2
852 , p7_a79 VARCHAR2
853 , p7_a80 VARCHAR2
854 , p7_a81 VARCHAR2
855 , p7_a82 VARCHAR2
856 , p7_a83 VARCHAR2
857 , p7_a84 VARCHAR2
858 , p7_a85 VARCHAR2
859 , p7_a86 VARCHAR2
860 , p7_a87 VARCHAR2
861 , p7_a88 VARCHAR2
862 , p7_a89 VARCHAR2
863 , p7_a90 VARCHAR2
864 , p7_a91 VARCHAR2
865 , p7_a92 VARCHAR2
866 , p7_a93 VARCHAR2
867 , p7_a94 VARCHAR2
868 , p7_a95 NUMBER
869 , p7_a96 NUMBER
870 , p7_a97 VARCHAR2
871 , p7_a98 NUMBER
872 , p7_a99 NUMBER
873 , p7_a100 VARCHAR2
874 , p7_a101 NUMBER
875 , x_supp_trade_profile_id out nocopy NUMBER
876 )
877
878 as
879 ddp_supp_trade_profile_rec ozf_supp_trade_profile_pvt.supp_trade_profile_rec_type;
880 ddindx binary_integer; indx binary_integer;
881 begin
882
883 -- copy data to the local IN or IN-OUT args, if any
884
885
886
887
888
889
890
891 ddp_supp_trade_profile_rec.supp_trade_profile_id := p7_a0;
892 ddp_supp_trade_profile_rec.object_version_number := p7_a1;
893 ddp_supp_trade_profile_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
894 ddp_supp_trade_profile_rec.last_updated_by := p7_a3;
895 ddp_supp_trade_profile_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
896 ddp_supp_trade_profile_rec.created_by := p7_a5;
897 ddp_supp_trade_profile_rec.last_update_login := p7_a6;
898 ddp_supp_trade_profile_rec.request_id := p7_a7;
899 ddp_supp_trade_profile_rec.program_application_id := p7_a8;
900 ddp_supp_trade_profile_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a9);
901 ddp_supp_trade_profile_rec.program_id := p7_a10;
902 ddp_supp_trade_profile_rec.created_from := p7_a11;
903 ddp_supp_trade_profile_rec.supplier_id := p7_a12;
904 ddp_supp_trade_profile_rec.supplier_site_id := p7_a13;
905 ddp_supp_trade_profile_rec.party_id := p7_a14;
906 ddp_supp_trade_profile_rec.cust_account_id := p7_a15;
907 ddp_supp_trade_profile_rec.cust_acct_site_id := p7_a16;
908 ddp_supp_trade_profile_rec.site_use_id := p7_a17;
909 ddp_supp_trade_profile_rec.pre_approval_flag := p7_a18;
910 ddp_supp_trade_profile_rec.approval_communication := p7_a19;
911 ddp_supp_trade_profile_rec.gl_contra_liability_acct := p7_a20;
912 ddp_supp_trade_profile_rec.gl_cost_adjustment_acct := p7_a21;
913 ddp_supp_trade_profile_rec.default_days_covered := p7_a22;
914 ddp_supp_trade_profile_rec.create_claim_price_increase := p7_a23;
915 ddp_supp_trade_profile_rec.authorization_period := p7_a24;
916 ddp_supp_trade_profile_rec.grace_days := p7_a25;
917 ddp_supp_trade_profile_rec.allow_qty_increase := p7_a26;
918 ddp_supp_trade_profile_rec.qty_increase_tolerance := p7_a27;
919 ddp_supp_trade_profile_rec.request_communication := p7_a28;
920 ddp_supp_trade_profile_rec.claim_communication := p7_a29;
921 ddp_supp_trade_profile_rec.claim_frequency := p7_a30;
922 ddp_supp_trade_profile_rec.claim_frequency_unit := p7_a31;
923 ddp_supp_trade_profile_rec.claim_computation_basis := p7_a32;
924 ddp_supp_trade_profile_rec.attribute_category := p7_a33;
925 ddp_supp_trade_profile_rec.attribute1 := p7_a34;
926 ddp_supp_trade_profile_rec.attribute2 := p7_a35;
927 ddp_supp_trade_profile_rec.attribute3 := p7_a36;
928 ddp_supp_trade_profile_rec.attribute4 := p7_a37;
929 ddp_supp_trade_profile_rec.attribute5 := p7_a38;
930 ddp_supp_trade_profile_rec.attribute6 := p7_a39;
931 ddp_supp_trade_profile_rec.attribute7 := p7_a40;
932 ddp_supp_trade_profile_rec.attribute8 := p7_a41;
933 ddp_supp_trade_profile_rec.attribute9 := p7_a42;
934 ddp_supp_trade_profile_rec.attribute10 := p7_a43;
935 ddp_supp_trade_profile_rec.attribute11 := p7_a44;
936 ddp_supp_trade_profile_rec.attribute12 := p7_a45;
937 ddp_supp_trade_profile_rec.attribute13 := p7_a46;
938 ddp_supp_trade_profile_rec.attribute14 := p7_a47;
939 ddp_supp_trade_profile_rec.attribute15 := p7_a48;
940 ddp_supp_trade_profile_rec.attribute16 := p7_a49;
941 ddp_supp_trade_profile_rec.attribute17 := p7_a50;
942 ddp_supp_trade_profile_rec.attribute18 := p7_a51;
943 ddp_supp_trade_profile_rec.attribute19 := p7_a52;
944 ddp_supp_trade_profile_rec.attribute20 := p7_a53;
945 ddp_supp_trade_profile_rec.attribute21 := p7_a54;
946 ddp_supp_trade_profile_rec.attribute22 := p7_a55;
947 ddp_supp_trade_profile_rec.attribute23 := p7_a56;
948 ddp_supp_trade_profile_rec.attribute24 := p7_a57;
949 ddp_supp_trade_profile_rec.attribute25 := p7_a58;
950 ddp_supp_trade_profile_rec.attribute26 := p7_a59;
951 ddp_supp_trade_profile_rec.attribute27 := p7_a60;
952 ddp_supp_trade_profile_rec.attribute28 := p7_a61;
953 ddp_supp_trade_profile_rec.attribute29 := p7_a62;
954 ddp_supp_trade_profile_rec.attribute30 := p7_a63;
955 ddp_supp_trade_profile_rec.dpp_attribute_category := p7_a64;
956 ddp_supp_trade_profile_rec.dpp_attribute1 := p7_a65;
957 ddp_supp_trade_profile_rec.dpp_attribute2 := p7_a66;
958 ddp_supp_trade_profile_rec.dpp_attribute3 := p7_a67;
959 ddp_supp_trade_profile_rec.dpp_attribute4 := p7_a68;
960 ddp_supp_trade_profile_rec.dpp_attribute5 := p7_a69;
961 ddp_supp_trade_profile_rec.dpp_attribute6 := p7_a70;
962 ddp_supp_trade_profile_rec.dpp_attribute7 := p7_a71;
963 ddp_supp_trade_profile_rec.dpp_attribute8 := p7_a72;
964 ddp_supp_trade_profile_rec.dpp_attribute9 := p7_a73;
965 ddp_supp_trade_profile_rec.dpp_attribute10 := p7_a74;
966 ddp_supp_trade_profile_rec.dpp_attribute11 := p7_a75;
967 ddp_supp_trade_profile_rec.dpp_attribute12 := p7_a76;
968 ddp_supp_trade_profile_rec.dpp_attribute13 := p7_a77;
969 ddp_supp_trade_profile_rec.dpp_attribute14 := p7_a78;
970 ddp_supp_trade_profile_rec.dpp_attribute15 := p7_a79;
971 ddp_supp_trade_profile_rec.dpp_attribute16 := p7_a80;
972 ddp_supp_trade_profile_rec.dpp_attribute17 := p7_a81;
973 ddp_supp_trade_profile_rec.dpp_attribute18 := p7_a82;
974 ddp_supp_trade_profile_rec.dpp_attribute19 := p7_a83;
975 ddp_supp_trade_profile_rec.dpp_attribute20 := p7_a84;
976 ddp_supp_trade_profile_rec.dpp_attribute21 := p7_a85;
977 ddp_supp_trade_profile_rec.dpp_attribute22 := p7_a86;
978 ddp_supp_trade_profile_rec.dpp_attribute23 := p7_a87;
979 ddp_supp_trade_profile_rec.dpp_attribute24 := p7_a88;
980 ddp_supp_trade_profile_rec.dpp_attribute25 := p7_a89;
981 ddp_supp_trade_profile_rec.dpp_attribute26 := p7_a90;
982 ddp_supp_trade_profile_rec.dpp_attribute27 := p7_a91;
983 ddp_supp_trade_profile_rec.dpp_attribute28 := p7_a92;
984 ddp_supp_trade_profile_rec.dpp_attribute29 := p7_a93;
985 ddp_supp_trade_profile_rec.dpp_attribute30 := p7_a94;
986 ddp_supp_trade_profile_rec.org_id := p7_a95;
987 ddp_supp_trade_profile_rec.security_group_id := p7_a96;
988 ddp_supp_trade_profile_rec.claim_currency_code := p7_a97;
989 ddp_supp_trade_profile_rec.min_claim_amt := p7_a98;
990 ddp_supp_trade_profile_rec.min_claim_amt_line_lvl := p7_a99;
991 ddp_supp_trade_profile_rec.auto_debit := p7_a100;
992 ddp_supp_trade_profile_rec.days_before_claiming_debit := p7_a101;
993
994
995 -- here's the delegated call to the old PL/SQL routine
996 ozf_supp_trade_profile_pvt.create_supp_trade_profile(p_api_version_number,
997 p_init_msg_list,
998 p_commit,
999 p_validation_level,
1000 x_return_status,
1001 x_msg_count,
1002 x_msg_data,
1003 ddp_supp_trade_profile_rec,
1004 x_supp_trade_profile_id);
1005
1006 -- copy data back from the local variables to OUT or IN-OUT args, if any
1007
1008
1009
1010
1011
1012
1013
1014
1015 end;
1016
1017 procedure update_supp_trade_profile(p_api_version_number NUMBER
1018 , p_init_msg_list VARCHAR2
1019 , p_commit VARCHAR2
1020 , p_validation_level NUMBER
1021 , x_return_status out nocopy VARCHAR2
1022 , x_msg_count out nocopy NUMBER
1023 , x_msg_data out nocopy VARCHAR2
1024 , p7_a0 NUMBER
1025 , p7_a1 NUMBER
1026 , p7_a2 DATE
1027 , p7_a3 NUMBER
1028 , p7_a4 DATE
1029 , p7_a5 NUMBER
1030 , p7_a6 NUMBER
1031 , p7_a7 NUMBER
1032 , p7_a8 NUMBER
1033 , p7_a9 DATE
1034 , p7_a10 NUMBER
1035 , p7_a11 VARCHAR2
1036 , p7_a12 NUMBER
1037 , p7_a13 NUMBER
1038 , p7_a14 NUMBER
1039 , p7_a15 NUMBER
1040 , p7_a16 NUMBER
1041 , p7_a17 NUMBER
1042 , p7_a18 VARCHAR2
1043 , p7_a19 VARCHAR2
1044 , p7_a20 NUMBER
1045 , p7_a21 NUMBER
1046 , p7_a22 NUMBER
1047 , p7_a23 VARCHAR2
1048 , p7_a24 NUMBER
1049 , p7_a25 NUMBER
1050 , p7_a26 VARCHAR2
1051 , p7_a27 NUMBER
1052 , p7_a28 VARCHAR2
1053 , p7_a29 VARCHAR2
1054 , p7_a30 NUMBER
1055 , p7_a31 VARCHAR2
1056 , p7_a32 NUMBER
1057 , p7_a33 VARCHAR2
1058 , p7_a34 VARCHAR2
1059 , p7_a35 VARCHAR2
1060 , p7_a36 VARCHAR2
1061 , p7_a37 VARCHAR2
1062 , p7_a38 VARCHAR2
1063 , p7_a39 VARCHAR2
1064 , p7_a40 VARCHAR2
1065 , p7_a41 VARCHAR2
1066 , p7_a42 VARCHAR2
1067 , p7_a43 VARCHAR2
1068 , p7_a44 VARCHAR2
1069 , p7_a45 VARCHAR2
1070 , p7_a46 VARCHAR2
1071 , p7_a47 VARCHAR2
1072 , p7_a48 VARCHAR2
1073 , p7_a49 VARCHAR2
1074 , p7_a50 VARCHAR2
1075 , p7_a51 VARCHAR2
1076 , p7_a52 VARCHAR2
1077 , p7_a53 VARCHAR2
1078 , p7_a54 VARCHAR2
1079 , p7_a55 VARCHAR2
1080 , p7_a56 VARCHAR2
1081 , p7_a57 VARCHAR2
1082 , p7_a58 VARCHAR2
1083 , p7_a59 VARCHAR2
1084 , p7_a60 VARCHAR2
1085 , p7_a61 VARCHAR2
1086 , p7_a62 VARCHAR2
1087 , p7_a63 VARCHAR2
1088 , p7_a64 VARCHAR2
1089 , p7_a65 VARCHAR2
1090 , p7_a66 VARCHAR2
1091 , p7_a67 VARCHAR2
1092 , p7_a68 VARCHAR2
1093 , p7_a69 VARCHAR2
1094 , p7_a70 VARCHAR2
1095 , p7_a71 VARCHAR2
1096 , p7_a72 VARCHAR2
1097 , p7_a73 VARCHAR2
1098 , p7_a74 VARCHAR2
1099 , p7_a75 VARCHAR2
1100 , p7_a76 VARCHAR2
1101 , p7_a77 VARCHAR2
1102 , p7_a78 VARCHAR2
1103 , p7_a79 VARCHAR2
1104 , p7_a80 VARCHAR2
1105 , p7_a81 VARCHAR2
1106 , p7_a82 VARCHAR2
1107 , p7_a83 VARCHAR2
1108 , p7_a84 VARCHAR2
1109 , p7_a85 VARCHAR2
1110 , p7_a86 VARCHAR2
1111 , p7_a87 VARCHAR2
1112 , p7_a88 VARCHAR2
1113 , p7_a89 VARCHAR2
1114 , p7_a90 VARCHAR2
1115 , p7_a91 VARCHAR2
1116 , p7_a92 VARCHAR2
1117 , p7_a93 VARCHAR2
1118 , p7_a94 VARCHAR2
1119 , p7_a95 NUMBER
1120 , p7_a96 NUMBER
1121 , p7_a97 VARCHAR2
1122 , p7_a98 NUMBER
1123 , p7_a99 NUMBER
1124 , p7_a100 VARCHAR2
1125 , p7_a101 NUMBER
1126 , x_object_version_number out nocopy NUMBER
1127 )
1128
1129 as
1130 ddp_supp_trade_profile_rec ozf_supp_trade_profile_pvt.supp_trade_profile_rec_type;
1131 ddindx binary_integer; indx binary_integer;
1132 begin
1133
1134 -- copy data to the local IN or IN-OUT args, if any
1135
1136
1137
1138
1139
1140
1141
1142 ddp_supp_trade_profile_rec.supp_trade_profile_id := p7_a0;
1143 ddp_supp_trade_profile_rec.object_version_number := p7_a1;
1144 ddp_supp_trade_profile_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a2);
1145 ddp_supp_trade_profile_rec.last_updated_by := p7_a3;
1146 ddp_supp_trade_profile_rec.creation_date := rosetta_g_miss_date_in_map(p7_a4);
1147 ddp_supp_trade_profile_rec.created_by := p7_a5;
1148 ddp_supp_trade_profile_rec.last_update_login := p7_a6;
1149 ddp_supp_trade_profile_rec.request_id := p7_a7;
1150 ddp_supp_trade_profile_rec.program_application_id := p7_a8;
1151 ddp_supp_trade_profile_rec.program_update_date := rosetta_g_miss_date_in_map(p7_a9);
1152 ddp_supp_trade_profile_rec.program_id := p7_a10;
1153 ddp_supp_trade_profile_rec.created_from := p7_a11;
1154 ddp_supp_trade_profile_rec.supplier_id := p7_a12;
1155 ddp_supp_trade_profile_rec.supplier_site_id := p7_a13;
1156 ddp_supp_trade_profile_rec.party_id := p7_a14;
1157 ddp_supp_trade_profile_rec.cust_account_id := p7_a15;
1158 ddp_supp_trade_profile_rec.cust_acct_site_id := p7_a16;
1159 ddp_supp_trade_profile_rec.site_use_id := p7_a17;
1160 ddp_supp_trade_profile_rec.pre_approval_flag := p7_a18;
1161 ddp_supp_trade_profile_rec.approval_communication := p7_a19;
1162 ddp_supp_trade_profile_rec.gl_contra_liability_acct := p7_a20;
1163 ddp_supp_trade_profile_rec.gl_cost_adjustment_acct := p7_a21;
1164 ddp_supp_trade_profile_rec.default_days_covered := p7_a22;
1165 ddp_supp_trade_profile_rec.create_claim_price_increase := p7_a23;
1166 ddp_supp_trade_profile_rec.authorization_period := p7_a24;
1167 ddp_supp_trade_profile_rec.grace_days := p7_a25;
1168 ddp_supp_trade_profile_rec.allow_qty_increase := p7_a26;
1169 ddp_supp_trade_profile_rec.qty_increase_tolerance := p7_a27;
1170 ddp_supp_trade_profile_rec.request_communication := p7_a28;
1171 ddp_supp_trade_profile_rec.claim_communication := p7_a29;
1172 ddp_supp_trade_profile_rec.claim_frequency := p7_a30;
1173 ddp_supp_trade_profile_rec.claim_frequency_unit := p7_a31;
1174 ddp_supp_trade_profile_rec.claim_computation_basis := p7_a32;
1175 ddp_supp_trade_profile_rec.attribute_category := p7_a33;
1176 ddp_supp_trade_profile_rec.attribute1 := p7_a34;
1177 ddp_supp_trade_profile_rec.attribute2 := p7_a35;
1178 ddp_supp_trade_profile_rec.attribute3 := p7_a36;
1179 ddp_supp_trade_profile_rec.attribute4 := p7_a37;
1180 ddp_supp_trade_profile_rec.attribute5 := p7_a38;
1181 ddp_supp_trade_profile_rec.attribute6 := p7_a39;
1182 ddp_supp_trade_profile_rec.attribute7 := p7_a40;
1183 ddp_supp_trade_profile_rec.attribute8 := p7_a41;
1184 ddp_supp_trade_profile_rec.attribute9 := p7_a42;
1185 ddp_supp_trade_profile_rec.attribute10 := p7_a43;
1186 ddp_supp_trade_profile_rec.attribute11 := p7_a44;
1187 ddp_supp_trade_profile_rec.attribute12 := p7_a45;
1188 ddp_supp_trade_profile_rec.attribute13 := p7_a46;
1189 ddp_supp_trade_profile_rec.attribute14 := p7_a47;
1190 ddp_supp_trade_profile_rec.attribute15 := p7_a48;
1191 ddp_supp_trade_profile_rec.attribute16 := p7_a49;
1192 ddp_supp_trade_profile_rec.attribute17 := p7_a50;
1193 ddp_supp_trade_profile_rec.attribute18 := p7_a51;
1194 ddp_supp_trade_profile_rec.attribute19 := p7_a52;
1195 ddp_supp_trade_profile_rec.attribute20 := p7_a53;
1196 ddp_supp_trade_profile_rec.attribute21 := p7_a54;
1197 ddp_supp_trade_profile_rec.attribute22 := p7_a55;
1198 ddp_supp_trade_profile_rec.attribute23 := p7_a56;
1199 ddp_supp_trade_profile_rec.attribute24 := p7_a57;
1200 ddp_supp_trade_profile_rec.attribute25 := p7_a58;
1201 ddp_supp_trade_profile_rec.attribute26 := p7_a59;
1202 ddp_supp_trade_profile_rec.attribute27 := p7_a60;
1203 ddp_supp_trade_profile_rec.attribute28 := p7_a61;
1204 ddp_supp_trade_profile_rec.attribute29 := p7_a62;
1205 ddp_supp_trade_profile_rec.attribute30 := p7_a63;
1206 ddp_supp_trade_profile_rec.dpp_attribute_category := p7_a64;
1207 ddp_supp_trade_profile_rec.dpp_attribute1 := p7_a65;
1208 ddp_supp_trade_profile_rec.dpp_attribute2 := p7_a66;
1209 ddp_supp_trade_profile_rec.dpp_attribute3 := p7_a67;
1210 ddp_supp_trade_profile_rec.dpp_attribute4 := p7_a68;
1211 ddp_supp_trade_profile_rec.dpp_attribute5 := p7_a69;
1212 ddp_supp_trade_profile_rec.dpp_attribute6 := p7_a70;
1213 ddp_supp_trade_profile_rec.dpp_attribute7 := p7_a71;
1214 ddp_supp_trade_profile_rec.dpp_attribute8 := p7_a72;
1215 ddp_supp_trade_profile_rec.dpp_attribute9 := p7_a73;
1216 ddp_supp_trade_profile_rec.dpp_attribute10 := p7_a74;
1217 ddp_supp_trade_profile_rec.dpp_attribute11 := p7_a75;
1218 ddp_supp_trade_profile_rec.dpp_attribute12 := p7_a76;
1219 ddp_supp_trade_profile_rec.dpp_attribute13 := p7_a77;
1220 ddp_supp_trade_profile_rec.dpp_attribute14 := p7_a78;
1221 ddp_supp_trade_profile_rec.dpp_attribute15 := p7_a79;
1222 ddp_supp_trade_profile_rec.dpp_attribute16 := p7_a80;
1223 ddp_supp_trade_profile_rec.dpp_attribute17 := p7_a81;
1224 ddp_supp_trade_profile_rec.dpp_attribute18 := p7_a82;
1225 ddp_supp_trade_profile_rec.dpp_attribute19 := p7_a83;
1226 ddp_supp_trade_profile_rec.dpp_attribute20 := p7_a84;
1227 ddp_supp_trade_profile_rec.dpp_attribute21 := p7_a85;
1228 ddp_supp_trade_profile_rec.dpp_attribute22 := p7_a86;
1229 ddp_supp_trade_profile_rec.dpp_attribute23 := p7_a87;
1230 ddp_supp_trade_profile_rec.dpp_attribute24 := p7_a88;
1231 ddp_supp_trade_profile_rec.dpp_attribute25 := p7_a89;
1232 ddp_supp_trade_profile_rec.dpp_attribute26 := p7_a90;
1233 ddp_supp_trade_profile_rec.dpp_attribute27 := p7_a91;
1234 ddp_supp_trade_profile_rec.dpp_attribute28 := p7_a92;
1235 ddp_supp_trade_profile_rec.dpp_attribute29 := p7_a93;
1236 ddp_supp_trade_profile_rec.dpp_attribute30 := p7_a94;
1237 ddp_supp_trade_profile_rec.org_id := p7_a95;
1238 ddp_supp_trade_profile_rec.security_group_id := p7_a96;
1239 ddp_supp_trade_profile_rec.claim_currency_code := p7_a97;
1240 ddp_supp_trade_profile_rec.min_claim_amt := p7_a98;
1241 ddp_supp_trade_profile_rec.min_claim_amt_line_lvl := p7_a99;
1242 ddp_supp_trade_profile_rec.auto_debit := p7_a100;
1243 ddp_supp_trade_profile_rec.days_before_claiming_debit := p7_a101;
1244
1245
1246 -- here's the delegated call to the old PL/SQL routine
1247 ozf_supp_trade_profile_pvt.update_supp_trade_profile(p_api_version_number,
1248 p_init_msg_list,
1249 p_commit,
1250 p_validation_level,
1251 x_return_status,
1252 x_msg_count,
1253 x_msg_data,
1254 ddp_supp_trade_profile_rec,
1255 x_object_version_number);
1256
1257 -- copy data back from the local variables to OUT or IN-OUT args, if any
1258
1259
1260
1261
1262
1263
1264
1265
1266 end;
1267
1268 procedure validate_supp_trade_profile(p_api_version_number NUMBER
1269 , p_init_msg_list VARCHAR2
1270 , p_validation_level NUMBER
1271 , p3_a0 NUMBER
1272 , p3_a1 NUMBER
1273 , p3_a2 DATE
1274 , p3_a3 NUMBER
1275 , p3_a4 DATE
1276 , p3_a5 NUMBER
1277 , p3_a6 NUMBER
1278 , p3_a7 NUMBER
1279 , p3_a8 NUMBER
1280 , p3_a9 DATE
1281 , p3_a10 NUMBER
1282 , p3_a11 VARCHAR2
1283 , p3_a12 NUMBER
1284 , p3_a13 NUMBER
1285 , p3_a14 NUMBER
1286 , p3_a15 NUMBER
1287 , p3_a16 NUMBER
1288 , p3_a17 NUMBER
1289 , p3_a18 VARCHAR2
1290 , p3_a19 VARCHAR2
1291 , p3_a20 NUMBER
1292 , p3_a21 NUMBER
1293 , p3_a22 NUMBER
1294 , p3_a23 VARCHAR2
1295 , p3_a24 NUMBER
1296 , p3_a25 NUMBER
1297 , p3_a26 VARCHAR2
1298 , p3_a27 NUMBER
1299 , p3_a28 VARCHAR2
1300 , p3_a29 VARCHAR2
1301 , p3_a30 NUMBER
1302 , p3_a31 VARCHAR2
1303 , p3_a32 NUMBER
1304 , p3_a33 VARCHAR2
1305 , p3_a34 VARCHAR2
1306 , p3_a35 VARCHAR2
1307 , p3_a36 VARCHAR2
1308 , p3_a37 VARCHAR2
1309 , p3_a38 VARCHAR2
1310 , p3_a39 VARCHAR2
1311 , p3_a40 VARCHAR2
1312 , p3_a41 VARCHAR2
1313 , p3_a42 VARCHAR2
1314 , p3_a43 VARCHAR2
1315 , p3_a44 VARCHAR2
1316 , p3_a45 VARCHAR2
1317 , p3_a46 VARCHAR2
1318 , p3_a47 VARCHAR2
1319 , p3_a48 VARCHAR2
1320 , p3_a49 VARCHAR2
1321 , p3_a50 VARCHAR2
1322 , p3_a51 VARCHAR2
1323 , p3_a52 VARCHAR2
1324 , p3_a53 VARCHAR2
1325 , p3_a54 VARCHAR2
1326 , p3_a55 VARCHAR2
1327 , p3_a56 VARCHAR2
1328 , p3_a57 VARCHAR2
1329 , p3_a58 VARCHAR2
1330 , p3_a59 VARCHAR2
1331 , p3_a60 VARCHAR2
1332 , p3_a61 VARCHAR2
1333 , p3_a62 VARCHAR2
1334 , p3_a63 VARCHAR2
1335 , p3_a64 VARCHAR2
1336 , p3_a65 VARCHAR2
1337 , p3_a66 VARCHAR2
1338 , p3_a67 VARCHAR2
1339 , p3_a68 VARCHAR2
1340 , p3_a69 VARCHAR2
1341 , p3_a70 VARCHAR2
1342 , p3_a71 VARCHAR2
1343 , p3_a72 VARCHAR2
1344 , p3_a73 VARCHAR2
1345 , p3_a74 VARCHAR2
1346 , p3_a75 VARCHAR2
1347 , p3_a76 VARCHAR2
1348 , p3_a77 VARCHAR2
1349 , p3_a78 VARCHAR2
1350 , p3_a79 VARCHAR2
1351 , p3_a80 VARCHAR2
1352 , p3_a81 VARCHAR2
1353 , p3_a82 VARCHAR2
1354 , p3_a83 VARCHAR2
1355 , p3_a84 VARCHAR2
1356 , p3_a85 VARCHAR2
1357 , p3_a86 VARCHAR2
1358 , p3_a87 VARCHAR2
1359 , p3_a88 VARCHAR2
1360 , p3_a89 VARCHAR2
1361 , p3_a90 VARCHAR2
1362 , p3_a91 VARCHAR2
1363 , p3_a92 VARCHAR2
1364 , p3_a93 VARCHAR2
1365 , p3_a94 VARCHAR2
1366 , p3_a95 NUMBER
1367 , p3_a96 NUMBER
1368 , p3_a97 VARCHAR2
1369 , p3_a98 NUMBER
1370 , p3_a99 NUMBER
1371 , p3_a100 VARCHAR2
1372 , p3_a101 NUMBER
1373 , x_return_status out nocopy VARCHAR2
1374 , x_msg_count out nocopy NUMBER
1375 , x_msg_data out nocopy VARCHAR2
1376 )
1377
1378 as
1379 ddp_supp_trade_profile_rec ozf_supp_trade_profile_pvt.supp_trade_profile_rec_type;
1380 ddindx binary_integer; indx binary_integer;
1381 begin
1382
1383 -- copy data to the local IN or IN-OUT args, if any
1384
1385
1386
1387 ddp_supp_trade_profile_rec.supp_trade_profile_id := p3_a0;
1388 ddp_supp_trade_profile_rec.object_version_number := p3_a1;
1389 ddp_supp_trade_profile_rec.last_update_date := rosetta_g_miss_date_in_map(p3_a2);
1390 ddp_supp_trade_profile_rec.last_updated_by := p3_a3;
1391 ddp_supp_trade_profile_rec.creation_date := rosetta_g_miss_date_in_map(p3_a4);
1392 ddp_supp_trade_profile_rec.created_by := p3_a5;
1393 ddp_supp_trade_profile_rec.last_update_login := p3_a6;
1394 ddp_supp_trade_profile_rec.request_id := p3_a7;
1395 ddp_supp_trade_profile_rec.program_application_id := p3_a8;
1396 ddp_supp_trade_profile_rec.program_update_date := rosetta_g_miss_date_in_map(p3_a9);
1397 ddp_supp_trade_profile_rec.program_id := p3_a10;
1398 ddp_supp_trade_profile_rec.created_from := p3_a11;
1399 ddp_supp_trade_profile_rec.supplier_id := p3_a12;
1400 ddp_supp_trade_profile_rec.supplier_site_id := p3_a13;
1401 ddp_supp_trade_profile_rec.party_id := p3_a14;
1402 ddp_supp_trade_profile_rec.cust_account_id := p3_a15;
1403 ddp_supp_trade_profile_rec.cust_acct_site_id := p3_a16;
1404 ddp_supp_trade_profile_rec.site_use_id := p3_a17;
1405 ddp_supp_trade_profile_rec.pre_approval_flag := p3_a18;
1406 ddp_supp_trade_profile_rec.approval_communication := p3_a19;
1407 ddp_supp_trade_profile_rec.gl_contra_liability_acct := p3_a20;
1408 ddp_supp_trade_profile_rec.gl_cost_adjustment_acct := p3_a21;
1409 ddp_supp_trade_profile_rec.default_days_covered := p3_a22;
1410 ddp_supp_trade_profile_rec.create_claim_price_increase := p3_a23;
1411 ddp_supp_trade_profile_rec.authorization_period := p3_a24;
1412 ddp_supp_trade_profile_rec.grace_days := p3_a25;
1413 ddp_supp_trade_profile_rec.allow_qty_increase := p3_a26;
1414 ddp_supp_trade_profile_rec.qty_increase_tolerance := p3_a27;
1415 ddp_supp_trade_profile_rec.request_communication := p3_a28;
1416 ddp_supp_trade_profile_rec.claim_communication := p3_a29;
1417 ddp_supp_trade_profile_rec.claim_frequency := p3_a30;
1418 ddp_supp_trade_profile_rec.claim_frequency_unit := p3_a31;
1419 ddp_supp_trade_profile_rec.claim_computation_basis := p3_a32;
1420 ddp_supp_trade_profile_rec.attribute_category := p3_a33;
1421 ddp_supp_trade_profile_rec.attribute1 := p3_a34;
1422 ddp_supp_trade_profile_rec.attribute2 := p3_a35;
1423 ddp_supp_trade_profile_rec.attribute3 := p3_a36;
1424 ddp_supp_trade_profile_rec.attribute4 := p3_a37;
1425 ddp_supp_trade_profile_rec.attribute5 := p3_a38;
1426 ddp_supp_trade_profile_rec.attribute6 := p3_a39;
1427 ddp_supp_trade_profile_rec.attribute7 := p3_a40;
1428 ddp_supp_trade_profile_rec.attribute8 := p3_a41;
1429 ddp_supp_trade_profile_rec.attribute9 := p3_a42;
1430 ddp_supp_trade_profile_rec.attribute10 := p3_a43;
1431 ddp_supp_trade_profile_rec.attribute11 := p3_a44;
1432 ddp_supp_trade_profile_rec.attribute12 := p3_a45;
1433 ddp_supp_trade_profile_rec.attribute13 := p3_a46;
1434 ddp_supp_trade_profile_rec.attribute14 := p3_a47;
1435 ddp_supp_trade_profile_rec.attribute15 := p3_a48;
1436 ddp_supp_trade_profile_rec.attribute16 := p3_a49;
1437 ddp_supp_trade_profile_rec.attribute17 := p3_a50;
1438 ddp_supp_trade_profile_rec.attribute18 := p3_a51;
1439 ddp_supp_trade_profile_rec.attribute19 := p3_a52;
1440 ddp_supp_trade_profile_rec.attribute20 := p3_a53;
1441 ddp_supp_trade_profile_rec.attribute21 := p3_a54;
1442 ddp_supp_trade_profile_rec.attribute22 := p3_a55;
1443 ddp_supp_trade_profile_rec.attribute23 := p3_a56;
1444 ddp_supp_trade_profile_rec.attribute24 := p3_a57;
1445 ddp_supp_trade_profile_rec.attribute25 := p3_a58;
1446 ddp_supp_trade_profile_rec.attribute26 := p3_a59;
1447 ddp_supp_trade_profile_rec.attribute27 := p3_a60;
1448 ddp_supp_trade_profile_rec.attribute28 := p3_a61;
1449 ddp_supp_trade_profile_rec.attribute29 := p3_a62;
1450 ddp_supp_trade_profile_rec.attribute30 := p3_a63;
1451 ddp_supp_trade_profile_rec.dpp_attribute_category := p3_a64;
1452 ddp_supp_trade_profile_rec.dpp_attribute1 := p3_a65;
1453 ddp_supp_trade_profile_rec.dpp_attribute2 := p3_a66;
1454 ddp_supp_trade_profile_rec.dpp_attribute3 := p3_a67;
1455 ddp_supp_trade_profile_rec.dpp_attribute4 := p3_a68;
1456 ddp_supp_trade_profile_rec.dpp_attribute5 := p3_a69;
1457 ddp_supp_trade_profile_rec.dpp_attribute6 := p3_a70;
1458 ddp_supp_trade_profile_rec.dpp_attribute7 := p3_a71;
1459 ddp_supp_trade_profile_rec.dpp_attribute8 := p3_a72;
1460 ddp_supp_trade_profile_rec.dpp_attribute9 := p3_a73;
1461 ddp_supp_trade_profile_rec.dpp_attribute10 := p3_a74;
1462 ddp_supp_trade_profile_rec.dpp_attribute11 := p3_a75;
1463 ddp_supp_trade_profile_rec.dpp_attribute12 := p3_a76;
1464 ddp_supp_trade_profile_rec.dpp_attribute13 := p3_a77;
1465 ddp_supp_trade_profile_rec.dpp_attribute14 := p3_a78;
1466 ddp_supp_trade_profile_rec.dpp_attribute15 := p3_a79;
1467 ddp_supp_trade_profile_rec.dpp_attribute16 := p3_a80;
1468 ddp_supp_trade_profile_rec.dpp_attribute17 := p3_a81;
1469 ddp_supp_trade_profile_rec.dpp_attribute18 := p3_a82;
1470 ddp_supp_trade_profile_rec.dpp_attribute19 := p3_a83;
1471 ddp_supp_trade_profile_rec.dpp_attribute20 := p3_a84;
1472 ddp_supp_trade_profile_rec.dpp_attribute21 := p3_a85;
1473 ddp_supp_trade_profile_rec.dpp_attribute22 := p3_a86;
1474 ddp_supp_trade_profile_rec.dpp_attribute23 := p3_a87;
1475 ddp_supp_trade_profile_rec.dpp_attribute24 := p3_a88;
1476 ddp_supp_trade_profile_rec.dpp_attribute25 := p3_a89;
1477 ddp_supp_trade_profile_rec.dpp_attribute26 := p3_a90;
1478 ddp_supp_trade_profile_rec.dpp_attribute27 := p3_a91;
1479 ddp_supp_trade_profile_rec.dpp_attribute28 := p3_a92;
1480 ddp_supp_trade_profile_rec.dpp_attribute29 := p3_a93;
1481 ddp_supp_trade_profile_rec.dpp_attribute30 := p3_a94;
1482 ddp_supp_trade_profile_rec.org_id := p3_a95;
1483 ddp_supp_trade_profile_rec.security_group_id := p3_a96;
1484 ddp_supp_trade_profile_rec.claim_currency_code := p3_a97;
1485 ddp_supp_trade_profile_rec.min_claim_amt := p3_a98;
1486 ddp_supp_trade_profile_rec.min_claim_amt_line_lvl := p3_a99;
1487 ddp_supp_trade_profile_rec.auto_debit := p3_a100;
1488 ddp_supp_trade_profile_rec.days_before_claiming_debit := p3_a101;
1489
1490
1491
1492
1493 -- here's the delegated call to the old PL/SQL routine
1494 ozf_supp_trade_profile_pvt.validate_supp_trade_profile(p_api_version_number,
1495 p_init_msg_list,
1496 p_validation_level,
1497 ddp_supp_trade_profile_rec,
1498 x_return_status,
1499 x_msg_count,
1500 x_msg_data);
1501
1502 -- copy data back from the local variables to OUT or IN-OUT args, if any
1503
1504
1505
1506
1507
1508
1509 end;
1510
1511 procedure check_supp_trd_prfl_items(p0_a0 NUMBER
1512 , p0_a1 NUMBER
1513 , p0_a2 DATE
1514 , p0_a3 NUMBER
1515 , p0_a4 DATE
1516 , p0_a5 NUMBER
1517 , p0_a6 NUMBER
1518 , p0_a7 NUMBER
1519 , p0_a8 NUMBER
1520 , p0_a9 DATE
1521 , p0_a10 NUMBER
1522 , p0_a11 VARCHAR2
1523 , p0_a12 NUMBER
1524 , p0_a13 NUMBER
1525 , p0_a14 NUMBER
1526 , p0_a15 NUMBER
1527 , p0_a16 NUMBER
1528 , p0_a17 NUMBER
1529 , p0_a18 VARCHAR2
1530 , p0_a19 VARCHAR2
1531 , p0_a20 NUMBER
1532 , p0_a21 NUMBER
1533 , p0_a22 NUMBER
1534 , p0_a23 VARCHAR2
1535 , p0_a24 NUMBER
1536 , p0_a25 NUMBER
1537 , p0_a26 VARCHAR2
1538 , p0_a27 NUMBER
1539 , p0_a28 VARCHAR2
1540 , p0_a29 VARCHAR2
1541 , p0_a30 NUMBER
1542 , p0_a31 VARCHAR2
1543 , p0_a32 NUMBER
1544 , p0_a33 VARCHAR2
1545 , p0_a34 VARCHAR2
1546 , p0_a35 VARCHAR2
1547 , p0_a36 VARCHAR2
1548 , p0_a37 VARCHAR2
1549 , p0_a38 VARCHAR2
1550 , p0_a39 VARCHAR2
1551 , p0_a40 VARCHAR2
1552 , p0_a41 VARCHAR2
1553 , p0_a42 VARCHAR2
1554 , p0_a43 VARCHAR2
1555 , p0_a44 VARCHAR2
1556 , p0_a45 VARCHAR2
1557 , p0_a46 VARCHAR2
1558 , p0_a47 VARCHAR2
1559 , p0_a48 VARCHAR2
1560 , p0_a49 VARCHAR2
1561 , p0_a50 VARCHAR2
1562 , p0_a51 VARCHAR2
1563 , p0_a52 VARCHAR2
1564 , p0_a53 VARCHAR2
1565 , p0_a54 VARCHAR2
1566 , p0_a55 VARCHAR2
1567 , p0_a56 VARCHAR2
1568 , p0_a57 VARCHAR2
1569 , p0_a58 VARCHAR2
1570 , p0_a59 VARCHAR2
1571 , p0_a60 VARCHAR2
1572 , p0_a61 VARCHAR2
1573 , p0_a62 VARCHAR2
1574 , p0_a63 VARCHAR2
1575 , p0_a64 VARCHAR2
1576 , p0_a65 VARCHAR2
1577 , p0_a66 VARCHAR2
1578 , p0_a67 VARCHAR2
1579 , p0_a68 VARCHAR2
1580 , p0_a69 VARCHAR2
1581 , p0_a70 VARCHAR2
1582 , p0_a71 VARCHAR2
1583 , p0_a72 VARCHAR2
1584 , p0_a73 VARCHAR2
1585 , p0_a74 VARCHAR2
1586 , p0_a75 VARCHAR2
1587 , p0_a76 VARCHAR2
1588 , p0_a77 VARCHAR2
1589 , p0_a78 VARCHAR2
1590 , p0_a79 VARCHAR2
1591 , p0_a80 VARCHAR2
1592 , p0_a81 VARCHAR2
1593 , p0_a82 VARCHAR2
1594 , p0_a83 VARCHAR2
1595 , p0_a84 VARCHAR2
1596 , p0_a85 VARCHAR2
1597 , p0_a86 VARCHAR2
1598 , p0_a87 VARCHAR2
1599 , p0_a88 VARCHAR2
1600 , p0_a89 VARCHAR2
1601 , p0_a90 VARCHAR2
1602 , p0_a91 VARCHAR2
1603 , p0_a92 VARCHAR2
1604 , p0_a93 VARCHAR2
1605 , p0_a94 VARCHAR2
1606 , p0_a95 NUMBER
1607 , p0_a96 NUMBER
1608 , p0_a97 VARCHAR2
1609 , p0_a98 NUMBER
1610 , p0_a99 NUMBER
1611 , p0_a100 VARCHAR2
1612 , p0_a101 NUMBER
1613 , p_validation_mode VARCHAR2
1614 , x_return_status out nocopy VARCHAR2
1615 )
1616
1617 as
1618 ddp_supp_trade_profile_rec ozf_supp_trade_profile_pvt.supp_trade_profile_rec_type;
1619 ddindx binary_integer; indx binary_integer;
1620 begin
1621
1622 -- copy data to the local IN or IN-OUT args, if any
1623 ddp_supp_trade_profile_rec.supp_trade_profile_id := p0_a0;
1624 ddp_supp_trade_profile_rec.object_version_number := p0_a1;
1625 ddp_supp_trade_profile_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a2);
1626 ddp_supp_trade_profile_rec.last_updated_by := p0_a3;
1627 ddp_supp_trade_profile_rec.creation_date := rosetta_g_miss_date_in_map(p0_a4);
1628 ddp_supp_trade_profile_rec.created_by := p0_a5;
1629 ddp_supp_trade_profile_rec.last_update_login := p0_a6;
1630 ddp_supp_trade_profile_rec.request_id := p0_a7;
1631 ddp_supp_trade_profile_rec.program_application_id := p0_a8;
1632 ddp_supp_trade_profile_rec.program_update_date := rosetta_g_miss_date_in_map(p0_a9);
1633 ddp_supp_trade_profile_rec.program_id := p0_a10;
1634 ddp_supp_trade_profile_rec.created_from := p0_a11;
1635 ddp_supp_trade_profile_rec.supplier_id := p0_a12;
1636 ddp_supp_trade_profile_rec.supplier_site_id := p0_a13;
1637 ddp_supp_trade_profile_rec.party_id := p0_a14;
1638 ddp_supp_trade_profile_rec.cust_account_id := p0_a15;
1639 ddp_supp_trade_profile_rec.cust_acct_site_id := p0_a16;
1640 ddp_supp_trade_profile_rec.site_use_id := p0_a17;
1641 ddp_supp_trade_profile_rec.pre_approval_flag := p0_a18;
1642 ddp_supp_trade_profile_rec.approval_communication := p0_a19;
1643 ddp_supp_trade_profile_rec.gl_contra_liability_acct := p0_a20;
1644 ddp_supp_trade_profile_rec.gl_cost_adjustment_acct := p0_a21;
1645 ddp_supp_trade_profile_rec.default_days_covered := p0_a22;
1646 ddp_supp_trade_profile_rec.create_claim_price_increase := p0_a23;
1647 ddp_supp_trade_profile_rec.authorization_period := p0_a24;
1648 ddp_supp_trade_profile_rec.grace_days := p0_a25;
1649 ddp_supp_trade_profile_rec.allow_qty_increase := p0_a26;
1650 ddp_supp_trade_profile_rec.qty_increase_tolerance := p0_a27;
1651 ddp_supp_trade_profile_rec.request_communication := p0_a28;
1652 ddp_supp_trade_profile_rec.claim_communication := p0_a29;
1653 ddp_supp_trade_profile_rec.claim_frequency := p0_a30;
1654 ddp_supp_trade_profile_rec.claim_frequency_unit := p0_a31;
1655 ddp_supp_trade_profile_rec.claim_computation_basis := p0_a32;
1656 ddp_supp_trade_profile_rec.attribute_category := p0_a33;
1657 ddp_supp_trade_profile_rec.attribute1 := p0_a34;
1658 ddp_supp_trade_profile_rec.attribute2 := p0_a35;
1659 ddp_supp_trade_profile_rec.attribute3 := p0_a36;
1660 ddp_supp_trade_profile_rec.attribute4 := p0_a37;
1661 ddp_supp_trade_profile_rec.attribute5 := p0_a38;
1662 ddp_supp_trade_profile_rec.attribute6 := p0_a39;
1663 ddp_supp_trade_profile_rec.attribute7 := p0_a40;
1664 ddp_supp_trade_profile_rec.attribute8 := p0_a41;
1665 ddp_supp_trade_profile_rec.attribute9 := p0_a42;
1666 ddp_supp_trade_profile_rec.attribute10 := p0_a43;
1667 ddp_supp_trade_profile_rec.attribute11 := p0_a44;
1668 ddp_supp_trade_profile_rec.attribute12 := p0_a45;
1669 ddp_supp_trade_profile_rec.attribute13 := p0_a46;
1670 ddp_supp_trade_profile_rec.attribute14 := p0_a47;
1671 ddp_supp_trade_profile_rec.attribute15 := p0_a48;
1672 ddp_supp_trade_profile_rec.attribute16 := p0_a49;
1673 ddp_supp_trade_profile_rec.attribute17 := p0_a50;
1674 ddp_supp_trade_profile_rec.attribute18 := p0_a51;
1675 ddp_supp_trade_profile_rec.attribute19 := p0_a52;
1676 ddp_supp_trade_profile_rec.attribute20 := p0_a53;
1677 ddp_supp_trade_profile_rec.attribute21 := p0_a54;
1678 ddp_supp_trade_profile_rec.attribute22 := p0_a55;
1679 ddp_supp_trade_profile_rec.attribute23 := p0_a56;
1680 ddp_supp_trade_profile_rec.attribute24 := p0_a57;
1681 ddp_supp_trade_profile_rec.attribute25 := p0_a58;
1682 ddp_supp_trade_profile_rec.attribute26 := p0_a59;
1683 ddp_supp_trade_profile_rec.attribute27 := p0_a60;
1684 ddp_supp_trade_profile_rec.attribute28 := p0_a61;
1685 ddp_supp_trade_profile_rec.attribute29 := p0_a62;
1686 ddp_supp_trade_profile_rec.attribute30 := p0_a63;
1687 ddp_supp_trade_profile_rec.dpp_attribute_category := p0_a64;
1688 ddp_supp_trade_profile_rec.dpp_attribute1 := p0_a65;
1689 ddp_supp_trade_profile_rec.dpp_attribute2 := p0_a66;
1690 ddp_supp_trade_profile_rec.dpp_attribute3 := p0_a67;
1691 ddp_supp_trade_profile_rec.dpp_attribute4 := p0_a68;
1692 ddp_supp_trade_profile_rec.dpp_attribute5 := p0_a69;
1693 ddp_supp_trade_profile_rec.dpp_attribute6 := p0_a70;
1694 ddp_supp_trade_profile_rec.dpp_attribute7 := p0_a71;
1695 ddp_supp_trade_profile_rec.dpp_attribute8 := p0_a72;
1696 ddp_supp_trade_profile_rec.dpp_attribute9 := p0_a73;
1697 ddp_supp_trade_profile_rec.dpp_attribute10 := p0_a74;
1698 ddp_supp_trade_profile_rec.dpp_attribute11 := p0_a75;
1699 ddp_supp_trade_profile_rec.dpp_attribute12 := p0_a76;
1700 ddp_supp_trade_profile_rec.dpp_attribute13 := p0_a77;
1701 ddp_supp_trade_profile_rec.dpp_attribute14 := p0_a78;
1702 ddp_supp_trade_profile_rec.dpp_attribute15 := p0_a79;
1703 ddp_supp_trade_profile_rec.dpp_attribute16 := p0_a80;
1704 ddp_supp_trade_profile_rec.dpp_attribute17 := p0_a81;
1705 ddp_supp_trade_profile_rec.dpp_attribute18 := p0_a82;
1706 ddp_supp_trade_profile_rec.dpp_attribute19 := p0_a83;
1707 ddp_supp_trade_profile_rec.dpp_attribute20 := p0_a84;
1708 ddp_supp_trade_profile_rec.dpp_attribute21 := p0_a85;
1709 ddp_supp_trade_profile_rec.dpp_attribute22 := p0_a86;
1710 ddp_supp_trade_profile_rec.dpp_attribute23 := p0_a87;
1711 ddp_supp_trade_profile_rec.dpp_attribute24 := p0_a88;
1712 ddp_supp_trade_profile_rec.dpp_attribute25 := p0_a89;
1713 ddp_supp_trade_profile_rec.dpp_attribute26 := p0_a90;
1714 ddp_supp_trade_profile_rec.dpp_attribute27 := p0_a91;
1715 ddp_supp_trade_profile_rec.dpp_attribute28 := p0_a92;
1716 ddp_supp_trade_profile_rec.dpp_attribute29 := p0_a93;
1717 ddp_supp_trade_profile_rec.dpp_attribute30 := p0_a94;
1718 ddp_supp_trade_profile_rec.org_id := p0_a95;
1719 ddp_supp_trade_profile_rec.security_group_id := p0_a96;
1720 ddp_supp_trade_profile_rec.claim_currency_code := p0_a97;
1721 ddp_supp_trade_profile_rec.min_claim_amt := p0_a98;
1722 ddp_supp_trade_profile_rec.min_claim_amt_line_lvl := p0_a99;
1723 ddp_supp_trade_profile_rec.auto_debit := p0_a100;
1724 ddp_supp_trade_profile_rec.days_before_claiming_debit := p0_a101;
1725
1726
1727
1728 -- here's the delegated call to the old PL/SQL routine
1729 ozf_supp_trade_profile_pvt.check_supp_trd_prfl_items(ddp_supp_trade_profile_rec,
1730 p_validation_mode,
1731 x_return_status);
1732
1733 -- copy data back from the local variables to OUT or IN-OUT args, if any
1734
1735
1736 end;
1737
1738 procedure validate_supp_trd_prfl_rec(p_api_version_number NUMBER
1739 , p_init_msg_list VARCHAR2
1740 , x_return_status out nocopy VARCHAR2
1741 , x_msg_count out nocopy NUMBER
1742 , x_msg_data out nocopy VARCHAR2
1743 , p5_a0 NUMBER
1744 , p5_a1 NUMBER
1745 , p5_a2 DATE
1746 , p5_a3 NUMBER
1747 , p5_a4 DATE
1748 , p5_a5 NUMBER
1749 , p5_a6 NUMBER
1750 , p5_a7 NUMBER
1751 , p5_a8 NUMBER
1752 , p5_a9 DATE
1753 , p5_a10 NUMBER
1754 , p5_a11 VARCHAR2
1755 , p5_a12 NUMBER
1756 , p5_a13 NUMBER
1757 , p5_a14 NUMBER
1758 , p5_a15 NUMBER
1759 , p5_a16 NUMBER
1760 , p5_a17 NUMBER
1761 , p5_a18 VARCHAR2
1762 , p5_a19 VARCHAR2
1763 , p5_a20 NUMBER
1764 , p5_a21 NUMBER
1765 , p5_a22 NUMBER
1766 , p5_a23 VARCHAR2
1767 , p5_a24 NUMBER
1768 , p5_a25 NUMBER
1769 , p5_a26 VARCHAR2
1770 , p5_a27 NUMBER
1771 , p5_a28 VARCHAR2
1772 , p5_a29 VARCHAR2
1773 , p5_a30 NUMBER
1774 , p5_a31 VARCHAR2
1775 , p5_a32 NUMBER
1776 , p5_a33 VARCHAR2
1777 , p5_a34 VARCHAR2
1778 , p5_a35 VARCHAR2
1779 , p5_a36 VARCHAR2
1780 , p5_a37 VARCHAR2
1781 , p5_a38 VARCHAR2
1782 , p5_a39 VARCHAR2
1783 , p5_a40 VARCHAR2
1784 , p5_a41 VARCHAR2
1785 , p5_a42 VARCHAR2
1786 , p5_a43 VARCHAR2
1787 , p5_a44 VARCHAR2
1788 , p5_a45 VARCHAR2
1789 , p5_a46 VARCHAR2
1790 , p5_a47 VARCHAR2
1791 , p5_a48 VARCHAR2
1792 , p5_a49 VARCHAR2
1793 , p5_a50 VARCHAR2
1794 , p5_a51 VARCHAR2
1795 , p5_a52 VARCHAR2
1796 , p5_a53 VARCHAR2
1797 , p5_a54 VARCHAR2
1798 , p5_a55 VARCHAR2
1799 , p5_a56 VARCHAR2
1800 , p5_a57 VARCHAR2
1801 , p5_a58 VARCHAR2
1802 , p5_a59 VARCHAR2
1803 , p5_a60 VARCHAR2
1804 , p5_a61 VARCHAR2
1805 , p5_a62 VARCHAR2
1806 , p5_a63 VARCHAR2
1807 , p5_a64 VARCHAR2
1808 , p5_a65 VARCHAR2
1809 , p5_a66 VARCHAR2
1810 , p5_a67 VARCHAR2
1811 , p5_a68 VARCHAR2
1812 , p5_a69 VARCHAR2
1813 , p5_a70 VARCHAR2
1814 , p5_a71 VARCHAR2
1815 , p5_a72 VARCHAR2
1816 , p5_a73 VARCHAR2
1817 , p5_a74 VARCHAR2
1818 , p5_a75 VARCHAR2
1819 , p5_a76 VARCHAR2
1820 , p5_a77 VARCHAR2
1821 , p5_a78 VARCHAR2
1822 , p5_a79 VARCHAR2
1823 , p5_a80 VARCHAR2
1824 , p5_a81 VARCHAR2
1825 , p5_a82 VARCHAR2
1826 , p5_a83 VARCHAR2
1827 , p5_a84 VARCHAR2
1828 , p5_a85 VARCHAR2
1829 , p5_a86 VARCHAR2
1830 , p5_a87 VARCHAR2
1831 , p5_a88 VARCHAR2
1832 , p5_a89 VARCHAR2
1833 , p5_a90 VARCHAR2
1834 , p5_a91 VARCHAR2
1835 , p5_a92 VARCHAR2
1836 , p5_a93 VARCHAR2
1837 , p5_a94 VARCHAR2
1838 , p5_a95 NUMBER
1839 , p5_a96 NUMBER
1840 , p5_a97 VARCHAR2
1841 , p5_a98 NUMBER
1842 , p5_a99 NUMBER
1843 , p5_a100 VARCHAR2
1844 , p5_a101 NUMBER
1845 )
1846
1847 as
1848 ddp_supp_trade_profile_rec ozf_supp_trade_profile_pvt.supp_trade_profile_rec_type;
1849 ddindx binary_integer; indx binary_integer;
1850 begin
1851
1852 -- copy data to the local IN or IN-OUT args, if any
1853
1854
1855
1856
1857
1858 ddp_supp_trade_profile_rec.supp_trade_profile_id := p5_a0;
1859 ddp_supp_trade_profile_rec.object_version_number := p5_a1;
1860 ddp_supp_trade_profile_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a2);
1861 ddp_supp_trade_profile_rec.last_updated_by := p5_a3;
1862 ddp_supp_trade_profile_rec.creation_date := rosetta_g_miss_date_in_map(p5_a4);
1863 ddp_supp_trade_profile_rec.created_by := p5_a5;
1864 ddp_supp_trade_profile_rec.last_update_login := p5_a6;
1865 ddp_supp_trade_profile_rec.request_id := p5_a7;
1866 ddp_supp_trade_profile_rec.program_application_id := p5_a8;
1867 ddp_supp_trade_profile_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a9);
1868 ddp_supp_trade_profile_rec.program_id := p5_a10;
1869 ddp_supp_trade_profile_rec.created_from := p5_a11;
1870 ddp_supp_trade_profile_rec.supplier_id := p5_a12;
1871 ddp_supp_trade_profile_rec.supplier_site_id := p5_a13;
1872 ddp_supp_trade_profile_rec.party_id := p5_a14;
1873 ddp_supp_trade_profile_rec.cust_account_id := p5_a15;
1874 ddp_supp_trade_profile_rec.cust_acct_site_id := p5_a16;
1875 ddp_supp_trade_profile_rec.site_use_id := p5_a17;
1876 ddp_supp_trade_profile_rec.pre_approval_flag := p5_a18;
1877 ddp_supp_trade_profile_rec.approval_communication := p5_a19;
1878 ddp_supp_trade_profile_rec.gl_contra_liability_acct := p5_a20;
1879 ddp_supp_trade_profile_rec.gl_cost_adjustment_acct := p5_a21;
1880 ddp_supp_trade_profile_rec.default_days_covered := p5_a22;
1881 ddp_supp_trade_profile_rec.create_claim_price_increase := p5_a23;
1882 ddp_supp_trade_profile_rec.authorization_period := p5_a24;
1883 ddp_supp_trade_profile_rec.grace_days := p5_a25;
1884 ddp_supp_trade_profile_rec.allow_qty_increase := p5_a26;
1885 ddp_supp_trade_profile_rec.qty_increase_tolerance := p5_a27;
1886 ddp_supp_trade_profile_rec.request_communication := p5_a28;
1887 ddp_supp_trade_profile_rec.claim_communication := p5_a29;
1888 ddp_supp_trade_profile_rec.claim_frequency := p5_a30;
1889 ddp_supp_trade_profile_rec.claim_frequency_unit := p5_a31;
1890 ddp_supp_trade_profile_rec.claim_computation_basis := p5_a32;
1891 ddp_supp_trade_profile_rec.attribute_category := p5_a33;
1892 ddp_supp_trade_profile_rec.attribute1 := p5_a34;
1893 ddp_supp_trade_profile_rec.attribute2 := p5_a35;
1894 ddp_supp_trade_profile_rec.attribute3 := p5_a36;
1895 ddp_supp_trade_profile_rec.attribute4 := p5_a37;
1896 ddp_supp_trade_profile_rec.attribute5 := p5_a38;
1897 ddp_supp_trade_profile_rec.attribute6 := p5_a39;
1898 ddp_supp_trade_profile_rec.attribute7 := p5_a40;
1899 ddp_supp_trade_profile_rec.attribute8 := p5_a41;
1900 ddp_supp_trade_profile_rec.attribute9 := p5_a42;
1901 ddp_supp_trade_profile_rec.attribute10 := p5_a43;
1902 ddp_supp_trade_profile_rec.attribute11 := p5_a44;
1903 ddp_supp_trade_profile_rec.attribute12 := p5_a45;
1904 ddp_supp_trade_profile_rec.attribute13 := p5_a46;
1905 ddp_supp_trade_profile_rec.attribute14 := p5_a47;
1906 ddp_supp_trade_profile_rec.attribute15 := p5_a48;
1907 ddp_supp_trade_profile_rec.attribute16 := p5_a49;
1908 ddp_supp_trade_profile_rec.attribute17 := p5_a50;
1909 ddp_supp_trade_profile_rec.attribute18 := p5_a51;
1910 ddp_supp_trade_profile_rec.attribute19 := p5_a52;
1911 ddp_supp_trade_profile_rec.attribute20 := p5_a53;
1912 ddp_supp_trade_profile_rec.attribute21 := p5_a54;
1913 ddp_supp_trade_profile_rec.attribute22 := p5_a55;
1914 ddp_supp_trade_profile_rec.attribute23 := p5_a56;
1915 ddp_supp_trade_profile_rec.attribute24 := p5_a57;
1916 ddp_supp_trade_profile_rec.attribute25 := p5_a58;
1917 ddp_supp_trade_profile_rec.attribute26 := p5_a59;
1918 ddp_supp_trade_profile_rec.attribute27 := p5_a60;
1919 ddp_supp_trade_profile_rec.attribute28 := p5_a61;
1920 ddp_supp_trade_profile_rec.attribute29 := p5_a62;
1921 ddp_supp_trade_profile_rec.attribute30 := p5_a63;
1922 ddp_supp_trade_profile_rec.dpp_attribute_category := p5_a64;
1923 ddp_supp_trade_profile_rec.dpp_attribute1 := p5_a65;
1924 ddp_supp_trade_profile_rec.dpp_attribute2 := p5_a66;
1925 ddp_supp_trade_profile_rec.dpp_attribute3 := p5_a67;
1926 ddp_supp_trade_profile_rec.dpp_attribute4 := p5_a68;
1927 ddp_supp_trade_profile_rec.dpp_attribute5 := p5_a69;
1928 ddp_supp_trade_profile_rec.dpp_attribute6 := p5_a70;
1929 ddp_supp_trade_profile_rec.dpp_attribute7 := p5_a71;
1930 ddp_supp_trade_profile_rec.dpp_attribute8 := p5_a72;
1931 ddp_supp_trade_profile_rec.dpp_attribute9 := p5_a73;
1932 ddp_supp_trade_profile_rec.dpp_attribute10 := p5_a74;
1933 ddp_supp_trade_profile_rec.dpp_attribute11 := p5_a75;
1934 ddp_supp_trade_profile_rec.dpp_attribute12 := p5_a76;
1935 ddp_supp_trade_profile_rec.dpp_attribute13 := p5_a77;
1936 ddp_supp_trade_profile_rec.dpp_attribute14 := p5_a78;
1937 ddp_supp_trade_profile_rec.dpp_attribute15 := p5_a79;
1938 ddp_supp_trade_profile_rec.dpp_attribute16 := p5_a80;
1939 ddp_supp_trade_profile_rec.dpp_attribute17 := p5_a81;
1940 ddp_supp_trade_profile_rec.dpp_attribute18 := p5_a82;
1941 ddp_supp_trade_profile_rec.dpp_attribute19 := p5_a83;
1942 ddp_supp_trade_profile_rec.dpp_attribute20 := p5_a84;
1943 ddp_supp_trade_profile_rec.dpp_attribute21 := p5_a85;
1944 ddp_supp_trade_profile_rec.dpp_attribute22 := p5_a86;
1945 ddp_supp_trade_profile_rec.dpp_attribute23 := p5_a87;
1946 ddp_supp_trade_profile_rec.dpp_attribute24 := p5_a88;
1947 ddp_supp_trade_profile_rec.dpp_attribute25 := p5_a89;
1948 ddp_supp_trade_profile_rec.dpp_attribute26 := p5_a90;
1949 ddp_supp_trade_profile_rec.dpp_attribute27 := p5_a91;
1950 ddp_supp_trade_profile_rec.dpp_attribute28 := p5_a92;
1951 ddp_supp_trade_profile_rec.dpp_attribute29 := p5_a93;
1952 ddp_supp_trade_profile_rec.dpp_attribute30 := p5_a94;
1953 ddp_supp_trade_profile_rec.org_id := p5_a95;
1954 ddp_supp_trade_profile_rec.security_group_id := p5_a96;
1955 ddp_supp_trade_profile_rec.claim_currency_code := p5_a97;
1956 ddp_supp_trade_profile_rec.min_claim_amt := p5_a98;
1957 ddp_supp_trade_profile_rec.min_claim_amt_line_lvl := p5_a99;
1958 ddp_supp_trade_profile_rec.auto_debit := p5_a100;
1959 ddp_supp_trade_profile_rec.days_before_claiming_debit := p5_a101;
1960
1961 -- here's the delegated call to the old PL/SQL routine
1962 ozf_supp_trade_profile_pvt.validate_supp_trd_prfl_rec(p_api_version_number,
1963 p_init_msg_list,
1964 x_return_status,
1965 x_msg_count,
1966 x_msg_data,
1967 ddp_supp_trade_profile_rec);
1968
1969 -- copy data back from the local variables to OUT or IN-OUT args, if any
1970
1971
1972
1973
1974
1975 end;
1976
1977 end ozf_supp_trade_profile_pvt_w;