APPS.AHL_PARTY_MERGE_PKG dependencies on AHL_SUBSCRIPTIONS_B

Line 12: -- AHL_SUBSCRIPTIONS_B

8: -- Party Merge are:
9: -- AHL_DOCUMENTS_B
10: -- AHL_SUPPLIER_DOCUMENTS
11: -- AHL_RECIPIENT_DOCUEMTNS
12: -- AHL_SUBSCRIPTIONS_B
13: -- AHL_DOC_REVISIONS_B
14: -- AHL_DOC_REVISION_COPIES
15: --
16: -- AHL_OPERATIONS_B

Line 341: -- Merge AHL_SUBSCRIPTIONS_B.REQUESTED_BY_PARTY_ID

337: end;
338: end if;
339: END AHL_DI_RECIPIENT_PARTY;
340:
341: -- Merge AHL_SUBSCRIPTIONS_B.REQUESTED_BY_PARTY_ID
342:
343: PROCEDURE AHL_DI_REQUESTED_BY_PARTY (
344: p_entity_name IN VARCHAR2,
345: p_from_id IN NUMBER,

Line 356: from ahl_subscriptions_b

352: x_return_status OUT NOCOPY VARCHAR2)
353: IS
354: cursor c1 is
355: select 1
356: from ahl_subscriptions_b
357: where requested_by_party_id = p_from_fk_id
358: for update nowait;
359:
360:

Line 404: -- In the case of AHL_SUBSCRIPTIONS_B table, if requested by party id 1000 got merged to requested by party id 2000

400: -- dependent record exists on the new parent. If a duplicate exists then do
401: -- not transfer and return the id of the duplicate record as the Merged To Id
402:
403:
404: -- In the case of AHL_SUBSCRIPTIONS_B table, if requested by party id 1000 got merged to requested by party id 2000
405: -- then, we have to update all records with requested by party id = 1000 to 2000
406:
407: if p_from_fk_id <> p_to_fk_id then
408: begin

Line 411: arp_message.set_token('TABLE_NAME', 'AHL_SUBSCRIPTIONS_B', FALSE);

407: if p_from_fk_id <> p_to_fk_id then
408: begin
409: -- obtain lock on records to be updated.
410: arp_message.set_name('AR', 'AR_LOCKING_TABLE');
411: arp_message.set_token('TABLE_NAME', 'AHL_SUBSCRIPTIONS_B', FALSE);
412:
413: open c1;
414: close c1;
415:

Line 416: update ahl_subscriptions_b

412:
413: open c1;
414: close c1;
415:
416: update ahl_subscriptions_b
417: set requested_by_party_id = p_to_fk_id,
418: last_update_date = SYSDATE,
419: last_updated_by = G_USER_ID,
420: last_update_login = G_LOGIN_ID

Line 432: 'AHL_SUBSCRIPTIONS_B for requested_by_party_id = ' || p_from_fk_id );

428: exception
429: when resource_busy then
430: arp_message.set_line(g_proc_name || '.' || l_api_name ||
431: '; Could not obtain lock for records in table ' ||
432: 'AHL_SUBSCRIPTIONS_B for requested_by_party_id = ' || p_from_fk_id );
433: x_return_status := FND_API.G_RET_STS_ERROR;
434: raise;
435:
436: when others then

Line 444: -- Merge AHL_SUBSCRIPTIONS_B.SUBSCRIBED_FRM_PARTY_ID

440: end;
441: end if;
442: END AHL_DI_REQUESTED_BY_PARTY ;
443:
444: -- Merge AHL_SUBSCRIPTIONS_B.SUBSCRIBED_FRM_PARTY_ID
445:
446: PROCEDURE AHL_DI_SUBSCRIBED_FRM_PARTY(
447: p_entity_name IN VARCHAR2,
448: p_from_id IN NUMBER,

Line 459: from ahl_subscriptions_b

455: x_return_status OUT NOCOPY VARCHAR2)
456: IS
457: cursor c1 is
458: select 1
459: from ahl_subscriptions_b
460: where SUBSCRIBED_FRM_PARTY_ID = p_from_fk_id
461: for update nowait;
462:
463:

Line 507: -- In the case of AHL_SUBSCRIPTIONS_B table, if subscribed from party id 1000 got merged to requested by party id 2000

503: -- dependent record exists on the new parent. If a duplicate exists then do
504: -- not transfer and return the id of the duplicate record as the Merged To Id
505:
506:
507: -- In the case of AHL_SUBSCRIPTIONS_B table, if subscribed from party id 1000 got merged to requested by party id 2000
508: -- then, we have to update all records with subscribed from party id = 1000 to 2000
509:
510: if p_from_fk_id <> p_to_fk_id then
511: begin

Line 514: arp_message.set_token('TABLE_NAME', 'AHL_SUBSCRIPTIONS_B', FALSE);

510: if p_from_fk_id <> p_to_fk_id then
511: begin
512: -- obtain lock on records to be updated.
513: arp_message.set_name('AR', 'AR_LOCKING_TABLE');
514: arp_message.set_token('TABLE_NAME', 'AHL_SUBSCRIPTIONS_B', FALSE);
515:
516: open c1;
517: close c1;
518:

Line 519: update ahl_subscriptions_b

515:
516: open c1;
517: close c1;
518:
519: update ahl_subscriptions_b
520: set SUBSCRIBED_FRM_PARTY_ID = p_to_fk_id,
521: last_update_date = SYSDATE,
522: last_updated_by = G_USER_ID,
523: last_update_login = G_LOGIN_ID

Line 535: 'AHL_SUBSCRIPTIONS_B for requested_by_party_id = ' || p_from_fk_id );

531: exception
532: when resource_busy then
533: arp_message.set_line(g_proc_name || '.' || l_api_name ||
534: '; Could not obtain lock for records in table ' ||
535: 'AHL_SUBSCRIPTIONS_B for requested_by_party_id = ' || p_from_fk_id );
536: x_return_status := FND_API.G_RET_STS_ERROR;
537: raise;
538:
539: when others then