1: package body ozf_offr_prod_denorm_pvt_oa as
2: /* $Header: ozfaodmb.pls 120.0 2005/08/31 09:43 gramanat noship $ */
3: procedure rosetta_table_copy_in_p0(t out nocopy ozf_offr_elig_prod_denorm_pvt.num_tbl_type, a0 JTF_NUMBER_TABLE) as
4: ddindx binary_integer; indx binary_integer;
5: begin
6: if a0 is not null and a0.count > 0 then
7: if a0.count > 0 then
17: end loop;
18: end if;
19: end if;
20: end rosetta_table_copy_in_p0;
21: procedure rosetta_table_copy_out_p0(t ozf_offr_elig_prod_denorm_pvt.num_tbl_type, a0 out nocopy JTF_NUMBER_TABLE) as
22: ddindx binary_integer; indx binary_integer;
23: begin
24: if t is null or t.count = 0 then
25: a0 := JTF_NUMBER_TABLE();
21: procedure rosetta_table_copy_out_p0(t ozf_offr_elig_prod_denorm_pvt.num_tbl_type, a0 out nocopy JTF_NUMBER_TABLE) as
22: ddindx binary_integer; indx binary_integer;
23: begin
24: if t is null or t.count = 0 then
25: a0 := JTF_NUMBER_TABLE();
26: else
27: a0 := JTF_NUMBER_TABLE();
28: if t.count > 0 then
29: a0.extend(t.count);
23: begin
24: if t is null or t.count = 0 then
25: a0 := JTF_NUMBER_TABLE();
26: else
27: a0 := JTF_NUMBER_TABLE();
28: if t.count > 0 then
29: a0.extend(t.count);
30: ddindx := t.first;
31: indx := 1;
81: end if;
82: end if;
83: end rosetta_table_copy_out_p1;
84:
85: procedure find_party_elig(p_offers_tbl JTF_NUMBER_TABLE
86: , p_party_id NUMBER
87: , p_cust_acct_id NUMBER
88: , p_cust_site_id NUMBER
89: , p_api_version NUMBER
91: , p_commit VARCHAR2
92: , x_return_status out nocopy VARCHAR2
93: , x_msg_count out nocopy NUMBER
94: , x_msg_data out nocopy VARCHAR2
95: , x_offers_tbl out nocopy JTF_NUMBER_TABLE
96: )
97:
98: as
99: ddp_offers_tbl ozf_offr_elig_prod_denorm_pvt.num_tbl_type;
140:
141: ozf_offr_prod_denorm_pvt_oa.rosetta_table_copy_out_p0(ddx_offers_tbl, x_offers_tbl);
142: end;
143:
144: procedure find_product_elig(p_products_tbl JTF_NUMBER_TABLE
145: , p_party_id NUMBER
146: , p_cust_acct_id NUMBER
147: , p_cust_site_id NUMBER
148: , p_api_version NUMBER
150: , p_commit VARCHAR2
151: , x_return_status out nocopy VARCHAR2
152: , x_msg_count out nocopy NUMBER
153: , x_msg_data out nocopy VARCHAR2
154: , x_offers_tbl out nocopy JTF_NUMBER_TABLE
155: )
156:
157: as
158: ddp_products_tbl ozf_offr_elig_prod_denorm_pvt.num_tbl_type;