详解EBS接口开发之供应商导入补充-供应商地点增加实例

DECLARE
  --v_org_id number;
  v_vendor_interface_id         NUMBER;
  v_vendor_site_interface_id    NUMBER; --接口表的id
  v_vendor_contact_interface_id NUMBER; --接口表的id
  v_temp_ext_bank_acct_id       NUMBER;
  v_org_id                      NUMBER;

  v_vendor_id      NUMBER;
  l_vendor_site_id NUMBER;
  l_party_site_id  NUMBER;
  l_location_id    NUMBER;

  l_result_rec        iby_fndcpt_common_pub.result_rec_type;
  l_bank_acct_id      NUMBER;
  l_return_status     VARCHAR2(30);
  l_msg_count         NUMBER;
  l_msg_data          VARCHAR2(2000);
  v_party_id          NUMBER;
  v_count_lov         NUMBER;
  v_vendor_num        NUMBER;
  g_vendor_count      NUMBER;
  g_vendor_site       NUMBER;
  g_vendor_contact    NUMBER;
  l_ext_bank_acct_rec iby_ext_bankacct_pub.extbankacct_rec_type;

  l_vendor_site_rec ap_vendor_pub_pkg.r_vendor_site_rec_type;

  --根据批处理id取得多个ou，实现根据ou提交标准请求
  CURSOR cur_ou IS --取得系统中所有OU
    SELE