1: package body cn_payment_worksheet_pvt_w as
2: /* $Header: cnwwkshb.pls 120.1.12000000.3 2007/05/23 11:30:28 rrshetty ship $ */
3: procedure rosetta_table_copy_in_p4(t out nocopy cn_payment_worksheet_pvt.salesrep_tab_typ, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: ) as
6: ddindx binary_integer; indx binary_integer;
7: begin
1: package body cn_payment_worksheet_pvt_w as
2: /* $Header: cnwwkshb.pls 120.1.12000000.3 2007/05/23 11:30:28 rrshetty ship $ */
3: procedure rosetta_table_copy_in_p4(t out nocopy cn_payment_worksheet_pvt.salesrep_tab_typ, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: ) as
6: ddindx binary_integer; indx binary_integer;
7: begin
8: if a0 is not null and a0.count > 0 then
20: end loop;
21: end if;
22: end if;
23: end rosetta_table_copy_in_p4;
24: procedure rosetta_table_copy_out_p4(t cn_payment_worksheet_pvt.salesrep_tab_typ, a0 out nocopy JTF_NUMBER_TABLE
25: , a1 out nocopy JTF_NUMBER_TABLE
26: ) as
27: ddindx binary_integer; indx binary_integer;
28: begin
21: end if;
22: end if;
23: end rosetta_table_copy_in_p4;
24: procedure rosetta_table_copy_out_p4(t cn_payment_worksheet_pvt.salesrep_tab_typ, a0 out nocopy JTF_NUMBER_TABLE
25: , a1 out nocopy JTF_NUMBER_TABLE
26: ) as
27: ddindx binary_integer; indx binary_integer;
28: begin
29: if t is null or t.count = 0 then
26: ) as
27: ddindx binary_integer; indx binary_integer;
28: begin
29: if t is null or t.count = 0 then
30: a0 := JTF_NUMBER_TABLE();
31: a1 := JTF_NUMBER_TABLE();
32: else
33: a0 := JTF_NUMBER_TABLE();
34: a1 := JTF_NUMBER_TABLE();
27: ddindx binary_integer; indx binary_integer;
28: begin
29: if t is null or t.count = 0 then
30: a0 := JTF_NUMBER_TABLE();
31: a1 := JTF_NUMBER_TABLE();
32: else
33: a0 := JTF_NUMBER_TABLE();
34: a1 := JTF_NUMBER_TABLE();
35: if t.count > 0 then
29: if t is null or t.count = 0 then
30: a0 := JTF_NUMBER_TABLE();
31: a1 := JTF_NUMBER_TABLE();
32: else
33: a0 := JTF_NUMBER_TABLE();
34: a1 := JTF_NUMBER_TABLE();
35: if t.count > 0 then
36: a0.extend(t.count);
37: a1.extend(t.count);
30: a0 := JTF_NUMBER_TABLE();
31: a1 := JTF_NUMBER_TABLE();
32: else
33: a0 := JTF_NUMBER_TABLE();
34: a1 := JTF_NUMBER_TABLE();
35: if t.count > 0 then
36: a0.extend(t.count);
37: a1.extend(t.count);
38: ddindx := t.first;
49: end if;
50: end if;
51: end rosetta_table_copy_out_p4;
52:
53: procedure rosetta_table_copy_in_p7(t out nocopy cn_payment_worksheet_pvt.calc_rec_tbl_type, a0 JTF_NUMBER_TABLE
54: , a1 JTF_NUMBER_TABLE
55: , a2 JTF_NUMBER_TABLE
56: , a3 JTF_NUMBER_TABLE
57: , a4 JTF_NUMBER_TABLE
50: end if;
51: end rosetta_table_copy_out_p4;
52:
53: procedure rosetta_table_copy_in_p7(t out nocopy cn_payment_worksheet_pvt.calc_rec_tbl_type, a0 JTF_NUMBER_TABLE
54: , a1 JTF_NUMBER_TABLE
55: , a2 JTF_NUMBER_TABLE
56: , a3 JTF_NUMBER_TABLE
57: , a4 JTF_NUMBER_TABLE
58: , a5 JTF_NUMBER_TABLE
51: end rosetta_table_copy_out_p4;
52:
53: procedure rosetta_table_copy_in_p7(t out nocopy cn_payment_worksheet_pvt.calc_rec_tbl_type, a0 JTF_NUMBER_TABLE
54: , a1 JTF_NUMBER_TABLE
55: , a2 JTF_NUMBER_TABLE
56: , a3 JTF_NUMBER_TABLE
57: , a4 JTF_NUMBER_TABLE
58: , a5 JTF_NUMBER_TABLE
59: , a6 JTF_NUMBER_TABLE
52:
53: procedure rosetta_table_copy_in_p7(t out nocopy cn_payment_worksheet_pvt.calc_rec_tbl_type, a0 JTF_NUMBER_TABLE
54: , a1 JTF_NUMBER_TABLE
55: , a2 JTF_NUMBER_TABLE
56: , a3 JTF_NUMBER_TABLE
57: , a4 JTF_NUMBER_TABLE
58: , a5 JTF_NUMBER_TABLE
59: , a6 JTF_NUMBER_TABLE
60: ) as
53: procedure rosetta_table_copy_in_p7(t out nocopy cn_payment_worksheet_pvt.calc_rec_tbl_type, a0 JTF_NUMBER_TABLE
54: , a1 JTF_NUMBER_TABLE
55: , a2 JTF_NUMBER_TABLE
56: , a3 JTF_NUMBER_TABLE
57: , a4 JTF_NUMBER_TABLE
58: , a5 JTF_NUMBER_TABLE
59: , a6 JTF_NUMBER_TABLE
60: ) as
61: ddindx binary_integer; indx binary_integer;
54: , a1 JTF_NUMBER_TABLE
55: , a2 JTF_NUMBER_TABLE
56: , a3 JTF_NUMBER_TABLE
57: , a4 JTF_NUMBER_TABLE
58: , a5 JTF_NUMBER_TABLE
59: , a6 JTF_NUMBER_TABLE
60: ) as
61: ddindx binary_integer; indx binary_integer;
62: begin
55: , a2 JTF_NUMBER_TABLE
56: , a3 JTF_NUMBER_TABLE
57: , a4 JTF_NUMBER_TABLE
58: , a5 JTF_NUMBER_TABLE
59: , a6 JTF_NUMBER_TABLE
60: ) as
61: ddindx binary_integer; indx binary_integer;
62: begin
63: if a0 is not null and a0.count > 0 then
80: end loop;
81: end if;
82: end if;
83: end rosetta_table_copy_in_p7;
84: procedure rosetta_table_copy_out_p7(t cn_payment_worksheet_pvt.calc_rec_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
85: , a1 out nocopy JTF_NUMBER_TABLE
86: , a2 out nocopy JTF_NUMBER_TABLE
87: , a3 out nocopy JTF_NUMBER_TABLE
88: , a4 out nocopy JTF_NUMBER_TABLE
81: end if;
82: end if;
83: end rosetta_table_copy_in_p7;
84: procedure rosetta_table_copy_out_p7(t cn_payment_worksheet_pvt.calc_rec_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
85: , a1 out nocopy JTF_NUMBER_TABLE
86: , a2 out nocopy JTF_NUMBER_TABLE
87: , a3 out nocopy JTF_NUMBER_TABLE
88: , a4 out nocopy JTF_NUMBER_TABLE
89: , a5 out nocopy JTF_NUMBER_TABLE
82: end if;
83: end rosetta_table_copy_in_p7;
84: procedure rosetta_table_copy_out_p7(t cn_payment_worksheet_pvt.calc_rec_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
85: , a1 out nocopy JTF_NUMBER_TABLE
86: , a2 out nocopy JTF_NUMBER_TABLE
87: , a3 out nocopy JTF_NUMBER_TABLE
88: , a4 out nocopy JTF_NUMBER_TABLE
89: , a5 out nocopy JTF_NUMBER_TABLE
90: , a6 out nocopy JTF_NUMBER_TABLE
83: end rosetta_table_copy_in_p7;
84: procedure rosetta_table_copy_out_p7(t cn_payment_worksheet_pvt.calc_rec_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
85: , a1 out nocopy JTF_NUMBER_TABLE
86: , a2 out nocopy JTF_NUMBER_TABLE
87: , a3 out nocopy JTF_NUMBER_TABLE
88: , a4 out nocopy JTF_NUMBER_TABLE
89: , a5 out nocopy JTF_NUMBER_TABLE
90: , a6 out nocopy JTF_NUMBER_TABLE
91: ) as
84: procedure rosetta_table_copy_out_p7(t cn_payment_worksheet_pvt.calc_rec_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
85: , a1 out nocopy JTF_NUMBER_TABLE
86: , a2 out nocopy JTF_NUMBER_TABLE
87: , a3 out nocopy JTF_NUMBER_TABLE
88: , a4 out nocopy JTF_NUMBER_TABLE
89: , a5 out nocopy JTF_NUMBER_TABLE
90: , a6 out nocopy JTF_NUMBER_TABLE
91: ) as
92: ddindx binary_integer; indx binary_integer;
85: , a1 out nocopy JTF_NUMBER_TABLE
86: , a2 out nocopy JTF_NUMBER_TABLE
87: , a3 out nocopy JTF_NUMBER_TABLE
88: , a4 out nocopy JTF_NUMBER_TABLE
89: , a5 out nocopy JTF_NUMBER_TABLE
90: , a6 out nocopy JTF_NUMBER_TABLE
91: ) as
92: ddindx binary_integer; indx binary_integer;
93: begin
86: , a2 out nocopy JTF_NUMBER_TABLE
87: , a3 out nocopy JTF_NUMBER_TABLE
88: , a4 out nocopy JTF_NUMBER_TABLE
89: , a5 out nocopy JTF_NUMBER_TABLE
90: , a6 out nocopy JTF_NUMBER_TABLE
91: ) as
92: ddindx binary_integer; indx binary_integer;
93: begin
94: if t is null or t.count = 0 then
91: ) as
92: ddindx binary_integer; indx binary_integer;
93: begin
94: if t is null or t.count = 0 then
95: a0 := JTF_NUMBER_TABLE();
96: a1 := JTF_NUMBER_TABLE();
97: a2 := JTF_NUMBER_TABLE();
98: a3 := JTF_NUMBER_TABLE();
99: a4 := JTF_NUMBER_TABLE();
92: ddindx binary_integer; indx binary_integer;
93: begin
94: if t is null or t.count = 0 then
95: a0 := JTF_NUMBER_TABLE();
96: a1 := JTF_NUMBER_TABLE();
97: a2 := JTF_NUMBER_TABLE();
98: a3 := JTF_NUMBER_TABLE();
99: a4 := JTF_NUMBER_TABLE();
100: a5 := JTF_NUMBER_TABLE();
93: begin
94: if t is null or t.count = 0 then
95: a0 := JTF_NUMBER_TABLE();
96: a1 := JTF_NUMBER_TABLE();
97: a2 := JTF_NUMBER_TABLE();
98: a3 := JTF_NUMBER_TABLE();
99: a4 := JTF_NUMBER_TABLE();
100: a5 := JTF_NUMBER_TABLE();
101: a6 := JTF_NUMBER_TABLE();
94: if t is null or t.count = 0 then
95: a0 := JTF_NUMBER_TABLE();
96: a1 := JTF_NUMBER_TABLE();
97: a2 := JTF_NUMBER_TABLE();
98: a3 := JTF_NUMBER_TABLE();
99: a4 := JTF_NUMBER_TABLE();
100: a5 := JTF_NUMBER_TABLE();
101: a6 := JTF_NUMBER_TABLE();
102: else
95: a0 := JTF_NUMBER_TABLE();
96: a1 := JTF_NUMBER_TABLE();
97: a2 := JTF_NUMBER_TABLE();
98: a3 := JTF_NUMBER_TABLE();
99: a4 := JTF_NUMBER_TABLE();
100: a5 := JTF_NUMBER_TABLE();
101: a6 := JTF_NUMBER_TABLE();
102: else
103: a0 := JTF_NUMBER_TABLE();
96: a1 := JTF_NUMBER_TABLE();
97: a2 := JTF_NUMBER_TABLE();
98: a3 := JTF_NUMBER_TABLE();
99: a4 := JTF_NUMBER_TABLE();
100: a5 := JTF_NUMBER_TABLE();
101: a6 := JTF_NUMBER_TABLE();
102: else
103: a0 := JTF_NUMBER_TABLE();
104: a1 := JTF_NUMBER_TABLE();
97: a2 := JTF_NUMBER_TABLE();
98: a3 := JTF_NUMBER_TABLE();
99: a4 := JTF_NUMBER_TABLE();
100: a5 := JTF_NUMBER_TABLE();
101: a6 := JTF_NUMBER_TABLE();
102: else
103: a0 := JTF_NUMBER_TABLE();
104: a1 := JTF_NUMBER_TABLE();
105: a2 := JTF_NUMBER_TABLE();
99: a4 := JTF_NUMBER_TABLE();
100: a5 := JTF_NUMBER_TABLE();
101: a6 := JTF_NUMBER_TABLE();
102: else
103: a0 := JTF_NUMBER_TABLE();
104: a1 := JTF_NUMBER_TABLE();
105: a2 := JTF_NUMBER_TABLE();
106: a3 := JTF_NUMBER_TABLE();
107: a4 := JTF_NUMBER_TABLE();
100: a5 := JTF_NUMBER_TABLE();
101: a6 := JTF_NUMBER_TABLE();
102: else
103: a0 := JTF_NUMBER_TABLE();
104: a1 := JTF_NUMBER_TABLE();
105: a2 := JTF_NUMBER_TABLE();
106: a3 := JTF_NUMBER_TABLE();
107: a4 := JTF_NUMBER_TABLE();
108: a5 := JTF_NUMBER_TABLE();
101: a6 := JTF_NUMBER_TABLE();
102: else
103: a0 := JTF_NUMBER_TABLE();
104: a1 := JTF_NUMBER_TABLE();
105: a2 := JTF_NUMBER_TABLE();
106: a3 := JTF_NUMBER_TABLE();
107: a4 := JTF_NUMBER_TABLE();
108: a5 := JTF_NUMBER_TABLE();
109: a6 := JTF_NUMBER_TABLE();
102: else
103: a0 := JTF_NUMBER_TABLE();
104: a1 := JTF_NUMBER_TABLE();
105: a2 := JTF_NUMBER_TABLE();
106: a3 := JTF_NUMBER_TABLE();
107: a4 := JTF_NUMBER_TABLE();
108: a5 := JTF_NUMBER_TABLE();
109: a6 := JTF_NUMBER_TABLE();
110: if t.count > 0 then
103: a0 := JTF_NUMBER_TABLE();
104: a1 := JTF_NUMBER_TABLE();
105: a2 := JTF_NUMBER_TABLE();
106: a3 := JTF_NUMBER_TABLE();
107: a4 := JTF_NUMBER_TABLE();
108: a5 := JTF_NUMBER_TABLE();
109: a6 := JTF_NUMBER_TABLE();
110: if t.count > 0 then
111: a0.extend(t.count);
104: a1 := JTF_NUMBER_TABLE();
105: a2 := JTF_NUMBER_TABLE();
106: a3 := JTF_NUMBER_TABLE();
107: a4 := JTF_NUMBER_TABLE();
108: a5 := JTF_NUMBER_TABLE();
109: a6 := JTF_NUMBER_TABLE();
110: if t.count > 0 then
111: a0.extend(t.count);
112: a1.extend(t.count);
105: a2 := JTF_NUMBER_TABLE();
106: a3 := JTF_NUMBER_TABLE();
107: a4 := JTF_NUMBER_TABLE();
108: a5 := JTF_NUMBER_TABLE();
109: a6 := JTF_NUMBER_TABLE();
110: if t.count > 0 then
111: a0.extend(t.count);
112: a1.extend(t.count);
113: a2.extend(t.count);
137:
138: procedure generic_conc_processor(p_payrun_id NUMBER
139: , p1_a0 VARCHAR2
140: , p_org_id NUMBER
141: , p3_a0 JTF_NUMBER_TABLE
142: , p3_a1 JTF_NUMBER_TABLE
143: , x_errbuf out nocopy VARCHAR2
144: , x_retcode out nocopy NUMBER
145: )
138: procedure generic_conc_processor(p_payrun_id NUMBER
139: , p1_a0 VARCHAR2
140: , p_org_id NUMBER
141: , p3_a0 JTF_NUMBER_TABLE
142: , p3_a1 JTF_NUMBER_TABLE
143: , x_errbuf out nocopy VARCHAR2
144: , x_retcode out nocopy NUMBER
145: )
146: