APPS.CSI_PARTY_MERGE_PKG dependencies on CSI_T_TXN_SYSTEMS

Line 847: PROCEDURE CSI_T_TXN_SYSTEMS_MERGE(

843: END;
844: end if;
845: END CSI_SYSTEMS_B_MERGE;
846:
847: PROCEDURE CSI_T_TXN_SYSTEMS_MERGE(
848: p_entity_name IN VARCHAR2,
849: p_from_id IN NUMBER,
850: x_to_id OUT NOCOPY NUMBER,
851: p_from_fk_id IN NUMBER,

Line 861: from csi_t_txn_systems

857: IS
858:
859: cursor c1 is
860: select 1
861: from csi_t_txn_systems
862: where install_site_use_id = p_from_fk_id
863: for update nowait;
864:
865: cursor c2 is

Line 867: from csi_t_txn_systems

863: for update nowait;
864:
865: cursor c2 is
866: select 1
867: from csi_t_txn_systems
868: where ship_to_contact_id = p_from_fk_id
869: or bill_to_contact_id = p_from_fk_id
870: or technical_contact_id = p_from_fk_id
871: or service_admin_contact_id = p_from_fk_id

Line 875: l_api_name VARCHAR2(30) := 'CSI_T_TXN_SYSTEMS_MERGE';

871: or service_admin_contact_id = p_from_fk_id
872: for update nowait;
873:
874: l_merge_reason_code VARCHAR2(30);
875: l_api_name VARCHAR2(30) := 'CSI_T_TXN_SYSTEMS_MERGE';
876: l_count NUMBER(10) := 0;
877: l_system_audit_id NUMBER;
878: l_column_name VARCHAR2(30);
879: v_no_of_rows NUMBER;

Line 889: arp_message.set_line('CSI_PARTY_MERGE_PKG.CSI_T_TXN_SYSTEMS_MERGE()+');

885: RESOURCE_BUSY EXCEPTION;
886: PRAGMA EXCEPTION_INIT(RESOURCE_BUSY, -0054);
887:
888: BEGIN
889: arp_message.set_line('CSI_PARTY_MERGE_PKG.CSI_T_TXN_SYSTEMS_MERGE()+');
890:
891: x_return_status := FND_API.G_RET_STS_SUCCESS;
892:
893: begin

Line 939: arp_message.set_token('TABLE_NAME', 'CSI_T_TXN_SYSTEMS', FALSE);

935:
936: If p_parent_entity_name = 'HZ_PARTY_SITES' Then
937:
938: arp_message.set_name('AR', 'AR_LOCKING_TABLE');
939: arp_message.set_token('TABLE_NAME', 'CSI_T_TXN_SYSTEMS', FALSE);
940:
941: l_column_name := 'install_site_use_id';
942:
943: open c1;

Line 946: update csi_t_txn_systems

942:
943: open c1;
944: close c1;
945:
946: update csi_t_txn_systems
947: set install_site_use_id = p_to_fk_id,
948: last_update_date = SYSDATE,
949: last_updated_by = G_USER_ID,
950: last_update_login = G_LOGIN_ID

Line 961: arp_message.set_token('TABLE_NAME', 'CSI_T_TXN_SYSTEMS', FALSE);

957:
958: Elsif p_parent_entity_name = 'HZ_PARTIES' Then
959:
960: arp_message.set_name('AR', 'AR_LOCKING_TABLE');
961: arp_message.set_token('TABLE_NAME', 'CSI_T_TXN_SYSTEMS', FALSE);
962:
963: l_column_name := 'contact_ids';
964:
965: open c2;

Line 968: update csi_t_txn_systems

964:
965: open c2;
966: close c2;
967:
968: update csi_t_txn_systems
969: set bill_to_contact_id = decode(bill_to_contact_id, p_from_fk_id, p_to_fk_id, bill_to_contact_id ),
970: ship_to_contact_id = decode(ship_to_contact_id, p_from_fk_id, p_to_fk_id, ship_to_contact_id ),
971: technical_contact_id = decode(technical_contact_id, p_from_fk_id, p_to_fk_id, technical_contact_id ),
972: service_admin_contact_id = decode(service_admin_contact_id,

Line 995: arp_message.set_line(g_proc_name || '.' || l_api_name || '; Could not obtain lock for records in table ' || 'CSI_T_TXN_SYSTEMS for '||l_column_name ||' = '|| p_from_fk_id );

991: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' ||v_internal_party_message);
992: x_return_status := FND_API.G_RET_STS_ERROR;
993: raise;
994: when resource_busy then
995: arp_message.set_line(g_proc_name || '.' || l_api_name || '; Could not obtain lock for records in table ' || 'CSI_T_TXN_SYSTEMS for '||l_column_name ||' = '|| p_from_fk_id );
996: x_return_status := FND_API.G_RET_STS_ERROR;
997: raise;
998: when others then
999: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);

Line 1006: END CSI_T_TXN_SYSTEMS_MERGE;

1002: END;
1003:
1004: end if;
1005:
1006: END CSI_T_TXN_SYSTEMS_MERGE;
1007:
1008: PROCEDURE CSI_T_PARTY_DETAILS_MERGE(
1009: p_entity_name IN VARCHAR2,
1010: p_from_id IN NUMBER,