--创建供应商地址上的电话号码 created by jenrry 20170419

DECLARE

l_return_status VARCHAR2(1);

l_msg_count NUMBER;

l_msg_data VARCHAR2(1000);

l_vendor_contact_rec hz_contact_point_v2pub.contact_point_rec_type;

l_vendor_edi_rec hz_contact_point_v2pub.edi_rec_type;

l_vendor_email_rec hz_contact_point_v2pub.email_rec_type;

l_vendor_phone_rec hz_contact_point_v2pub.phone_rec_type;

l_vendor_fax_rec hz_contact_point_v2pub.telex_rec_type;

l_vendor_web_rec hz_contact_point_v2pub.web_rec_type;

l_vendor_contact_id NUMBER;

BEGIN

fnd_global.apps_initialize(0, 50737, 20005);

mo_global.init(‘SQLAP‘);

--

l_vendor_contact_rec.owner_table_name := ‘HZ_PARTY_SITES‘;

l_vendor_contact_rec.owner_table_id := 7037;

l_vendor_contact_rec.contact_point_type := ‘PHONE‘;

l_vendor_contact_rec.created_by_module := ‘POS_SUPPLIER_MGMT‘;

l_vendor_phone_rec.phone_area_code := ‘010‘;

l_vendor_phone_rec.phone_number := ‘017809091134‘;

l_vendor_phone_rec.phone_line_type := ‘GEN‘;--电话

hz_contact_point_v2pub.create_contact_point(p_init_msg_list => fnd_api.g_true,

p_contact_point_rec => l_vendor_contact_rec,

p_edi_rec => l_vendor_edi_rec,

p_email_rec => l_vendor_email_rec,

p_phone_rec => l_vendor_phone_rec,

p_telex_rec => l_vendor_fax_rec,

p_web_rec => l_vendor_web_rec,

x_contact_point_id => l_vendor_contact_id,

x_return_status => l_return_status,

x_msg_count => l_msg_count,

x_msg_data => l_msg_data);

dbms_output.put_line(‘l_return_status:‘ || l_return_status);

dbms_output.put_line(‘l_msg_count:‘ || l_msg_count);

dbms_output.put_line(‘l_msg_data:‘ || l_msg_data);

dbms_output.put_line(‘l_vendor_contact_id:‘ || l_vendor_contact_id);

dbms_output.put_line(fnd_msg_pub.get_detail(1, ‘F‘));

END;

--创建供应商地址上的传真号码

DECLARE

l_return_status VARCHAR2(1);

l_msg_count NUMBER;

l_msg_data VARCHAR2(1000);

l_vendor_contact_rec hz_contact_point_v2pub.contact_point_rec_type;

l_vendor_edi_rec hz_contact_point_v2pub.edi_rec_type;

l_vendor_email_rec hz_contact_point_v2pub.email_rec_type;

l_vendor_phone_rec hz_contact_point_v2pub.phone_rec_type;

l_vendor_fax_rec hz_contact_point_v2pub.telex_rec_type;

l_vendor_web_rec hz_contact_point_v2pub.web_rec_type;

l_vendor_contact_id NUMBER;

BEGIN

fnd_global.apps_initialize(0, 50737, 20005);

mo_global.init(‘SQLAP‘);

--

l_vendor_contact_rec.owner_table_name := ‘HZ_PARTY_SITES‘;

l_vendor_contact_rec.owner_table_id := 7037;

l_vendor_contact_rec.contact_point_type := ‘PHONE‘;

l_vendor_contact_rec.created_by_module := ‘POS_SUPPLIER_MGMT‘;

l_vendor_phone_rec.phone_area_code := ‘010‘;

l_vendor_phone_rec.phone_number := ‘017809091134‘;

l_vendor_phone_rec.phone_line_type := ‘FAX‘;--传真

hz_contact_point_v2pub.create_contact_point(p_init_msg_list => fnd_api.g_true,

p_contact_point_rec => l_vendor_contact_rec,

p_edi_rec => l_vendor_edi_rec,

p_email_rec => l_vendor_email_rec,

p_phone_rec => l_vendor_phone_rec,

p_telex_rec => l_vendor_fax_rec,

p_web_rec => l_vendor_web_rec,

x_contact_point_id => l_vendor_contact_id,

x_return_status => l_return_status,

x_msg_count => l_msg_count,

x_msg_data => l_msg_data);

dbms_output.put_line(‘l_return_status:‘ || l_return_status);

dbms_output.put_line(‘l_msg_count:‘ || l_msg_count);

dbms_output.put_line(‘l_msg_data:‘ || l_msg_data);

dbms_output.put_line(‘l_vendor_contact_id:‘ || l_vendor_contact_id);

dbms_output.put_line(fnd_msg_pub.get_detail(1, ‘F‘));

END;

创建供应商联系人目录的联系人信息

DECLARE

l_return_status VARCHAR2(1);

l_msg_count NUMBER;

l_msg_data VARCHAR2(1000);

l_vendor_contact_rec ap_vendor_pub_pkg.r_vendor_contact_rec_type;

l_vendor_contact_id NUMBER;

l_per_party_id NUMBER;

l_rel_party_id NUMBER;

l_rel_id NUMBER;

l_org_contact_id NUMBER;

l_party_site_id NUMBER;

BEGIN

fnd_global.apps_initialize(1670, 50728, 200);

mo_global.init(‘SQLAP‘);

--

l_vendor_contact_rec.vendor_id := 133003;

l_vendor_contact_rec.person_last_name := ‘赵六‘;

l_vendor_contact_rec.person_title := ‘销售经理‘;

l_vendor_contact_rec.area_code := ‘010‘;

l_vendor_contact_rec.phone := ‘12345678‘;

l_vendor_contact_rec.fax_area_code := ‘010‘;

l_vendor_contact_rec.fax_phone := ‘12345678‘;

l_vendor_contact_rec.email_address := ‘[email protected]‘;

ap_vendor_pub_pkg.create_vendor_contact(p_api_version => 1.0,

p_init_msg_list => fnd_api.g_true,

p_commit => fnd_api.g_false,

p_validation_level => fnd_api.g_valid_level_full,

x_return_status => l_return_status,

x_msg_count => l_msg_count,

x_msg_data => l_msg_data,

p_vendor_contact_rec => l_vendor_contact_rec,

x_vendor_contact_id => l_vendor_contact_id,

x_per_party_id => l_per_party_id,

x_rel_party_id => l_rel_party_id,

x_rel_id => l_rel_id,

x_org_contact_id => l_org_contact_id,

x_party_site_id => l_party_site_id);

dbms_output.put_line(‘l_return_status:‘ || l_return_status);

dbms_output.put_line(‘l_msg_count:‘ || l_msg_count);

dbms_output.put_line(‘l_msg_data:‘ || l_msg_data);

dbms_output.put_line(‘l_vendor_contact_id:‘ || l_vendor_contact_id);

dbms_output.put_line(‘l_per_party_id:‘ || l_per_party_id);

dbms_output.put_line(‘l_rel_party_id:‘ || l_rel_party_id);

dbms_output.put_line(‘l_rel_id:‘ || l_rel_id);

dbms_output.put_line(‘l_org_contact_id:‘ || l_org_contact_id);

dbms_output.put_line(‘l_party_site_id:‘ || l_party_site_id);

dbms_output.put_line(fnd_msg_pub.get_detail(1, ‘F‘));

END;

创建供应商银行账户/创建银行账户

--创建供应商银行账户 created by jenrry 20170419

DECLARE

l_return_status VARCHAR2(1);

l_msg_count NUMBER;

l_msg_data VARCHAR2(1000);

x_bank_acct_id number;

l_joint_acct_owner_id number;

l_ext_bank_acct_rec iby_ext_bankacct_pub.extbankacct_rec_type;

x_response_rec iby_fndcpt_common_pub.result_rec_type;

BEGIN

fnd_global.apps_initialize(0, 50737, 20005);

mo_global.init(‘SQLAP‘);

--

l_ext_bank_acct_rec.bank_account_name := ‘银行账号006‘;

l_ext_bank_acct_rec.bank_account_num := ‘20170418006‘;

l_ext_bank_acct_rec.acct_owner_party_id := 9057;

l_ext_bank_acct_rec.country_code := ‘CN‘;

l_ext_bank_acct_rec.bank_id := 5050;

l_ext_bank_acct_rec.branch_id := 5051;

l_ext_bank_acct_rec.START_DATE := sysdate;

iby_ext_bankacct_pub.create_ext_bank_acct(p_api_version => 1.0,

p_init_msg_list => fnd_api.G_FALSE,

p_ext_bank_acct_rec => l_ext_bank_acct_rec,

p_association_level => ‘AO‘,

p_supplier_site_id => 3007,

p_party_site_id => 7037,

p_org_id => 142,

p_org_type => ‘OPERATING_UNIT‘, --Bug7136876: new parameter

x_acct_id => x_bank_acct_id,

x_return_status => l_return_status,

x_msg_count => l_msg_count,

x_msg_data => l_msg_data,

x_response => x_response_rec);

dbms_output.put_line(‘l_return_status:‘ || l_return_status);

dbms_output.put_line(‘l_msg_count:‘ || l_msg_count);

dbms_output.put_line(‘l_msg_data:‘ || l_msg_data);

dbms_output.put_line(‘x_bank_acct_id:‘ || x_bank_acct_id);

dbms_output.put_line(fnd_msg_pub.get_detail(1, ‘F‘));

END;

/*

The details of the mandatory parameters to be passed for each level is given below:

1.Supplier level: p_association_level should have ‘S‘ (case sensitive)

2.Supplier site level: p_association_level should have ‘SS‘(case sensitive)

p_supplier_site_id should have the supplier id.

3.Address level: p_association_level should have ‘A‘(case sensitive)

p_party_site_id should have the party_site_id of particular address

4.Address- operating unit: p_association_level should have ‘AO‘(case sensitive)

p_party_site_id should have the party_site_id of the address

p_org_id should have the org_id.

*/