1: package body lns_distributions_pub_w as
2: /* $Header: LNS_DIST_PUBJ_B.pls 120.4 2005/09/01 08:34 raverma noship $ */
3: procedure rosetta_table_copy_in_p1(t out nocopy lns_distributions_pub.distribution_tbl, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_VARCHAR2_TABLE_100
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
1: package body lns_distributions_pub_w as
2: /* $Header: LNS_DIST_PUBJ_B.pls 120.4 2005/09/01 08:34 raverma noship $ */
3: procedure rosetta_table_copy_in_p1(t out nocopy lns_distributions_pub.distribution_tbl, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_VARCHAR2_TABLE_100
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
8: , a5 JTF_VARCHAR2_TABLE_100
3: procedure rosetta_table_copy_in_p1(t out nocopy lns_distributions_pub.distribution_tbl, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_VARCHAR2_TABLE_100
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
8: , a5 JTF_VARCHAR2_TABLE_100
9: , a6 JTF_NUMBER_TABLE
10: , a7 JTF_NUMBER_TABLE
11: , a8 JTF_VARCHAR2_TABLE_100
5: , a2 JTF_VARCHAR2_TABLE_100
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
8: , a5 JTF_VARCHAR2_TABLE_100
9: , a6 JTF_NUMBER_TABLE
10: , a7 JTF_NUMBER_TABLE
11: , a8 JTF_VARCHAR2_TABLE_100
12: , a9 JTF_VARCHAR2_TABLE_100
13: , a10 JTF_NUMBER_TABLE
6: , a3 JTF_VARCHAR2_TABLE_100
7: , a4 JTF_NUMBER_TABLE
8: , a5 JTF_VARCHAR2_TABLE_100
9: , a6 JTF_NUMBER_TABLE
10: , a7 JTF_NUMBER_TABLE
11: , a8 JTF_VARCHAR2_TABLE_100
12: , a9 JTF_VARCHAR2_TABLE_100
13: , a10 JTF_NUMBER_TABLE
14: , a11 JTF_NUMBER_TABLE
9: , a6 JTF_NUMBER_TABLE
10: , a7 JTF_NUMBER_TABLE
11: , a8 JTF_VARCHAR2_TABLE_100
12: , a9 JTF_VARCHAR2_TABLE_100
13: , a10 JTF_NUMBER_TABLE
14: , a11 JTF_NUMBER_TABLE
15: ) as
16: ddindx binary_integer; indx binary_integer;
17: begin
10: , a7 JTF_NUMBER_TABLE
11: , a8 JTF_VARCHAR2_TABLE_100
12: , a9 JTF_VARCHAR2_TABLE_100
13: , a10 JTF_NUMBER_TABLE
14: , a11 JTF_NUMBER_TABLE
15: ) as
16: ddindx binary_integer; indx binary_integer;
17: begin
18: if a0 is not null and a0.count > 0 then
40: end loop;
41: end if;
42: end if;
43: end rosetta_table_copy_in_p1;
44: procedure rosetta_table_copy_out_p1(t lns_distributions_pub.distribution_tbl, a0 out nocopy JTF_NUMBER_TABLE
45: , a1 out nocopy JTF_NUMBER_TABLE
46: , a2 out nocopy JTF_VARCHAR2_TABLE_100
47: , a3 out nocopy JTF_VARCHAR2_TABLE_100
48: , a4 out nocopy JTF_NUMBER_TABLE
41: end if;
42: end if;
43: end rosetta_table_copy_in_p1;
44: procedure rosetta_table_copy_out_p1(t lns_distributions_pub.distribution_tbl, a0 out nocopy JTF_NUMBER_TABLE
45: , a1 out nocopy JTF_NUMBER_TABLE
46: , a2 out nocopy JTF_VARCHAR2_TABLE_100
47: , a3 out nocopy JTF_VARCHAR2_TABLE_100
48: , a4 out nocopy JTF_NUMBER_TABLE
49: , a5 out nocopy JTF_VARCHAR2_TABLE_100
44: procedure rosetta_table_copy_out_p1(t lns_distributions_pub.distribution_tbl, a0 out nocopy JTF_NUMBER_TABLE
45: , a1 out nocopy JTF_NUMBER_TABLE
46: , a2 out nocopy JTF_VARCHAR2_TABLE_100
47: , a3 out nocopy JTF_VARCHAR2_TABLE_100
48: , a4 out nocopy JTF_NUMBER_TABLE
49: , a5 out nocopy JTF_VARCHAR2_TABLE_100
50: , a6 out nocopy JTF_NUMBER_TABLE
51: , a7 out nocopy JTF_NUMBER_TABLE
52: , a8 out nocopy JTF_VARCHAR2_TABLE_100
46: , a2 out nocopy JTF_VARCHAR2_TABLE_100
47: , a3 out nocopy JTF_VARCHAR2_TABLE_100
48: , a4 out nocopy JTF_NUMBER_TABLE
49: , a5 out nocopy JTF_VARCHAR2_TABLE_100
50: , a6 out nocopy JTF_NUMBER_TABLE
51: , a7 out nocopy JTF_NUMBER_TABLE
52: , a8 out nocopy JTF_VARCHAR2_TABLE_100
53: , a9 out nocopy JTF_VARCHAR2_TABLE_100
54: , a10 out nocopy JTF_NUMBER_TABLE
47: , a3 out nocopy JTF_VARCHAR2_TABLE_100
48: , a4 out nocopy JTF_NUMBER_TABLE
49: , a5 out nocopy JTF_VARCHAR2_TABLE_100
50: , a6 out nocopy JTF_NUMBER_TABLE
51: , a7 out nocopy JTF_NUMBER_TABLE
52: , a8 out nocopy JTF_VARCHAR2_TABLE_100
53: , a9 out nocopy JTF_VARCHAR2_TABLE_100
54: , a10 out nocopy JTF_NUMBER_TABLE
55: , a11 out nocopy JTF_NUMBER_TABLE
50: , a6 out nocopy JTF_NUMBER_TABLE
51: , a7 out nocopy JTF_NUMBER_TABLE
52: , a8 out nocopy JTF_VARCHAR2_TABLE_100
53: , a9 out nocopy JTF_VARCHAR2_TABLE_100
54: , a10 out nocopy JTF_NUMBER_TABLE
55: , a11 out nocopy JTF_NUMBER_TABLE
56: ) as
57: ddindx binary_integer; indx binary_integer;
58: begin
51: , a7 out nocopy JTF_NUMBER_TABLE
52: , a8 out nocopy JTF_VARCHAR2_TABLE_100
53: , a9 out nocopy JTF_VARCHAR2_TABLE_100
54: , a10 out nocopy JTF_NUMBER_TABLE
55: , a11 out nocopy JTF_NUMBER_TABLE
56: ) as
57: ddindx binary_integer; indx binary_integer;
58: begin
59: if t is null or t.count = 0 then
56: ) as
57: ddindx binary_integer; indx binary_integer;
58: begin
59: if t is null or t.count = 0 then
60: a0 := JTF_NUMBER_TABLE();
61: a1 := JTF_NUMBER_TABLE();
62: a2 := JTF_VARCHAR2_TABLE_100();
63: a3 := JTF_VARCHAR2_TABLE_100();
64: a4 := JTF_NUMBER_TABLE();
57: ddindx binary_integer; indx binary_integer;
58: begin
59: if t is null or t.count = 0 then
60: a0 := JTF_NUMBER_TABLE();
61: a1 := JTF_NUMBER_TABLE();
62: a2 := JTF_VARCHAR2_TABLE_100();
63: a3 := JTF_VARCHAR2_TABLE_100();
64: a4 := JTF_NUMBER_TABLE();
65: a5 := JTF_VARCHAR2_TABLE_100();
60: a0 := JTF_NUMBER_TABLE();
61: a1 := JTF_NUMBER_TABLE();
62: a2 := JTF_VARCHAR2_TABLE_100();
63: a3 := JTF_VARCHAR2_TABLE_100();
64: a4 := JTF_NUMBER_TABLE();
65: a5 := JTF_VARCHAR2_TABLE_100();
66: a6 := JTF_NUMBER_TABLE();
67: a7 := JTF_NUMBER_TABLE();
68: a8 := JTF_VARCHAR2_TABLE_100();
62: a2 := JTF_VARCHAR2_TABLE_100();
63: a3 := JTF_VARCHAR2_TABLE_100();
64: a4 := JTF_NUMBER_TABLE();
65: a5 := JTF_VARCHAR2_TABLE_100();
66: a6 := JTF_NUMBER_TABLE();
67: a7 := JTF_NUMBER_TABLE();
68: a8 := JTF_VARCHAR2_TABLE_100();
69: a9 := JTF_VARCHAR2_TABLE_100();
70: a10 := JTF_NUMBER_TABLE();
63: a3 := JTF_VARCHAR2_TABLE_100();
64: a4 := JTF_NUMBER_TABLE();
65: a5 := JTF_VARCHAR2_TABLE_100();
66: a6 := JTF_NUMBER_TABLE();
67: a7 := JTF_NUMBER_TABLE();
68: a8 := JTF_VARCHAR2_TABLE_100();
69: a9 := JTF_VARCHAR2_TABLE_100();
70: a10 := JTF_NUMBER_TABLE();
71: a11 := JTF_NUMBER_TABLE();
66: a6 := JTF_NUMBER_TABLE();
67: a7 := JTF_NUMBER_TABLE();
68: a8 := JTF_VARCHAR2_TABLE_100();
69: a9 := JTF_VARCHAR2_TABLE_100();
70: a10 := JTF_NUMBER_TABLE();
71: a11 := JTF_NUMBER_TABLE();
72: else
73: a0 := JTF_NUMBER_TABLE();
74: a1 := JTF_NUMBER_TABLE();
67: a7 := JTF_NUMBER_TABLE();
68: a8 := JTF_VARCHAR2_TABLE_100();
69: a9 := JTF_VARCHAR2_TABLE_100();
70: a10 := JTF_NUMBER_TABLE();
71: a11 := JTF_NUMBER_TABLE();
72: else
73: a0 := JTF_NUMBER_TABLE();
74: a1 := JTF_NUMBER_TABLE();
75: a2 := JTF_VARCHAR2_TABLE_100();
69: a9 := JTF_VARCHAR2_TABLE_100();
70: a10 := JTF_NUMBER_TABLE();
71: a11 := JTF_NUMBER_TABLE();
72: else
73: a0 := JTF_NUMBER_TABLE();
74: a1 := JTF_NUMBER_TABLE();
75: a2 := JTF_VARCHAR2_TABLE_100();
76: a3 := JTF_VARCHAR2_TABLE_100();
77: a4 := JTF_NUMBER_TABLE();
70: a10 := JTF_NUMBER_TABLE();
71: a11 := JTF_NUMBER_TABLE();
72: else
73: a0 := JTF_NUMBER_TABLE();
74: a1 := JTF_NUMBER_TABLE();
75: a2 := JTF_VARCHAR2_TABLE_100();
76: a3 := JTF_VARCHAR2_TABLE_100();
77: a4 := JTF_NUMBER_TABLE();
78: a5 := JTF_VARCHAR2_TABLE_100();
73: a0 := JTF_NUMBER_TABLE();
74: a1 := JTF_NUMBER_TABLE();
75: a2 := JTF_VARCHAR2_TABLE_100();
76: a3 := JTF_VARCHAR2_TABLE_100();
77: a4 := JTF_NUMBER_TABLE();
78: a5 := JTF_VARCHAR2_TABLE_100();
79: a6 := JTF_NUMBER_TABLE();
80: a7 := JTF_NUMBER_TABLE();
81: a8 := JTF_VARCHAR2_TABLE_100();
75: a2 := JTF_VARCHAR2_TABLE_100();
76: a3 := JTF_VARCHAR2_TABLE_100();
77: a4 := JTF_NUMBER_TABLE();
78: a5 := JTF_VARCHAR2_TABLE_100();
79: a6 := JTF_NUMBER_TABLE();
80: a7 := JTF_NUMBER_TABLE();
81: a8 := JTF_VARCHAR2_TABLE_100();
82: a9 := JTF_VARCHAR2_TABLE_100();
83: a10 := JTF_NUMBER_TABLE();
76: a3 := JTF_VARCHAR2_TABLE_100();
77: a4 := JTF_NUMBER_TABLE();
78: a5 := JTF_VARCHAR2_TABLE_100();
79: a6 := JTF_NUMBER_TABLE();
80: a7 := JTF_NUMBER_TABLE();
81: a8 := JTF_VARCHAR2_TABLE_100();
82: a9 := JTF_VARCHAR2_TABLE_100();
83: a10 := JTF_NUMBER_TABLE();
84: a11 := JTF_NUMBER_TABLE();
79: a6 := JTF_NUMBER_TABLE();
80: a7 := JTF_NUMBER_TABLE();
81: a8 := JTF_VARCHAR2_TABLE_100();
82: a9 := JTF_VARCHAR2_TABLE_100();
83: a10 := JTF_NUMBER_TABLE();
84: a11 := JTF_NUMBER_TABLE();
85: if t.count > 0 then
86: a0.extend(t.count);
87: a1.extend(t.count);
80: a7 := JTF_NUMBER_TABLE();
81: a8 := JTF_VARCHAR2_TABLE_100();
82: a9 := JTF_VARCHAR2_TABLE_100();
83: a10 := JTF_NUMBER_TABLE();
84: a11 := JTF_NUMBER_TABLE();
85: if t.count > 0 then
86: a0.extend(t.count);
87: a1.extend(t.count);
88: a2.extend(t.count);
123: procedure rosetta_table_copy_in_p3(t out nocopy lns_distributions_pub.default_distributions_tbl, a0 JTF_VARCHAR2_TABLE_100
124: , a1 JTF_VARCHAR2_TABLE_100
125: , a2 JTF_VARCHAR2_TABLE_100
126: , a3 JTF_VARCHAR2_TABLE_100
127: , a4 JTF_NUMBER_TABLE
128: , a5 JTF_VARCHAR2_TABLE_100
129: , a6 JTF_NUMBER_TABLE
130: , a7 JTF_VARCHAR2_TABLE_100
131: , a8 JTF_NUMBER_TABLE
125: , a2 JTF_VARCHAR2_TABLE_100
126: , a3 JTF_VARCHAR2_TABLE_100
127: , a4 JTF_NUMBER_TABLE
128: , a5 JTF_VARCHAR2_TABLE_100
129: , a6 JTF_NUMBER_TABLE
130: , a7 JTF_VARCHAR2_TABLE_100
131: , a8 JTF_NUMBER_TABLE
132: , a9 JTF_NUMBER_TABLE
133: , a10 JTF_VARCHAR2_TABLE_100
127: , a4 JTF_NUMBER_TABLE
128: , a5 JTF_VARCHAR2_TABLE_100
129: , a6 JTF_NUMBER_TABLE
130: , a7 JTF_VARCHAR2_TABLE_100
131: , a8 JTF_NUMBER_TABLE
132: , a9 JTF_NUMBER_TABLE
133: , a10 JTF_VARCHAR2_TABLE_100
134: , a11 JTF_VARCHAR2_TABLE_100
135: , a12 JTF_VARCHAR2_TABLE_100
128: , a5 JTF_VARCHAR2_TABLE_100
129: , a6 JTF_NUMBER_TABLE
130: , a7 JTF_VARCHAR2_TABLE_100
131: , a8 JTF_NUMBER_TABLE
132: , a9 JTF_NUMBER_TABLE
133: , a10 JTF_VARCHAR2_TABLE_100
134: , a11 JTF_VARCHAR2_TABLE_100
135: , a12 JTF_VARCHAR2_TABLE_100
136: ) as
166: procedure rosetta_table_copy_out_p3(t lns_distributions_pub.default_distributions_tbl, a0 out nocopy JTF_VARCHAR2_TABLE_100
167: , a1 out nocopy JTF_VARCHAR2_TABLE_100
168: , a2 out nocopy JTF_VARCHAR2_TABLE_100
169: , a3 out nocopy JTF_VARCHAR2_TABLE_100
170: , a4 out nocopy JTF_NUMBER_TABLE
171: , a5 out nocopy JTF_VARCHAR2_TABLE_100
172: , a6 out nocopy JTF_NUMBER_TABLE
173: , a7 out nocopy JTF_VARCHAR2_TABLE_100
174: , a8 out nocopy JTF_NUMBER_TABLE
168: , a2 out nocopy JTF_VARCHAR2_TABLE_100
169: , a3 out nocopy JTF_VARCHAR2_TABLE_100
170: , a4 out nocopy JTF_NUMBER_TABLE
171: , a5 out nocopy JTF_VARCHAR2_TABLE_100
172: , a6 out nocopy JTF_NUMBER_TABLE
173: , a7 out nocopy JTF_VARCHAR2_TABLE_100
174: , a8 out nocopy JTF_NUMBER_TABLE
175: , a9 out nocopy JTF_NUMBER_TABLE
176: , a10 out nocopy JTF_VARCHAR2_TABLE_100
170: , a4 out nocopy JTF_NUMBER_TABLE
171: , a5 out nocopy JTF_VARCHAR2_TABLE_100
172: , a6 out nocopy JTF_NUMBER_TABLE
173: , a7 out nocopy JTF_VARCHAR2_TABLE_100
174: , a8 out nocopy JTF_NUMBER_TABLE
175: , a9 out nocopy JTF_NUMBER_TABLE
176: , a10 out nocopy JTF_VARCHAR2_TABLE_100
177: , a11 out nocopy JTF_VARCHAR2_TABLE_100
178: , a12 out nocopy JTF_VARCHAR2_TABLE_100
171: , a5 out nocopy JTF_VARCHAR2_TABLE_100
172: , a6 out nocopy JTF_NUMBER_TABLE
173: , a7 out nocopy JTF_VARCHAR2_TABLE_100
174: , a8 out nocopy JTF_NUMBER_TABLE
175: , a9 out nocopy JTF_NUMBER_TABLE
176: , a10 out nocopy JTF_VARCHAR2_TABLE_100
177: , a11 out nocopy JTF_VARCHAR2_TABLE_100
178: , a12 out nocopy JTF_VARCHAR2_TABLE_100
179: ) as
183: a0 := JTF_VARCHAR2_TABLE_100();
184: a1 := JTF_VARCHAR2_TABLE_100();
185: a2 := JTF_VARCHAR2_TABLE_100();
186: a3 := JTF_VARCHAR2_TABLE_100();
187: a4 := JTF_NUMBER_TABLE();
188: a5 := JTF_VARCHAR2_TABLE_100();
189: a6 := JTF_NUMBER_TABLE();
190: a7 := JTF_VARCHAR2_TABLE_100();
191: a8 := JTF_NUMBER_TABLE();
185: a2 := JTF_VARCHAR2_TABLE_100();
186: a3 := JTF_VARCHAR2_TABLE_100();
187: a4 := JTF_NUMBER_TABLE();
188: a5 := JTF_VARCHAR2_TABLE_100();
189: a6 := JTF_NUMBER_TABLE();
190: a7 := JTF_VARCHAR2_TABLE_100();
191: a8 := JTF_NUMBER_TABLE();
192: a9 := JTF_NUMBER_TABLE();
193: a10 := JTF_VARCHAR2_TABLE_100();
187: a4 := JTF_NUMBER_TABLE();
188: a5 := JTF_VARCHAR2_TABLE_100();
189: a6 := JTF_NUMBER_TABLE();
190: a7 := JTF_VARCHAR2_TABLE_100();
191: a8 := JTF_NUMBER_TABLE();
192: a9 := JTF_NUMBER_TABLE();
193: a10 := JTF_VARCHAR2_TABLE_100();
194: a11 := JTF_VARCHAR2_TABLE_100();
195: a12 := JTF_VARCHAR2_TABLE_100();
188: a5 := JTF_VARCHAR2_TABLE_100();
189: a6 := JTF_NUMBER_TABLE();
190: a7 := JTF_VARCHAR2_TABLE_100();
191: a8 := JTF_NUMBER_TABLE();
192: a9 := JTF_NUMBER_TABLE();
193: a10 := JTF_VARCHAR2_TABLE_100();
194: a11 := JTF_VARCHAR2_TABLE_100();
195: a12 := JTF_VARCHAR2_TABLE_100();
196: else
197: a0 := JTF_VARCHAR2_TABLE_100();
198: a1 := JTF_VARCHAR2_TABLE_100();
199: a2 := JTF_VARCHAR2_TABLE_100();
200: a3 := JTF_VARCHAR2_TABLE_100();
201: a4 := JTF_NUMBER_TABLE();
202: a5 := JTF_VARCHAR2_TABLE_100();
203: a6 := JTF_NUMBER_TABLE();
204: a7 := JTF_VARCHAR2_TABLE_100();
205: a8 := JTF_NUMBER_TABLE();
199: a2 := JTF_VARCHAR2_TABLE_100();
200: a3 := JTF_VARCHAR2_TABLE_100();
201: a4 := JTF_NUMBER_TABLE();
202: a5 := JTF_VARCHAR2_TABLE_100();
203: a6 := JTF_NUMBER_TABLE();
204: a7 := JTF_VARCHAR2_TABLE_100();
205: a8 := JTF_NUMBER_TABLE();
206: a9 := JTF_NUMBER_TABLE();
207: a10 := JTF_VARCHAR2_TABLE_100();
201: a4 := JTF_NUMBER_TABLE();
202: a5 := JTF_VARCHAR2_TABLE_100();
203: a6 := JTF_NUMBER_TABLE();
204: a7 := JTF_VARCHAR2_TABLE_100();
205: a8 := JTF_NUMBER_TABLE();
206: a9 := JTF_NUMBER_TABLE();
207: a10 := JTF_VARCHAR2_TABLE_100();
208: a11 := JTF_VARCHAR2_TABLE_100();
209: a12 := JTF_VARCHAR2_TABLE_100();
202: a5 := JTF_VARCHAR2_TABLE_100();
203: a6 := JTF_NUMBER_TABLE();
204: a7 := JTF_VARCHAR2_TABLE_100();
205: a8 := JTF_NUMBER_TABLE();
206: a9 := JTF_NUMBER_TABLE();
207: a10 := JTF_VARCHAR2_TABLE_100();
208: a11 := JTF_VARCHAR2_TABLE_100();
209: a12 := JTF_VARCHAR2_TABLE_100();
210: if t.count > 0 then
246: end if;
247: end if;
248: end rosetta_table_copy_out_p3;
249:
250: procedure rosetta_table_copy_in_p5(t out nocopy lns_distributions_pub.acc_event_tbl, a0 JTF_NUMBER_TABLE
251: , a1 JTF_VARCHAR2_TABLE_100
252: , a2 JTF_DATE_TABLE
253: , a3 JTF_VARCHAR2_TABLE_100
254: , a4 JTF_NUMBER_TABLE
250: procedure rosetta_table_copy_in_p5(t out nocopy lns_distributions_pub.acc_event_tbl, a0 JTF_NUMBER_TABLE
251: , a1 JTF_VARCHAR2_TABLE_100
252: , a2 JTF_DATE_TABLE
253: , a3 JTF_VARCHAR2_TABLE_100
254: , a4 JTF_NUMBER_TABLE
255: ) as
256: ddindx binary_integer; indx binary_integer;
257: begin
258: if a0 is not null and a0.count > 0 then
273: end loop;
274: end if;
275: end if;
276: end rosetta_table_copy_in_p5;
277: procedure rosetta_table_copy_out_p5(t lns_distributions_pub.acc_event_tbl, a0 out nocopy JTF_NUMBER_TABLE
278: , a1 out nocopy JTF_VARCHAR2_TABLE_100
279: , a2 out nocopy JTF_DATE_TABLE
280: , a3 out nocopy JTF_VARCHAR2_TABLE_100
281: , a4 out nocopy JTF_NUMBER_TABLE
277: procedure rosetta_table_copy_out_p5(t lns_distributions_pub.acc_event_tbl, a0 out nocopy JTF_NUMBER_TABLE
278: , a1 out nocopy JTF_VARCHAR2_TABLE_100
279: , a2 out nocopy JTF_DATE_TABLE
280: , a3 out nocopy JTF_VARCHAR2_TABLE_100
281: , a4 out nocopy JTF_NUMBER_TABLE
282: ) as
283: ddindx binary_integer; indx binary_integer;
284: begin
285: if t is null or t.count = 0 then
282: ) as
283: ddindx binary_integer; indx binary_integer;
284: begin
285: if t is null or t.count = 0 then
286: a0 := JTF_NUMBER_TABLE();
287: a1 := JTF_VARCHAR2_TABLE_100();
288: a2 := JTF_DATE_TABLE();
289: a3 := JTF_VARCHAR2_TABLE_100();
290: a4 := JTF_NUMBER_TABLE();
286: a0 := JTF_NUMBER_TABLE();
287: a1 := JTF_VARCHAR2_TABLE_100();
288: a2 := JTF_DATE_TABLE();
289: a3 := JTF_VARCHAR2_TABLE_100();
290: a4 := JTF_NUMBER_TABLE();
291: else
292: a0 := JTF_NUMBER_TABLE();
293: a1 := JTF_VARCHAR2_TABLE_100();
294: a2 := JTF_DATE_TABLE();
288: a2 := JTF_DATE_TABLE();
289: a3 := JTF_VARCHAR2_TABLE_100();
290: a4 := JTF_NUMBER_TABLE();
291: else
292: a0 := JTF_NUMBER_TABLE();
293: a1 := JTF_VARCHAR2_TABLE_100();
294: a2 := JTF_DATE_TABLE();
295: a3 := JTF_VARCHAR2_TABLE_100();
296: a4 := JTF_NUMBER_TABLE();
292: a0 := JTF_NUMBER_TABLE();
293: a1 := JTF_VARCHAR2_TABLE_100();
294: a2 := JTF_DATE_TABLE();
295: a3 := JTF_VARCHAR2_TABLE_100();
296: a4 := JTF_NUMBER_TABLE();
297: if t.count > 0 then
298: a0.extend(t.count);
299: a1.extend(t.count);
300: a2.extend(t.count);
317: end if;
318: end if;
319: end rosetta_table_copy_out_p5;
320:
321: procedure rosetta_table_copy_in_p6(t out nocopy lns_distributions_pub.g_number_tbl, a0 JTF_NUMBER_TABLE) as
322: ddindx binary_integer; indx binary_integer;
323: begin
324: if a0 is not null and a0.count > 0 then
325: if a0.count > 0 then
335: end loop;
336: end if;
337: end if;
338: end rosetta_table_copy_in_p6;
339: procedure rosetta_table_copy_out_p6(t lns_distributions_pub.g_number_tbl, a0 out nocopy JTF_NUMBER_TABLE) 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();
339: procedure rosetta_table_copy_out_p6(t lns_distributions_pub.g_number_tbl, a0 out nocopy JTF_NUMBER_TABLE) 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: else
345: a0 := JTF_NUMBER_TABLE();
346: if t.count > 0 then
347: a0.extend(t.count);
341: begin
342: if t is null or t.count = 0 then
343: a0 := JTF_NUMBER_TABLE();
344: else
345: a0 := JTF_NUMBER_TABLE();
346: if t.count > 0 then
347: a0.extend(t.count);
348: ddindx := t.first;
349: indx := 1;
358: end if;
359: end if;
360: end rosetta_table_copy_out_p6;
361:
362: procedure create_event(p0_a0 JTF_NUMBER_TABLE
363: , p0_a1 JTF_VARCHAR2_TABLE_100
364: , p0_a2 JTF_DATE_TABLE
365: , p0_a3 JTF_VARCHAR2_TABLE_100
366: , p0_a4 JTF_NUMBER_TABLE
362: procedure create_event(p0_a0 JTF_NUMBER_TABLE
363: , p0_a1 JTF_VARCHAR2_TABLE_100
364: , p0_a2 JTF_DATE_TABLE
365: , p0_a3 JTF_VARCHAR2_TABLE_100
366: , p0_a4 JTF_NUMBER_TABLE
367: , p_init_msg_list VARCHAR2
368: , p_commit VARCHAR2
369: , x_return_status out nocopy VARCHAR2
370: , x_msg_count out nocopy NUMBER
411: , p_loan_id NUMBER
412: , p_disb_header_id NUMBER
413: , p_include_loan_receivables VARCHAR2
414: , p_distribution_type VARCHAR2
415: , p7_a0 out nocopy JTF_NUMBER_TABLE
416: , p7_a1 out nocopy JTF_NUMBER_TABLE
417: , p7_a2 out nocopy JTF_VARCHAR2_TABLE_100
418: , p7_a3 out nocopy JTF_VARCHAR2_TABLE_100
419: , p7_a4 out nocopy JTF_NUMBER_TABLE
412: , p_disb_header_id NUMBER
413: , p_include_loan_receivables VARCHAR2
414: , p_distribution_type VARCHAR2
415: , p7_a0 out nocopy JTF_NUMBER_TABLE
416: , p7_a1 out nocopy JTF_NUMBER_TABLE
417: , p7_a2 out nocopy JTF_VARCHAR2_TABLE_100
418: , p7_a3 out nocopy JTF_VARCHAR2_TABLE_100
419: , p7_a4 out nocopy JTF_NUMBER_TABLE
420: , p7_a5 out nocopy JTF_VARCHAR2_TABLE_100
415: , p7_a0 out nocopy JTF_NUMBER_TABLE
416: , p7_a1 out nocopy JTF_NUMBER_TABLE
417: , p7_a2 out nocopy JTF_VARCHAR2_TABLE_100
418: , p7_a3 out nocopy JTF_VARCHAR2_TABLE_100
419: , p7_a4 out nocopy JTF_NUMBER_TABLE
420: , p7_a5 out nocopy JTF_VARCHAR2_TABLE_100
421: , p7_a6 out nocopy JTF_NUMBER_TABLE
422: , p7_a7 out nocopy JTF_NUMBER_TABLE
423: , p7_a8 out nocopy JTF_VARCHAR2_TABLE_100
417: , p7_a2 out nocopy JTF_VARCHAR2_TABLE_100
418: , p7_a3 out nocopy JTF_VARCHAR2_TABLE_100
419: , p7_a4 out nocopy JTF_NUMBER_TABLE
420: , p7_a5 out nocopy JTF_VARCHAR2_TABLE_100
421: , p7_a6 out nocopy JTF_NUMBER_TABLE
422: , p7_a7 out nocopy JTF_NUMBER_TABLE
423: , p7_a8 out nocopy JTF_VARCHAR2_TABLE_100
424: , p7_a9 out nocopy JTF_VARCHAR2_TABLE_100
425: , p7_a10 out nocopy JTF_NUMBER_TABLE
418: , p7_a3 out nocopy JTF_VARCHAR2_TABLE_100
419: , p7_a4 out nocopy JTF_NUMBER_TABLE
420: , p7_a5 out nocopy JTF_VARCHAR2_TABLE_100
421: , p7_a6 out nocopy JTF_NUMBER_TABLE
422: , p7_a7 out nocopy JTF_NUMBER_TABLE
423: , p7_a8 out nocopy JTF_VARCHAR2_TABLE_100
424: , p7_a9 out nocopy JTF_VARCHAR2_TABLE_100
425: , p7_a10 out nocopy JTF_NUMBER_TABLE
426: , p7_a11 out nocopy JTF_NUMBER_TABLE
421: , p7_a6 out nocopy JTF_NUMBER_TABLE
422: , p7_a7 out nocopy JTF_NUMBER_TABLE
423: , p7_a8 out nocopy JTF_VARCHAR2_TABLE_100
424: , p7_a9 out nocopy JTF_VARCHAR2_TABLE_100
425: , p7_a10 out nocopy JTF_NUMBER_TABLE
426: , p7_a11 out nocopy JTF_NUMBER_TABLE
427: , x_return_status out nocopy VARCHAR2
428: , x_msg_count out nocopy NUMBER
429: , x_msg_data out nocopy VARCHAR2
422: , p7_a7 out nocopy JTF_NUMBER_TABLE
423: , p7_a8 out nocopy JTF_VARCHAR2_TABLE_100
424: , p7_a9 out nocopy JTF_VARCHAR2_TABLE_100
425: , p7_a10 out nocopy JTF_NUMBER_TABLE
426: , p7_a11 out nocopy JTF_NUMBER_TABLE
427: , x_return_status out nocopy VARCHAR2
428: , x_msg_count out nocopy NUMBER
429: , x_msg_data out nocopy VARCHAR2
430: )