EBS客户地址及联系人导入

legen

如题。需要导入EBS客户的地址和地址联系人，现在本人实现新增客户的地址和联系人，但有一个新的需求：就是如果客户的地址已经存在，就不新增此地址而是把地址的联系人新增到这个地址下面即可。
新增联系人代码如下：
l_iface_phone_rec.last_update_date  := sysdate;
      l_iface_phone_rec.last_updated_by   := 0;
      l_iface_phone_rec.creation_date     := sysdate;
      l_iface_phone_rec.created_by        := 0;
      l_iface_phone_rec.last_update_login := 0;

      l_iface_phone_rec.insert_update_flag        := 'I';
      l_iface_phone_rec.orig_system_customer_ref  := i.customer_ref;--已有
      l_iface_phone_rec.orig_system_address_ref   := l_address_ref;--问题就是如何取到这个
      l_iface_phone_rec.orig_system_contact_ref   := l_c_ref; --联系人序列，可以定义字符，唯一
      l_iface_phone_rec.orig_system_telephone_ref := l_t_ref; --电话序列，可以定义字符，唯一
      l_iface_phone_rec.contact_last_name         := i.dms_receipt_contact;--已有
      l_iface_phone_rec.org_id                    := 81;

      l_iface_phone_rec.telephone_type     := 'GEN'; --Telephone
      l_iface_phone_rec.telephone          := i.dms_rc_mobile;--已有
      l_iface_phone_rec.contact_point_type := 'PHONE';
      l_iface_phone_rec.PHONE_ATTRIBUTE2   := 'DMS_PHONE'; /*标识DMS联系人数据*/

      insert into ra_contact_phones_int_al
      values l_iface_phone_rec;
现在问题来了，如果不新增客户的地址，我如何取到现在已有地址的地址参考（orig_system_address_ref ）呢？如果找到这个问题就解决了，但是问了一些同事都说没有接触过单新增地址下面的联系人的，看那个大牛给点指引！
在此谢过！！！

hzsumking

建议楼主参考一下
http://hi.baidu.com/ivrcmcc/item/97409d56c12999c29f266746