更新供应商地点层的付款方法API
DECLARE
--API 参数
l_external_payee_rec_type iby_disbursement_setup_pub.external_payee_rec_type;
l_ext_payee_id_rec_type iby_disbursement_setup_pub.ext_payee_id_rec_type;
l_ext_payee_tab iby_disbursement_setup_pub.external_payee_tab_type;
l_ext_payee_id_tab iby_disbursement_setup_pub.ext_payee_id_tab_type;
l_ext_payee_status_tab iby_disbursement_setup_pub.ext_payee_update_tab_type;
--变量
l_api_version CONSTANT NUMBER := 1;
l_msg_data VARCHAR2(2000);
l_msg VARCHAR2(4000);
l_msg_count NUMBER;
l_return_status VARCHAR2(1);
l_method_code VARCHAR2(50);
l_vendor_id NUMBER;
l_party_id NUMBER;
l_party_site_id NUMBER;
l_location_id NUMBER;
l_vendor_site_id NUMBER;
l_object_version_number NUMBER;
l_loc_version_number NUMBER;
g_def_exclusive_pay_flag VARCHAR2(1) := 'Y';
--l_party_id NUMBER;
--游标
CURSOR cur_cux_vendor IS
SELECT l.vendor_site_code, l.attribute2, l.line_id
FROM cux_oms_vendor_site