1: package body okl_credit_mgnt_pub_w as
2: /* $Header: OKLUCMTB.pls 115.4 2003/10/30 23:20:30 rgalipo noship $ */
3: procedure submit_credit_request(p_api_version NUMBER
4: , p_init_msg_list VARCHAR2
5: , x_return_status out nocopy VARCHAR2
57: ddp_chr_rec.party_contact_id := p11_a11;
58: ddp_chr_rec.org_id := p11_a12;
59:
60: -- here's the delegated call to the old PL/SQL routine
61: okl_credit_mgnt_pub.submit_credit_request(p_api_version,
62: p_init_msg_list,
63: x_return_status,
64: x_msg_count,
65: x_msg_data,
119:
120:
121:
122: -- here's the delegated call to the old PL/SQL routine
123: okl_credit_mgnt_pub.compile_credit_request(p_api_version,
124: p_init_msg_list,
125: x_return_status,
126: x_msg_count,
127: x_msg_data,
149: p6_a11 := ddx_chr_rec.party_contact_id;
150: p6_a12 := ddx_chr_rec.org_id;
151: end;
152:
153: end okl_credit_mgnt_pub_w;