The following lines contain the word 'select', 'insert', 'update' or 'delete':
select count(1)
into dummy
from po_location_associations_all
where location_id = p_inventory_location_id
and org_id = l_org_id;
select count(1)
into dummy
from po_location_associations_all
where location_id = p_inventory_location_id;
procedure insert_po_loc_associations ( p_inventory_location_id in number,
p_inventory_organization_id in number,
p_customer_id in number,
p_address_id in number,
p_site_use_id in number,
x_return_status out nocopy varchar2,
x_msg_count out nocopy number,
x_msg_data out nocopy varchar2
) is
--
l_org_id number;
SELECT org_id
INTO l_org_id
FROM HZ_CUST_ACCT_SITES_ALL
WHERE cust_acct_site_id
= p_address_id;
insert into po_location_associations (
location_id,
last_update_date,
last_updated_by,
last_update_login,
creation_date,
created_by,
customer_id,
address_id,
site_use_id,
organization_id,
org_id
) values (
p_inventory_location_id,
sysdate,
fnd_global.user_id,
fnd_global.Login_id,
sysdate,
fnd_global.user_id,
p_customer_id,
p_address_id,
p_site_use_id,
p_inventory_organization_id,
l_org_id
);
end insert_po_loc_associations;
procedure insert_po_loc_associations ( p_inventory_location_id in number,
p_inventory_organization_id in number,
p_customer_id in number,
p_address_id in number,
p_site_use_id in number
) is
--
begin
--
check_unique_inv_location( p_inventory_location_id => p_inventory_location_id );
insert into po_location_associations (
location_id,
last_update_date,
last_updated_by,
last_update_login,
creation_date,
created_by,
customer_id,
address_id,
site_use_id,
organization_id,
org_id
) values (
p_inventory_location_id,
sysdate,
fnd_global.user_id,
fnd_global.Login_id,
sysdate,
fnd_global.user_id,
p_customer_id,
p_address_id,
p_site_use_id,
p_inventory_organization_id,
arp_standard.sysparm.org_id
);
end insert_po_loc_associations;
procedure update_po_loc_associations ( p_site_use_id in number,
p_address_id in number,
p_customer_id in number,
p_inventory_organization_id in number,
p_inventory_location_id in number,
x_return_status out nocopy varchar2,
x_msg_count out nocopy number,
x_msg_data out nocopy varchar2
) is
--
l_dummy number;
and modified the select condition to get organization_id
Modified the 'if' condition to check whether
organization_id is same*/
begin
select location_id,organization_id
into l_inventory_location_id,l_inventory_organization_id
from po_location_associations
where site_use_id = p_site_use_id;
SELECT count(1)
INTO l_dummy
FROM po_requisition_lines porl
WHERE porl.deliver_to_location_id = l_inventory_location_id
AND nvl(porl.source_type_code, 'VENDOR') = 'INVENTORY';
delete from po_location_associations
where site_use_id = p_site_use_id;
insert_po_loc_associations( p_inventory_location_id => p_inventory_location_id,
p_inventory_organization_id => p_inventory_organization_id,
p_customer_id => p_customer_id,
p_address_id => p_address_id,
p_site_use_id => p_site_use_id,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
end update_po_loc_associations;
procedure update_po_loc_associations ( p_site_use_id in number,
p_address_id in number,
p_customer_id in number,
p_inventory_organization_id in number,
p_inventory_location_id in number ) is
--
l_dummy number;
and modified the select condition to get organization_id
Modified the 'if' condition to check whether
organization_id is same*/
begin
select location_id,organization_id
into l_inventory_location_id,l_inventory_organization_id
from po_location_associations
where site_use_id = p_site_use_id;
SELECT count(1)
INTO l_dummy
FROM po_requisition_lines porl
WHERE porl.deliver_to_location_id = l_inventory_location_id
AND nvl(porl.source_type_code, 'VENDOR') = 'INVENTORY';
delete from po_location_associations
where site_use_id = p_site_use_id;
insert_po_loc_associations( p_inventory_location_id => p_inventory_location_id,
p_inventory_organization_id => p_inventory_organization_id,
p_customer_id => p_customer_id,
p_address_id => p_address_id,
p_site_use_id => p_site_use_id
);
end update_po_loc_associations;