1: package body okl_credit_datapoints_pvt_w as
2: /* $Header: OKLECDPB.pls 120.0.12010000.1 2008/07/25 08:01:18 appldev ship $ */
3: procedure rosetta_table_copy_in_p4(t out nocopy okl_credit_datapoints_pvt.lap_dp_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_NUMBER_TABLE
6: , a3 JTF_NUMBER_TABLE
7: , a4 JTF_VARCHAR2_TABLE_100
1: package body okl_credit_datapoints_pvt_w as
2: /* $Header: OKLECDPB.pls 120.0.12010000.1 2008/07/25 08:01:18 appldev ship $ */
3: procedure rosetta_table_copy_in_p4(t out nocopy okl_credit_datapoints_pvt.lap_dp_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_NUMBER_TABLE
6: , a3 JTF_NUMBER_TABLE
7: , a4 JTF_VARCHAR2_TABLE_100
8: , a5 JTF_VARCHAR2_TABLE_200
1: package body okl_credit_datapoints_pvt_w as
2: /* $Header: OKLECDPB.pls 120.0.12010000.1 2008/07/25 08:01:18 appldev ship $ */
3: procedure rosetta_table_copy_in_p4(t out nocopy okl_credit_datapoints_pvt.lap_dp_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_NUMBER_TABLE
6: , a3 JTF_NUMBER_TABLE
7: , a4 JTF_VARCHAR2_TABLE_100
8: , a5 JTF_VARCHAR2_TABLE_200
9: , a6 JTF_VARCHAR2_TABLE_100
2: /* $Header: OKLECDPB.pls 120.0.12010000.1 2008/07/25 08:01:18 appldev ship $ */
3: procedure rosetta_table_copy_in_p4(t out nocopy okl_credit_datapoints_pvt.lap_dp_tbl_type, a0 JTF_NUMBER_TABLE
4: , a1 JTF_NUMBER_TABLE
5: , a2 JTF_NUMBER_TABLE
6: , a3 JTF_NUMBER_TABLE
7: , a4 JTF_VARCHAR2_TABLE_100
8: , a5 JTF_VARCHAR2_TABLE_200
9: , a6 JTF_VARCHAR2_TABLE_100
10: , a7 JTF_VARCHAR2_TABLE_200
32: end loop;
33: end if;
34: end if;
35: end rosetta_table_copy_in_p4;
36: procedure rosetta_table_copy_out_p4(t okl_credit_datapoints_pvt.lap_dp_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
37: , a1 out nocopy JTF_NUMBER_TABLE
38: , a2 out nocopy JTF_NUMBER_TABLE
39: , a3 out nocopy JTF_NUMBER_TABLE
40: , a4 out nocopy JTF_VARCHAR2_TABLE_100
33: end if;
34: end if;
35: end rosetta_table_copy_in_p4;
36: procedure rosetta_table_copy_out_p4(t okl_credit_datapoints_pvt.lap_dp_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
37: , a1 out nocopy JTF_NUMBER_TABLE
38: , a2 out nocopy JTF_NUMBER_TABLE
39: , a3 out nocopy JTF_NUMBER_TABLE
40: , a4 out nocopy JTF_VARCHAR2_TABLE_100
41: , a5 out nocopy JTF_VARCHAR2_TABLE_200
34: end if;
35: end rosetta_table_copy_in_p4;
36: procedure rosetta_table_copy_out_p4(t okl_credit_datapoints_pvt.lap_dp_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
37: , a1 out nocopy JTF_NUMBER_TABLE
38: , a2 out nocopy JTF_NUMBER_TABLE
39: , a3 out nocopy JTF_NUMBER_TABLE
40: , a4 out nocopy JTF_VARCHAR2_TABLE_100
41: , a5 out nocopy JTF_VARCHAR2_TABLE_200
42: , a6 out nocopy JTF_VARCHAR2_TABLE_100
35: end rosetta_table_copy_in_p4;
36: procedure rosetta_table_copy_out_p4(t okl_credit_datapoints_pvt.lap_dp_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
37: , a1 out nocopy JTF_NUMBER_TABLE
38: , a2 out nocopy JTF_NUMBER_TABLE
39: , a3 out nocopy JTF_NUMBER_TABLE
40: , a4 out nocopy JTF_VARCHAR2_TABLE_100
41: , a5 out nocopy JTF_VARCHAR2_TABLE_200
42: , a6 out nocopy JTF_VARCHAR2_TABLE_100
43: , a7 out nocopy JTF_VARCHAR2_TABLE_200
44: ) as
45: ddindx binary_integer; indx binary_integer;
46: begin
47: if t is null or t.count = 0 then
48: a0 := JTF_NUMBER_TABLE();
49: a1 := JTF_NUMBER_TABLE();
50: a2 := JTF_NUMBER_TABLE();
51: a3 := JTF_NUMBER_TABLE();
52: a4 := JTF_VARCHAR2_TABLE_100();
45: ddindx binary_integer; indx binary_integer;
46: begin
47: if t is null or t.count = 0 then
48: a0 := JTF_NUMBER_TABLE();
49: a1 := JTF_NUMBER_TABLE();
50: a2 := JTF_NUMBER_TABLE();
51: a3 := JTF_NUMBER_TABLE();
52: a4 := JTF_VARCHAR2_TABLE_100();
53: a5 := JTF_VARCHAR2_TABLE_200();
46: begin
47: if t is null or t.count = 0 then
48: a0 := JTF_NUMBER_TABLE();
49: a1 := JTF_NUMBER_TABLE();
50: a2 := JTF_NUMBER_TABLE();
51: a3 := JTF_NUMBER_TABLE();
52: a4 := JTF_VARCHAR2_TABLE_100();
53: a5 := JTF_VARCHAR2_TABLE_200();
54: a6 := JTF_VARCHAR2_TABLE_100();
47: if t is null or t.count = 0 then
48: a0 := JTF_NUMBER_TABLE();
49: a1 := JTF_NUMBER_TABLE();
50: a2 := JTF_NUMBER_TABLE();
51: a3 := JTF_NUMBER_TABLE();
52: a4 := JTF_VARCHAR2_TABLE_100();
53: a5 := JTF_VARCHAR2_TABLE_200();
54: a6 := JTF_VARCHAR2_TABLE_100();
55: a7 := JTF_VARCHAR2_TABLE_200();
53: a5 := JTF_VARCHAR2_TABLE_200();
54: a6 := JTF_VARCHAR2_TABLE_100();
55: a7 := JTF_VARCHAR2_TABLE_200();
56: else
57: a0 := JTF_NUMBER_TABLE();
58: a1 := JTF_NUMBER_TABLE();
59: a2 := JTF_NUMBER_TABLE();
60: a3 := JTF_NUMBER_TABLE();
61: a4 := JTF_VARCHAR2_TABLE_100();
54: a6 := JTF_VARCHAR2_TABLE_100();
55: a7 := JTF_VARCHAR2_TABLE_200();
56: else
57: a0 := JTF_NUMBER_TABLE();
58: a1 := JTF_NUMBER_TABLE();
59: a2 := JTF_NUMBER_TABLE();
60: a3 := JTF_NUMBER_TABLE();
61: a4 := JTF_VARCHAR2_TABLE_100();
62: a5 := JTF_VARCHAR2_TABLE_200();
55: a7 := JTF_VARCHAR2_TABLE_200();
56: else
57: a0 := JTF_NUMBER_TABLE();
58: a1 := JTF_NUMBER_TABLE();
59: a2 := JTF_NUMBER_TABLE();
60: a3 := JTF_NUMBER_TABLE();
61: a4 := JTF_VARCHAR2_TABLE_100();
62: a5 := JTF_VARCHAR2_TABLE_200();
63: a6 := JTF_VARCHAR2_TABLE_100();
56: else
57: a0 := JTF_NUMBER_TABLE();
58: a1 := JTF_NUMBER_TABLE();
59: a2 := JTF_NUMBER_TABLE();
60: a3 := JTF_NUMBER_TABLE();
61: a4 := JTF_VARCHAR2_TABLE_100();
62: a5 := JTF_VARCHAR2_TABLE_200();
63: a6 := JTF_VARCHAR2_TABLE_100();
64: a7 := JTF_VARCHAR2_TABLE_200();
94:
95: procedure fetch_leaseapp_datapoints(p_api_version NUMBER
96: , p_init_msg_list VARCHAR2
97: , p_leaseapp_id NUMBER
98: , p3_a0 out nocopy JTF_NUMBER_TABLE
99: , p3_a1 out nocopy JTF_NUMBER_TABLE
100: , p3_a2 out nocopy JTF_NUMBER_TABLE
101: , p3_a3 out nocopy JTF_NUMBER_TABLE
102: , p3_a4 out nocopy JTF_VARCHAR2_TABLE_100
95: procedure fetch_leaseapp_datapoints(p_api_version NUMBER
96: , p_init_msg_list VARCHAR2
97: , p_leaseapp_id NUMBER
98: , p3_a0 out nocopy JTF_NUMBER_TABLE
99: , p3_a1 out nocopy JTF_NUMBER_TABLE
100: , p3_a2 out nocopy JTF_NUMBER_TABLE
101: , p3_a3 out nocopy JTF_NUMBER_TABLE
102: , p3_a4 out nocopy JTF_VARCHAR2_TABLE_100
103: , p3_a5 out nocopy JTF_VARCHAR2_TABLE_200
96: , p_init_msg_list VARCHAR2
97: , p_leaseapp_id NUMBER
98: , p3_a0 out nocopy JTF_NUMBER_TABLE
99: , p3_a1 out nocopy JTF_NUMBER_TABLE
100: , p3_a2 out nocopy JTF_NUMBER_TABLE
101: , p3_a3 out nocopy JTF_NUMBER_TABLE
102: , p3_a4 out nocopy JTF_VARCHAR2_TABLE_100
103: , p3_a5 out nocopy JTF_VARCHAR2_TABLE_200
104: , p3_a6 out nocopy JTF_VARCHAR2_TABLE_100
97: , p_leaseapp_id NUMBER
98: , p3_a0 out nocopy JTF_NUMBER_TABLE
99: , p3_a1 out nocopy JTF_NUMBER_TABLE
100: , p3_a2 out nocopy JTF_NUMBER_TABLE
101: , p3_a3 out nocopy JTF_NUMBER_TABLE
102: , p3_a4 out nocopy JTF_VARCHAR2_TABLE_100
103: , p3_a5 out nocopy JTF_VARCHAR2_TABLE_200
104: , p3_a6 out nocopy JTF_VARCHAR2_TABLE_100
105: , p3_a7 out nocopy JTF_VARCHAR2_TABLE_200
149: end;
150:
151: procedure store_leaseapp_datapoints(p_api_version NUMBER
152: , p_init_msg_list VARCHAR2
153: , p2_a0 JTF_NUMBER_TABLE
154: , p2_a1 JTF_NUMBER_TABLE
155: , p2_a2 JTF_NUMBER_TABLE
156: , p2_a3 JTF_NUMBER_TABLE
157: , p2_a4 JTF_VARCHAR2_TABLE_100
150:
151: procedure store_leaseapp_datapoints(p_api_version NUMBER
152: , p_init_msg_list VARCHAR2
153: , p2_a0 JTF_NUMBER_TABLE
154: , p2_a1 JTF_NUMBER_TABLE
155: , p2_a2 JTF_NUMBER_TABLE
156: , p2_a3 JTF_NUMBER_TABLE
157: , p2_a4 JTF_VARCHAR2_TABLE_100
158: , p2_a5 JTF_VARCHAR2_TABLE_200
151: procedure store_leaseapp_datapoints(p_api_version NUMBER
152: , p_init_msg_list VARCHAR2
153: , p2_a0 JTF_NUMBER_TABLE
154: , p2_a1 JTF_NUMBER_TABLE
155: , p2_a2 JTF_NUMBER_TABLE
156: , p2_a3 JTF_NUMBER_TABLE
157: , p2_a4 JTF_VARCHAR2_TABLE_100
158: , p2_a5 JTF_VARCHAR2_TABLE_200
159: , p2_a6 JTF_VARCHAR2_TABLE_100
152: , p_init_msg_list VARCHAR2
153: , p2_a0 JTF_NUMBER_TABLE
154: , p2_a1 JTF_NUMBER_TABLE
155: , p2_a2 JTF_NUMBER_TABLE
156: , p2_a3 JTF_NUMBER_TABLE
157: , p2_a4 JTF_VARCHAR2_TABLE_100
158: , p2_a5 JTF_VARCHAR2_TABLE_200
159: , p2_a6 JTF_VARCHAR2_TABLE_100
160: , p2_a7 JTF_VARCHAR2_TABLE_200