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