API to Create Bank Branch (iby_ext_bankacct_pub.create_ext_bank_branch)

DECLARE
    p_api_version           NUMBER := 1.0;
    p_init_msg_list         VARCHAR2(1) := 'F';
    l_bank_id               NUMBER := 12182101;--530705;
    x_return_status         VARCHAR2(2000);
    x_msg_count             NUMBER(5);
    x_msg_data              VARCHAR2(2000);
    x_branch_id             NUMBER;
    p_count                 NUMBER;
    x_response              iby_fndcpt_common_pub.result_rec_type;
    p_ext_bank_branch_rec   iby_ext_bankacct_pub.extbankbranch_rec_type;
BEGIN
    dbms_output.put_line('Program Start');
    p_ext_bank_branch_rec.bch_object_version_number := 1.0;
    p_ext_bank_branch_rec.branch_name := 'Bank Test Branch';
    p_ext_bank_branch_rec.branch_type := 'ABA';
    p_ext_bank_branch_rec.bank_party_id := l_bank_id;
   
iby_ext_bankacct_pub.create_ext_bank_branch(
    p_api_version => p_api_version,
    p_init_msg_list => p_init_msg_list,
    p_ext_bank_branch_rec => p_ext_bank_branch_rec,
    x_branch_id => x_branch_id,
    x_return_status => x_return_status,
    x_msg_count => x_msg_count,
    x_msg_data => x_msg_data,
    x_response => x_response);

    dbms_output.put_line('x_branch_id: ' || x_branch_id);
    dbms_output.put_line('x_return_status: ' || x_return_status);
    IF
        ( x_msg_count = 1 )
    THEN
        dbms_output.put_line('x_msg_data ' || x_msg_data);
    ELSIF ( x_msg_count > 1 ) THEN
        LOOP
            p_count := p_count + 1;
            x_msg_data := fnd_msg_pub.get(fnd_msg_pub.g_next,fnd_api.g_false);
            IF
                ( x_msg_data IS NULL )
            THEN
                EXIT;
            END IF;
            dbms_output.put_line('Message:' || p_count|| ' ---' || x_msg_data);
        END LOOP;
    END IF;

    COMMIT;
    dbms_output.put_line('Program End');
EXCEPTION
    WHEN OTHERS THEN
        ROLLBACK;
        dbms_output.put_line('Main Exception Error:'||sqlerrm);
END;
/


Script output
---------------------------------------
Program Start
x_branch_id: 12182104
x_return_status: S
Program End



Query to check
------------------------------
select * from ce_bank_branches_v where BRANCH_PARTY_ID=12182104

select * from iby_ext_bank_branches_v where BRANCH_PARTY_ID=12182104