Oracle EBS 银行账户API
发布时间:2020-12-12 13:40:05 所属栏目:百科 来源:网络整理
导读:?创建银行 -- Create BankDECLARE p_init_msg_list VARCHAR2(200); p_country_code VARCHAR2(200); p_bank_name VARCHAR2(200); p_bank_number VARCHAR2(200); p_alternate_bank_name VARCHAR2(200); p_short_bank_name VARCHAR2(200); p_description VARCHA
?创建银行 -- Create Bank DECLARE p_init_msg_list VARCHAR2(200); p_country_code VARCHAR2(200); p_bank_name VARCHAR2(200); p_bank_number VARCHAR2(200); p_alternate_bank_name VARCHAR2(200); p_short_bank_name VARCHAR2(200); p_description VARCHAR2(200); p_tax_payer_id VARCHAR2(200); p_tax_registration_number VARCHAR2(200); x_bank_id NUMBER; x_return_status VARCHAR2(200); x_msg_count NUMBER; x_msg_data VARCHAR2(200); p_count NUMBER; BEGIN p_init_msg_list := fnd_api.g_true; p_country_code := ‘US‘; p_bank_name := ‘Bank1‘; p_bank_number := ‘123‘; p_alternate_bank_name := ‘Alternate Test Bank‘; p_short_bank_name := ‘B1‘; p_description := ‘Test Bank Creation API‘; ce_bank_pub.create_bank(p_init_msg_list => p_init_msg_list,p_country_code => p_country_code,p_bank_name => p_bank_name,p_bank_number => p_bank_number,p_alternate_bank_name => p_alternate_bank_name,p_short_bank_name => p_short_bank_name,p_description => p_description,x_bank_id => x_bank_id,x_return_status => x_return_status,x_msg_count => x_msg_count,x_msg_data => x_msg_data); dbms_output.put_line(‘BANK_ID/PARTY_ID = ‘ || x_bank_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); 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; END; 创建分行,也可用于创建供应商时创建的银行分行账户,在供应商创建一行环节,只能创建分行账户,银行账户是取系统已有的银行,换句话说,供应商处不能创建银行只能创建分行。 --创建供应商银行分行 created by jenrry 20170419 DECLARE l_return_status VARCHAR2(1); l_msg_count NUMBER; l_msg_data VARCHAR2(1000); l_bank_rec hz_bank_pub.bank_rec_type := hz_bank_pub.g_miss_bank_rec; l_orga_rec hz_party_v2pub.organization_rec_type := hz_party_v2pub.g_miss_organization_rec; l_party_rec hz_party_v2pub.party_rec_type := hz_party_v2pub.g_miss_party_rec; p_bank_id number; x_party_id NUMBER; x_party_number hz_parties.party_number%TYPE; x_profile_id NUMBER; x_relationship_id NUMBER; x_rel_party_id NUMBER; x_rel_party_number hz_parties.party_number%TYPE; x_bitcode_assignment_id NUMBER; x_bbtcode_assignment_id NUMBER; x_rfccode_assignment_id NUMBER; x_pobject_version_number NUMBER; x_bbtobject_version_number NUMBER; x_rfcobject_version_number NUMBER; BEGIN fnd_global.apps_initialize(0,50737,20005); mo_global.init(‘SQLAP‘); l_orga_rec.organization_name := ‘酒仙桥支行‘; --支行名称 l_orga_rec.created_by_module := ‘CE‘; l_bank_rec.branch_type := ‘ABA‘; --分行类型 --l_bank_rec.bank_or_branch_number := ‘‘; --支行编号 l_bank_rec.inactive_date := fnd_api.g_miss_date; l_bank_rec.institution_type := ‘BANK_BRANCH‘; l_bank_rec.organization_rec := l_orga_rec; hz_bank_pub.create_bank_branch(p_init_msg_list => fnd_api.g_false,p_bank_rec => l_bank_rec,p_bank_party_id => 5050,x_party_id => x_party_id,x_party_number => x_party_number,x_profile_id => x_profile_id,x_relationship_id => x_relationship_id,x_rel_party_id => x_rel_party_id,x_rel_party_number => x_rel_party_number,x_bitcode_assignment_id => x_bitcode_assignment_id,x_bbtcode_assignment_id => x_bbtcode_assignment_id,x_rfccode_assignment_id => x_rfccode_assignment_id,x_return_status => l_return_status,x_msg_count => l_msg_count,x_msg_data => l_msg_data); dbms_output.put_line(‘l_return_status:‘ || l_return_status); dbms_output.put_line(‘l_msg_count:‘ || l_msg_count); dbms_output.put_line(‘l_msg_data:‘ || l_msg_data); dbms_output.put_line(‘x_party_id:‘ || x_party_id); dbms_output.put_line(fnd_msg_pub.get_detail(1,‘F‘)); END; (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |