API to Create Supplier (pos_vendor_pub_pkg.create_vendor)

DECLARE
    l_vendor_rec      ap_vendor_pub_pkg.r_vendor_rec_type;
    l_return_status   VARCHAR2(10);
    l_msg_count       NUMBER;
    l_msg_data        VARCHAR2(1000);
    l_vendor_id       NUMBER;
    l_party_id        NUMBER;
BEGIN

--Required
    l_vendor_rec.segment1 := NULL;--'10001'; --ID
    l_vendor_rec.vendor_name := 'Sandy Test Supplier'; --Supplier Name
---l_vendor_rec.party_id          := 115422;
    l_vendor_rec.jgzz_fiscal_code := 'ABUFS3022M';
    l_vendor_rec.tax_reference := '09753805106C';
    l_vendor_rec.start_date_active := SYSDATE;
    l_vendor_rec.invoice_currency_code := 'INR';
    l_vendor_rec.payment_currency_code := 'INR';
    l_vendor_rec.pay_group_lookup_code := 'CUSTOMER';
  --  l_vendor_rec.EMPLOYEE_ID := 18635;
   
pos_vendor_pub_pkg.create_vendor
    (p_vendor_rec => l_vendor_rec,
    x_return_status => l_return_status,
    x_msg_count => l_msg_count,
    x_msg_data => l_msg_data,
    x_vendor_id => l_vendor_id,
    x_party_id => l_party_id);

    COMMIT;
    dbms_output.put_line('return_status: ' || l_return_status);
    dbms_output.put_line('msg_data: ' || l_msg_data);
    dbms_output.put_line('vendor_id: ' || l_vendor_id);
    dbms_output.put_line('party_id: ' || l_party_id);
END;



Script Output
--------------------------
return_status: S
msg_data:
vendor_id: 1737017
party_id: 12182106

Query:

--------------------------

select aps.Party_id, aps.* from ap_suppliers aps where vendor_id =1737017