[Home] [Help]
176: RETURN;
177: END IF;
178:
179: IF (p_from_fk_id <> p_to_fk_id) THEN
180: IF (p_parent_entity_name = 'HZ_PARTY_SITES') THEN
181:
182: OPEN C_Carrier_Sites(p_from_fk_id);
183: FETCH C_Carrier_Sites INTO l_from_carrier_site_num;
184: CLOSE C_Carrier_Sites;
451: -- p_from_id Value of PK of the record being merged
452: -- x_to_id Value of the PK of the record to which this record is mapped
453: -- p_from_fk_id Value of the from ID (e.g. Party, Party Site, etc.) when merge is executed
454: -- p_to_fk_id Value of the to ID (e.g. Party, Party Site, etc.) when merge is executed
455: -- p_parent_entity_name Name of parent HZ table (e.g. HZ_PARTIES, HZ_PARTY_SITES)
456: -- p_batch_id ID of the batch
457: -- p_batch_party_id ID of the batch and Party record
458: -- x_return_status Return status
459: --
484: l_Return_Status VARCHAR2(1);
485: --
486: CURSOR getPartyId(p_party_site_id IN NUMBER) IS
487: SELECT party_id
488: FROM hz_party_Sites
489: WHERE party_site_id = p_party_site_id;
490: --
491: CURSOR getVendorID(p_party_id IN NUMBER) IS
492: SELECT vendor_id
494: WHERE party_id = p_party_id;
495: --
496: CURSOR getLocationID(p_party_site_id NUMBER) IS
497: SELECT location_id
498: FROM hz_party_sites
499: WHERE party_site_id = p_from_fk_id;
500: --
501: BEGIN
502: --{
534: END IF;
535: --
536: IF p_from_FK_id <> p_to_FK_id THEN
537: --{
538: IF p_parent_entity_name = 'HZ_PARTY_SITES' THEN
539: --{
540: BEGIN
541: --
542: -- R12 Perf Bug 4949639 : Replace WND with WDD
545: --
546: SELECT 1
547: INTO l_query_count
548: FROM wsh_delivery_details wdd,
549: hz_party_Sites hps,
550: wsh_locations wl
551: WHERE hps.party_site_id = p_from_fk_id
552: AND wdd.ship_from_location_id = wl.wsh_location_id
553: AND hps.location_id = wl.source_location_id
1575: p_batch_party_id IN NUMBER,
1576: x_return_status IN OUT NOCOPY VARCHAR2)
1577: IS
1578:
1579: -- Cursor to fetch the location id from Hz_Party_Sites table.
1580: CURSOR Get_Location_Id ( p_party_site_id NUMBER )
1581: IS
1582: SELECT Party_Id, Party_Site_Id, Location_Id
1583: FROM HZ_PARTY_SITES HPS
1579: -- Cursor to fetch the location id from Hz_Party_Sites table.
1580: CURSOR Get_Location_Id ( p_party_site_id NUMBER )
1581: IS
1582: SELECT Party_Id, Party_Site_Id, Location_Id
1583: FROM HZ_PARTY_SITES HPS
1584: WHERE PARTY_SITE_ID = p_party_site_id;
1585:
1586: -- Fetches delivery details with new party sites and old locations.
1587: -- Old locations to be updated with new locations in Shipping
1860: END IF; -- }
1861: CLOSE Get_Location_Id;
1862:
1863:
1864: -- Get From_Location_Id from Hz_Party_Sites
1865: OPEN Get_Location_Id ( p_from_fk_id );
1866: FETCH Get_Location_Id INTO l_from_party_id, l_from_party_site_id, l_from_location_id;
1867: IF Get_Location_Id%NOTFOUND
1868: THEN -- {