[Home] [Help]
112: l_count Number;
113:
114: begin
115:
116: if p_owner_table_name = 'HZ_PARTIES' OR p_owner_table_name = 'HZ_PARTY_SITES' then
117: open get_pps_ssc_csr;
118: fetch get_pps_ssc_csr into l_count;
119: close get_pps_ssc_csr;
120:
597:
598:
599:
600:
601: IF p_orig_sys_reference_rec.owner_table_name = 'HZ_PARTIES'
602: THEN
603: BEGIN
604: -- SSM SST Integration and Extension
605: -- Checking SST rules is now applicable only for profile entities.
614:
615: /* IF sst_rules_passed (p_orig_sys_reference_rec.owner_table_name, p_orig_sys_reference_rec.owner_table_id)
616: THEN*/
617: select party_type into l_dummy
618: from hz_parties
619: where party_id = p_orig_sys_reference_rec.owner_table_id ;
620: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
621: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'DQM Sync Mode '||p_orig_sys_reference_rec.dqm_sync_mode,
622: p_msg_level=>fnd_log.level_statement);
642: WHEN NO_DATA_FOUND THEN
643: fnd_message.set_name('AR', 'HZ_API_INVALID_FK');
644: fnd_message.set_token('FK', 'party_id');
645: fnd_message.set_token('COLUMN', 'party_id');
646: fnd_message.set_token('TABLE', 'hz_parties');
647: fnd_msg_pub.add;
648: x_return_status := fnd_api.g_ret_sts_error;
649:
650: END;
963:
964:
965:
966: -- SYNC PARTIES
967: IF p_orig_sys_reference_rec.owner_table_name = 'HZ_PARTIES'
968: THEN
969: BEGIN
970: -- SSM SST Integration and Extension
971: -- Checking SST rules is now applicable only for profile entities.
978: /* IF sst_rules_passed (p_orig_sys_reference_rec.owner_table_name, l_temp )
979: THEN */
980:
981: select party_type into l_dummy
982: from hz_parties
983: where party_id = l_temp ;
984:
985: IF l_dummy = 'ORGANIZATION'
986: THEN
994: WHEN NO_DATA_FOUND THEN
995: fnd_message.set_name('AR', 'HZ_API_INVALID_FK');
996: fnd_message.set_token('FK', 'party_id');
997: fnd_message.set_token('COLUMN', 'party_id');
998: fnd_message.set_token('TABLE', 'hz_parties');
999: fnd_msg_pub.add;
1000: x_return_status := fnd_api.g_ret_sts_error;
1001:
1002: END;
1083: and orig_system = l_orig_sys_reference_rec.orig_system
1084: and status = 'A';
1085:
1086: l_multi_osr_flag varchar2(1);
1087: x_party_id HZ_PARTIES.party_id%TYPE;
1088: l_dummy VARCHAR2(1);
1089:
1090: begin
1091: -- standard start of API savepoint
1260: and orig_system = l_orig_sys_reference_rec.orig_system
1261: and status = 'A';
1262:
1263: l_multi_osr_flag varchar2(1);
1264: x_party_id HZ_PARTIES.party_id%TYPE;
1265: l_dummy VARCHAR2(1);
1266:
1267: begin
1268:
1623: and status = 'A';
1624:
1625: l_dup_exists varchar2(1);
1626: l_multi_osr_flag varchar2(1);
1627: x_party_id HZ_PARTIES.party_id%TYPE;
1628: l_dummy VARCHAR2(1);
1629: l_party_merge_flag BOOLEAN := FALSE; /*For Bug 3235877*/
1630:
1631: begin
1884: and rownum=1
1885: );
1886:
1887: l_multi_osr_flag varchar2(1);
1888: x_party_id HZ_PARTIES.party_id%TYPE;
1889:
1890:
1891: begin
1892:
2004:
2005: --//Table hz_contact_points
2006: cursor c_cust_cont_point_id is
2007: select party.party_id
2008: from hz_parties party,hz_contact_points cont
2009: where cont.contact_point_id = p_owner_table_id
2010: and cont.owner_table_id = party.party_id
2011: --and cont.status = 'A' -- Bug 3196803 : Removed the check of status = 'A'
2012: union
2044: --and role.status = 'A'; -- Bug 3196803 : Removed the check of status = 'A'
2045:
2046: begin
2047:
2048: if p_owner_table_name = 'HZ_PARTIES' then
2049: x_party_id := p_owner_table_id;
2050:
2051: elsif p_owner_table_name = 'HZ_PARTY_SITES' then
2052: open c_party_site_id;