DECLARE
x_acct_id NUMBER;
x_response_rec iby_fndcpt_common_pub.result_rec_type;
x_return_status VARCHAR2(10);
x_msg_count NUMBER;
x_msg_data VARCHAR2(256);
x_bank_acct_rec iby_ext_bankacct_pub.extbankacct_rec_type;
BEGIN
dbms_output.put_line('Program Start');
x_bank_acct_rec.country_code := 'IN';
x_bank_acct_rec.branch_id := 12182104;--ce_bank_branches_v.branch_party_id
x_bank_acct_rec.bank_id := 12182101;--ce_bank_branches_v.bank_party_id
x_bank_acct_rec.acct_owner_party_id := 12182106;--ap_suppliers.party_id
x_bank_acct_rec.currency := 'INR';
x_bank_acct_rec.bank_account_name := 'Sandy Test Account';---new bank account name
x_bank_acct_rec.bank_account_num := 999999999;--23593 ;--new bank account number
x_msg_count := 0;
x_msg_data := NULL;
x_return_status := NULL;
iby_ext_bankacct_pub.create_ext_bank_acct
(p_api_version => 1.0,
p_init_msg_list => fnd_api.g_true,
p_ext_bank_acct_rec => x_bank_acct_rec,
x_acct_id => x_acct_id,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_response => x_response_rec
);
COMMIT;
dbms_output.put_line('External bank account created.');
dbms_output.put_line('x_acct_id:' || x_acct_id);
dbms_output.put_line('x_return_status:' || x_return_status);
dbms_output.put_line('x_msg_count:' || x_msg_count);
dbms_output.put_line('x_msg_data:' || x_msg_data);
EXCEPTION
WHEN OTHERS THEN
dbms_output.put_line('main exception-IBY_EXT_BANKACCT_PUB.create_ext_bank_acct.');
END;
Script Output
---------------------------------
Program Start
External bank account created.
x_acct_id224771
x_return_statusS
x_msg_count.0
x_msg_data.
Query to find the record
------------------------------------
SELECT * FROM iby_ext_bank_accounts_v where EXT_BANK_ACCOUNT_ID =224771
No comments:
Post a Comment