Location assignment doesn't work

Question

Hi all,
I have a procedure which creates a customer but i found that it doesn't work properly. After execution it seems OK in Customers JSP but when i started to create an invoice for the new customer it doesn't recognized it's location.
Here is my procedure:
  procedure set_customers (p_cust_row in cust_type)
is
p_organization_rec HZ_PARTY_V2PUB.ORGANIZATION_REC_TYPE;
x_return_status VARCHAR2(2000);
x_msg_count NUMBER;
x_msg_data VARCHAR2(2000);
x_party_id NUMBER;
X_PARTY_NUMBER varchar2(2000);
x_profile_id NUMBER;
p_location_rec hz_location_v2pub.location_rec_type;
x_location_id number;
p_party_site_rec HZ_PARTY_SITE_V2PUB.PARTY_SITE_REC_TYPE;
x_party_site_id number;
x_party_site_number varchar2(2000);
p_party_site_use_rec hz_party_site_v2pub.party_site_use_rec_type;
x_party_site_use_id NUMBER;
p_cust_account_rec     HZ_CUST_ACCOUNT_V2PUB.CUST_ACCOUNT_REC_TYPE;
-- p_organization_rec     HZ_PARTY_V2PUB.ORGANIZATION_REC_TYPE;
p_customer_profile_rec HZ_CUSTOMER_PROFILE_V2PUB.CUSTOMER_PROFILE_REC_TYPE;
x_cust_account_id      NUMBER;
x_account_number       VARCHAR2(2000);
-- x_party_id             NUMBER;
-- x_party_number         varchar2(2000);
-- x_profile_id           NUMBER;
p_location_id number;
p_created_by_module varchar2(500);
p_application_id number;
x_loc_id NUMBER;
begin
-- create organization
p_organization_rec.organization_name := p_cust_row.customer_name;
p_organization_rec.created_by_module := 'HZ_CPUI';
p_organization_rec.tax_reference := p_cust_row.vat_id;
p_organization_rec.jgzz_fiscal_code := p_cust_row.taxpayer_id;
p_organization_rec.application_id := 222;
hz_party_v2pub.create_organization (
'T',
p_organization_rec,
x_return_status,
x_msg_count,
x_msg_data,
x_party_id,
x_party_number,
x_profile_id);
    dbms_output.put_line('return_status='|| SUBSTR (x_return_status,1,255));
    dbms_output.put_line('count='||TO_CHAR(x_msg_count));
    dbms_output.put_line('Msg_data = '|| SUBSTR (x_msg_data,1,255));
    dbms_output.put_line('Party Id='|| SUBSTR (x_party_id,1,255));
    dbms_output.put_line('Party_Number='|| SUBSTR (x_party_number,1,255));
    dbms_output.put_line('Organization_Name='||SUBSTR(p_organization_rec.organization_name,1,255));
    dbms_output.put_line('CreatedBy='||SUBSTR (p_organization_rec.created_by_module,1,255));
    dbms_output.put_line('Profile Id='|| SUBSTR (x_profile_id,1,255));
      IF x_msg_count > 1 THEN
        FOR I IN 1..x_msg_count LOOP
        dbms_output.put_line('I.'|| SUBSTR (FND_MSG_PUB.Get(p_encoded =>
        FND_API.G_FALSE ), 1, 255));
      end loop;
      end if;
--create location
p_location_rec.country := 'BG';
p_location_rec.address1 := p_cust_row.customer_address;
p_location_rec.city := p_cust_row.customer_city;
p_location_rec.created_by_module := 'HZ_CPUI';
p_location_rec.application_id := 222;
p_location_rec.address_style := 'POSTAL_ADDR_DEF';
hz_location_v2pub.create_location(
'T',
p_location_rec,
x_location_id,
x_return_status,
x_msg_count,
x_msg_data);
  dbms_output.put_line('x_return_status = '||SUBSTR(x_return_status,1,255));
  dbms_output.put_line('x_msg_count = '||TO_CHAR(x_msg_count));
  dbms_output.put_line('Location Id = '||TO_CHAR(x_location_id));
  dbms_output.put_line('Country = '|| SUBSTR(p_location_rec.country,1,255));
  dbms_output.put_line('Address1 = '|| SUBSTR(p_location_rec.Address1,1,255));
  dbms_output.put_line('State = '|| SUBSTR(p_location_rec.state,1,255));
  dbms_output.put_line('Created By = '|| SUBSTR(p_location_rec.created_by_module,1,255));
  dbms_output.put_line('x_msg_data = '|| SUBSTR(x_msg_data,1,255));
    IF x_msg_count > 1 THEN
      FOR I IN 1..x_msg_count LOOP
      dbms_output.put_line(I||'.'||SUBSTR(FND_MSG_PUB.Get(p_encoded=>
      FND_API.G_FALSE ),1, 255));
      end loop;
    end if;
-- create party site
p_party_site_rec.party_id := x_party_id;--p_organization_rec.party_rec.party_id; --26743
p_party_site_rec.location_id := x_location_id;--p_location_rec.Location_Id; --2057
p_party_site_rec.identifying_address_flag := 'Y';
p_party_site_rec.created_by_module := 'HZ_CPUI';
p_party_site_rec.application_id := 222;
hz_party_site_v2pub.create_party_site(
'T',
p_party_site_rec,
x_party_site_id,
x_party_site_number,
x_return_status,
x_msg_count,
x_msg_data);
  dbms_output.put_line('x_return_status = '||SUBSTR(x_return_status,1,255));
  dbms_output.put_line('x_msg_count = '||TO_CHAR(x_msg_count));
  dbms_output.put_line('Party Site Id = '||TO_CHAR(x_party_site_id));
  dbms_output.put_line('Party Site Number = '||SUBSTR(x_party_site_number,1,255));
  dbms_output.put_line('x_msg_data = '||SUBSTR(x_msg_data,1,255));
    IF x_msg_count >1 THEN
      FOR I IN 1..x_msg_count LOOP
      dbms_output.put_line(I||'.'||SUBSTR(FND_MSG_PUB.Get(p_encoded=>
      FND_API.G_FALSE), 1, 255));
      end loop;
    end if;
-- create party site use
p_party_site_use_rec.party_site_id := x_party_site_id;--p_party_site_rec.Party_Site_Id;
p_party_site_use_rec.created_by_module := 'HZ_CPUI';
p_party_site_use_rec.site_use_type := 'BILL_TO';
p_party_site_use_rec.application_id := 222;
hz_party_site_v2pub.create_party_site_use(
'T',
p_party_site_use_rec,
x_party_site_use_id,
x_return_status,
x_msg_count,
x_msg_data);
  dbms_output.put_line('x_return_status = '||substr(x_return_status,1,255));
  dbms_output.put_line('x_msg_count = '||TO_CHAR(x_msg_count));
  dbms_output.put_line('Site Use Id = '||TO_CHAR(x_party_site_use_id));
  dbms_output.put_line(SubStr('x_msg_data = '||x_msg_data,1,255));
    IF x_msg_count >1 THEN
      FOR I IN 1..x_msg_count LOOP
      dbms_output.put_line(I||'.'||SUBSTR(FND_MSG_PUB.Get(p_encoded=>
      FND_API.G_FALSE ), 1, 255));
      end loop;
    end if;
--create customer account
p_cust_account_rec.created_by_module   := 'HZ_CPUI';
p_organization_rec.party_rec.party_id  := x_party_id;--p_organization_rec.party_rec.party_id;
p_cust_account_rec.application_id := '222';
p_cust_account_rec.customer_type := 'R';
p_customer_profile_rec.grouping_rule_id := '-1';
HZ_CUST_ACCOUNT_V2PUB.CREATE_CUST_ACCOUNT
              p_init_msg_list       => FND_API.G_TRUE,
              p_cust_account_rec    =>p_cust_account_rec,
              p_organization_rec    =>p_organization_rec,
              p_customer_profile_rec=>p_customer_profile_rec,
              p_create_profile_amt  =>'F',
              x_cust_account_id     =>x_cust_account_id,
              x_account_number      =>x_account_number,
              x_party_id            =>x_party_id,
              x_party_number        =>x_party_number,
              x_profile_id          =>x_profile_id,
              x_return_status       =>x_return_status,
              x_msg_count           => x_msg_count,
              x_msg_data            =>x_msg_data
IF x_return_status = fnd_api.g_ret_sts_success THEN
    COMMIT;
    DBMS_OUTPUT.PUT_LINE('Creation of Cust account is Successful ');
    DBMS_OUTPUT.PUT_LINE('Output information ....');
    DBMS_OUTPUT.PUT_LINE('x_cust_account_id  : '||x_cust_account_id);
    DBMS_OUTPUT.PUT_LINE('x_account_number   : '||x_account_number);
    DBMS_OUTPUT.PUT_LINE('x_party_id         : '||x_party_id);
    DBMS_OUTPUT.PUT_LINE('x_party_number     : '||x_party_number);
ELSE
    DBMS_OUTPUT.PUT_LINE ('Creation of Cust account got failed:'||x_msg_data);
    ROLLBACK;
    FOR i IN 1 .. x_msg_count
    LOOP
      x_msg_data := oe_msg_pub.get( p_msg_index => i, p_encoded => 'F');
      dbms_output.put_line( i|| ') '|| x_msg_data);
    END LOOP;
end if;
DBMS_OUTPUT.PUT_LINE('Completion of API');
-- location
insert into hz_cust_acct_sites_all
  CUST_ACCT_SITE_ID,
  cust_account_id,
  party_site_id,
  last_update_date,
  last_updated_by,
  creation_date,
  created_by,
  last_update_login,
  orig_system_reference,
  status,
  org_id,
  bill_to_flag,
  object_version_number,
  created_by_module,
  application_id
) values
  hz_cust_acct_sites_s.nextval,
  x_cust_account_id,--p_cust_account_rec.cust_account_id,
  x_party_site_id,--p_party_site_rec.party_site_id,
  sysdate,
  '-1',
  sysdate,
  '-1',
  '102804',
  hz_cust_acct_sites_s.nextval,
  'A',
  '81',
  'P',
  1,
  'HZ_CPUI',
  222 
fnd_client_info.set_org_context('81');
p_location_id := x_location_id;
p_created_by_module := 'HZ_CPUI';
hz_tax_assignment_v2pub.create_loc_assignment(
'T',
p_location_id,
'T',
p_created_by_module,
p_application_id,
x_return_status,
x_msg_count,
x_msg_data,
x_loc_id);
  dbms_output.put_line('x_return_status = '||SUBSTR(x_return_status,1,255));
  dbms_output.put_line('Location Id = '||TO_CHAR(p_location_id));
  dbms_output.put_line('Created By Moudle = '|| SUBSTR (p_created_by_module,1,30));
  dbms_output.put_line('x_msg_count = '||TO_CHAR(x_msg_count));
  dbms_output.put_line('x_msg_data = '|| SUBSTR (x_msg_data,1,255));
    IF x_msg_count >1 THEN
      FOR I IN 1..x_msg_count LOOP
        dbms_output.put_line(I||'.'||SUBSTR(FND_MSG_PUB.Get(p_encoded=>
        FND_API.G_FALSE ), 1, 255));
      END LOOP;
    end if;
dbms_output.put_line(x_party_site_id || '--' || p_party_site_rec.party_site_id);
end set_customers;EBS Version: 12.1.3
I call this procedure with another and pass a param for just one customer(in test environment).
I made a test and create one via EBS Receivables -> Customers - > Customers . After this i created a manual invoice for that customer and when i specify the name of the Bill To(the new one) the Number, Location and Address are filled automatically. But with the customer created via this procedure it didn't filled automatically(when customer's name was specified...).
procedure create_customers(p_choice in number) is
cursor c is select taxpayer_id
                  ,customer_name
                  ,customer_city
                  ,customer_address
                  ,vat_id 
            from xx_customers_temp
             where taxpayer_id = '131199238';
v_cust cust_type;                         
begin
    open c;
    loop
      fetch c into  v_cust;
      exit when c%notfound;
    dbms_output.put_line(v_cust.taxpayer_id || '--' || v_cust.customer_name || '--' || v_cust.customer_city
                        || '--' || v_cust.customer_address|| '--' || v_cust.vat_id);
    if p_choice = 1 then
      set_customers(v_cust);
    end if;
  end loop;
  close c;
end create_customers;Any ideas?
Thanks in advance,
Bahchevanov.

Answer 1

For location the iPod uses the location of nearby wifi routers that are in Apple's database. You do not have to be connected to the network/router to use that router's location. Thus, it appears that the iPod can't see a nearby router that is in Apple's database. Apple continuously updated their database based on info they obtain from iPhones. No one has been able to find a way to inform Apple of a router or correct is location.
You can confirm that by going to place with a know located router like Starbucks or McDonalds