Monday, May 16, 2011
IBY_EXT_BANKACCT_PUB.CREATE_EXT_BANK – R12 – API to Create External Bank
Test Instance: R12.1.1
Script:
set serveroutput on;
DECLARE
v_error_reason VARCHAR2 (2000);
v_msg_data VARCHAR2 (1000);
v_msg_count NUMBER;
v_return_status VARCHAR2 (100);
v_extbank_rec_type iby_ext_bankacct_pub.extbank_rec_type;
x_response iby_fndcpt_common_pub.result_rec_type;
x_bank_id NUMBER;
BEGIN
v_error_reason := NULL;
v_return_status := NULL;
v_msg_count := NULL;
v_msg_data := NULL;
v_extbank_rec_type.object_version_number := 1.0;
v_extbank_rec_type.bank_name := 'TEST SHARE';
v_extbank_rec_type.bank_number := '14589';
v_extbank_rec_type.institution_type := 'BANK';
v_extbank_rec_type.country_code := 'US';
v_extbank_rec_type.description := 'Create via API';
iby_ext_bankacct_pub.create_ext_bank
(p_api_version => 1.0,
p_init_msg_list => fnd_api.g_true,
p_ext_bank_rec => v_extbank_rec_type,
x_bank_id => x_bank_id,
x_return_status => v_return_status,
x_msg_count => v_msg_count,
x_msg_data => v_msg_data,
x_response => x_response
);
DBMS_OUTPUT.put_line ('v_return_status = '||v_return_status);
DBMS_OUTPUT.put_line ('v_msg_count = '||v_msg_count);
DBMS_OUTPUT.put_line ('v_msg_data = '||v_msg_data);
DBMS_OUTPUT.put_line ('x_bank_id = '||x_bank_id);
DBMS_OUTPUT.put_line ('x_response.Result_Code = ' || x_response.result_code);
DBMS_OUTPUT.put_line ( 'x_response.Result_Category = '
|| x_response.result_category
);
DBMS_OUTPUT.put_line ( 'x_response.Result_Message = '
|| x_response.result_message
);
IF v_return_status <> fnd_api.g_ret_sts_success
THEN
IF v_msg_count >= 1
THEN
FOR i IN 1 .. v_msg_count
LOOP
IF v_error_reason IS NULL
THEN
v_error_reason :=
SUBSTR (fnd_msg_pub.get (p_encoded => fnd_api.g_false),
1,
255
);
ELSE
v_error_reason :=
v_error_reason
|| ' ,'
|| SUBSTR (fnd_msg_pub.get (p_encoded => fnd_api.g_false),
1,
255
);
END IF;
DBMS_OUTPUT.put_line ('BANK API ERROR-' || v_error_reason);
END LOOP;
END IF;
END IF;
END;
Do you think this Article is useful?
Subscribe to:
Post Comments (Atom)
0 Responses to “IBY_EXT_BANKACCT_PUB.CREATE_EXT_BANK – R12 – API to Create External Bank”
Post a Comment