140: /*** Private procedure for inserting statement , procedure level debug lines into generated packages **/
141: PROCEDURE d(p_msg_level NUMBER,str VARCHAR2, val VARCHAR2 DEFAULT NULL, pad VARCHAR2 DEFAULT ' ') IS
142: l_msg_level VARCHAR2(30);
143: BEGIN
144: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
145: l(pad||'IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN');
146: l_msg_level :='fnd_log.level_statement';
147: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
148: l(pad||'IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
141: PROCEDURE d(p_msg_level NUMBER,str VARCHAR2, val VARCHAR2 DEFAULT NULL, pad VARCHAR2 DEFAULT ' ') IS
142: l_msg_level VARCHAR2(30);
143: BEGIN
144: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
145: l(pad||'IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN');
146: l_msg_level :='fnd_log.level_statement';
147: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
148: l(pad||'IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
149: l_msg_level :='fnd_log.level_procedure';
142: l_msg_level VARCHAR2(30);
143: BEGIN
144: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
145: l(pad||'IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN');
146: l_msg_level :='fnd_log.level_statement';
147: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
148: l(pad||'IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
149: l_msg_level :='fnd_log.level_procedure';
150: ELSE
143: BEGIN
144: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
145: l(pad||'IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN');
146: l_msg_level :='fnd_log.level_statement';
147: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
148: l(pad||'IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
149: l_msg_level :='fnd_log.level_procedure';
150: ELSE
151: RETURN;
144: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
145: l(pad||'IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN');
146: l_msg_level :='fnd_log.level_statement';
147: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
148: l(pad||'IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
149: l_msg_level :='fnd_log.level_procedure';
150: ELSE
151: RETURN;
152: END IF;
145: l(pad||'IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN');
146: l_msg_level :='fnd_log.level_statement';
147: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
148: l(pad||'IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
149: l_msg_level :='fnd_log.level_procedure';
150: ELSE
151: RETURN;
152: END IF;
153: IF val IS NULL THEN
150: ELSE
151: RETURN;
152: END IF;
153: IF val IS NULL THEN
154: -- REPURI. Bug 4996283. Adding tracking indentifiers for fnd log messages
155: -- Passing p_module_prefix as dqm and p_module as hz_match_rule_xxx to help debug fnd logs better
156:
157: l(pad||' hz_utility_v2pub.debug(p_message=>'''||str||' '',p_module_prefix=>''dqm'',p_module=>''hz_match_rule_xxx'',p_prefix=>NULL,p_msg_level=>'||l_msg_level||');');
158: ELSE
151: RETURN;
152: END IF;
153: IF val IS NULL THEN
154: -- REPURI. Bug 4996283. Adding tracking indentifiers for fnd log messages
155: -- Passing p_module_prefix as dqm and p_module as hz_match_rule_xxx to help debug fnd logs better
156:
157: l(pad||' hz_utility_v2pub.debug(p_message=>'''||str||' '',p_module_prefix=>''dqm'',p_module=>''hz_match_rule_xxx'',p_prefix=>NULL,p_msg_level=>'||l_msg_level||');');
158: ELSE
159: l(pad||' hz_utility_v2pub.debug(p_message=>'''||str||' ''||'||val||',p_module_prefix=>''dqm'',p_module=>''hz_match_rule_xxx'',p_prefix=>NULL,p_msg_level=>'||l_msg_level||');');
165: PROCEDURE ds(p_msg_level NUMBER,pad VARCHAR2 DEFAULT ' ') IS
166: BEGIN
167: IF nvl(FND_PROFILE.VALUE('HZ_DQM_DEV_DEBUG'), 'N') = 'N'
168: THEN
169: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
170: l(pad||'IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN');
171: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
172: l(pad||'IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
173: ELSE
166: BEGIN
167: IF nvl(FND_PROFILE.VALUE('HZ_DQM_DEV_DEBUG'), 'N') = 'N'
168: THEN
169: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
170: l(pad||'IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN');
171: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
172: l(pad||'IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
173: ELSE
174: RETURN;
167: IF nvl(FND_PROFILE.VALUE('HZ_DQM_DEV_DEBUG'), 'N') = 'N'
168: THEN
169: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
170: l(pad||'IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN');
171: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
172: l(pad||'IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
173: ELSE
174: RETURN;
175: END IF;
168: THEN
169: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
170: l(pad||'IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN');
171: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
172: l(pad||'IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
173: ELSE
174: RETURN;
175: END IF;
176: END IF;
181: l_msg_level VARCHAR2(30);
182: BEGIN
183: IF nvl(FND_PROFILE.VALUE('HZ_DQM_DEV_DEBUG'), 'N') = 'N'
184: THEN
185: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
186: l_msg_level :='fnd_log.level_statement';
187: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
188: l_msg_level :='fnd_log.level_procedure';
189: ELSE
182: BEGIN
183: IF nvl(FND_PROFILE.VALUE('HZ_DQM_DEV_DEBUG'), 'N') = 'N'
184: THEN
185: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
186: l_msg_level :='fnd_log.level_statement';
187: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
188: l_msg_level :='fnd_log.level_procedure';
189: ELSE
190: RETURN;
183: IF nvl(FND_PROFILE.VALUE('HZ_DQM_DEV_DEBUG'), 'N') = 'N'
184: THEN
185: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
186: l_msg_level :='fnd_log.level_statement';
187: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
188: l_msg_level :='fnd_log.level_procedure';
189: ELSE
190: RETURN;
191: END IF;
184: THEN
185: IF p_msg_level=FND_LOG.LEVEL_STATEMENT THEN
186: l_msg_level :='fnd_log.level_statement';
187: ELSIF p_msg_level=FND_LOG.LEVEL_PROCEDURE THEN
188: l_msg_level :='fnd_log.level_procedure';
189: ELSE
190: RETURN;
191: END IF;
192: IF val IS NULL THEN
189: ELSE
190: RETURN;
191: END IF;
192: IF val IS NULL THEN
193: -- REPURI. Bug 4996283. Adding tracking indentifiers for fnd log messages
194: -- Passing p_module_prefix as dqm and p_module as hz_match_rule_xxx to help debug fnd logs better
195:
196: l(pad||' hz_utility_v2pub.debug(p_message=>'''||str||''',p_module_prefix=>''dqm'',p_module=>''hz_match_rule_xxx'',p_prefix=>NULL,p_msg_level=>'||l_msg_level||');');
197: ELSE
190: RETURN;
191: END IF;
192: IF val IS NULL THEN
193: -- REPURI. Bug 4996283. Adding tracking indentifiers for fnd log messages
194: -- Passing p_module_prefix as dqm and p_module as hz_match_rule_xxx to help debug fnd logs better
195:
196: l(pad||' hz_utility_v2pub.debug(p_message=>'''||str||''',p_module_prefix=>''dqm'',p_module=>''hz_match_rule_xxx'',p_prefix=>NULL,p_msg_level=>'||l_msg_level||');');
197: ELSE
198: l(pad||' hz_utility_v2pub.debug(p_message=>'''||str||' ''||'||val||',p_module_prefix=>''dqm'',p_module=>''hz_match_rule_xxx'',p_prefix=>NULL,p_msg_level=>'||l_msg_level||');');
233: BEGIN
234:
235: IF str1 IS NOT NULL
236: THEN
237: ds(fnd_log.level_statement, ' ');
238: dc(fnd_log.level_statement, str1, val1) ;
239: END IF;
240:
241: IF str2 IS NOT NULL
234:
235: IF str1 IS NOT NULL
236: THEN
237: ds(fnd_log.level_statement, ' ');
238: dc(fnd_log.level_statement, str1, val1) ;
239: END IF;
240:
241: IF str2 IS NOT NULL
242: THEN
239: END IF;
240:
241: IF str2 IS NOT NULL
242: THEN
243: dc(fnd_log.level_statement, str2, val2) ;
244: END IF;
245:
246: IF str3 IS NOT NULL
247: THEN
244: END IF;
245:
246: IF str3 IS NOT NULL
247: THEN
248: dc(fnd_log.level_statement, str3, val3) ;
249: END IF;
250:
251: IF str4 IS NOT NULL
252: THEN
249: END IF;
250:
251: IF str4 IS NOT NULL
252: THEN
253: dc(fnd_log.level_statement, str4, val4) ;
254: END IF;
255:
256: IF str1 IS NOT NULL
257: THEN
271: BEGIN
272:
273: IF str1 IS NOT NULL
274: THEN
275: ds(fnd_log.level_statement, ' ');
276: dc(fnd_log.level_statement, str1 ) ;
277: END IF;
278:
279: IF str2 IS NOT NULL
272:
273: IF str1 IS NOT NULL
274: THEN
275: ds(fnd_log.level_statement, ' ');
276: dc(fnd_log.level_statement, str1 ) ;
277: END IF;
278:
279: IF str2 IS NOT NULL
280: THEN
277: END IF;
278:
279: IF str2 IS NOT NULL
280: THEN
281: dc(fnd_log.level_statement, str2 ) ;
282: END IF;
283:
284: IF str3 IS NOT NULL
285: THEN
282: END IF;
283:
284: IF str3 IS NOT NULL
285: THEN
286: dc(fnd_log.level_statement, str3 ) ;
287: END IF;
288:
289: IF str4 IS NOT NULL
290: THEN
287: END IF;
288:
289: IF str4 IS NOT NULL
290: THEN
291: dc(fnd_log.level_statement, str4) ;
292: END IF;
293:
294: IF str1 IS NOT NULL
295: THEN
327: l(' temp VARCHAR2(300) ;');
328: l('BEGIN');
329: l(' remainder_str := input_str ;');
330: l(' current_pos := 1 ;');
331: ds(fnd_log.level_statement, ' ');
332: l(' WHILE remainder_str IS NOT NULL');
333: l(' LOOP');
334: l(' temp := substr(remainder_str, 1 , 255 );');
335: dc(fnd_log.level_statement, ' ', 'temp' ) ;
331: ds(fnd_log.level_statement, ' ');
332: l(' WHILE remainder_str IS NOT NULL');
333: l(' LOOP');
334: l(' temp := substr(remainder_str, 1 , 255 );');
335: dc(fnd_log.level_statement, ' ', 'temp' ) ;
336: l(' current_pos := current_pos + 255 ;');
337: l(' remainder_str := substr(input_str,current_pos );');
338: l(' END LOOP ;');
339: de ;
789: l(' x_msg_count OUT NUMBER,');
790: l(' x_msg_data OUT VARCHAR2');
791: l(') IS');
792: l(' BEGIN');
793: d(fnd_log.level_procedure,'find_parties-1(+)');
794: d(fnd_log.level_statement,'Rule ID','x_rule_id');
795:
796: l(' find_parties(p_init_msg_list,x_rule_id,p_party_search_rec,');
797: l(' p_party_site_list,p_contact_list,p_contact_point_list,');
790: l(' x_msg_data OUT VARCHAR2');
791: l(') IS');
792: l(' BEGIN');
793: d(fnd_log.level_procedure,'find_parties-1(+)');
794: d(fnd_log.level_statement,'Rule ID','x_rule_id');
795:
796: l(' find_parties(p_init_msg_list,x_rule_id,p_party_search_rec,');
797: l(' p_party_site_list,p_contact_list,p_contact_point_list,');
798: l(' p_restrict_sql,NULL,p_search_merged,x_search_ctx_id,');
796: l(' find_parties(p_init_msg_list,x_rule_id,p_party_search_rec,');
797: l(' p_party_site_list,p_contact_list,p_contact_point_list,');
798: l(' p_restrict_sql,NULL,p_search_merged,x_search_ctx_id,');
799: l(' x_num_matches,x_return_status,x_msg_count,x_msg_data);');
800: d(fnd_log.level_procedure,'find_parties-1(-)');
801: l(' END;');
802: l('');
803: -- Generate find_parties code. Public signature.
804: l(' PROCEDURE find_parties (');
823: l(' WHERE MATCH_RULE_ID = p_rule_id;');
824: l(' l_cmp_flag VARCHAR2(1);');
825: l(' BEGIN');
826: l('');
827: d(fnd_log.level_procedure,'find_parties(+)');
828: d(fnd_log.level_statement,'Rule ID','p_rule_id');
829: l(' -- Initialize return status and message stack');
830: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
831: l(' IF FND_API.to_Boolean(p_init_msg_list) THEN');
824: l(' l_cmp_flag VARCHAR2(1);');
825: l(' BEGIN');
826: l('');
827: d(fnd_log.level_procedure,'find_parties(+)');
828: d(fnd_log.level_statement,'Rule ID','p_rule_id');
829: l(' -- Initialize return status and message stack');
830: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
831: l(' IF FND_API.to_Boolean(p_init_msg_list) THEN');
832: l(' FND_MSG_PUB.initialize;');
879: l(' IF (fnd_profile.value(''HZ_QUALITY_WEIGHTING_USER_HOOK'') = ''Y'') THEN ');
880: l(' HZ_DQM_SEARCH_UTIL.get_quality_score ( x_search_ctx_id, p_rule_id); ');
881: l(' END IF; ');
882:
883: d(fnd_log.level_procedure,'find_parties(-)');
884: gen_exception_block;
885: l(' END;');
886: l('');
887:
909: l(' WHERE MATCH_RULE_ID = p_rule_id;');
910: l(' l_cmp_flag VARCHAR2(1);');
911: l(' BEGIN');
912: l('');
913: d(fnd_log.level_procedure,'find_persons(+)');
914: d(fnd_log.level_statement,'Rule ID','p_rule_id');
915: l(' -- Initialize return status and message stack');
916: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
917: l(' IF FND_API.to_Boolean(p_init_msg_list) THEN');
910: l(' l_cmp_flag VARCHAR2(1);');
911: l(' BEGIN');
912: l('');
913: d(fnd_log.level_procedure,'find_persons(+)');
914: d(fnd_log.level_statement,'Rule ID','p_rule_id');
915: l(' -- Initialize return status and message stack');
916: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
917: l(' IF FND_API.to_Boolean(p_init_msg_list) THEN');
918: l(' FND_MSG_PUB.initialize;');
970: END IF;
971:
972: END LOOP;
973: l(' END IF;');
974: d(fnd_log.level_procedure,'find_persons(-)');
975: gen_exception_block;
976: l(' END;');
977: l('');
978:
1024: l(' WHERE MATCH_RULE_ID = p_rule_id;');
1025: l(' l_cmp_flag VARCHAR2(1);');
1026: l(' BEGIN');
1027:
1028: ds(fnd_log.level_procedure,' ');
1029: dc(fnd_log.level_procedure,'find_party_details(+)');
1030: de(' ');
1031: ds(fnd_log.level_statement,' ');
1032: dc(fnd_log.level_statement,'Rule ID','p_rule_id');
1025: l(' l_cmp_flag VARCHAR2(1);');
1026: l(' BEGIN');
1027:
1028: ds(fnd_log.level_procedure,' ');
1029: dc(fnd_log.level_procedure,'find_party_details(+)');
1030: de(' ');
1031: ds(fnd_log.level_statement,' ');
1032: dc(fnd_log.level_statement,'Rule ID','p_rule_id');
1033: de(' ');
1027:
1028: ds(fnd_log.level_procedure,' ');
1029: dc(fnd_log.level_procedure,'find_party_details(+)');
1030: de(' ');
1031: ds(fnd_log.level_statement,' ');
1032: dc(fnd_log.level_statement,'Rule ID','p_rule_id');
1033: de(' ');
1034: l('');
1035: l(' -- Initialize return status and message stack');
1028: ds(fnd_log.level_procedure,' ');
1029: dc(fnd_log.level_procedure,'find_party_details(+)');
1030: de(' ');
1031: ds(fnd_log.level_statement,' ');
1032: dc(fnd_log.level_statement,'Rule ID','p_rule_id');
1033: de(' ');
1034: l('');
1035: l(' -- Initialize return status and message stack');
1036: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
1079: l(' p_rule_id,p_party_search_rec,p_party_site_list,p_contact_list,');
1080: l(' p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,x_search_ctx_id,x_num_matches);');
1081: END LOOP;
1082: l(' END IF;');
1083: d(fnd_log.level_procedure,'find_party_details(-)');
1084: gen_exception_block;
1085: l(' END;');
1086: l('');
1087: l(' PROCEDURE find_duplicate_parties (');
1106: l(' l_cmp_flag VARCHAR2(1);');
1107: l(' BEGIN');
1108:
1109:
1110: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
1111: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1112:
1113: l('');
1114: l(' -- Initialize return status and message stack');
1107: l(' BEGIN');
1108:
1109:
1110: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
1111: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1112:
1113: l('');
1114: l(' -- Initialize return status and message stack');
1115: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
1162: l(' p_rule_id,p_party_id,');
1163: l(' p_restrict_sql,p_match_type,p_dup_batch_id,p_search_merged,x_dup_set_id, x_search_ctx_id,x_num_matches);');
1164: END LOOP;
1165: l(' END IF;');
1166: d(fnd_log.level_procedure,'find_duplicate_parties(-)');
1167:
1168: gen_exception_block;
1169: l(' END;');
1170: l('');
1190: l(' l_cmp_flag VARCHAR2(1);');
1191: l(' BEGIN');
1192:
1193:
1194: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
1195: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1196:
1197: l('');
1198: l(' -- Initialize return status and message stack');
1191: l(' BEGIN');
1192:
1193:
1194: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
1195: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1196:
1197: l('');
1198: l(' -- Initialize return status and message stack');
1199: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
1242: l(' p_rule_id,p_party_site_id,p_party_id,');
1243: l(' p_restrict_sql,p_match_type,x_search_ctx_id,x_num_matches);');
1244: END LOOP;
1245: l(' END IF;');
1246: d(fnd_log.level_procedure,'find_duplicate_party_sites(-)');
1247:
1248: gen_exception_block;
1249: l(' END;');
1250:
1269: l(' l_cmp_flag VARCHAR2(1);');
1270: l(' BEGIN');
1271:
1272:
1273: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
1274: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1275:
1276: l('');
1277: l(' -- Initialize return status and message stack');
1270: l(' BEGIN');
1271:
1272:
1273: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
1274: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1275:
1276: l('');
1277: l(' -- Initialize return status and message stack');
1278: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
1321: l(' p_rule_id,p_org_contact_id,p_party_id,');
1322: l(' p_restrict_sql,p_match_type,x_search_ctx_id,x_num_matches);');
1323: END LOOP;
1324: l(' END IF;');
1325: d(fnd_log.level_procedure,'find_duplicate_contacts(-)');
1326:
1327: gen_exception_block;
1328: l(' END;');
1329:
1348: l(' l_cmp_flag VARCHAR2(1);');
1349: l(' BEGIN');
1350:
1351:
1352: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
1353: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1354:
1355: l('');
1356: l(' -- Initialize return status and message stack');
1349: l(' BEGIN');
1350:
1351:
1352: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
1353: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1354:
1355: l('');
1356: l(' -- Initialize return status and message stack');
1357: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
1400: l(' p_rule_id,p_contact_point_id,p_party_id,');
1401: l(' p_restrict_sql,p_match_type,x_search_ctx_id,x_num_matches);');
1402: END LOOP;
1403: l(' END IF;');
1404: d(fnd_log.level_procedure,'find_duplicate_contact_points(-)');
1405:
1406: gen_exception_block;
1407: l(' END;');
1408: l('');
1466: l(' l_cmp_flag VARCHAR2(1);');
1467: l(' BEGIN');
1468:
1469:
1470: d(fnd_log.level_procedure,'find_parties_dynamic(+)');
1471: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1472:
1473: l('');
1474: l(' -- Initialize return status and message stack');
1467: l(' BEGIN');
1468:
1469:
1470: d(fnd_log.level_procedure,'find_parties_dynamic(+)');
1471: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1472:
1473: l('');
1474: l(' -- Initialize return status and message stack');
1475: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
1526: l(' p_attrib_val16,p_attrib_val17,p_attrib_val18,p_attrib_val19,p_attrib_val20,');
1527: l(' p_restrict_sql,p_match_type,p_search_merged,x_search_ctx_id,x_num_matches);');
1528: END LOOP;
1529: l(' END IF;');
1530: d(fnd_log.level_procedure,'find_parties_dynamic(-)');
1531:
1532: gen_exception_block;
1533: l(' END;');
1534: l('');
1593: l(' l_cmp_flag VARCHAR2(1);');
1594: l(' BEGIN');
1595:
1596:
1597: d(fnd_log.level_procedure,'find_parties_dynamic(+)');
1598: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1599:
1600: l('');
1601: l(' -- Initialize return status and message stack');
1594: l(' BEGIN');
1595:
1596:
1597: d(fnd_log.level_procedure,'find_parties_dynamic(+)');
1598: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1599:
1600: l('');
1601: l(' -- Initialize return status and message stack');
1602: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
1667: END IF;
1668:
1669: END LOOP;
1670: l(' END IF;');
1671: d(fnd_log.level_procedure,'call_api_dynamic(-)');
1672:
1673: gen_exception_block;
1674: l(' END; ');
1675:
1690: l(' l_num_matches NUMBER;');
1691: l(' BEGIN');
1692:
1693:
1694: d(fnd_log.level_procedure,'get_matching_party_sites-1(+)');
1695: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1696:
1697: l(' get_matching_party_sites(p_init_msg_list,p_rule_id,p_party_id,');
1698: l(' p_party_site_list,p_contact_point_list,');
1691: l(' BEGIN');
1692:
1693:
1694: d(fnd_log.level_procedure,'get_matching_party_sites-1(+)');
1695: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1696:
1697: l(' get_matching_party_sites(p_init_msg_list,p_rule_id,p_party_id,');
1698: l(' p_party_site_list,p_contact_point_list,');
1699: l(' NULL,NULL,x_search_ctx_id,');
1697: l(' get_matching_party_sites(p_init_msg_list,p_rule_id,p_party_id,');
1698: l(' p_party_site_list,p_contact_point_list,');
1699: l(' NULL,NULL,x_search_ctx_id,');
1700: l(' l_num_matches,x_return_status,x_msg_count,x_msg_data);');
1701: d(fnd_log.level_procedure,'get_matching_party_sites-1(-)');
1702:
1703: l(' END;');
1704:
1705: l('PROCEDURE get_matching_party_sites (');
1723: l(' l_cmp_flag VARCHAR2(1);');
1724: l(' BEGIN');
1725:
1726:
1727: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
1728: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1729:
1730:
1731: l('');
1724: l(' BEGIN');
1725:
1726:
1727: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
1728: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1729:
1730:
1731: l('');
1732: l(' -- Initialize return status and message stack');
1772: l(' p_rule_id, p_party_id,p_party_site_list, p_contact_point_list,');
1773: l(' p_restrict_sql, p_match_type,null,x_search_ctx_id,x_num_matches);');
1774: END LOOP;
1775: l(' END IF;');
1776: d(fnd_log.level_procedure,'get_matching_party_sites(-)');
1777:
1778: gen_exception_block;
1779: l(' END;');
1780: l('');
1793: l(' l_num_matches NUMBER;');
1794: l(' BEGIN');
1795:
1796:
1797: d(fnd_log.level_procedure,'get_matching_contacts-1(+)');
1798: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1799:
1800: l(' get_matching_contacts(p_init_msg_list,p_rule_id,p_party_id,');
1801: l(' p_contact_list,p_contact_point_list,');
1794: l(' BEGIN');
1795:
1796:
1797: d(fnd_log.level_procedure,'get_matching_contacts-1(+)');
1798: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1799:
1800: l(' get_matching_contacts(p_init_msg_list,p_rule_id,p_party_id,');
1801: l(' p_contact_list,p_contact_point_list,');
1802: l(' NULL,NULL,x_search_ctx_id,');
1800: l(' get_matching_contacts(p_init_msg_list,p_rule_id,p_party_id,');
1801: l(' p_contact_list,p_contact_point_list,');
1802: l(' NULL,NULL,x_search_ctx_id,');
1803: l(' l_num_matches,x_return_status,x_msg_count,x_msg_data);');
1804: d(fnd_log.level_procedure,'get_matching_contacts-1(-)');
1805:
1806: l(' END;');
1807:
1808: l('PROCEDURE get_matching_contacts (');
1826: l(' l_cmp_flag VARCHAR2(1);');
1827: l(' BEGIN');
1828:
1829:
1830: d(fnd_log.level_procedure,'get_matching_contacts(+)');
1831: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1832:
1833:
1834: l('');
1827: l(' BEGIN');
1828:
1829:
1830: d(fnd_log.level_procedure,'get_matching_contacts(+)');
1831: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1832:
1833:
1834: l('');
1835: l(' -- Initialize return status and message stack');
1876: l(' p_restrict_sql, p_match_type,null,x_search_ctx_id,x_num_matches);');
1877: END LOOP;
1878: l(' END IF;');
1879: gen_exception_block;
1880: d(fnd_log.level_procedure,'get_matching_contacts(-)');
1881:
1882: l(' END;');
1883: l('');
1884: -- Generate get_matching_contact_points code
1895: l(' l_num_matches NUMBER;');
1896: l(' BEGIN');
1897:
1898:
1899: d(fnd_log.level_procedure,'get_matching_contact_points-1(+)');
1900: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1901:
1902: l(' get_matching_contact_points(p_init_msg_list,p_rule_id,p_party_id,');
1903: l(' p_contact_point_list,');
1896: l(' BEGIN');
1897:
1898:
1899: d(fnd_log.level_procedure,'get_matching_contact_points-1(+)');
1900: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1901:
1902: l(' get_matching_contact_points(p_init_msg_list,p_rule_id,p_party_id,');
1903: l(' p_contact_point_list,');
1904: l(' NULL,NULL,x_search_ctx_id,');
1902: l(' get_matching_contact_points(p_init_msg_list,p_rule_id,p_party_id,');
1903: l(' p_contact_point_list,');
1904: l(' NULL,NULL,x_search_ctx_id,');
1905: l(' l_num_matches,x_return_status,x_msg_count,x_msg_data);');
1906: d(fnd_log.level_procedure,'get_matching_contact_points-1(-)');
1907:
1908: l(' END;');
1909: l('PROCEDURE get_matching_contact_points (');
1910: l(' p_init_msg_list IN VARCHAR2:= FND_API.G_FALSE,');
1926: l(' l_cmp_flag VARCHAR2(1);');
1927: l(' BEGIN');
1928:
1929:
1930: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
1931: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1932:
1933: l('');
1934: l(' -- Initialize return status and message stack');
1927: l(' BEGIN');
1928:
1929:
1930: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
1931: d(fnd_log.level_statement,'Rule ID','p_rule_id');
1932:
1933: l('');
1934: l(' -- Initialize return status and message stack');
1935: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
1975: l(' p_rule_id, p_party_id, p_contact_point_list,');
1976: l(' p_restrict_sql, p_match_type,null,x_search_ctx_id,x_num_matches);');
1977: END LOOP;
1978: l(' END IF;');
1979: d(fnd_log.level_procedure,'get_matching_contact_points(-)');
1980:
1981: gen_exception_block;
1982: l(' END;');
1983: l('');
1998: l(' l_search_ctx_id NUMBER;');
1999: l(' BEGIN');
2000:
2001:
2002: d(fnd_log.level_procedure,'get_party_score_details(+)');
2003: d(fnd_log.level_statement,'Rule ID','p_rule_id');
2004:
2005: l(' l_search_ctx_id:=p_search_ctx_id;');
2006: l(' get_score_details(p_init_msg_list,p_rule_id,p_party_id,');
1999: l(' BEGIN');
2000:
2001:
2002: d(fnd_log.level_procedure,'get_party_score_details(+)');
2003: d(fnd_log.level_statement,'Rule ID','p_rule_id');
2004:
2005: l(' l_search_ctx_id:=p_search_ctx_id;');
2006: l(' get_score_details(p_init_msg_list,p_rule_id,p_party_id,');
2007: l(' p_party_search_rec,p_party_site_list,p_contact_list,p_contact_point_list,');
2005: l(' l_search_ctx_id:=p_search_ctx_id;');
2006: l(' get_score_details(p_init_msg_list,p_rule_id,p_party_id,');
2007: l(' p_party_search_rec,p_party_site_list,p_contact_list,p_contact_point_list,');
2008: l(' l_search_ctx_id,x_return_status,x_msg_count,x_msg_data);');
2009: d(fnd_log.level_procedure,'get_party_score_details(-)');
2010:
2011: l(' END;');
2012:
2013: l('PROCEDURE get_score_details (');
2030: l(' l_cmp_flag VARCHAR2(1);');
2031: l(' BEGIN');
2032:
2033:
2034: d(fnd_log.level_procedure,'get_score_details(+)');
2035: d(fnd_log.level_statement,'Rule ID','p_rule_id');
2036:
2037:
2038: l('');
2031: l(' BEGIN');
2032:
2033:
2034: d(fnd_log.level_procedure,'get_score_details(+)');
2035: d(fnd_log.level_statement,'Rule ID','p_rule_id');
2036:
2037:
2038: l('');
2039: l(' -- Initialize return status and message stack');
2080: l(' p_party_id, p_party_search_rec,p_party_site_list,');
2081: l(' p_contact_list, p_contact_point_list,x_search_ctx_id);');
2082: END LOOP;
2083: l(' END IF;');
2084: d(fnd_log.level_procedure,'get_score_details(-)');
2085:
2086: gen_exception_block;
2087: l(' END;');
2088: l('PROCEDURE get_party_for_search (');
2104: l(' l_cmp_flag VARCHAR2(1);');
2105: l(' BEGIN');
2106:
2107:
2108: d(fnd_log.level_procedure,'get_party_for_search(+)');
2109: d(fnd_log.level_statement,'Rule ID','p_rule_id');
2110:
2111: l('');
2112: l(' -- Initialize return status and message stack');
2105: l(' BEGIN');
2106:
2107:
2108: d(fnd_log.level_procedure,'get_party_for_search(+)');
2109: d(fnd_log.level_statement,'Rule ID','p_rule_id');
2110:
2111: l('');
2112: l(' -- Initialize return status and message stack');
2113: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
2152: l(' p_party_id, x_party_search_rec,x_party_site_list,');
2153: l(' x_contact_list, x_contact_point_list);');
2154: END LOOP;
2155: l(' END IF;');
2156: d(fnd_log.level_procedure,'get_party_for_search(-)');
2157:
2158: gen_exception_block;
2159: l(' END;');
2160:
2179: l(' WHERE MATCH_RULE_ID = p_rule_id;');
2180: l(' l_cmp_flag VARCHAR2(1);');
2181: l(' BEGIN');
2182:
2183: d(fnd_log.level_procedure,'get_search_criteria(+)');
2184: d(fnd_log.level_statement,'Rule ID','p_rule_id');
2185:
2186: l('');
2187: l(' -- Initialize return status and message stack');
2180: l(' l_cmp_flag VARCHAR2(1);');
2181: l(' BEGIN');
2182:
2183: d(fnd_log.level_procedure,'get_search_criteria(+)');
2184: d(fnd_log.level_statement,'Rule ID','p_rule_id');
2185:
2186: l('');
2187: l(' -- Initialize return status and message stack');
2188: l(' x_return_status := FND_API.G_RET_STS_SUCCESS;');
2227: l(' p_party_id, p_party_site_ids, p_contact_ids, p_contact_pt_ids, x_party_search_rec,x_party_site_list,');
2228: l(' x_contact_list, x_contact_point_list);');
2229: END LOOP;
2230: l(' END IF;');
2231: d(fnd_log.level_procedure,'get_search_criteria(-)');
2232:
2233: gen_exception_block;
2234: l(' END;');
2235:
2660: l(' N NUMBER:=1;');
2661: l(' x_modify VARCHAR2(1);');
2662: end if;
2663: l(' BEGIN');
2664: d(fnd_log.level_procedure,'INIT_'||p_entity||'_QUERY ');
2665: l(' x_denorm_str := NULL;');
2666:
2667: -- Setup of contains str
2668: l_num_primary := 0;
3158: END IF;
3159: l(' total NUMBER := 0;');
3160: l(' BEGIN');
3161: ldbg_s('-----------------','calling the function get_party_score');
3162: d(fnd_log.level_procedure,'GET_PARTY_SCORE ');
3163: l(' IF g_score_until_thresh AND (total)>=g_thres_score THEN');
3164: ldbg_sv('get_party_score returned total = ', 'total');
3165: l(' RETURN total;');
3166: l(' END IF;');
5051: l(' push_eval;');
5052: l(' RETURN;');
5053: l(' END IF;');
5054: l(' END IF;');
5055: ds(fnd_log.level_statement);
5056: dc(fnd_log.level_statement,'In eval_party_level l_party_id = ','l_party_id');
5057: dc(fnd_log.level_statement,'In eval_party_level l_score = ','l_score');
5058: de;
5059: l(' END LOOP;');
5052: l(' RETURN;');
5053: l(' END IF;');
5054: l(' END IF;');
5055: ds(fnd_log.level_statement);
5056: dc(fnd_log.level_statement,'In eval_party_level l_party_id = ','l_party_id');
5057: dc(fnd_log.level_statement,'In eval_party_level l_score = ','l_score');
5058: de;
5059: l(' END LOOP;');
5060: ldbg_s('===========END of LOOP=====================');
5053: l(' END IF;');
5054: l(' END IF;');
5055: ds(fnd_log.level_statement);
5056: dc(fnd_log.level_statement,'In eval_party_level l_party_id = ','l_party_id');
5057: dc(fnd_log.level_statement,'In eval_party_level l_score = ','l_score');
5058: de;
5059: l(' END LOOP;');
5060: ldbg_s('===========END of LOOP=====================');
5061: l(' CLOSE l_party_cur;');
5152: l(' h_ps_score(detcnt) := 0; ');
5153: l(' END IF; ');
5154: l(' detcnt := detcnt +1;');
5155: l(' END IF;');
5156: ds(fnd_log.level_statement);
5157: dc(fnd_log.level_statement,'In eval_party_site_level l_party_site_id = ','l_party_site_id');
5158: dc(fnd_log.level_statement,'In eval_paty_site_level l_ps_party_id = ','l_ps_party_id');
5159: dc(fnd_log.level_statement,'In eval_party_site_level l_score = ','l_score');
5160: de;
5153: l(' END IF; ');
5154: l(' detcnt := detcnt +1;');
5155: l(' END IF;');
5156: ds(fnd_log.level_statement);
5157: dc(fnd_log.level_statement,'In eval_party_site_level l_party_site_id = ','l_party_site_id');
5158: dc(fnd_log.level_statement,'In eval_paty_site_level l_ps_party_id = ','l_ps_party_id');
5159: dc(fnd_log.level_statement,'In eval_party_site_level l_score = ','l_score');
5160: de;
5161: l(' END IF;');
5154: l(' detcnt := detcnt +1;');
5155: l(' END IF;');
5156: ds(fnd_log.level_statement);
5157: dc(fnd_log.level_statement,'In eval_party_site_level l_party_site_id = ','l_party_site_id');
5158: dc(fnd_log.level_statement,'In eval_paty_site_level l_ps_party_id = ','l_ps_party_id');
5159: dc(fnd_log.level_statement,'In eval_party_site_level l_score = ','l_score');
5160: de;
5161: l(' END IF;');
5162: l(' END LOOP;');
5155: l(' END IF;');
5156: ds(fnd_log.level_statement);
5157: dc(fnd_log.level_statement,'In eval_party_site_level l_party_site_id = ','l_party_site_id');
5158: dc(fnd_log.level_statement,'In eval_paty_site_level l_ps_party_id = ','l_ps_party_id');
5159: dc(fnd_log.level_statement,'In eval_party_site_level l_score = ','l_score');
5160: de;
5161: l(' END IF;');
5162: l(' END LOOP;');
5163: ldbg_s('===========END of LOOP=====================');
5246: l(' h_ct_score(detcnt) := 0; ');
5247: l(' END IF; ');
5248: l(' detcnt := detcnt +1;');
5249: l(' END IF;');
5250: ds(fnd_log.level_statement);
5251: dc(fnd_log.level_statement,'In eval_contact_level l_org_contact_id = ','l_org_contact_id');
5252: dc(fnd_log.level_statement,'In eval_contact_level l_ct_party_id = ','l_ct_party_id');
5253: dc(fnd_log.level_statement,'In eval_contact_level l_score = ','l_score');
5254: de;
5247: l(' END IF; ');
5248: l(' detcnt := detcnt +1;');
5249: l(' END IF;');
5250: ds(fnd_log.level_statement);
5251: dc(fnd_log.level_statement,'In eval_contact_level l_org_contact_id = ','l_org_contact_id');
5252: dc(fnd_log.level_statement,'In eval_contact_level l_ct_party_id = ','l_ct_party_id');
5253: dc(fnd_log.level_statement,'In eval_contact_level l_score = ','l_score');
5254: de;
5255: l(' END LOOP;');
5248: l(' detcnt := detcnt +1;');
5249: l(' END IF;');
5250: ds(fnd_log.level_statement);
5251: dc(fnd_log.level_statement,'In eval_contact_level l_org_contact_id = ','l_org_contact_id');
5252: dc(fnd_log.level_statement,'In eval_contact_level l_ct_party_id = ','l_ct_party_id');
5253: dc(fnd_log.level_statement,'In eval_contact_level l_score = ','l_score');
5254: de;
5255: l(' END LOOP;');
5256: ldbg_s('===========END of LOOP=====================');
5249: l(' END IF;');
5250: ds(fnd_log.level_statement);
5251: dc(fnd_log.level_statement,'In eval_contact_level l_org_contact_id = ','l_org_contact_id');
5252: dc(fnd_log.level_statement,'In eval_contact_level l_ct_party_id = ','l_ct_party_id');
5253: dc(fnd_log.level_statement,'In eval_contact_level l_score = ','l_score');
5254: de;
5255: l(' END LOOP;');
5256: ldbg_s('===========END of LOOP=====================');
5257: l(' CLOSE l_contact_cur;');
5436: l(' end if;');
5437: end if;
5438:
5439: l(' END IF;');
5440: ds(fnd_log.level_statement);
5441: dc(fnd_log.level_statement,'In eval_cpt_level l_contact_pt_id = ','l_contact_pt_id');
5442: dc(fnd_log.level_statement,'In eval_cpt_level l_cpt_party_id = ','l_cpt_party_id');
5443: dc(fnd_log.level_statement,'In eval_cpt_level l_score = ','l_score');
5444: de;
5437: end if;
5438:
5439: l(' END IF;');
5440: ds(fnd_log.level_statement);
5441: dc(fnd_log.level_statement,'In eval_cpt_level l_contact_pt_id = ','l_contact_pt_id');
5442: dc(fnd_log.level_statement,'In eval_cpt_level l_cpt_party_id = ','l_cpt_party_id');
5443: dc(fnd_log.level_statement,'In eval_cpt_level l_score = ','l_score');
5444: de;
5445: l(' END IF;');
5438:
5439: l(' END IF;');
5440: ds(fnd_log.level_statement);
5441: dc(fnd_log.level_statement,'In eval_cpt_level l_contact_pt_id = ','l_contact_pt_id');
5442: dc(fnd_log.level_statement,'In eval_cpt_level l_cpt_party_id = ','l_cpt_party_id');
5443: dc(fnd_log.level_statement,'In eval_cpt_level l_score = ','l_score');
5444: de;
5445: l(' END IF;');
5446: l(' END LOOP;');
5439: l(' END IF;');
5440: ds(fnd_log.level_statement);
5441: dc(fnd_log.level_statement,'In eval_cpt_level l_contact_pt_id = ','l_contact_pt_id');
5442: dc(fnd_log.level_statement,'In eval_cpt_level l_cpt_party_id = ','l_cpt_party_id');
5443: dc(fnd_log.level_statement,'In eval_cpt_level l_score = ','l_score');
5444: de;
5445: l(' END IF;');
5446: l(' END LOOP;');
5447: ldbg_s('===========END of LOOP=====================');
5493: l(' other_acq_criteria_exists := TRUE; ');
5494: l(' ELSE');
5495: l(' other_acq_criteria_exists := FALSE; ');
5496: l(' END IF; ');
5497: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
5498: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
5499: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
5500: --End of Bug No:5218095
5501: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
5494: l(' ELSE');
5495: l(' other_acq_criteria_exists := FALSE; ');
5496: l(' END IF; ');
5497: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
5498: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
5499: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
5500: --End of Bug No:5218095
5501: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
5502: --start of Bug No:5218095
5495: l(' other_acq_criteria_exists := FALSE; ');
5496: l(' END IF; ');
5497: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
5498: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
5499: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
5500: --End of Bug No:5218095
5501: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
5502: --start of Bug No:5218095
5503: l(' IF ( call_max_score(p_index) < l_threshold) THEN ');
5540: l('');
5541:
5542: ldbg_s('--------------------------------');
5543: ldbg_s('Entering Procedure find_parties');
5544: ds(fnd_log.level_statement);
5545: dc(fnd_log.level_statement,'Input Parameters are :');
5546: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5547: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5548: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5541:
5542: ldbg_s('--------------------------------');
5543: ldbg_s('Entering Procedure find_parties');
5544: ds(fnd_log.level_statement);
5545: dc(fnd_log.level_statement,'Input Parameters are :');
5546: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5547: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5548: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5549: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5542: ldbg_s('--------------------------------');
5543: ldbg_s('Entering Procedure find_parties');
5544: ds(fnd_log.level_statement);
5545: dc(fnd_log.level_statement,'Input Parameters are :');
5546: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5547: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5548: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5549: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5550: dc(fnd_log.level_statement,'p_dup_party_id = ','p_dup_party_id');
5543: ldbg_s('Entering Procedure find_parties');
5544: ds(fnd_log.level_statement);
5545: dc(fnd_log.level_statement,'Input Parameters are :');
5546: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5547: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5548: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5549: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5550: dc(fnd_log.level_statement,'p_dup_party_id = ','p_dup_party_id');
5551: de;
5544: ds(fnd_log.level_statement);
5545: dc(fnd_log.level_statement,'Input Parameters are :');
5546: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5547: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5548: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5549: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5550: dc(fnd_log.level_statement,'p_dup_party_id = ','p_dup_party_id');
5551: de;
5552:
5545: dc(fnd_log.level_statement,'Input Parameters are :');
5546: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5547: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5548: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5549: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5550: dc(fnd_log.level_statement,'p_dup_party_id = ','p_dup_party_id');
5551: de;
5552:
5553: l(' -- ************************************');
5546: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5547: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5548: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5549: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5550: dc(fnd_log.level_statement,'p_dup_party_id = ','p_dup_party_id');
5551: de;
5552:
5553: l(' -- ************************************');
5554: l(' -- STEP 1. Initialization and error checks');
5665: l(' defcpt := 1;');
5666: l(' END IF;');
5667: l('');
5668:
5669: ds(fnd_log.level_statement);
5670: ldbg_s('------------------------');
5671: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5672: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5673: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5667: l('');
5668:
5669: ds(fnd_log.level_statement);
5670: ldbg_s('------------------------');
5671: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5672: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5673: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5674: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5675: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5668:
5669: ds(fnd_log.level_statement);
5670: ldbg_s('------------------------');
5671: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5672: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5673: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5674: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5675: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5676: dc(fnd_log.level_statement,'In find_parties l_search_ctx_id = ','l_search_ctx_id');
5669: ds(fnd_log.level_statement);
5670: ldbg_s('------------------------');
5671: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5672: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5673: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5674: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5675: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5676: dc(fnd_log.level_statement,'In find_parties l_search_ctx_id = ','l_search_ctx_id');
5677: de;
5670: ldbg_s('------------------------');
5671: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5672: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5673: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5674: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5675: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5676: dc(fnd_log.level_statement,'In find_parties l_search_ctx_id = ','l_search_ctx_id');
5677: de;
5678:
5671: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5672: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5673: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5674: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5675: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5676: dc(fnd_log.level_statement,'In find_parties l_search_ctx_id = ','l_search_ctx_id');
5677: de;
5678:
5679: IF l_max_score=1 THEN
5672: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5673: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5674: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5675: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5676: dc(fnd_log.level_statement,'In find_parties l_search_ctx_id = ','l_search_ctx_id');
5677: de;
5678:
5679: IF l_max_score=1 THEN
5680: ldbg_s('In find_parties l_max_score = 1');
5695: l(' do_eval(I);');
5696: l(' END LOOP;');
5697:
5698: IF l_purpose IN ('S','W') THEN
5699: d(fnd_log.level_statement,'In find_parties. This is a Search Rule. Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
5700: ELSE
5701: d(fnd_log.level_statement,'In find_parties. This is a Duplicate Identification Rule. Evaluating Matches. Threshold : '||l_match_threshold);
5702: END IF;
5703:
5697:
5698: IF l_purpose IN ('S','W') THEN
5699: d(fnd_log.level_statement,'In find_parties. This is a Search Rule. Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
5700: ELSE
5701: d(fnd_log.level_statement,'In find_parties. This is a Duplicate Identification Rule. Evaluating Matches. Threshold : '||l_match_threshold);
5702: END IF;
5703:
5704: l(' x_num_matches := 0;');
5705: l(' l_num_eval := 0;');
5710: l(' END IF;');
5711:
5712: l(' WHILE l_party_id IS NOT NULL LOOP');
5713: l(' l_num_eval:= l_num_eval+1;');
5714: ds(fnd_log.level_statement);
5715: ldbg_s('----------------------');
5716: dc(fnd_log.level_statement,'In find_parties Match Party ID = ','H_SCORES(l_party_id).PARTY_ID');
5717: IF l_purpose = 'S' THEN
5718: dc(fnd_log.level_statement,'In find_parties Score = ','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
5712: l(' WHILE l_party_id IS NOT NULL LOOP');
5713: l(' l_num_eval:= l_num_eval+1;');
5714: ds(fnd_log.level_statement);
5715: ldbg_s('----------------------');
5716: dc(fnd_log.level_statement,'In find_parties Match Party ID = ','H_SCORES(l_party_id).PARTY_ID');
5717: IF l_purpose = 'S' THEN
5718: dc(fnd_log.level_statement,'In find_parties Score = ','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
5719: ELSE
5720: dc(fnd_log.level_statement,'In find_parties Score = ','H_SCORES(l_party_id).TOTAL_SCORE');
5714: ds(fnd_log.level_statement);
5715: ldbg_s('----------------------');
5716: dc(fnd_log.level_statement,'In find_parties Match Party ID = ','H_SCORES(l_party_id).PARTY_ID');
5717: IF l_purpose = 'S' THEN
5718: dc(fnd_log.level_statement,'In find_parties Score = ','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
5719: ELSE
5720: dc(fnd_log.level_statement,'In find_parties Score = ','H_SCORES(l_party_id).TOTAL_SCORE');
5721: END IF;
5722: de;
5716: dc(fnd_log.level_statement,'In find_parties Match Party ID = ','H_SCORES(l_party_id).PARTY_ID');
5717: IF l_purpose = 'S' THEN
5718: dc(fnd_log.level_statement,'In find_parties Score = ','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
5719: ELSE
5720: dc(fnd_log.level_statement,'In find_parties Score = ','H_SCORES(l_party_id).TOTAL_SCORE');
5721: END IF;
5722: de;
5723: IF l_purpose = ('S') THEN
5724: ldbg_s('In find_parties inserting Search Rule results into HZ_MATCHED_PARTIES_GT');
5787: ELSE ---Start of Code Change for Match Rule Set
5788: l(' BEGIN');
5789: l('');
5790:
5791: d(fnd_log.level_procedure,'find_parties(+)');
5792: ds(fnd_log.level_statement);
5793: dc(fnd_log.level_statement,'Input Parameters:');
5794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5788: l(' BEGIN');
5789: l('');
5790:
5791: d(fnd_log.level_procedure,'find_parties(+)');
5792: ds(fnd_log.level_statement);
5793: dc(fnd_log.level_statement,'Input Parameters:');
5794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5796: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5789: l('');
5790:
5791: d(fnd_log.level_procedure,'find_parties(+)');
5792: ds(fnd_log.level_statement);
5793: dc(fnd_log.level_statement,'Input Parameters:');
5794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5796: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5797: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5790:
5791: d(fnd_log.level_procedure,'find_parties(+)');
5792: ds(fnd_log.level_statement);
5793: dc(fnd_log.level_statement,'Input Parameters:');
5794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5796: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5797: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5798: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
5791: d(fnd_log.level_procedure,'find_parties(+)');
5792: ds(fnd_log.level_statement);
5793: dc(fnd_log.level_statement,'Input Parameters:');
5794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5796: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5797: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5798: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
5799: de;
5792: ds(fnd_log.level_statement);
5793: dc(fnd_log.level_statement,'Input Parameters:');
5794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5796: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5797: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5798: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
5799: de;
5800: pop_conditions(p_rule_id,'find_parties','p_rule_id,p_party_search_rec,p_party_site_list,
5793: dc(fnd_log.level_statement,'Input Parameters:');
5794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5796: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5797: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5798: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
5799: de;
5800: pop_conditions(p_rule_id,'find_parties','p_rule_id,p_party_search_rec,p_party_site_list,
5801: p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,p_dup_party_id,
5794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5796: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5797: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5798: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
5799: de;
5800: pop_conditions(p_rule_id,'find_parties','p_rule_id,p_party_search_rec,p_party_site_list,
5801: p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,p_dup_party_id,
5802: p_dup_set_id,p_dup_batch_id,p_ins_details,x_search_ctx_id,x_num_matches','PARTY');
5800: pop_conditions(p_rule_id,'find_parties','p_rule_id,p_party_search_rec,p_party_site_list,
5801: p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,p_dup_party_id,
5802: p_dup_set_id,p_dup_batch_id,p_ins_details,x_search_ctx_id,x_num_matches','PARTY');
5803:
5804: d(fnd_log.level_procedure,'find_parties(-)');
5805: l('EXCEPTION');
5806:
5807: END IF; ---End of Code Change for Match Rule Set
5808:
6078: l(' push_eval;');
6079: l(' RETURN;');
6080: l(' END IF;');
6081: l(' END IF;');
6082: ds(fnd_log.level_statement);
6083: dc(fnd_log.level_statement,'Party Level Matches');
6084: dc(fnd_log.level_statement,'l_party_id','l_party_id');
6085: dc(fnd_log.level_statement,'l_score','l_score');
6086: de;
6079: l(' RETURN;');
6080: l(' END IF;');
6081: l(' END IF;');
6082: ds(fnd_log.level_statement);
6083: dc(fnd_log.level_statement,'Party Level Matches');
6084: dc(fnd_log.level_statement,'l_party_id','l_party_id');
6085: dc(fnd_log.level_statement,'l_score','l_score');
6086: de;
6087: l(' END LOOP;');
6080: l(' END IF;');
6081: l(' END IF;');
6082: ds(fnd_log.level_statement);
6083: dc(fnd_log.level_statement,'Party Level Matches');
6084: dc(fnd_log.level_statement,'l_party_id','l_party_id');
6085: dc(fnd_log.level_statement,'l_score','l_score');
6086: de;
6087: l(' END LOOP;');
6088: l(' CLOSE l_party_cur;');
6081: l(' END IF;');
6082: ds(fnd_log.level_statement);
6083: dc(fnd_log.level_statement,'Party Level Matches');
6084: dc(fnd_log.level_statement,'l_party_id','l_party_id');
6085: dc(fnd_log.level_statement,'l_score','l_score');
6086: de;
6087: l(' END LOOP;');
6088: l(' CLOSE l_party_cur;');
6089: l(' ROLLBACK to eval_start;');
6207: l(' h_ps_score(detcnt) := 0; ');
6208: l(' END IF; ');
6209: l(' detcnt := detcnt +1;');
6210: l(' END IF;');
6211: ds(fnd_log.level_statement);
6212: dc(fnd_log.level_statement,'Party Site Level Matches');
6213: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
6214: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
6215: dc(fnd_log.level_statement,'l_score','l_score');
6208: l(' END IF; ');
6209: l(' detcnt := detcnt +1;');
6210: l(' END IF;');
6211: ds(fnd_log.level_statement);
6212: dc(fnd_log.level_statement,'Party Site Level Matches');
6213: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
6214: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
6215: dc(fnd_log.level_statement,'l_score','l_score');
6216: de;
6209: l(' detcnt := detcnt +1;');
6210: l(' END IF;');
6211: ds(fnd_log.level_statement);
6212: dc(fnd_log.level_statement,'Party Site Level Matches');
6213: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
6214: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
6215: dc(fnd_log.level_statement,'l_score','l_score');
6216: de;
6217: l(' END IF;');
6210: l(' END IF;');
6211: ds(fnd_log.level_statement);
6212: dc(fnd_log.level_statement,'Party Site Level Matches');
6213: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
6214: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
6215: dc(fnd_log.level_statement,'l_score','l_score');
6216: de;
6217: l(' END IF;');
6218: l(' END LOOP;');
6211: ds(fnd_log.level_statement);
6212: dc(fnd_log.level_statement,'Party Site Level Matches');
6213: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
6214: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
6215: dc(fnd_log.level_statement,'l_score','l_score');
6216: de;
6217: l(' END IF;');
6218: l(' END LOOP;');
6219: l(' CLOSE l_party_site_cur;');
6266: l(' h_ct_score(detcnt) := 0; ');
6267: l(' END IF; ');
6268: l(' detcnt := detcnt +1;');
6269: l(' END IF;');
6270: ds(fnd_log.level_statement);
6271: dc(fnd_log.level_statement,'Contact Level Matches');
6272: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
6273: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
6274: dc(fnd_log.level_statement,'l_score','l_score');
6267: l(' END IF; ');
6268: l(' detcnt := detcnt +1;');
6269: l(' END IF;');
6270: ds(fnd_log.level_statement);
6271: dc(fnd_log.level_statement,'Contact Level Matches');
6272: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
6273: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
6274: dc(fnd_log.level_statement,'l_score','l_score');
6275: de;
6268: l(' detcnt := detcnt +1;');
6269: l(' END IF;');
6270: ds(fnd_log.level_statement);
6271: dc(fnd_log.level_statement,'Contact Level Matches');
6272: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
6273: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
6274: dc(fnd_log.level_statement,'l_score','l_score');
6275: de;
6276: l(' END LOOP;');
6269: l(' END IF;');
6270: ds(fnd_log.level_statement);
6271: dc(fnd_log.level_statement,'Contact Level Matches');
6272: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
6273: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
6274: dc(fnd_log.level_statement,'l_score','l_score');
6275: de;
6276: l(' END LOOP;');
6277: l(' CLOSE l_contact_cur;');
6270: ds(fnd_log.level_statement);
6271: dc(fnd_log.level_statement,'Contact Level Matches');
6272: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
6273: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
6274: dc(fnd_log.level_statement,'l_score','l_score');
6275: de;
6276: l(' END LOOP;');
6277: l(' CLOSE l_contact_cur;');
6278: l(' ROLLBACK to eval_start;');
6461: l(' end if;');
6462: end if;
6463:
6464: l(' END IF;');
6465: ds(fnd_log.level_statement);
6466: dc(fnd_log.level_statement,'Contact pt Level Matches');
6467: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
6468: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
6469: dc(fnd_log.level_statement,'l_score','l_score');
6462: end if;
6463:
6464: l(' END IF;');
6465: ds(fnd_log.level_statement);
6466: dc(fnd_log.level_statement,'Contact pt Level Matches');
6467: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
6468: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
6469: dc(fnd_log.level_statement,'l_score','l_score');
6470: de;
6463:
6464: l(' END IF;');
6465: ds(fnd_log.level_statement);
6466: dc(fnd_log.level_statement,'Contact pt Level Matches');
6467: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
6468: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
6469: dc(fnd_log.level_statement,'l_score','l_score');
6470: de;
6471: l(' END IF;');
6464: l(' END IF;');
6465: ds(fnd_log.level_statement);
6466: dc(fnd_log.level_statement,'Contact pt Level Matches');
6467: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
6468: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
6469: dc(fnd_log.level_statement,'l_score','l_score');
6470: de;
6471: l(' END IF;');
6472: l(' END LOOP;');
6465: ds(fnd_log.level_statement);
6466: dc(fnd_log.level_statement,'Contact pt Level Matches');
6467: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
6468: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
6469: dc(fnd_log.level_statement,'l_score','l_score');
6470: de;
6471: l(' END IF;');
6472: l(' END LOOP;');
6473: l(' CLOSE l_contact_pt_cur;');
6516: l(' other_acq_criteria_exists := TRUE; ');
6517: l(' ELSE');
6518: l(' other_acq_criteria_exists := FALSE; ');
6519: l(' END IF; ');
6520: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
6521: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
6522: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
6523: --End of Bug No:5218095
6524: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
6517: l(' ELSE');
6518: l(' other_acq_criteria_exists := FALSE; ');
6519: l(' END IF; ');
6520: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
6521: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
6522: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
6523: --End of Bug No:5218095
6524: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
6525: --start of Bug No:5218095
6518: l(' other_acq_criteria_exists := FALSE; ');
6519: l(' END IF; ');
6520: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
6521: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
6522: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
6523: --End of Bug No:5218095
6524: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
6525: --start of Bug No:5218095
6526: l(' IF ( call_max_score(p_index) < l_threshold) THEN ');
6560: l(' BEGIN');
6561: l('');
6562:
6563:
6564: d(fnd_log.level_procedure,'find_persons(+)');
6565: ds(fnd_log.level_statement);
6566: dc(fnd_log.level_statement,'Input Parameters:');
6567: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6568: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6561: l('');
6562:
6563:
6564: d(fnd_log.level_procedure,'find_persons(+)');
6565: ds(fnd_log.level_statement);
6566: dc(fnd_log.level_statement,'Input Parameters:');
6567: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6568: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6569: de;
6562:
6563:
6564: d(fnd_log.level_procedure,'find_persons(+)');
6565: ds(fnd_log.level_statement);
6566: dc(fnd_log.level_statement,'Input Parameters:');
6567: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6568: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6569: de;
6570:
6563:
6564: d(fnd_log.level_procedure,'find_persons(+)');
6565: ds(fnd_log.level_statement);
6566: dc(fnd_log.level_statement,'Input Parameters:');
6567: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6568: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6569: de;
6570:
6571: l(' -- ************************************');
6564: d(fnd_log.level_procedure,'find_persons(+)');
6565: ds(fnd_log.level_statement);
6566: dc(fnd_log.level_statement,'Input Parameters:');
6567: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6568: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6569: de;
6570:
6571: l(' -- ************************************');
6572: l(' -- STEP 1. Initialization and error checks');
6616: l(' defcpt := 1;');
6617: l(' END IF;');
6618: l('');
6619:
6620: ds(fnd_log.level_statement);
6621: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6622: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6623: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6624: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6617: l(' END IF;');
6618: l('');
6619:
6620: ds(fnd_log.level_statement);
6621: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6622: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6623: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6624: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6625: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6618: l('');
6619:
6620: ds(fnd_log.level_statement);
6621: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6622: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6623: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6624: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6625: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6626: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
6619:
6620: ds(fnd_log.level_statement);
6621: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6622: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6623: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6624: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6625: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6626: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
6627: de;
6620: ds(fnd_log.level_statement);
6621: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6622: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6623: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6624: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6625: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6626: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
6627: de;
6628:
6621: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6622: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6623: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6624: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6625: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6626: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
6627: de;
6628:
6629: /**** Call all 4 evaluation procedures ***********/
6622: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6623: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6624: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6625: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6626: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
6627: de;
6628:
6629: /**** Call all 4 evaluation procedures ***********/
6630: l(' FOR I in 1..5 LOOP');
6632: l(' END LOOP;');
6633: l(' IF l_contact_contains_str IS NOT NULL THEN');
6634: l(' eval_contact_level(l_contact_contains_str,p_ins_details,l_contact_max_score);');
6635: l(' END IF;');
6636: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
6637:
6638: l(' x_num_matches := 0;');
6639: l(' l_num_eval := 0;');
6640: l(' IF l_match_str = '' OR '' THEN');
6645:
6646:
6647: l(' WHILE l_party_id IS NOT NULL LOOP');
6648: l(' l_num_eval:= l_num_eval+1;');
6649: ds(fnd_log.level_statement);
6650: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
6651: IF l_purpose = 'S' THEN
6652: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
6653: ELSE
6646:
6647: l(' WHILE l_party_id IS NOT NULL LOOP');
6648: l(' l_num_eval:= l_num_eval+1;');
6649: ds(fnd_log.level_statement);
6650: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
6651: IF l_purpose = 'S' THEN
6652: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
6653: ELSE
6654: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
6648: l(' l_num_eval:= l_num_eval+1;');
6649: ds(fnd_log.level_statement);
6650: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
6651: IF l_purpose = 'S' THEN
6652: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
6653: ELSE
6654: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
6655: END IF;
6656: de;
6650: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
6651: IF l_purpose = 'S' THEN
6652: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
6653: ELSE
6654: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
6655: END IF;
6656: de;
6657: IF l_purpose = ('S') THEN
6658: l(' IF (H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
6709: l(' END IF;');
6710: l(' END LOOP;');
6711:
6712: l(' HZ_DQM_SEARCH_UTIL.set_num_eval(l_num_eval);');
6713: d(fnd_log.level_procedure,'find_persons(-)');
6714:
6715:
6716: l('EXCEPTION');
6717: l(' WHEN L_RETURN_IMM_EXC THEN');
6729: l('END find_persons;');
6730: l('');
6731: ELSE ---Start of Code Change for Match Rule Set
6732: l('BEGIN');
6733: d(fnd_log.level_procedure,'find_persons(+)');
6734: ds(fnd_log.level_statement);
6735: dc(fnd_log.level_statement,'Input Parameters:');
6736: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6737: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6730: l('');
6731: ELSE ---Start of Code Change for Match Rule Set
6732: l('BEGIN');
6733: d(fnd_log.level_procedure,'find_persons(+)');
6734: ds(fnd_log.level_statement);
6735: dc(fnd_log.level_statement,'Input Parameters:');
6736: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6737: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6738: de;
6731: ELSE ---Start of Code Change for Match Rule Set
6732: l('BEGIN');
6733: d(fnd_log.level_procedure,'find_persons(+)');
6734: ds(fnd_log.level_statement);
6735: dc(fnd_log.level_statement,'Input Parameters:');
6736: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6737: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6738: de;
6739: pop_conditions(p_rule_id,'find_persons','p_rule_id,p_party_search_rec,p_party_site_list,p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,p_ins_details,x_search_ctx_id,x_num_matches','PARTY');
6732: l('BEGIN');
6733: d(fnd_log.level_procedure,'find_persons(+)');
6734: ds(fnd_log.level_statement);
6735: dc(fnd_log.level_statement,'Input Parameters:');
6736: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6737: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6738: de;
6739: pop_conditions(p_rule_id,'find_persons','p_rule_id,p_party_search_rec,p_party_site_list,p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,p_ins_details,x_search_ctx_id,x_num_matches','PARTY');
6740: d(fnd_log.level_procedure,'find_persons(-)');
6733: d(fnd_log.level_procedure,'find_persons(+)');
6734: ds(fnd_log.level_statement);
6735: dc(fnd_log.level_statement,'Input Parameters:');
6736: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6737: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6738: de;
6739: pop_conditions(p_rule_id,'find_persons','p_rule_id,p_party_search_rec,p_party_site_list,p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,p_ins_details,x_search_ctx_id,x_num_matches','PARTY');
6740: d(fnd_log.level_procedure,'find_persons(-)');
6741: l('EXCEPTION');
6736: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6737: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6738: de;
6739: pop_conditions(p_rule_id,'find_persons','p_rule_id,p_party_search_rec,p_party_site_list,p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,p_ins_details,x_search_ctx_id,x_num_matches','PARTY');
6740: d(fnd_log.level_procedure,'find_persons(-)');
6741: l('EXCEPTION');
6742: l(' WHEN FND_API.G_EXC_ERROR THEN');
6743: l(' RAISE FND_API.G_EXC_ERROR;');
6744: l(' WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN');
6787: l('');
6788: l(' BEGIN');
6789:
6790:
6791: d(fnd_log.level_procedure,'find_party_details(+)');
6792: ds(fnd_log.level_statement);
6793: dc(fnd_log.level_statement,'Input Parameters:');
6794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6788: l(' BEGIN');
6789:
6790:
6791: d(fnd_log.level_procedure,'find_party_details(+)');
6792: ds(fnd_log.level_statement);
6793: dc(fnd_log.level_statement,'Input Parameters:');
6794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6796: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6789:
6790:
6791: d(fnd_log.level_procedure,'find_party_details(+)');
6792: ds(fnd_log.level_statement);
6793: dc(fnd_log.level_statement,'Input Parameters:');
6794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6796: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6797: de;
6790:
6791: d(fnd_log.level_procedure,'find_party_details(+)');
6792: ds(fnd_log.level_statement);
6793: dc(fnd_log.level_statement,'Input Parameters:');
6794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6796: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6797: de;
6798:
6791: d(fnd_log.level_procedure,'find_party_details(+)');
6792: ds(fnd_log.level_statement);
6793: dc(fnd_log.level_statement,'Input Parameters:');
6794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6796: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6797: de;
6798:
6799: l(' find_parties(p_rule_id,p_party_search_rec,p_party_site_list, p_contact_list, p_contact_point_list,');
6792: ds(fnd_log.level_statement);
6793: dc(fnd_log.level_statement,'Input Parameters:');
6794: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6795: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6796: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6797: de;
6798:
6799: l(' find_parties(p_rule_id,p_party_search_rec,p_party_site_list, p_contact_list, p_contact_point_list,');
6800: l(' p_restrict_sql,p_match_type,p_search_merged,null,null, null,''Y'',');
6808: l(' DELETE FROM HZ_MATCHED_CPTS_GT cpt WHERE SEARCH_CONTEXT_ID = x_search_ctx_id ');
6809: l(' AND NOT EXISTS ');
6810: l(' (SELECT 1 FROM HZ_MATCHED_PARTIES_GT p WHERE SEARCH_CONTEXT_ID = x_search_ctx_id AND p.PARTY_ID = cpt.PARTY_ID);');
6811:
6812: d(fnd_log.level_procedure,'find_party_details(-)');
6813:
6814:
6815: l('EXCEPTION');
6816: l(' WHEN FND_API.G_EXC_ERROR THEN');
6850: l(' l_use_contact_cpt_flag VARCHAR2(1) := ''Y'';');
6851: l('');
6852: l('BEGIN');
6853: l('');
6854: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
6855: ds(fnd_log.level_statement);
6856: dc(fnd_log.level_statement,'Input Parameters:');
6857: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6858: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6851: l('');
6852: l('BEGIN');
6853: l('');
6854: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
6855: ds(fnd_log.level_statement);
6856: dc(fnd_log.level_statement,'Input Parameters:');
6857: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6858: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6859: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6852: l('BEGIN');
6853: l('');
6854: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
6855: ds(fnd_log.level_statement);
6856: dc(fnd_log.level_statement,'Input Parameters:');
6857: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6858: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6859: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6860: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6853: l('');
6854: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
6855: ds(fnd_log.level_statement);
6856: dc(fnd_log.level_statement,'Input Parameters:');
6857: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6858: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6859: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6860: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6861: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6854: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
6855: ds(fnd_log.level_statement);
6856: dc(fnd_log.level_statement,'Input Parameters:');
6857: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6858: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6859: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6860: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6861: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6862: de;
6855: ds(fnd_log.level_statement);
6856: dc(fnd_log.level_statement,'Input Parameters:');
6857: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6858: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6859: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6860: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6861: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6862: de;
6863: l('');
6856: dc(fnd_log.level_statement,'Input Parameters:');
6857: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6858: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6859: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6860: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6861: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6862: de;
6863: l('');
6864: l(' --Fix for bug 4417124 ');
6857: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6858: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6859: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6860: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6861: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6862: de;
6863: l('');
6864: l(' --Fix for bug 4417124 ');
6865: l('');
6926: l(' hz_utility_pub.user_id,p_dup_batch_id);'); --Bug No: 4244529
6927: l(' ELSE');
6928: l(' x_dup_set_id := NULL;');
6929: l(' END IF;');
6930: d(fnd_log.level_procedure,'find_duplicate_parties(-)');
6931:
6932:
6933: l('EXCEPTION');
6934: l(' WHEN FND_API.G_EXC_ERROR THEN');
6975:
6976: l(' BEGIN ');
6977:
6978:
6979: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
6980: ds(fnd_log.level_statement);
6981: dc(fnd_log.level_statement,'Input Parameters:');
6982: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6983: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6976: l(' BEGIN ');
6977:
6978:
6979: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
6980: ds(fnd_log.level_statement);
6981: dc(fnd_log.level_statement,'Input Parameters:');
6982: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6983: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6984: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6977:
6978:
6979: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
6980: ds(fnd_log.level_statement);
6981: dc(fnd_log.level_statement,'Input Parameters:');
6982: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6983: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6984: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6985: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6978:
6979: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
6980: ds(fnd_log.level_statement);
6981: dc(fnd_log.level_statement,'Input Parameters:');
6982: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6983: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6984: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6985: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6986: de;
6979: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
6980: ds(fnd_log.level_statement);
6981: dc(fnd_log.level_statement,'Input Parameters:');
6982: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6983: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6984: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6985: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6986: de;
6987:
6980: ds(fnd_log.level_statement);
6981: dc(fnd_log.level_statement,'Input Parameters:');
6982: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6983: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6984: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6985: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6986: de;
6987:
6988: l(' p_party_site_list(1) := p_party_site_id; ');
6981: dc(fnd_log.level_statement,'Input Parameters:');
6982: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6983: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6984: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6985: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6986: de;
6987:
6988: l(' p_party_site_list(1) := p_party_site_id; ');
6989: l(' OPEN get_cpts_for_party_sites;');
7019: l(' p_match_type, ');
7020: l(' p_party_site_id, ');
7021: l(' x_search_ctx_id,');
7022: l(' x_num_matches);');
7023: d(fnd_log.level_procedure,'find_duplicate_party_sites(-)');
7024:
7025:
7026: l('EXCEPTION');
7027: l(' WHEN FND_API.G_EXC_ERROR THEN');
7069:
7070: l('BEGIN ');
7071:
7072:
7073: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
7074: ds(fnd_log.level_statement);
7075: dc(fnd_log.level_statement,'Input Parameters:');
7076: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7077: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7070: l('BEGIN ');
7071:
7072:
7073: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
7074: ds(fnd_log.level_statement);
7075: dc(fnd_log.level_statement,'Input Parameters:');
7076: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7077: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7078: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7071:
7072:
7073: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
7074: ds(fnd_log.level_statement);
7075: dc(fnd_log.level_statement,'Input Parameters:');
7076: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7077: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7078: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7079: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7072:
7073: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
7074: ds(fnd_log.level_statement);
7075: dc(fnd_log.level_statement,'Input Parameters:');
7076: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7077: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7078: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7079: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7080: de;
7073: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
7074: ds(fnd_log.level_statement);
7075: dc(fnd_log.level_statement,'Input Parameters:');
7076: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7077: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7078: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7079: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7080: de;
7081:
7074: ds(fnd_log.level_statement);
7075: dc(fnd_log.level_statement,'Input Parameters:');
7076: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7077: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7078: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7079: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7080: de;
7081:
7082:
7075: dc(fnd_log.level_statement,'Input Parameters:');
7076: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7077: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7078: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7079: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7080: de;
7081:
7082:
7083: l(' p_contact_ids(1) := p_org_contact_id; ');
7115: l(' p_org_contact_id, ');
7116: l(' x_search_ctx_id, ');
7117: l(' x_num_matches);');
7118: l(' ');
7119: d(fnd_log.level_procedure,'find_duplicate_contacts(-)');
7120:
7121:
7122: l('EXCEPTION');
7123: l(' WHEN FND_API.G_EXC_ERROR THEN');
7154: l('');
7155: l('BEGIN');
7156:
7157:
7158: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
7159: ds(fnd_log.level_statement);
7160: dc(fnd_log.level_statement,'Input Parameters:');
7161: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7162: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7155: l('BEGIN');
7156:
7157:
7158: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
7159: ds(fnd_log.level_statement);
7160: dc(fnd_log.level_statement,'Input Parameters:');
7161: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7162: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7163: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7156:
7157:
7158: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
7159: ds(fnd_log.level_statement);
7160: dc(fnd_log.level_statement,'Input Parameters:');
7161: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7162: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7163: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7164: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7157:
7158: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
7159: ds(fnd_log.level_statement);
7160: dc(fnd_log.level_statement,'Input Parameters:');
7161: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7162: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7163: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7164: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7165: de;
7158: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
7159: ds(fnd_log.level_statement);
7160: dc(fnd_log.level_statement,'Input Parameters:');
7161: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7162: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7163: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7164: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7165: de;
7166:
7159: ds(fnd_log.level_statement);
7160: dc(fnd_log.level_statement,'Input Parameters:');
7161: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7162: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7163: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7164: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7165: de;
7166:
7167: l(' contact_point_ids(1) := p_contact_point_id; ');
7160: dc(fnd_log.level_statement,'Input Parameters:');
7161: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7162: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7163: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7164: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7165: de;
7166:
7167: l(' contact_point_ids(1) := p_contact_point_id; ');
7168: l(' get_search_criteria ( ');
7191: l(' p_match_type, ');
7192: l(' p_contact_point_id, ');
7193: l(' x_search_ctx_id, ');
7194: l(' x_num_matches ); ');
7195: d(fnd_log.level_procedure,'find_duplicate_contact_points(-)');
7196:
7197:
7198: l('EXCEPTION');
7199: l(' WHEN FND_API.G_EXC_ERROR THEN');
7333: l(' FIRST BOOLEAN := TRUE; ');
7334: l('');
7335: l('BEGIN');
7336:
7337: d(fnd_log.level_procedure,'call_api_dynamic(+)');
7338: l('');
7339: FOR I in 1..20 LOOP
7340: l(' IF p_attrib_id'||I||' IS NOT NULL THEN');
7341: l(' AttrVals(p_attrib_id'||I||'):=p_attrib_val'||I||';');
7359: AND s.attribute_id = a.attribute_id) LOOP
7360: l(' IF AttrVals.EXISTS('||ATTRS.attribute_id||') THEN');
7361: IF ATTRS.entity_name='PARTY' THEN
7362: l(' l_party_rec.'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7363: d(fnd_log.level_statement,'l_party_rec.'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7364: ELSIF ATTRS.entity_name='PARTY_SITES' THEN
7365: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7366: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7367: ELSIF ATTRS.entity_name='CONTACTS' THEN
7362: l(' l_party_rec.'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7363: d(fnd_log.level_statement,'l_party_rec.'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7364: ELSIF ATTRS.entity_name='PARTY_SITES' THEN
7365: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7366: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7367: ELSIF ATTRS.entity_name='CONTACTS' THEN
7368: l(' l_contact_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7369: d(fnd_log.level_statement,'l_contact_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7370: ELSIF ATTRS.entity_name='CONTACT_POINTS' THEN
7365: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7366: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7367: ELSIF ATTRS.entity_name='CONTACTS' THEN
7368: l(' l_contact_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7369: d(fnd_log.level_statement,'l_contact_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7370: ELSIF ATTRS.entity_name='CONTACT_POINTS' THEN
7371: BEGIN
7372: SELECT tag INTO l_cpt_type FROM fnd_lookup_values
7373: WHERE lookup_type = 'HZ_DQM_CPT_ATTR_TYPE'
7383: l(' FOR I in 1..l_cpt_list.COUNT LOOP');
7384: l(' IF l_cpt_list(I).CONTACT_POINT_TYPE=l_cpt_type THEN');
7385: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7386: l(' FIRST := TRUE;');
7387: ds(fnd_log.level_statement);
7388: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
7389: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7390: de;
7391: l(' END IF;');
7384: l(' IF l_cpt_list(I).CONTACT_POINT_TYPE=l_cpt_type THEN');
7385: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7386: l(' FIRST := TRUE;');
7387: ds(fnd_log.level_statement);
7388: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
7389: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7390: de;
7391: l(' END IF;');
7392: l(' END LOOP;');
7385: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7386: l(' FIRST := TRUE;');
7387: ds(fnd_log.level_statement);
7388: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
7389: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7390: de;
7391: l(' END IF;');
7392: l(' END LOOP;');
7393: l(' IF not FIRST THEN');
7393: l(' IF not FIRST THEN');
7394: l(' l_idx := l_cpt_list.COUNT+1;');
7395: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
7396: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7397: ds(fnd_log.level_statement);
7398: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
7399: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7400: de;
7401: l(' END IF;');
7394: l(' l_idx := l_cpt_list.COUNT+1;');
7395: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
7396: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7397: ds(fnd_log.level_statement);
7398: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
7399: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7400: de;
7401: l(' END IF;');
7402: END IF;
7395: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
7396: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7397: ds(fnd_log.level_statement);
7398: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
7399: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7400: de;
7401: l(' END IF;');
7402: END IF;
7403: l(' END IF;');
7433: l(' get_matching_contact_points(p_rule_id,p_party_id, l_cpt_list,');
7434: l(' p_restrict_sql,p_match_type,NULL,');
7435: l(' x_search_ctx_id,x_num_matches);');
7436: l(' END IF;');
7437: d(fnd_log.level_procedure,'call_api_dynamic(-)');
7438:
7439:
7440: l('EXCEPTION');
7441: l(' WHEN FND_API.G_EXC_ERROR THEN');
7533: l(' ');
7534: l(' BEGIN');
7535:
7536:
7537: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7538: ds(fnd_log.level_statement);
7539: dc(fnd_log.level_statement,'Input Parameters:');
7540: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7541: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7534: l(' BEGIN');
7535:
7536:
7537: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7538: ds(fnd_log.level_statement);
7539: dc(fnd_log.level_statement,'Input Parameters:');
7540: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7541: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7542: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7535:
7536:
7537: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7538: ds(fnd_log.level_statement);
7539: dc(fnd_log.level_statement,'Input Parameters:');
7540: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7541: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7542: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7543: de;
7536:
7537: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7538: ds(fnd_log.level_statement);
7539: dc(fnd_log.level_statement,'Input Parameters:');
7540: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7541: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7542: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7543: de;
7544: l('');
7537: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7538: ds(fnd_log.level_statement);
7539: dc(fnd_log.level_statement,'Input Parameters:');
7540: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7541: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7542: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7543: de;
7544: l('');
7545: l(' -- ************************************');
7538: ds(fnd_log.level_statement);
7539: dc(fnd_log.level_statement,'Input Parameters:');
7540: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7541: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7542: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7543: de;
7544: l('');
7545: l(' -- ************************************');
7546: l(' -- STEP 1. Initialization and error checks');
7567: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
7568: l(' x_search_ctx_id := l_search_ctx_id;');
7569: l('');
7570:
7571: ds(fnd_log.level_statement);
7572: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7573: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
7574: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7575: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7568: l(' x_search_ctx_id := l_search_ctx_id;');
7569: l('');
7570:
7571: ds(fnd_log.level_statement);
7572: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7573: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
7574: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7575: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7576: de;
7569: l('');
7570:
7571: ds(fnd_log.level_statement);
7572: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7573: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
7574: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7575: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7576: de;
7577:
7570:
7571: ds(fnd_log.level_statement);
7572: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7573: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
7574: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7575: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7576: de;
7577:
7578: l(' IF l_party_site_contains_str IS NULL THEN');
7571: ds(fnd_log.level_statement);
7572: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7573: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
7574: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7575: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7576: de;
7577:
7578: l(' IF l_party_site_contains_str IS NULL THEN');
7579: l(' defps := 1;');
7595: l(' l_match_ps_list(l_cnt):= l_party_site_id ;');
7596: l(' l_cnt:=l_cnt+1;');
7597: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
7598: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,l_score,defct,defcpt, l_ps_party_id, l_party_site_id, null,null);');
7599: ds(fnd_log.level_statement);
7600: dc(fnd_log.level_statement,'Party Site Level Matches');
7601: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
7602: dc(fnd_log.level_statement,'l_score','l_score');
7603: de;
7596: l(' l_cnt:=l_cnt+1;');
7597: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
7598: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,l_score,defct,defcpt, l_ps_party_id, l_party_site_id, null,null);');
7599: ds(fnd_log.level_statement);
7600: dc(fnd_log.level_statement,'Party Site Level Matches');
7601: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
7602: dc(fnd_log.level_statement,'l_score','l_score');
7603: de;
7604:
7597: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
7598: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,l_score,defct,defcpt, l_ps_party_id, l_party_site_id, null,null);');
7599: ds(fnd_log.level_statement);
7600: dc(fnd_log.level_statement,'Party Site Level Matches');
7601: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
7602: dc(fnd_log.level_statement,'l_score','l_score');
7603: de;
7604:
7605: l(' END IF; ');
7598: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,l_score,defct,defcpt, l_ps_party_id, l_party_site_id, null,null);');
7599: ds(fnd_log.level_statement);
7600: dc(fnd_log.level_statement,'Party Site Level Matches');
7601: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
7602: dc(fnd_log.level_statement,'l_score','l_score');
7603: de;
7604:
7605: l(' END IF; ');
7606: l(' END LOOP;');
7650: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,defps,defct,l_score,l_cpt_party_id,l_cpt_ps_id,l_cpt_contact_id,l_contact_pt_id);');
7651: l(' END IF;');
7652: l(' END IF;');
7653: l(' END IF; ');
7654: ds(fnd_log.level_statement);
7655: dc(fnd_log.level_statement,'Contact_point Level Matches');
7656: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
7657: dc(fnd_log.level_statement,'l_score','l_score');
7658: de;
7651: l(' END IF;');
7652: l(' END IF;');
7653: l(' END IF; ');
7654: ds(fnd_log.level_statement);
7655: dc(fnd_log.level_statement,'Contact_point Level Matches');
7656: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
7657: dc(fnd_log.level_statement,'l_score','l_score');
7658: de;
7659: l(' END LOOP;');
7652: l(' END IF;');
7653: l(' END IF; ');
7654: ds(fnd_log.level_statement);
7655: dc(fnd_log.level_statement,'Contact_point Level Matches');
7656: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
7657: dc(fnd_log.level_statement,'l_score','l_score');
7658: de;
7659: l(' END LOOP;');
7660: l(' CLOSE l_contact_pt_cur;');
7653: l(' END IF; ');
7654: ds(fnd_log.level_statement);
7655: dc(fnd_log.level_statement,'Contact_point Level Matches');
7656: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
7657: dc(fnd_log.level_statement,'l_score','l_score');
7658: de;
7659: l(' END LOOP;');
7660: l(' CLOSE l_contact_pt_cur;');
7661: l(' ROLLBACK TO eval_start;');
7661: l(' ROLLBACK TO eval_start;');
7662: l(' END IF;');
7663: l(' x_num_matches := 0;');
7664: l(' l_party_site_id := H_SCORES.FIRST;');
7665: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7666: l(' WHILE l_party_site_id IS NOT NULL LOOP');
7667: ds(fnd_log.level_statement);
7668: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
7669: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
7663: l(' x_num_matches := 0;');
7664: l(' l_party_site_id := H_SCORES.FIRST;');
7665: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7666: l(' WHILE l_party_site_id IS NOT NULL LOOP');
7667: ds(fnd_log.level_statement);
7668: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
7669: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
7670: de;
7671: l(' IF l_match_str = '' OR '' THEN');
7664: l(' l_party_site_id := H_SCORES.FIRST;');
7665: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7666: l(' WHILE l_party_site_id IS NOT NULL LOOP');
7667: ds(fnd_log.level_statement);
7668: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
7669: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
7670: de;
7671: l(' IF l_match_str = '' OR '' THEN');
7672: --Start of Bug No: 4162385
7665: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7666: l(' WHILE l_party_site_id IS NOT NULL LOOP');
7667: ds(fnd_log.level_statement);
7668: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
7669: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
7670: de;
7671: l(' IF l_match_str = '' OR '' THEN');
7672: --Start of Bug No: 4162385
7673: IF l_purpose = 'D' THEN
7696: l(' END LOOP;');
7697: ELSE ---Start of Code Change for Match Rule Set
7698: l(' ');
7699: l(' BEGIN');
7700: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7701: ds(fnd_log.level_statement);
7702: dc(fnd_log.level_statement,'Input Parameters:');
7703: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7704: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7697: ELSE ---Start of Code Change for Match Rule Set
7698: l(' ');
7699: l(' BEGIN');
7700: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7701: ds(fnd_log.level_statement);
7702: dc(fnd_log.level_statement,'Input Parameters:');
7703: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7704: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7705: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7698: l(' ');
7699: l(' BEGIN');
7700: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7701: ds(fnd_log.level_statement);
7702: dc(fnd_log.level_statement,'Input Parameters:');
7703: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7704: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7705: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7706: de;
7699: l(' BEGIN');
7700: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7701: ds(fnd_log.level_statement);
7702: dc(fnd_log.level_statement,'Input Parameters:');
7703: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7704: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7705: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7706: de;
7707: l('');
7700: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7701: ds(fnd_log.level_statement);
7702: dc(fnd_log.level_statement,'Input Parameters:');
7703: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7704: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7705: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7706: de;
7707: l('');
7708: pop_conditions(p_rule_id,'get_matching_party_sites','p_rule_id,p_party_id,p_party_site_list,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_party_site_id,x_search_ctx_id,x_num_matches','PARTY_SITES');
7701: ds(fnd_log.level_statement);
7702: dc(fnd_log.level_statement,'Input Parameters:');
7703: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7704: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7705: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7706: de;
7707: l('');
7708: pop_conditions(p_rule_id,'get_matching_party_sites','p_rule_id,p_party_id,p_party_site_list,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_party_site_id,x_search_ctx_id,x_num_matches','PARTY_SITES');
7709:
7707: l('');
7708: pop_conditions(p_rule_id,'get_matching_party_sites','p_rule_id,p_party_id,p_party_site_list,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_party_site_id,x_search_ctx_id,x_num_matches','PARTY_SITES');
7709:
7710: END IF; ---End of Code Change for Match Rule Set
7711: d(fnd_log.level_procedure,'get_matching_party_sites(-)');
7712:
7713: l('EXCEPTION');
7714: l(' WHEN FND_API.G_EXC_ERROR THEN');
7715: l(' RAISE FND_API.G_EXC_ERROR;');
7804: l(' ');
7805: l(' BEGIN');
7806:
7807:
7808: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7809: ds(fnd_log.level_statement);
7810: dc(fnd_log.level_statement,'Input Parameters:');
7811: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7812: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7805: l(' BEGIN');
7806:
7807:
7808: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7809: ds(fnd_log.level_statement);
7810: dc(fnd_log.level_statement,'Input Parameters:');
7811: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7812: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7813: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7806:
7807:
7808: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7809: ds(fnd_log.level_statement);
7810: dc(fnd_log.level_statement,'Input Parameters:');
7811: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7812: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7813: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7814: de;
7807:
7808: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7809: ds(fnd_log.level_statement);
7810: dc(fnd_log.level_statement,'Input Parameters:');
7811: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7812: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7813: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7814: de;
7815:
7808: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7809: ds(fnd_log.level_statement);
7810: dc(fnd_log.level_statement,'Input Parameters:');
7811: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7812: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7813: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7814: de;
7815:
7816: l('');
7809: ds(fnd_log.level_statement);
7810: dc(fnd_log.level_statement,'Input Parameters:');
7811: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7812: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7813: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7814: de;
7815:
7816: l('');
7817: l(' -- ************************************');
7839: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
7840: l(' x_search_ctx_id := l_search_ctx_id;');
7841: l('');
7842:
7843: ds(fnd_log.level_statement);
7844: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7845: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
7846: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7847: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7840: l(' x_search_ctx_id := l_search_ctx_id;');
7841: l('');
7842:
7843: ds(fnd_log.level_statement);
7844: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7845: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
7846: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7847: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7848: de;
7841: l('');
7842:
7843: ds(fnd_log.level_statement);
7844: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7845: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
7846: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7847: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7848: de;
7849:
7842:
7843: ds(fnd_log.level_statement);
7844: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7845: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
7846: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7847: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7848: de;
7849:
7850: l(' IF l_contact_contains_str IS NULL THEN');
7843: ds(fnd_log.level_statement);
7844: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7845: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
7846: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7847: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7848: de;
7849:
7850: l(' IF l_contact_contains_str IS NULL THEN');
7851: l(' defct := 1;');
7867:
7868: l(' l_score := GET_CONTACTS_SCORE(l_match_idx'||l_c_param_list||');');
7869: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,defps,l_score,defcpt, l_ct_party_id, null, l_org_contact_id, null);');
7870:
7871: ds(fnd_log.level_statement);
7872: dc(fnd_log.level_statement,'Contact Level Matches');
7873: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
7874: dc(fnd_log.level_statement,'l_score','l_score');
7875: de;
7868: l(' l_score := GET_CONTACTS_SCORE(l_match_idx'||l_c_param_list||');');
7869: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,defps,l_score,defcpt, l_ct_party_id, null, l_org_contact_id, null);');
7870:
7871: ds(fnd_log.level_statement);
7872: dc(fnd_log.level_statement,'Contact Level Matches');
7873: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
7874: dc(fnd_log.level_statement,'l_score','l_score');
7875: de;
7876:
7869: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,defps,l_score,defcpt, l_ct_party_id, null, l_org_contact_id, null);');
7870:
7871: ds(fnd_log.level_statement);
7872: dc(fnd_log.level_statement,'Contact Level Matches');
7873: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
7874: dc(fnd_log.level_statement,'l_score','l_score');
7875: de;
7876:
7877: l(' END IF; ');
7870:
7871: ds(fnd_log.level_statement);
7872: dc(fnd_log.level_statement,'Contact Level Matches');
7873: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
7874: dc(fnd_log.level_statement,'l_score','l_score');
7875: de;
7876:
7877: l(' END IF; ');
7878: l(' END LOOP;');
7923: l(' END IF;');
7924: l(' END IF;');
7925: l(' END IF; ');
7926: l(' END LOOP;');
7927: ds(fnd_log.level_statement);
7928: dc(fnd_log.level_statement,'Contact_point Level Matches');
7929: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
7930: dc(fnd_log.level_statement,'l_score','l_score');
7931: de;
7924: l(' END IF;');
7925: l(' END IF; ');
7926: l(' END LOOP;');
7927: ds(fnd_log.level_statement);
7928: dc(fnd_log.level_statement,'Contact_point Level Matches');
7929: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
7930: dc(fnd_log.level_statement,'l_score','l_score');
7931: de;
7932: l(' CLOSE l_contact_pt_cur;');
7925: l(' END IF; ');
7926: l(' END LOOP;');
7927: ds(fnd_log.level_statement);
7928: dc(fnd_log.level_statement,'Contact_point Level Matches');
7929: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
7930: dc(fnd_log.level_statement,'l_score','l_score');
7931: de;
7932: l(' CLOSE l_contact_pt_cur;');
7933: l(' END IF;');
7926: l(' END LOOP;');
7927: ds(fnd_log.level_statement);
7928: dc(fnd_log.level_statement,'Contact_point Level Matches');
7929: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
7930: dc(fnd_log.level_statement,'l_score','l_score');
7931: de;
7932: l(' CLOSE l_contact_pt_cur;');
7933: l(' END IF;');
7934: l(' x_num_matches := 0;');
7932: l(' CLOSE l_contact_pt_cur;');
7933: l(' END IF;');
7934: l(' x_num_matches := 0;');
7935: l(' l_org_contact_id := H_SCORES.FIRST;');
7936: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7937: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
7938: l(' IF l_match_str = '' OR '' THEN');
7939: ds(fnd_log.level_statement);
7940: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
7935: l(' l_org_contact_id := H_SCORES.FIRST;');
7936: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7937: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
7938: l(' IF l_match_str = '' OR '' THEN');
7939: ds(fnd_log.level_statement);
7940: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
7941: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
7942: de;
7943: --Start of Bug No: 4162385
7936: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7937: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
7938: l(' IF l_match_str = '' OR '' THEN');
7939: ds(fnd_log.level_statement);
7940: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
7941: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
7942: de;
7943: --Start of Bug No: 4162385
7944: IF l_purpose = 'D' THEN
7937: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
7938: l(' IF l_match_str = '' OR '' THEN');
7939: ds(fnd_log.level_statement);
7940: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
7941: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
7942: de;
7943: --Start of Bug No: 4162385
7944: IF l_purpose = 'D' THEN
7945: l_entity_score_lh := 'H_SCORES(l_org_contact_id).TOTAL_SCORE';
7973: l(' END LOOP;');
7974: ELSE ---Start of Code Change for Match Rule Set
7975: l(' ');
7976: l(' BEGIN');
7977: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7978: ds(fnd_log.level_statement);
7979: dc(fnd_log.level_statement,'Input Parameters:');
7980: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7981: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7974: ELSE ---Start of Code Change for Match Rule Set
7975: l(' ');
7976: l(' BEGIN');
7977: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7978: ds(fnd_log.level_statement);
7979: dc(fnd_log.level_statement,'Input Parameters:');
7980: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7981: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7982: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7975: l(' ');
7976: l(' BEGIN');
7977: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7978: ds(fnd_log.level_statement);
7979: dc(fnd_log.level_statement,'Input Parameters:');
7980: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7981: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7982: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7983: de;
7976: l(' BEGIN');
7977: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7978: ds(fnd_log.level_statement);
7979: dc(fnd_log.level_statement,'Input Parameters:');
7980: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7981: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7982: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7983: de;
7984: pop_conditions(p_rule_id,'get_matching_contacts','p_rule_id,p_party_id,p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_contact_id,x_search_ctx_id,x_num_matches','CONTACTS');
7977: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7978: ds(fnd_log.level_statement);
7979: dc(fnd_log.level_statement,'Input Parameters:');
7980: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7981: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7982: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7983: de;
7984: pop_conditions(p_rule_id,'get_matching_contacts','p_rule_id,p_party_id,p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_contact_id,x_search_ctx_id,x_num_matches','CONTACTS');
7985: END IF; ---End of Code Change for Match Rule Set
7978: ds(fnd_log.level_statement);
7979: dc(fnd_log.level_statement,'Input Parameters:');
7980: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7981: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7982: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7983: de;
7984: pop_conditions(p_rule_id,'get_matching_contacts','p_rule_id,p_party_id,p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_contact_id,x_search_ctx_id,x_num_matches','CONTACTS');
7985: END IF; ---End of Code Change for Match Rule Set
7986:
7983: de;
7984: pop_conditions(p_rule_id,'get_matching_contacts','p_rule_id,p_party_id,p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_contact_id,x_search_ctx_id,x_num_matches','CONTACTS');
7985: END IF; ---End of Code Change for Match Rule Set
7986:
7987: d(fnd_log.level_procedure,'get_matching_contacts(-)');
7988:
7989: l('EXCEPTION');
7990: l(' WHEN FND_API.G_EXC_ERROR THEN');
7991: l(' RAISE FND_API.G_EXC_ERROR;');
8061: l(' BEGIN');
8062:
8063:
8064:
8065: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8066: ds(fnd_log.level_statement);
8067: dc(fnd_log.level_statement,'Input Parameters:');
8068: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8069: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8062:
8063:
8064:
8065: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8066: ds(fnd_log.level_statement);
8067: dc(fnd_log.level_statement,'Input Parameters:');
8068: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8069: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8070: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8063:
8064:
8065: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8066: ds(fnd_log.level_statement);
8067: dc(fnd_log.level_statement,'Input Parameters:');
8068: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8069: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8070: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8071: de;
8064:
8065: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8066: ds(fnd_log.level_statement);
8067: dc(fnd_log.level_statement,'Input Parameters:');
8068: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8069: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8070: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8071: de;
8072:
8065: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8066: ds(fnd_log.level_statement);
8067: dc(fnd_log.level_statement,'Input Parameters:');
8068: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8069: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8070: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8071: de;
8072:
8073: l('');
8066: ds(fnd_log.level_statement);
8067: dc(fnd_log.level_statement,'Input Parameters:');
8068: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8069: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8070: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8071: de;
8072:
8073: l('');
8074: l(' -- ************************************');
8097: l(' -- Setup Search Context ID');
8098: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
8099: l(' x_search_ctx_id := l_search_ctx_id;');
8100:
8101: ds(fnd_log.level_statement);
8102: dc(fnd_log.level_statement,'l_match_str','l_match_str');
8103: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
8104: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
8105: de;
8098: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
8099: l(' x_search_ctx_id := l_search_ctx_id;');
8100:
8101: ds(fnd_log.level_statement);
8102: dc(fnd_log.level_statement,'l_match_str','l_match_str');
8103: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
8104: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
8105: de;
8106:
8099: l(' x_search_ctx_id := l_search_ctx_id;');
8100:
8101: ds(fnd_log.level_statement);
8102: dc(fnd_log.level_statement,'l_match_str','l_match_str');
8103: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
8104: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
8105: de;
8106:
8107: l('');
8100:
8101: ds(fnd_log.level_statement);
8102: dc(fnd_log.level_statement,'l_match_str','l_match_str');
8103: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
8104: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
8105: de;
8106:
8107: l('');
8108: l(' IF l_contact_pt_contains_str IS NOT NULL THEN');
8119: l(' H_CONTACT_POINT_ID(cnt) := l_contact_pt_id;');
8120: l(' H_PARTY_ID(cnt) := l_cpt_party_id;');
8121: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
8122: l(' cnt := cnt+1;');
8123: ds(fnd_log.level_statement);
8124: dc(fnd_log.level_statement,'Contact Point Matches');
8125: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
8126: dc(fnd_log.level_statement,'l_score','l_score');
8127: de;
8120: l(' H_PARTY_ID(cnt) := l_cpt_party_id;');
8121: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
8122: l(' cnt := cnt+1;');
8123: ds(fnd_log.level_statement);
8124: dc(fnd_log.level_statement,'Contact Point Matches');
8125: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
8126: dc(fnd_log.level_statement,'l_score','l_score');
8127: de;
8128:
8121: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
8122: l(' cnt := cnt+1;');
8123: ds(fnd_log.level_statement);
8124: dc(fnd_log.level_statement,'Contact Point Matches');
8125: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
8126: dc(fnd_log.level_statement,'l_score','l_score');
8127: de;
8128:
8129: l(' END IF; ');
8122: l(' cnt := cnt+1;');
8123: ds(fnd_log.level_statement);
8124: dc(fnd_log.level_statement,'Contact Point Matches');
8125: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
8126: dc(fnd_log.level_statement,'l_score','l_score');
8127: de;
8128:
8129: l(' END IF; ');
8130: l(' END LOOP;');
8129: l(' END IF; ');
8130: l(' END LOOP;');
8131: l(' CLOSE l_contact_pt_cur;');
8132:
8133: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
8134: l(' x_num_matches := 0; ');
8135: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
8136: ds(fnd_log.level_statement);
8137: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
8132:
8133: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
8134: l(' x_num_matches := 0; ');
8135: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
8136: ds(fnd_log.level_statement);
8137: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
8138: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
8139: de;
8140: --Start of Bug No: 4162385
8133: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
8134: l(' x_num_matches := 0; ');
8135: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
8136: ds(fnd_log.level_statement);
8137: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
8138: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
8139: de;
8140: --Start of Bug No: 4162385
8141: IF l_purpose = 'D' THEN
8134: l(' x_num_matches := 0; ');
8135: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
8136: ds(fnd_log.level_statement);
8137: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
8138: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
8139: de;
8140: --Start of Bug No: 4162385
8141: IF l_purpose = 'D' THEN
8142: l_entity_score_lh := 'H_SCORE(I)';
8155: l(' END LOOP; ');
8156: l(' END IF;');
8157: ELSE ---Start of Code Change for Match Rule Set
8158: l(' BEGIN');
8159: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8160: ds(fnd_log.level_statement);
8161: dc(fnd_log.level_statement,'Input Parameters:');
8162: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8163: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8156: l(' END IF;');
8157: ELSE ---Start of Code Change for Match Rule Set
8158: l(' BEGIN');
8159: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8160: ds(fnd_log.level_statement);
8161: dc(fnd_log.level_statement,'Input Parameters:');
8162: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8163: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8164: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8157: ELSE ---Start of Code Change for Match Rule Set
8158: l(' BEGIN');
8159: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8160: ds(fnd_log.level_statement);
8161: dc(fnd_log.level_statement,'Input Parameters:');
8162: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8163: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8164: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8165: de;
8158: l(' BEGIN');
8159: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8160: ds(fnd_log.level_statement);
8161: dc(fnd_log.level_statement,'Input Parameters:');
8162: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8163: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8164: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8165: de;
8166: pop_conditions(p_rule_id,'get_matching_contact_points','p_rule_id,p_party_id,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_contact_point_id,x_search_ctx_id,x_num_matches','CONTACT_POINTS');
8159: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8160: ds(fnd_log.level_statement);
8161: dc(fnd_log.level_statement,'Input Parameters:');
8162: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8163: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8164: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8165: de;
8166: pop_conditions(p_rule_id,'get_matching_contact_points','p_rule_id,p_party_id,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_contact_point_id,x_search_ctx_id,x_num_matches','CONTACT_POINTS');
8167:
8160: ds(fnd_log.level_statement);
8161: dc(fnd_log.level_statement,'Input Parameters:');
8162: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8163: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8164: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8165: de;
8166: pop_conditions(p_rule_id,'get_matching_contact_points','p_rule_id,p_party_id,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_contact_point_id,x_search_ctx_id,x_num_matches','CONTACT_POINTS');
8167:
8168: END IF; ---End of Code Change for Match Rule Set
8165: de;
8166: pop_conditions(p_rule_id,'get_matching_contact_points','p_rule_id,p_party_id,p_contact_point_list,p_restrict_sql,p_match_type,p_dup_contact_point_id,x_search_ctx_id,x_num_matches','CONTACT_POINTS');
8167:
8168: END IF; ---End of Code Change for Match Rule Set
8169: d(fnd_log.level_procedure,'get_matching_contact_points(-)');
8170:
8171: l('EXCEPTION');
8172: l(' WHEN FND_API.G_EXC_ERROR THEN');
8173: l(' RAISE FND_API.G_EXC_ERROR;');
8260: l(' l_TX35_new VARCHAR2(4000);'); --9155543
8261: l('');
8262: l(' BEGIN');
8263: l('');
8264: d(fnd_log.level_statement,'get_score_details(+)');
8265: l(' -- ************************************');
8266: l(' -- STEP 1. Initialization and error checks');
8267: l('');
8268: l(' l_entered_max_score:= init_search(p_party_search_rec,p_party_site_list,p_contact_list,p_contact_point_list,'' OR '', l_party_max_score, l_ps_max_score, l_contact_max_score, l_cpt_max_score);');
8408: l(' INSERT_CONTACT_POINTS_SCORE(p_party_id,l_max_id,l_search_ctx_id, p_contact_point_list(l_max_idx), g_contact_pt_stage_list(l_max_idx) '||replace(l_cpt_param_list,'l_TX','l_max_TX')||',l_max_idx);');
8409: l(' END IF;');
8410: l(' CLOSE l_contact_pt_cur;');
8411: l(' END IF;');
8412: d(fnd_log.level_procedure,'get_score_details(-)');
8413: ELSE ---Start of Code Change for Match Rule Set
8414: l(' BEGIN');
8415: l('');
8416: d(fnd_log.level_statement,'get_score_details(+)');
8412: d(fnd_log.level_procedure,'get_score_details(-)');
8413: ELSE ---Start of Code Change for Match Rule Set
8414: l(' BEGIN');
8415: l('');
8416: d(fnd_log.level_statement,'get_score_details(+)');
8417: pop_conditions(p_rule_id,'get_score_details','p_rule_id,p_party_id,p_party_search_rec,p_party_site_list,p_contact_list,p_contact_point_list,x_search_ctx_id','PARTY');
8418: d(fnd_log.level_procedure,'get_score_details(-)');
8419: END IF; ---End of Code Change for Match Rule Set
8420:
8414: l(' BEGIN');
8415: l('');
8416: d(fnd_log.level_statement,'get_score_details(+)');
8417: pop_conditions(p_rule_id,'get_score_details','p_rule_id,p_party_id,p_party_search_rec,p_party_site_list,p_contact_list,p_contact_point_list,x_search_ctx_id','PARTY');
8418: d(fnd_log.level_procedure,'get_score_details(-)');
8419: END IF; ---End of Code Change for Match Rule Set
8420:
8421: l('EXCEPTION');
8422: l(' WHEN FND_API.G_EXC_ERROR THEN');
8889: l(' ) RETURN NUMBER IS');
8890: END IF;
8891: l(' total NUMBER := 0;');
8892: l(' BEGIN');
8893: d(fnd_log.level_procedure,'GET_PARTY_SCORE ');
8894: l(' IF g_score_until_thresh AND (total)>=g_thres_score THEN');
8895: l(' RETURN total;');
8896: l(' END IF;');
8897: FOR SECATTRS IN (
9883: l(' push_eval;');
9884: l(' RETURN;');
9885: l(' END IF;');
9886: l(' END IF;');
9887: ds(fnd_log.level_statement);
9888: dc(fnd_log.level_statement,'Party Level Matches');
9889: dc(fnd_log.level_statement,'l_party_id','l_party_id');
9890: dc(fnd_log.level_statement,'l_score','l_score');
9891: de;
9884: l(' RETURN;');
9885: l(' END IF;');
9886: l(' END IF;');
9887: ds(fnd_log.level_statement);
9888: dc(fnd_log.level_statement,'Party Level Matches');
9889: dc(fnd_log.level_statement,'l_party_id','l_party_id');
9890: dc(fnd_log.level_statement,'l_score','l_score');
9891: de;
9892: l(' END LOOP;');
9885: l(' END IF;');
9886: l(' END IF;');
9887: ds(fnd_log.level_statement);
9888: dc(fnd_log.level_statement,'Party Level Matches');
9889: dc(fnd_log.level_statement,'l_party_id','l_party_id');
9890: dc(fnd_log.level_statement,'l_score','l_score');
9891: de;
9892: l(' END LOOP;');
9893: l(' CLOSE l_party_cur;');
9886: l(' END IF;');
9887: ds(fnd_log.level_statement);
9888: dc(fnd_log.level_statement,'Party Level Matches');
9889: dc(fnd_log.level_statement,'l_party_id','l_party_id');
9890: dc(fnd_log.level_statement,'l_score','l_score');
9891: de;
9892: l(' END LOOP;');
9893: l(' CLOSE l_party_cur;');
9894: l(' ROLLBACK to eval_start;');
9961: l(' h_ps_party_id(detcnt) := l_ps_party_id;');
9962: l(' h_ps_score(detcnt) := round((l_score/p_emax_score)*100);');
9963: l(' detcnt := detcnt +1;');
9964: l(' END IF;');
9965: ds(fnd_log.level_statement);
9966: dc(fnd_log.level_statement,'Party Site Level Matches');
9967: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
9968: dc(fnd_log.level_statement,'l_ps_party_id','l_ps_party_id');
9969: dc(fnd_log.level_statement,'l_score','l_score');
9962: l(' h_ps_score(detcnt) := round((l_score/p_emax_score)*100);');
9963: l(' detcnt := detcnt +1;');
9964: l(' END IF;');
9965: ds(fnd_log.level_statement);
9966: dc(fnd_log.level_statement,'Party Site Level Matches');
9967: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
9968: dc(fnd_log.level_statement,'l_ps_party_id','l_ps_party_id');
9969: dc(fnd_log.level_statement,'l_score','l_score');
9970: de;
9963: l(' detcnt := detcnt +1;');
9964: l(' END IF;');
9965: ds(fnd_log.level_statement);
9966: dc(fnd_log.level_statement,'Party Site Level Matches');
9967: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
9968: dc(fnd_log.level_statement,'l_ps_party_id','l_ps_party_id');
9969: dc(fnd_log.level_statement,'l_score','l_score');
9970: de;
9971: l(' END IF;');
9964: l(' END IF;');
9965: ds(fnd_log.level_statement);
9966: dc(fnd_log.level_statement,'Party Site Level Matches');
9967: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
9968: dc(fnd_log.level_statement,'l_ps_party_id','l_ps_party_id');
9969: dc(fnd_log.level_statement,'l_score','l_score');
9970: de;
9971: l(' END IF;');
9972: l(' END LOOP;');
9965: ds(fnd_log.level_statement);
9966: dc(fnd_log.level_statement,'Party Site Level Matches');
9967: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
9968: dc(fnd_log.level_statement,'l_ps_party_id','l_ps_party_id');
9969: dc(fnd_log.level_statement,'l_score','l_score');
9970: de;
9971: l(' END IF;');
9972: l(' END LOOP;');
9973: l(' CLOSE l_party_site_cur;');
10045: l(' h_ct_party_id(detcnt) := l_ct_party_id;');
10046: l(' h_ct_score(detcnt) := round((l_score/p_emax_score)*100);');
10047: l(' detcnt := detcnt +1;');
10048: l(' END IF;');
10049: ds(fnd_log.level_statement);
10050: dc(fnd_log.level_statement,'Contact Level Matches');
10051: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10052: dc(fnd_log.level_statement,'l_ct_party_id','l_ct_party_id');
10053: dc(fnd_log.level_statement,'l_score','l_score');
10046: l(' h_ct_score(detcnt) := round((l_score/p_emax_score)*100);');
10047: l(' detcnt := detcnt +1;');
10048: l(' END IF;');
10049: ds(fnd_log.level_statement);
10050: dc(fnd_log.level_statement,'Contact Level Matches');
10051: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10052: dc(fnd_log.level_statement,'l_ct_party_id','l_ct_party_id');
10053: dc(fnd_log.level_statement,'l_score','l_score');
10054: de;
10047: l(' detcnt := detcnt +1;');
10048: l(' END IF;');
10049: ds(fnd_log.level_statement);
10050: dc(fnd_log.level_statement,'Contact Level Matches');
10051: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10052: dc(fnd_log.level_statement,'l_ct_party_id','l_ct_party_id');
10053: dc(fnd_log.level_statement,'l_score','l_score');
10054: de;
10055: l(' END LOOP;');
10048: l(' END IF;');
10049: ds(fnd_log.level_statement);
10050: dc(fnd_log.level_statement,'Contact Level Matches');
10051: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10052: dc(fnd_log.level_statement,'l_ct_party_id','l_ct_party_id');
10053: dc(fnd_log.level_statement,'l_score','l_score');
10054: de;
10055: l(' END LOOP;');
10056: l(' CLOSE l_contact_cur;');
10049: ds(fnd_log.level_statement);
10050: dc(fnd_log.level_statement,'Contact Level Matches');
10051: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10052: dc(fnd_log.level_statement,'l_ct_party_id','l_ct_party_id');
10053: dc(fnd_log.level_statement,'l_score','l_score');
10054: de;
10055: l(' END LOOP;');
10056: l(' CLOSE l_contact_cur;');
10057: l(' ROLLBACK to eval_start;');
10129: l(' h_cpt_party_id(detcnt) := l_cpt_party_id;');
10130: l(' h_cpt_score(detcnt) := round((l_score/p_emax_score)*100);');
10131: l(' detcnt := detcnt +1;');
10132: l(' END IF;');
10133: ds(fnd_log.level_statement);
10134: dc(fnd_log.level_statement,'Contact pt Level Matches');
10135: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10136: dc(fnd_log.level_statement,'l_cpt_party_id','l_cpt_party_id');
10137: dc(fnd_log.level_statement,'l_score','l_score');
10130: l(' h_cpt_score(detcnt) := round((l_score/p_emax_score)*100);');
10131: l(' detcnt := detcnt +1;');
10132: l(' END IF;');
10133: ds(fnd_log.level_statement);
10134: dc(fnd_log.level_statement,'Contact pt Level Matches');
10135: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10136: dc(fnd_log.level_statement,'l_cpt_party_id','l_cpt_party_id');
10137: dc(fnd_log.level_statement,'l_score','l_score');
10138: de;
10131: l(' detcnt := detcnt +1;');
10132: l(' END IF;');
10133: ds(fnd_log.level_statement);
10134: dc(fnd_log.level_statement,'Contact pt Level Matches');
10135: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10136: dc(fnd_log.level_statement,'l_cpt_party_id','l_cpt_party_id');
10137: dc(fnd_log.level_statement,'l_score','l_score');
10138: de;
10139: l(' END IF;');
10132: l(' END IF;');
10133: ds(fnd_log.level_statement);
10134: dc(fnd_log.level_statement,'Contact pt Level Matches');
10135: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10136: dc(fnd_log.level_statement,'l_cpt_party_id','l_cpt_party_id');
10137: dc(fnd_log.level_statement,'l_score','l_score');
10138: de;
10139: l(' END IF;');
10140: l(' END LOOP;');
10133: ds(fnd_log.level_statement);
10134: dc(fnd_log.level_statement,'Contact pt Level Matches');
10135: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10136: dc(fnd_log.level_statement,'l_cpt_party_id','l_cpt_party_id');
10137: dc(fnd_log.level_statement,'l_score','l_score');
10138: de;
10139: l(' END IF;');
10140: l(' END LOOP;');
10141: l(' CLOSE l_contact_pt_cur;');
10191: l(' BEGIN');
10192: l('');
10193:
10194:
10195: d(fnd_log.level_procedure,'find_parties(+)');
10196: ds(fnd_log.level_statement);
10197: dc(fnd_log.level_statement,'Input Parameters:');
10198: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10199: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10192: l('');
10193:
10194:
10195: d(fnd_log.level_procedure,'find_parties(+)');
10196: ds(fnd_log.level_statement);
10197: dc(fnd_log.level_statement,'Input Parameters:');
10198: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10199: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10200: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10193:
10194:
10195: d(fnd_log.level_procedure,'find_parties(+)');
10196: ds(fnd_log.level_statement);
10197: dc(fnd_log.level_statement,'Input Parameters:');
10198: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10199: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10200: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10201: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10194:
10195: d(fnd_log.level_procedure,'find_parties(+)');
10196: ds(fnd_log.level_statement);
10197: dc(fnd_log.level_statement,'Input Parameters:');
10198: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10199: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10200: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10201: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10202: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
10195: d(fnd_log.level_procedure,'find_parties(+)');
10196: ds(fnd_log.level_statement);
10197: dc(fnd_log.level_statement,'Input Parameters:');
10198: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10199: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10200: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10201: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10202: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
10203: de;
10196: ds(fnd_log.level_statement);
10197: dc(fnd_log.level_statement,'Input Parameters:');
10198: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10199: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10200: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10201: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10202: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
10203: de;
10204:
10197: dc(fnd_log.level_statement,'Input Parameters:');
10198: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10199: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10200: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10201: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10202: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
10203: de;
10204:
10205: l(' -- ************************************');
10198: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10199: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10200: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10201: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10202: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
10203: de;
10204:
10205: l(' -- ************************************');
10206: l(' -- STEP 1. Initialization and error checks');
10306: l(' defcpt := 1;');
10307: l(' END IF;');
10308: l('');
10309:
10310: ds(fnd_log.level_statement);
10311: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10312: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10313: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10314: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10307: l(' END IF;');
10308: l('');
10309:
10310: ds(fnd_log.level_statement);
10311: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10312: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10313: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10314: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10315: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10308: l('');
10309:
10310: ds(fnd_log.level_statement);
10311: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10312: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10313: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10314: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10315: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10316: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
10309:
10310: ds(fnd_log.level_statement);
10311: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10312: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10313: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10314: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10315: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10316: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
10317: de;
10310: ds(fnd_log.level_statement);
10311: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10312: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10313: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10314: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10315: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10316: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
10317: de;
10318:
10311: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10312: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10313: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10314: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10315: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10316: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
10317: de;
10318:
10319: IF l_max_score=1 THEN
10312: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10313: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10314: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10315: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10316: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
10317: de;
10318:
10319: IF l_max_score=1 THEN
10320: l(' FOR I in 1..3 LOOP');
10334: l(' do_eval(I);');
10335: l(' END LOOP;');
10336: l('ROLLBACK to find_parties;');
10337: IF l_purpose = 'S' THEN
10338: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
10339: ELSE
10340: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||l_match_threshold);
10341: END IF;
10342:
10336: l('ROLLBACK to find_parties;');
10337: IF l_purpose = 'S' THEN
10338: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
10339: ELSE
10340: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||l_match_threshold);
10341: END IF;
10342:
10343: l(' x_num_matches := 0;');
10344: l(' l_num_eval := 0;');
10349: l(' END IF;');
10350:
10351: l(' WHILE l_party_id IS NOT NULL LOOP');
10352: l(' l_num_eval:= l_num_eval+1;');
10353: ds(fnd_log.level_statement);
10354: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
10355: IF l_purpose = 'S' THEN
10356: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
10357: ELSE
10350:
10351: l(' WHILE l_party_id IS NOT NULL LOOP');
10352: l(' l_num_eval:= l_num_eval+1;');
10353: ds(fnd_log.level_statement);
10354: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
10355: IF l_purpose = 'S' THEN
10356: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
10357: ELSE
10358: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
10352: l(' l_num_eval:= l_num_eval+1;');
10353: ds(fnd_log.level_statement);
10354: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
10355: IF l_purpose = 'S' THEN
10356: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
10357: ELSE
10358: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
10359: END IF;
10360: de;
10354: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
10355: IF l_purpose = 'S' THEN
10356: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
10357: ELSE
10358: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
10359: END IF;
10360: de;
10361: IF l_purpose = ('S') THEN
10362: l(' IF (H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
10432: l(' l_search_ctx_id, h_cpt_id(I), h_cpt_party_id(I), h_cpt_score(I));');
10433: l(' END IF;');
10434: l('');
10435: l(' HZ_DQM_SEARCH_UTIL.set_num_eval(l_num_eval);');
10436: d(fnd_log.level_procedure,'find_parties(-)');
10437:
10438:
10439: l('EXCEPTION');
10440: l(' WHEN FND_API.G_EXC_ERROR THEN');
10678: l(' push_eval;');
10679: l(' RETURN;');
10680: l(' END IF;');
10681: l(' END IF;');
10682: ds(fnd_log.level_statement);
10683: dc(fnd_log.level_statement,'Party Level Matches');
10684: dc(fnd_log.level_statement,'l_party_id','l_party_id');
10685: dc(fnd_log.level_statement,'l_score','l_score');
10686: de;
10679: l(' RETURN;');
10680: l(' END IF;');
10681: l(' END IF;');
10682: ds(fnd_log.level_statement);
10683: dc(fnd_log.level_statement,'Party Level Matches');
10684: dc(fnd_log.level_statement,'l_party_id','l_party_id');
10685: dc(fnd_log.level_statement,'l_score','l_score');
10686: de;
10687: l(' END LOOP;');
10680: l(' END IF;');
10681: l(' END IF;');
10682: ds(fnd_log.level_statement);
10683: dc(fnd_log.level_statement,'Party Level Matches');
10684: dc(fnd_log.level_statement,'l_party_id','l_party_id');
10685: dc(fnd_log.level_statement,'l_score','l_score');
10686: de;
10687: l(' END LOOP;');
10688: l(' CLOSE l_party_cur;');
10681: l(' END IF;');
10682: ds(fnd_log.level_statement);
10683: dc(fnd_log.level_statement,'Party Level Matches');
10684: dc(fnd_log.level_statement,'l_party_id','l_party_id');
10685: dc(fnd_log.level_statement,'l_score','l_score');
10686: de;
10687: l(' END LOOP;');
10688: l(' CLOSE l_party_cur;');
10689: l(' ROLLBACK to eval_start;');
10808: l(' h_ps_party_id(detcnt) := l_person_id;');
10809: l(' h_ps_score(detcnt) := round((l_score/p_emax_score)*100);');
10810: l(' detcnt := detcnt +1;');
10811: l(' END IF;');
10812: ds(fnd_log.level_statement);
10813: dc(fnd_log.level_statement,'Party Site Level Matches');
10814: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
10815: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
10816: dc(fnd_log.level_statement,'l_score','l_score');
10809: l(' h_ps_score(detcnt) := round((l_score/p_emax_score)*100);');
10810: l(' detcnt := detcnt +1;');
10811: l(' END IF;');
10812: ds(fnd_log.level_statement);
10813: dc(fnd_log.level_statement,'Party Site Level Matches');
10814: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
10815: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
10816: dc(fnd_log.level_statement,'l_score','l_score');
10817: de;
10810: l(' detcnt := detcnt +1;');
10811: l(' END IF;');
10812: ds(fnd_log.level_statement);
10813: dc(fnd_log.level_statement,'Party Site Level Matches');
10814: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
10815: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
10816: dc(fnd_log.level_statement,'l_score','l_score');
10817: de;
10818: l(' END IF;');
10811: l(' END IF;');
10812: ds(fnd_log.level_statement);
10813: dc(fnd_log.level_statement,'Party Site Level Matches');
10814: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
10815: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
10816: dc(fnd_log.level_statement,'l_score','l_score');
10817: de;
10818: l(' END IF;');
10819: l(' END LOOP;');
10812: ds(fnd_log.level_statement);
10813: dc(fnd_log.level_statement,'Party Site Level Matches');
10814: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
10815: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
10816: dc(fnd_log.level_statement,'l_score','l_score');
10817: de;
10818: l(' END IF;');
10819: l(' END LOOP;');
10820: l(' CLOSE l_party_site_cur;');
10863: l(' h_ct_party_id(detcnt) := l_person_id;');
10864: l(' h_ct_score(detcnt) := round((l_score/p_emax_score)*100);');
10865: l(' detcnt := detcnt +1;');
10866: l(' END IF;');
10867: ds(fnd_log.level_statement);
10868: dc(fnd_log.level_statement,'Contact Level Matches');
10869: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10870: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
10871: dc(fnd_log.level_statement,'l_score','l_score');
10864: l(' h_ct_score(detcnt) := round((l_score/p_emax_score)*100);');
10865: l(' detcnt := detcnt +1;');
10866: l(' END IF;');
10867: ds(fnd_log.level_statement);
10868: dc(fnd_log.level_statement,'Contact Level Matches');
10869: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10870: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
10871: dc(fnd_log.level_statement,'l_score','l_score');
10872: de;
10865: l(' detcnt := detcnt +1;');
10866: l(' END IF;');
10867: ds(fnd_log.level_statement);
10868: dc(fnd_log.level_statement,'Contact Level Matches');
10869: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10870: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
10871: dc(fnd_log.level_statement,'l_score','l_score');
10872: de;
10873: l(' END LOOP;');
10866: l(' END IF;');
10867: ds(fnd_log.level_statement);
10868: dc(fnd_log.level_statement,'Contact Level Matches');
10869: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10870: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
10871: dc(fnd_log.level_statement,'l_score','l_score');
10872: de;
10873: l(' END LOOP;');
10874: l(' CLOSE l_contact_cur;');
10867: ds(fnd_log.level_statement);
10868: dc(fnd_log.level_statement,'Contact Level Matches');
10869: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10870: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
10871: dc(fnd_log.level_statement,'l_score','l_score');
10872: de;
10873: l(' END LOOP;');
10874: l(' CLOSE l_contact_cur;');
10875: l(' ROLLBACK to eval_start;');
10964: l(' h_cpt_party_id(detcnt) := l_person_id;');
10965: l(' h_cpt_score(detcnt) := round((l_score/p_emax_score)*100);');
10966: l(' detcnt := detcnt +1;');
10967: l(' END IF;');
10968: ds(fnd_log.level_statement);
10969: dc(fnd_log.level_statement,'Contact pt Level Matches');
10970: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10971: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
10972: dc(fnd_log.level_statement,'l_score','l_score');
10965: l(' h_cpt_score(detcnt) := round((l_score/p_emax_score)*100);');
10966: l(' detcnt := detcnt +1;');
10967: l(' END IF;');
10968: ds(fnd_log.level_statement);
10969: dc(fnd_log.level_statement,'Contact pt Level Matches');
10970: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10971: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
10972: dc(fnd_log.level_statement,'l_score','l_score');
10973: de;
10966: l(' detcnt := detcnt +1;');
10967: l(' END IF;');
10968: ds(fnd_log.level_statement);
10969: dc(fnd_log.level_statement,'Contact pt Level Matches');
10970: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10971: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
10972: dc(fnd_log.level_statement,'l_score','l_score');
10973: de;
10974: l(' END IF;');
10967: l(' END IF;');
10968: ds(fnd_log.level_statement);
10969: dc(fnd_log.level_statement,'Contact pt Level Matches');
10970: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10971: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
10972: dc(fnd_log.level_statement,'l_score','l_score');
10973: de;
10974: l(' END IF;');
10975: l(' END LOOP;');
10968: ds(fnd_log.level_statement);
10969: dc(fnd_log.level_statement,'Contact pt Level Matches');
10970: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10971: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
10972: dc(fnd_log.level_statement,'l_score','l_score');
10973: de;
10974: l(' END IF;');
10975: l(' END LOOP;');
10976: l(' CLOSE l_contact_pt_cur;');
11025: l(' BEGIN');
11026: l('');
11027:
11028:
11029: d(fnd_log.level_procedure,'find_persons(+)');
11030: ds(fnd_log.level_statement);
11031: dc(fnd_log.level_statement,'Input Parameters:');
11032: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11033: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11026: l('');
11027:
11028:
11029: d(fnd_log.level_procedure,'find_persons(+)');
11030: ds(fnd_log.level_statement);
11031: dc(fnd_log.level_statement,'Input Parameters:');
11032: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11033: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11034: de;
11027:
11028:
11029: d(fnd_log.level_procedure,'find_persons(+)');
11030: ds(fnd_log.level_statement);
11031: dc(fnd_log.level_statement,'Input Parameters:');
11032: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11033: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11034: de;
11035:
11028:
11029: d(fnd_log.level_procedure,'find_persons(+)');
11030: ds(fnd_log.level_statement);
11031: dc(fnd_log.level_statement,'Input Parameters:');
11032: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11033: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11034: de;
11035:
11036: l(' -- ************************************');
11029: d(fnd_log.level_procedure,'find_persons(+)');
11030: ds(fnd_log.level_statement);
11031: dc(fnd_log.level_statement,'Input Parameters:');
11032: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11033: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11034: de;
11035:
11036: l(' -- ************************************');
11037: l(' -- STEP 1. Initialization and error checks');
11079: l(' defcpt := 1;');
11080: l(' END IF;');
11081: l('');
11082:
11083: ds(fnd_log.level_statement);
11084: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11085: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11086: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11087: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11080: l(' END IF;');
11081: l('');
11082:
11083: ds(fnd_log.level_statement);
11084: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11085: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11086: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11087: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11088: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11081: l('');
11082:
11083: ds(fnd_log.level_statement);
11084: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11085: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11086: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11087: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11088: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11089: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11082:
11083: ds(fnd_log.level_statement);
11084: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11085: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11086: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11087: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11088: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11089: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11090: de;
11083: ds(fnd_log.level_statement);
11084: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11085: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11086: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11087: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11088: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11089: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11090: de;
11091:
11084: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11085: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11086: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11087: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11088: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11089: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11090: de;
11091:
11092: /**** Call all 4 evaluation procedures ***********/
11085: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11086: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11087: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11088: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11089: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11090: de;
11091:
11092: /**** Call all 4 evaluation procedures ***********/
11093: l(' FOR I in 1..5 LOOP');
11096: l(' ROLLBACK to find_persons;');
11097: l(' IF l_contact_contains_str IS NOT NULL THEN');
11098: l(' eval_contact_level(l_contact_contains_str,p_ins_details,l_contact_max_score);');
11099: l(' END IF;');
11100: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
11101:
11102: l(' x_num_matches := 0;');
11103: l(' l_num_eval := 0;');
11104: l(' IF l_match_str = '' OR '' THEN');
11108: l(' END IF;');
11109:
11110: l(' WHILE l_party_id IS NOT NULL LOOP');
11111: l(' l_num_eval:= l_num_eval+1;');
11112: ds(fnd_log.level_statement);
11113: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
11114: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
11115: de;
11116: l(' IF (H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
11109:
11110: l(' WHILE l_party_id IS NOT NULL LOOP');
11111: l(' l_num_eval:= l_num_eval+1;');
11112: ds(fnd_log.level_statement);
11113: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
11114: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
11115: de;
11116: l(' IF (H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
11117: l(' INSERT INTO HZ_MATCHED_PARTIES_GT (SEARCH_CONTEXT_ID, PARTY_ID, SCORE) ');
11110: l(' WHILE l_party_id IS NOT NULL LOOP');
11111: l(' l_num_eval:= l_num_eval+1;');
11112: ds(fnd_log.level_statement);
11113: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
11114: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
11115: de;
11116: l(' IF (H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
11117: l(' INSERT INTO HZ_MATCHED_PARTIES_GT (SEARCH_CONTEXT_ID, PARTY_ID, SCORE) ');
11118: l(' VALUES (l_search_ctx_id,H_SCORES(l_party_id).PARTY_ID,round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100));');
11145: l(' l_search_ctx_id, h_cpt_id(I), h_cpt_party_id(I), h_cpt_score(I));');
11146: l(' END IF;');
11147: l('');
11148: l(' HZ_DQM_SEARCH_UTIL.set_num_eval(l_num_eval);');
11149: d(fnd_log.level_procedure,'find_persons(-)');
11150:
11151:
11152: l('EXCEPTION');
11153: l(' WHEN FND_API.G_EXC_ERROR THEN');
11207: l('');
11208: l(' BEGIN');
11209:
11210:
11211: d(fnd_log.level_procedure,'find_party_details(+)');
11212: ds(fnd_log.level_statement);
11213: dc(fnd_log.level_statement,'Input Parameters:');
11214: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11215: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11208: l(' BEGIN');
11209:
11210:
11211: d(fnd_log.level_procedure,'find_party_details(+)');
11212: ds(fnd_log.level_statement);
11213: dc(fnd_log.level_statement,'Input Parameters:');
11214: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11215: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11216: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11209:
11210:
11211: d(fnd_log.level_procedure,'find_party_details(+)');
11212: ds(fnd_log.level_statement);
11213: dc(fnd_log.level_statement,'Input Parameters:');
11214: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11215: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11216: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11217: de;
11210:
11211: d(fnd_log.level_procedure,'find_party_details(+)');
11212: ds(fnd_log.level_statement);
11213: dc(fnd_log.level_statement,'Input Parameters:');
11214: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11215: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11216: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11217: de;
11218:
11211: d(fnd_log.level_procedure,'find_party_details(+)');
11212: ds(fnd_log.level_statement);
11213: dc(fnd_log.level_statement,'Input Parameters:');
11214: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11215: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11216: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11217: de;
11218:
11219: l(' find_parties(p_rule_id,p_party_search_rec,p_party_site_list, p_contact_list, p_contact_point_list,');
11212: ds(fnd_log.level_statement);
11213: dc(fnd_log.level_statement,'Input Parameters:');
11214: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11215: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11216: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11217: de;
11218:
11219: l(' find_parties(p_rule_id,p_party_search_rec,p_party_site_list, p_contact_list, p_contact_point_list,');
11220: l(' p_restrict_sql,p_match_type,p_search_merged,null,null, null,''Y'',');
11228: l(' DELETE FROM HZ_MATCHED_CPTS_GT cpt WHERE SEARCH_CONTEXT_ID = x_search_ctx_id ');
11229: l(' AND NOT EXISTS ');
11230: l(' (SELECT 1 FROM HZ_MATCHED_PARTIES_GT p WHERE SEARCH_CONTEXT_ID = x_search_ctx_id AND p.PARTY_ID = cpt.PARTY_ID);');
11231:
11232: d(fnd_log.level_procedure,'find_party_details(-)');
11233:
11234:
11235: l('EXCEPTION');
11236: l(' WHEN FND_API.G_EXC_ERROR THEN');
11268: l('');
11269: l('BEGIN');
11270:
11271:
11272: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
11273: ds(fnd_log.level_statement);
11274: dc(fnd_log.level_statement,'Input Parameters:');
11275: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11276: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11269: l('BEGIN');
11270:
11271:
11272: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
11273: ds(fnd_log.level_statement);
11274: dc(fnd_log.level_statement,'Input Parameters:');
11275: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11276: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11277: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11270:
11271:
11272: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
11273: ds(fnd_log.level_statement);
11274: dc(fnd_log.level_statement,'Input Parameters:');
11275: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11276: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11277: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11278: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11271:
11272: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
11273: ds(fnd_log.level_statement);
11274: dc(fnd_log.level_statement,'Input Parameters:');
11275: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11276: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11277: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11278: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11279: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11272: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
11273: ds(fnd_log.level_statement);
11274: dc(fnd_log.level_statement,'Input Parameters:');
11275: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11276: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11277: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11278: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11279: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11280: de;
11273: ds(fnd_log.level_statement);
11274: dc(fnd_log.level_statement,'Input Parameters:');
11275: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11276: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11277: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11278: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11279: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11280: de;
11281:
11274: dc(fnd_log.level_statement,'Input Parameters:');
11275: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11276: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11277: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11278: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11279: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11280: de;
11281:
11282: l('');
11275: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11276: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11277: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11278: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11279: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11280: de;
11281:
11282: l('');
11283: l(' get_party_for_search(');
11320: l(' hz_utility_pub.user_id,p_dup_batch_id);'); --Bug No: 4244529
11321: l(' ELSE');
11322: l(' x_dup_set_id := NULL;');
11323: l(' END IF;');
11324: d(fnd_log.level_procedure,'find_duplicate_parties(-)');
11325:
11326:
11327: l('EXCEPTION');
11328: l(' WHEN FND_API.G_EXC_ERROR THEN');
11371:
11372: l(' BEGIN ');
11373:
11374:
11375: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
11376: ds(fnd_log.level_statement);
11377: dc(fnd_log.level_statement,'Input Parameters:');
11378: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11379: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11372: l(' BEGIN ');
11373:
11374:
11375: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
11376: ds(fnd_log.level_statement);
11377: dc(fnd_log.level_statement,'Input Parameters:');
11378: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11379: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11380: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11373:
11374:
11375: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
11376: ds(fnd_log.level_statement);
11377: dc(fnd_log.level_statement,'Input Parameters:');
11378: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11379: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11380: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11381: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11374:
11375: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
11376: ds(fnd_log.level_statement);
11377: dc(fnd_log.level_statement,'Input Parameters:');
11378: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11379: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11380: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11381: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11382: de;
11375: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
11376: ds(fnd_log.level_statement);
11377: dc(fnd_log.level_statement,'Input Parameters:');
11378: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11379: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11380: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11381: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11382: de;
11383:
11376: ds(fnd_log.level_statement);
11377: dc(fnd_log.level_statement,'Input Parameters:');
11378: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11379: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11380: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11381: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11382: de;
11383:
11384: l(' p_party_site_list(1) := p_party_site_id; ');
11377: dc(fnd_log.level_statement,'Input Parameters:');
11378: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11379: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11380: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11381: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11382: de;
11383:
11384: l(' p_party_site_list(1) := p_party_site_id; ');
11385: l(' OPEN get_cpts_for_party_sites;');
11415: l(' p_match_type, ');
11416: l(' p_party_site_id, ');
11417: l(' x_search_ctx_id,');
11418: l(' x_num_matches);');
11419: d(fnd_log.level_procedure,'find_duplicate_party_sites(-)');
11420:
11421:
11422: l('EXCEPTION');
11423: l(' WHEN FND_API.G_EXC_ERROR THEN');
11467:
11468: l('BEGIN ');
11469:
11470:
11471: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
11472: ds(fnd_log.level_statement);
11473: dc(fnd_log.level_statement,'Input Parameters:');
11474: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11475: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11468: l('BEGIN ');
11469:
11470:
11471: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
11472: ds(fnd_log.level_statement);
11473: dc(fnd_log.level_statement,'Input Parameters:');
11474: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11475: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11476: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11469:
11470:
11471: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
11472: ds(fnd_log.level_statement);
11473: dc(fnd_log.level_statement,'Input Parameters:');
11474: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11475: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11476: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11477: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11470:
11471: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
11472: ds(fnd_log.level_statement);
11473: dc(fnd_log.level_statement,'Input Parameters:');
11474: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11475: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11476: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11477: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11478: de;
11471: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
11472: ds(fnd_log.level_statement);
11473: dc(fnd_log.level_statement,'Input Parameters:');
11474: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11475: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11476: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11477: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11478: de;
11479:
11472: ds(fnd_log.level_statement);
11473: dc(fnd_log.level_statement,'Input Parameters:');
11474: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11475: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11476: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11477: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11478: de;
11479:
11480:
11473: dc(fnd_log.level_statement,'Input Parameters:');
11474: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11475: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11476: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11477: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11478: de;
11479:
11480:
11481: l(' p_contact_ids(1) := p_org_contact_id; ');
11513: l(' p_org_contact_id, ');
11514: l(' x_search_ctx_id, ');
11515: l(' x_num_matches);');
11516: l(' ');
11517: d(fnd_log.level_procedure,'find_duplicate_contacts(-)');
11518:
11519:
11520: l('EXCEPTION');
11521: l(' WHEN FND_API.G_EXC_ERROR THEN');
11554: l('');
11555: l('BEGIN');
11556:
11557:
11558: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
11559: ds(fnd_log.level_statement);
11560: dc(fnd_log.level_statement,'Input Parameters:');
11561: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11562: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11555: l('BEGIN');
11556:
11557:
11558: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
11559: ds(fnd_log.level_statement);
11560: dc(fnd_log.level_statement,'Input Parameters:');
11561: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11562: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11563: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11556:
11557:
11558: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
11559: ds(fnd_log.level_statement);
11560: dc(fnd_log.level_statement,'Input Parameters:');
11561: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11562: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11563: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11564: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11557:
11558: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
11559: ds(fnd_log.level_statement);
11560: dc(fnd_log.level_statement,'Input Parameters:');
11561: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11562: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11563: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11564: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11565: de;
11558: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
11559: ds(fnd_log.level_statement);
11560: dc(fnd_log.level_statement,'Input Parameters:');
11561: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11562: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11563: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11564: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11565: de;
11566:
11559: ds(fnd_log.level_statement);
11560: dc(fnd_log.level_statement,'Input Parameters:');
11561: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11562: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11563: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11564: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11565: de;
11566:
11567: l(' contact_point_ids(1) := p_contact_point_id; ');
11560: dc(fnd_log.level_statement,'Input Parameters:');
11561: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11562: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11563: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11564: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11565: de;
11566:
11567: l(' contact_point_ids(1) := p_contact_point_id; ');
11568: l(' get_search_criteria ( ');
11591: l(' p_match_type, ');
11592: l(' p_contact_point_id, ');
11593: l(' x_search_ctx_id, ');
11594: l(' x_num_matches ); ');
11595: d(fnd_log.level_procedure,'find_duplicate_contact_points(-)');
11596:
11597:
11598: l('EXCEPTION');
11599: l(' WHEN FND_API.G_EXC_ERROR THEN');
11739: l(' FIRST BOOLEAN := TRUE; ');
11740: l('');
11741: l('BEGIN');
11742:
11743: d(fnd_log.level_procedure,'call_api_dynamic(+)');
11744: l('');
11745: FOR I in 1..20 LOOP
11746: l(' IF p_attrib_id'||I||' IS NOT NULL THEN');
11747: l(' AttrVals(p_attrib_id'||I||'):=p_attrib_val'||I||';');
11765: AND s.attribute_id = a.attribute_id) LOOP
11766: l(' IF AttrVals.EXISTS('||ATTRS.attribute_id||') THEN');
11767: IF ATTRS.entity_name='PARTY' THEN
11768: l(' l_party_rec.'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11769: d(fnd_log.level_statement,'l_party_rec.'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11770: ELSIF ATTRS.entity_name='PARTY_SITES' THEN
11771: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11772: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11773: ELSIF ATTRS.entity_name='CONTACTS' THEN
11768: l(' l_party_rec.'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11769: d(fnd_log.level_statement,'l_party_rec.'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11770: ELSIF ATTRS.entity_name='PARTY_SITES' THEN
11771: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11772: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11773: ELSIF ATTRS.entity_name='CONTACTS' THEN
11774: l(' l_contact_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11775: d(fnd_log.level_statement,'l_contact_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11776: ELSIF ATTRS.entity_name='CONTACT_POINTS' THEN
11771: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11772: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11773: ELSIF ATTRS.entity_name='CONTACTS' THEN
11774: l(' l_contact_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11775: d(fnd_log.level_statement,'l_contact_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11776: ELSIF ATTRS.entity_name='CONTACT_POINTS' THEN
11777: BEGIN
11778: SELECT tag INTO l_cpt_type FROM fnd_lookup_values
11779: WHERE lookup_type = 'HZ_DQM_CPT_ATTR_TYPE'
11789: l(' FOR I in 1..l_cpt_list.COUNT LOOP');
11790: l(' IF l_cpt_list(I).CONTACT_POINT_TYPE=l_cpt_type THEN');
11791: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11792: l(' FIRST := TRUE;');
11793: ds(fnd_log.level_statement);
11794: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
11795: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11796: de;
11797: l(' END IF;');
11790: l(' IF l_cpt_list(I).CONTACT_POINT_TYPE=l_cpt_type THEN');
11791: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11792: l(' FIRST := TRUE;');
11793: ds(fnd_log.level_statement);
11794: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
11795: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11796: de;
11797: l(' END IF;');
11798: l(' END LOOP;');
11791: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11792: l(' FIRST := TRUE;');
11793: ds(fnd_log.level_statement);
11794: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
11795: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11796: de;
11797: l(' END IF;');
11798: l(' END LOOP;');
11799: l(' IF not FIRST THEN');
11799: l(' IF not FIRST THEN');
11800: l(' l_idx := l_cpt_list.COUNT+1;');
11801: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
11802: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11803: ds(fnd_log.level_statement);
11804: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
11805: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11806: de;
11807: l(' END IF;');
11800: l(' l_idx := l_cpt_list.COUNT+1;');
11801: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
11802: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11803: ds(fnd_log.level_statement);
11804: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
11805: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11806: de;
11807: l(' END IF;');
11808: END IF;
11801: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
11802: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11803: ds(fnd_log.level_statement);
11804: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
11805: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11806: de;
11807: l(' END IF;');
11808: END IF;
11809: l(' END IF;');
11834: l(' get_matching_contact_points(p_rule_id,p_party_id, l_cpt_list,');
11835: l(' p_restrict_sql,p_match_type,NULL,');
11836: l(' x_search_ctx_id,x_num_matches);');
11837: l(' END IF;');
11838: d(fnd_log.level_procedure,'call_api_dynamic(-)');
11839:
11840:
11841: l('EXCEPTION');
11842: l(' WHEN FND_API.G_EXC_ERROR THEN');
11931: l(' ');
11932: l(' BEGIN');
11933:
11934:
11935: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
11936: ds(fnd_log.level_statement);
11937: dc(fnd_log.level_statement,'Input Parameters:');
11938: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11939: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11932: l(' BEGIN');
11933:
11934:
11935: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
11936: ds(fnd_log.level_statement);
11937: dc(fnd_log.level_statement,'Input Parameters:');
11938: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11939: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11940: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
11933:
11934:
11935: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
11936: ds(fnd_log.level_statement);
11937: dc(fnd_log.level_statement,'Input Parameters:');
11938: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11939: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11940: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
11941: de;
11934:
11935: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
11936: ds(fnd_log.level_statement);
11937: dc(fnd_log.level_statement,'Input Parameters:');
11938: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11939: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11940: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
11941: de;
11942: l('');
11935: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
11936: ds(fnd_log.level_statement);
11937: dc(fnd_log.level_statement,'Input Parameters:');
11938: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11939: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11940: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
11941: de;
11942: l('');
11943: l(' -- ************************************');
11936: ds(fnd_log.level_statement);
11937: dc(fnd_log.level_statement,'Input Parameters:');
11938: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11939: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11940: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
11941: de;
11942: l('');
11943: l(' -- ************************************');
11944: l(' -- STEP 1. Initialization and error checks');
11963: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
11964: l(' x_search_ctx_id := l_search_ctx_id;');
11965: l('');
11966:
11967: ds(fnd_log.level_statement);
11968: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11969: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11970: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11971: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11964: l(' x_search_ctx_id := l_search_ctx_id;');
11965: l('');
11966:
11967: ds(fnd_log.level_statement);
11968: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11969: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11970: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11971: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11972: de;
11965: l('');
11966:
11967: ds(fnd_log.level_statement);
11968: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11969: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11970: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11971: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11972: de;
11973:
11966:
11967: ds(fnd_log.level_statement);
11968: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11969: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11970: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11971: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11972: de;
11973:
11974: l(' IF l_party_site_contains_str IS NULL THEN');
11967: ds(fnd_log.level_statement);
11968: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11969: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11970: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11971: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11972: de;
11973:
11974: l(' IF l_party_site_contains_str IS NULL THEN');
11975: l(' defps := 1;');
11989: l(' l_party_site_id <> p_dup_party_site_id)) THEN ');
11990: l(' l_index := map_id(l_party_site_id);');
11991: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
11992: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,l_score,defct,defcpt, l_ps_party_id, l_party_site_id, null,null);');
11993: ds(fnd_log.level_statement);
11994: dc(fnd_log.level_statement,'Party Site Level Matches');
11995: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
11996: dc(fnd_log.level_statement,'l_score','l_score');
11997: de;
11990: l(' l_index := map_id(l_party_site_id);');
11991: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
11992: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,l_score,defct,defcpt, l_ps_party_id, l_party_site_id, null,null);');
11993: ds(fnd_log.level_statement);
11994: dc(fnd_log.level_statement,'Party Site Level Matches');
11995: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
11996: dc(fnd_log.level_statement,'l_score','l_score');
11997: de;
11998:
11991: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
11992: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,l_score,defct,defcpt, l_ps_party_id, l_party_site_id, null,null);');
11993: ds(fnd_log.level_statement);
11994: dc(fnd_log.level_statement,'Party Site Level Matches');
11995: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
11996: dc(fnd_log.level_statement,'l_score','l_score');
11997: de;
11998:
11999: l(' END IF; ');
11992: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,l_score,defct,defcpt, l_ps_party_id, l_party_site_id, null,null);');
11993: ds(fnd_log.level_statement);
11994: dc(fnd_log.level_statement,'Party Site Level Matches');
11995: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
11996: dc(fnd_log.level_statement,'l_score','l_score');
11997: de;
11998:
11999: l(' END IF; ');
12000: l(' END LOOP;');
12034: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,defps,defct,l_score,l_cpt_party_id,l_cpt_ps_id,l_cpt_contact_id,l_contact_pt_id);');
12035: l(' END IF;');
12036: l(' END IF;');
12037: l(' END IF; ');
12038: ds(fnd_log.level_statement);
12039: dc(fnd_log.level_statement,'Contact_point Level Matches');
12040: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
12041: dc(fnd_log.level_statement,'l_score','l_score');
12042: de;
12035: l(' END IF;');
12036: l(' END IF;');
12037: l(' END IF; ');
12038: ds(fnd_log.level_statement);
12039: dc(fnd_log.level_statement,'Contact_point Level Matches');
12040: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
12041: dc(fnd_log.level_statement,'l_score','l_score');
12042: de;
12043: l(' END LOOP;');
12036: l(' END IF;');
12037: l(' END IF; ');
12038: ds(fnd_log.level_statement);
12039: dc(fnd_log.level_statement,'Contact_point Level Matches');
12040: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
12041: dc(fnd_log.level_statement,'l_score','l_score');
12042: de;
12043: l(' END LOOP;');
12044: l(' CLOSE l_contact_pt_cur;');
12037: l(' END IF; ');
12038: ds(fnd_log.level_statement);
12039: dc(fnd_log.level_statement,'Contact_point Level Matches');
12040: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
12041: dc(fnd_log.level_statement,'l_score','l_score');
12042: de;
12043: l(' END LOOP;');
12044: l(' CLOSE l_contact_pt_cur;');
12045: l(' END IF;');
12045: l(' END IF;');
12046: l(' ROLLBACK to get_matching_party_sites ;');
12047: l(' x_num_matches := 0;');
12048: l(' l_party_site_id := H_SCORES.FIRST;');
12049: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12050: l(' WHILE l_party_site_id IS NOT NULL LOOP');
12051: ds(fnd_log.level_statement);
12052: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
12053: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
12047: l(' x_num_matches := 0;');
12048: l(' l_party_site_id := H_SCORES.FIRST;');
12049: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12050: l(' WHILE l_party_site_id IS NOT NULL LOOP');
12051: ds(fnd_log.level_statement);
12052: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
12053: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
12054: de;
12055: l(' IF l_match_str = '' OR '' THEN');
12048: l(' l_party_site_id := H_SCORES.FIRST;');
12049: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12050: l(' WHILE l_party_site_id IS NOT NULL LOOP');
12051: ds(fnd_log.level_statement);
12052: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
12053: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
12054: de;
12055: l(' IF l_match_str = '' OR '' THEN');
12056: l(' IF (H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12049: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12050: l(' WHILE l_party_site_id IS NOT NULL LOOP');
12051: ds(fnd_log.level_statement);
12052: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
12053: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
12054: de;
12055: l(' IF l_match_str = '' OR '' THEN');
12056: l(' IF (H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12057: l(' INSERT INTO HZ_MATCHED_PARTY_SITES_GT (SEARCH_CONTEXT_ID, PARTY_ID, PARTY_SITE_ID, SCORE) ');
12073: l(' END IF;');
12074: l(' l_party_site_id:=H_SCORES.NEXT(l_party_site_id);');
12075: l(' END LOOP;');
12076:
12077: d(fnd_log.level_procedure,'get_matching_party_sites(-)');
12078:
12079: l('EXCEPTION');
12080: l(' WHEN FND_API.G_EXC_ERROR THEN');
12081: l(' ROLLBACK to get_matching_party_sites ;');
12171: l(' ');
12172: l(' BEGIN');
12173:
12174:
12175: d(fnd_log.level_procedure,'get_matching_contacts(+)');
12176: ds(fnd_log.level_statement);
12177: dc(fnd_log.level_statement,'Input Parameters:');
12178: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12179: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12172: l(' BEGIN');
12173:
12174:
12175: d(fnd_log.level_procedure,'get_matching_contacts(+)');
12176: ds(fnd_log.level_statement);
12177: dc(fnd_log.level_statement,'Input Parameters:');
12178: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12179: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12180: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
12173:
12174:
12175: d(fnd_log.level_procedure,'get_matching_contacts(+)');
12176: ds(fnd_log.level_statement);
12177: dc(fnd_log.level_statement,'Input Parameters:');
12178: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12179: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12180: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
12181: de;
12174:
12175: d(fnd_log.level_procedure,'get_matching_contacts(+)');
12176: ds(fnd_log.level_statement);
12177: dc(fnd_log.level_statement,'Input Parameters:');
12178: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12179: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12180: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
12181: de;
12182:
12175: d(fnd_log.level_procedure,'get_matching_contacts(+)');
12176: ds(fnd_log.level_statement);
12177: dc(fnd_log.level_statement,'Input Parameters:');
12178: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12179: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12180: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
12181: de;
12182:
12183: l('');
12176: ds(fnd_log.level_statement);
12177: dc(fnd_log.level_statement,'Input Parameters:');
12178: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12179: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12180: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
12181: de;
12182:
12183: l('');
12184: l(' -- ************************************');
12204: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
12205: l(' x_search_ctx_id := l_search_ctx_id;');
12206: l('');
12207:
12208: ds(fnd_log.level_statement);
12209: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12210: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
12211: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12212: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12205: l(' x_search_ctx_id := l_search_ctx_id;');
12206: l('');
12207:
12208: ds(fnd_log.level_statement);
12209: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12210: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
12211: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12212: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12213: de;
12206: l('');
12207:
12208: ds(fnd_log.level_statement);
12209: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12210: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
12211: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12212: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12213: de;
12214:
12207:
12208: ds(fnd_log.level_statement);
12209: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12210: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
12211: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12212: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12213: de;
12214:
12215: l(' IF l_contact_contains_str IS NULL THEN');
12208: ds(fnd_log.level_statement);
12209: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12210: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
12211: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12212: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12213: de;
12214:
12215: l(' IF l_contact_contains_str IS NULL THEN');
12216: l(' defct := 1;');
12229: l(' l_index := map_id(l_org_contact_id);');
12230: l(' l_score := GET_CONTACTS_SCORE(l_match_idx'||l_c_param_list||');');
12231: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,defps,l_score,defcpt, l_ct_party_id, null, l_org_contact_id, null);');
12232:
12233: ds(fnd_log.level_statement);
12234: dc(fnd_log.level_statement,'Contact Level Matches');
12235: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
12236: dc(fnd_log.level_statement,'l_score','l_score');
12237: de;
12230: l(' l_score := GET_CONTACTS_SCORE(l_match_idx'||l_c_param_list||');');
12231: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,defps,l_score,defcpt, l_ct_party_id, null, l_org_contact_id, null);');
12232:
12233: ds(fnd_log.level_statement);
12234: dc(fnd_log.level_statement,'Contact Level Matches');
12235: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
12236: dc(fnd_log.level_statement,'l_score','l_score');
12237: de;
12238:
12231: l(' H_SCORES(l_index) := get_new_score_rec(l_score,defpt,defps,l_score,defcpt, l_ct_party_id, null, l_org_contact_id, null);');
12232:
12233: ds(fnd_log.level_statement);
12234: dc(fnd_log.level_statement,'Contact Level Matches');
12235: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
12236: dc(fnd_log.level_statement,'l_score','l_score');
12237: de;
12238:
12239: l(' END IF; ');
12232:
12233: ds(fnd_log.level_statement);
12234: dc(fnd_log.level_statement,'Contact Level Matches');
12235: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
12236: dc(fnd_log.level_statement,'l_score','l_score');
12237: de;
12238:
12239: l(' END IF; ');
12240: l(' END LOOP;');
12275: l(' END IF;');
12276: l(' END IF;');
12277: l(' END IF; ');
12278: l(' END LOOP;');
12279: ds(fnd_log.level_statement);
12280: dc(fnd_log.level_statement,'Contact_point Level Matches');
12281: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
12282: dc(fnd_log.level_statement,'l_score','l_score');
12283: de;
12276: l(' END IF;');
12277: l(' END IF; ');
12278: l(' END LOOP;');
12279: ds(fnd_log.level_statement);
12280: dc(fnd_log.level_statement,'Contact_point Level Matches');
12281: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
12282: dc(fnd_log.level_statement,'l_score','l_score');
12283: de;
12284: l(' CLOSE l_contact_pt_cur;');
12277: l(' END IF; ');
12278: l(' END LOOP;');
12279: ds(fnd_log.level_statement);
12280: dc(fnd_log.level_statement,'Contact_point Level Matches');
12281: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
12282: dc(fnd_log.level_statement,'l_score','l_score');
12283: de;
12284: l(' CLOSE l_contact_pt_cur;');
12285: l(' END IF;');
12278: l(' END LOOP;');
12279: ds(fnd_log.level_statement);
12280: dc(fnd_log.level_statement,'Contact_point Level Matches');
12281: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
12282: dc(fnd_log.level_statement,'l_score','l_score');
12283: de;
12284: l(' CLOSE l_contact_pt_cur;');
12285: l(' END IF;');
12286: l(' ROLLBACK to get_matching_contacts ;');
12285: l(' END IF;');
12286: l(' ROLLBACK to get_matching_contacts ;');
12287: l(' x_num_matches := 0;');
12288: l(' l_org_contact_id := H_SCORES.FIRST;');
12289: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12290: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
12291: l(' IF l_match_str = '' OR '' THEN');
12292: ds(fnd_log.level_statement);
12293: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
12288: l(' l_org_contact_id := H_SCORES.FIRST;');
12289: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12290: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
12291: l(' IF l_match_str = '' OR '' THEN');
12292: ds(fnd_log.level_statement);
12293: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
12294: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
12295: de;
12296: -- IF l_purpose = 'S' THEN
12289: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12290: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
12291: l(' IF l_match_str = '' OR '' THEN');
12292: ds(fnd_log.level_statement);
12293: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
12294: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
12295: de;
12296: -- IF l_purpose = 'S' THEN
12297: l(' IF (H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12290: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
12291: l(' IF l_match_str = '' OR '' THEN');
12292: ds(fnd_log.level_statement);
12293: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
12294: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
12295: de;
12296: -- IF l_purpose = 'S' THEN
12297: l(' IF (H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12298: l(' INSERT INTO HZ_MATCHED_CONTACTS_GT (SEARCH_CONTEXT_ID, PARTY_ID, ORG_CONTACT_ID, SCORE) ');
12315: l(' END IF;');
12316: l(' l_org_contact_id:=H_SCORES.NEXT(l_org_contact_id);');
12317: l(' END LOOP;');
12318:
12319: d(fnd_log.level_procedure,'get_matching_contacts(-)');
12320:
12321: l('EXCEPTION');
12322: l(' WHEN FND_API.G_EXC_ERROR THEN');
12323: l(' ROLLBACK to get_matching_contacts ;');
12394: l(' BEGIN');
12395:
12396:
12397:
12398: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
12399: ds(fnd_log.level_statement);
12400: dc(fnd_log.level_statement,'Input Parameters:');
12401: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12402: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12395:
12396:
12397:
12398: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
12399: ds(fnd_log.level_statement);
12400: dc(fnd_log.level_statement,'Input Parameters:');
12401: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12402: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12403: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
12396:
12397:
12398: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
12399: ds(fnd_log.level_statement);
12400: dc(fnd_log.level_statement,'Input Parameters:');
12401: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12402: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12403: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
12404: de;
12397:
12398: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
12399: ds(fnd_log.level_statement);
12400: dc(fnd_log.level_statement,'Input Parameters:');
12401: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12402: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12403: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
12404: de;
12405:
12398: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
12399: ds(fnd_log.level_statement);
12400: dc(fnd_log.level_statement,'Input Parameters:');
12401: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12402: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12403: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
12404: de;
12405:
12406: l('');
12399: ds(fnd_log.level_statement);
12400: dc(fnd_log.level_statement,'Input Parameters:');
12401: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12402: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12403: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
12404: de;
12405:
12406: l('');
12407: l(' -- ************************************');
12428: l(' -- Setup Search Context ID');
12429: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
12430: l(' x_search_ctx_id := l_search_ctx_id;');
12431:
12432: ds(fnd_log.level_statement);
12433: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12434: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12435: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12436: de;
12429: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
12430: l(' x_search_ctx_id := l_search_ctx_id;');
12431:
12432: ds(fnd_log.level_statement);
12433: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12434: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12435: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12436: de;
12437:
12430: l(' x_search_ctx_id := l_search_ctx_id;');
12431:
12432: ds(fnd_log.level_statement);
12433: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12434: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12435: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12436: de;
12437:
12438: l('');
12431:
12432: ds(fnd_log.level_statement);
12433: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12434: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12435: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12436: de;
12437:
12438: l('');
12439: l(' IF l_contact_pt_contains_str IS NOT NULL THEN');
12450: l(' H_CONTACT_POINT_ID(cnt) := l_contact_pt_id;');
12451: l(' H_PARTY_ID(cnt) := l_cpt_party_id;');
12452: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
12453: l(' cnt := cnt+1;');
12454: ds(fnd_log.level_statement);
12455: dc(fnd_log.level_statement,'Contact Point Matches');
12456: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
12457: dc(fnd_log.level_statement,'l_score','l_score');
12458: de;
12451: l(' H_PARTY_ID(cnt) := l_cpt_party_id;');
12452: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
12453: l(' cnt := cnt+1;');
12454: ds(fnd_log.level_statement);
12455: dc(fnd_log.level_statement,'Contact Point Matches');
12456: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
12457: dc(fnd_log.level_statement,'l_score','l_score');
12458: de;
12459:
12452: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
12453: l(' cnt := cnt+1;');
12454: ds(fnd_log.level_statement);
12455: dc(fnd_log.level_statement,'Contact Point Matches');
12456: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
12457: dc(fnd_log.level_statement,'l_score','l_score');
12458: de;
12459:
12460: l(' END IF; ');
12453: l(' cnt := cnt+1;');
12454: ds(fnd_log.level_statement);
12455: dc(fnd_log.level_statement,'Contact Point Matches');
12456: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
12457: dc(fnd_log.level_statement,'l_score','l_score');
12458: de;
12459:
12460: l(' END IF; ');
12461: l(' END LOOP;');
12460: l(' END IF; ');
12461: l(' END LOOP;');
12462: l(' CLOSE l_contact_pt_cur;');
12463:
12464: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12465: l('ROLLBACK to get_matching_contact_points ;');
12466: l(' x_num_matches := 0; ');
12467: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
12468: ds(fnd_log.level_statement);
12464: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12465: l('ROLLBACK to get_matching_contact_points ;');
12466: l(' x_num_matches := 0; ');
12467: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
12468: ds(fnd_log.level_statement);
12469: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
12470: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
12471: de;
12472: l(' IF (H_SCORE(I)/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12465: l('ROLLBACK to get_matching_contact_points ;');
12466: l(' x_num_matches := 0; ');
12467: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
12468: ds(fnd_log.level_statement);
12469: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
12470: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
12471: de;
12472: l(' IF (H_SCORE(I)/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12473: l(' INSERT INTO HZ_MATCHED_CPTS_GT(SEARCH_CONTEXT_ID,CONTACT_POINT_ID,PARTY_ID,SCORE) VALUES (');
12466: l(' x_num_matches := 0; ');
12467: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
12468: ds(fnd_log.level_statement);
12469: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
12470: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
12471: de;
12472: l(' IF (H_SCORE(I)/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12473: l(' INSERT INTO HZ_MATCHED_CPTS_GT(SEARCH_CONTEXT_ID,CONTACT_POINT_ID,PARTY_ID,SCORE) VALUES (');
12474: l(' l_search_ctx_id,H_CONTACT_POINT_ID(I),H_PARTY_ID(I),round(H_SCORE(I)/l_entered_max_score)*100);');
12476: l(' END IF;');
12477: l(' END LOOP; ');
12478: l(' END IF;');
12479:
12480: d(fnd_log.level_procedure,'get_matching_contact_points(-)');
12481:
12482: l('EXCEPTION');
12483: l(' WHEN FND_API.G_EXC_ERROR THEN');
12484: l(' ROLLBACK to get_matching_contact_points ;');
12569: l(' ');
12570: l(' BEGIN');
12571: l('');
12572:
12573: d(fnd_log.level_statement,'get_score_details(+)');
12574: l(' -- ************************************');
12575: l(' -- STEP 1. Initialization and error checks');
12576: l('');
12577: l(' l_entered_max_score:= init_search(p_party_search_rec,p_party_site_list,p_contact_list,p_contact_point_list,'' OR '', l_party_max_score, l_ps_max_score, l_contact_max_score, l_cpt_max_score);');
12705: l(' DELETE FROM HZ_SRCH_PARTIES WHERE batch_id = -1 ;');
12706: l(' DELETE FROM HZ_SRCH_PSITES WHERE batch_id = -1 ;');
12707: l(' DELETE FROM HZ_SRCH_CONTACTS WHERE batch_id = -1 ;');
12708: l(' DELETE FROM HZ_SRCH_CPTS WHERE batch_id = -1 ;');
12709: d(fnd_log.level_procedure,'get_score_details(-)');
12710:
12711:
12712: l('EXCEPTION');
12713: l(' WHEN FND_API.G_EXC_ERROR THEN');
15931: l(' l_attrib_id18 NUMBER; ');
15932: l(' l_attrib_id19 NUMBER; ');
15933: l(' l_attrib_id20 NUMBER; ');
15934: l(' BEGIN');
15935: d(fnd_log.level_procedure,'call_api_dynamic_names(+)');
15936: d(fnd_log.level_statement,'Rule ID','p_rule_id ');
15937: l(' ');
15938: l(' IF (p_attrib_name1 IS NOT NULL) THEN ');
15939: l(' l_attrib_id1 := get_attrib_id(p_attrib_name1); ');
15932: l(' l_attrib_id19 NUMBER; ');
15933: l(' l_attrib_id20 NUMBER; ');
15934: l(' BEGIN');
15935: d(fnd_log.level_procedure,'call_api_dynamic_names(+)');
15936: d(fnd_log.level_statement,'Rule ID','p_rule_id ');
15937: l(' ');
15938: l(' IF (p_attrib_name1 IS NOT NULL) THEN ');
15939: l(' l_attrib_id1 := get_attrib_id(p_attrib_name1); ');
15940: l(' END IF; ');
16008: l(' p_attrib_val11,p_attrib_val12,p_attrib_val13,p_attrib_val14,p_attrib_val15, ');
16009: l(' p_attrib_val16,p_attrib_val17,p_attrib_val18,p_attrib_val19,p_attrib_val20, ');
16010: l(' p_restrict_sql,p_api_name,p_match_type,p_party_id,p_search_merged, ');
16011: l(' x_search_ctx_id,x_num_matches, x_return_status, x_msg_count, x_msg_data); ');
16012: d(fnd_log.level_procedure,'call_api_dynamic_names(-)');
16013: gen_exception_block;
16014: l(' END call_api_dynamic_names; ');
16015:
16016: END gen_call_api_dynamic_names;