Issue in Inserting Vendor Details using API

[ajit]

Hi All,
Using ap_po_vendors_apis_pkg API(AP Supplier API) I am trying to insert vendor details into po_vendors and po_vendor_sites_all table, but records are inserted only into po_vendors table, site level details are not inserted into po_vendor_sites_all table.
Code compiles successfully with out any error.

Can you please share your suggestions?
Below is the code which I am using
DECLARE
l_vendor_id number;
l_vendor_status varchar2(15);
l_err_msg varchar2(3000);
l_vendor_site_id number;
v_vendor_status varchar2(15);
v_err_msg varchar2(3000);
l_user_id NUMBER(10);
l_resp_id NUMBER(10);
l_appl_id NUMBER(10);
l_vendor_contact_id NUMBER(10);
l_vendor_contact_status varchar2(15);
l_contact_err_msg varchar2(3000);

BEGIN

fnd_global.apps_initialize(31822,64683,201);
--dbms_application_info.set_client_info(1483);

--Inserting Vendor Header Details--

ap_po_vendors_apis_pkg.insert_new_vendor
(p_vendor_name => 'Test Supplier',
p_vendor_type_lookup_code => 'VENDOR',
p_taxpayer_id => '13-13448121',
p_tax_registration_id => NULL,
p_women_owned_flag => NULL,
p_small_business_flag => NULL,
p_minority_group_lookup_code => NULL,
p_supplier_number => '901',
x_vendor_id => l_vendor_id,
x_status => l_vendor_status,
x_exception_msg => l_err_msg,
p_source => 'NT IMPORT',
p_what_to_import => NULL,
p_commit_size => 1000);

commit;

--Inserting Vendor Site Details--

ap_po_vendors_apis_pkg.insert_new_vendor_site
(x_vendor_site_id => l_vendor_site_id,
x_status =>v_vendor_status,
x_exception_msg => v_err_msg,
p_vendor_site_code => 'ABdc',
p_vendor_id => l_vendor_id,
p_org_id => '1483',
p_address_line1 => 'Newyork',
p_address_line2 =>null,
p_address_line3 =>null,
p_address_line4 =>null,
p_city => 'Bangalore',
p_state => 'KA',
p_zip =>null,
p_province =>null,
p_county =>null,
p_country => 'US',
p_area_code =>null,
p_phone =>null,
p_fax_area_code =>null,
p_fax =>null,
p_email_address =>null,
p_purchasing_site_flag => 'Y',
p_pay_site_flag => 'Y',
p_rfq_only_site_flag => 'N',
p_source => null,
p_what_to_import => null,
p_commit_size => 1000);


COMMIT;
dbms_output.put_line('VENDOR ID :'|| l_vendor_id||' Status :'||l_vendor_status||l_err_msg);
dbms_output.put_line('VENDOR Site ID :'|| l_vendor_site_id||' Status :'||v_vendor_status||v_err_msg);

EXCEPTION
WHEN others then
dbms_output.put_line('Errors :'||sqlerrm);

END;



Regards,
Ajit Dani