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;
3151: END IF;
3152: l(' total NUMBER := 0;');
3153: l(' BEGIN');
3154: ldbg_s('-----------------','calling the function get_party_score');
3155: d(fnd_log.level_procedure,'GET_PARTY_SCORE ');
3156: l(' IF g_score_until_thresh AND (total)>=g_thres_score THEN');
3157: ldbg_sv('get_party_score returned total = ', 'total');
3158: l(' RETURN total;');
3159: l(' END IF;');
5036: l(' push_eval;');
5037: l(' RETURN;');
5038: l(' END IF;');
5039: l(' END IF;');
5040: ds(fnd_log.level_statement);
5041: dc(fnd_log.level_statement,'In eval_party_level l_party_id = ','l_party_id');
5042: dc(fnd_log.level_statement,'In eval_party_level l_score = ','l_score');
5043: de;
5044: l(' END LOOP;');
5037: l(' RETURN;');
5038: l(' END IF;');
5039: l(' END IF;');
5040: ds(fnd_log.level_statement);
5041: dc(fnd_log.level_statement,'In eval_party_level l_party_id = ','l_party_id');
5042: dc(fnd_log.level_statement,'In eval_party_level l_score = ','l_score');
5043: de;
5044: l(' END LOOP;');
5045: ldbg_s('===========END of LOOP=====================');
5038: l(' END IF;');
5039: l(' END IF;');
5040: ds(fnd_log.level_statement);
5041: dc(fnd_log.level_statement,'In eval_party_level l_party_id = ','l_party_id');
5042: dc(fnd_log.level_statement,'In eval_party_level l_score = ','l_score');
5043: de;
5044: l(' END LOOP;');
5045: ldbg_s('===========END of LOOP=====================');
5046: l(' CLOSE l_party_cur;');
5137: l(' h_ps_score(detcnt) := 0; ');
5138: l(' END IF; ');
5139: l(' detcnt := detcnt +1;');
5140: l(' END IF;');
5141: ds(fnd_log.level_statement);
5142: dc(fnd_log.level_statement,'In eval_party_site_level l_party_site_id = ','l_party_site_id');
5143: dc(fnd_log.level_statement,'In eval_paty_site_level l_ps_party_id = ','l_ps_party_id');
5144: dc(fnd_log.level_statement,'In eval_party_site_level l_score = ','l_score');
5145: de;
5138: l(' END IF; ');
5139: l(' detcnt := detcnt +1;');
5140: l(' END IF;');
5141: ds(fnd_log.level_statement);
5142: dc(fnd_log.level_statement,'In eval_party_site_level l_party_site_id = ','l_party_site_id');
5143: dc(fnd_log.level_statement,'In eval_paty_site_level l_ps_party_id = ','l_ps_party_id');
5144: dc(fnd_log.level_statement,'In eval_party_site_level l_score = ','l_score');
5145: de;
5146: l(' END IF;');
5139: l(' detcnt := detcnt +1;');
5140: l(' END IF;');
5141: ds(fnd_log.level_statement);
5142: dc(fnd_log.level_statement,'In eval_party_site_level l_party_site_id = ','l_party_site_id');
5143: dc(fnd_log.level_statement,'In eval_paty_site_level l_ps_party_id = ','l_ps_party_id');
5144: dc(fnd_log.level_statement,'In eval_party_site_level l_score = ','l_score');
5145: de;
5146: l(' END IF;');
5147: l(' END LOOP;');
5140: l(' END IF;');
5141: ds(fnd_log.level_statement);
5142: dc(fnd_log.level_statement,'In eval_party_site_level l_party_site_id = ','l_party_site_id');
5143: dc(fnd_log.level_statement,'In eval_paty_site_level l_ps_party_id = ','l_ps_party_id');
5144: dc(fnd_log.level_statement,'In eval_party_site_level l_score = ','l_score');
5145: de;
5146: l(' END IF;');
5147: l(' END LOOP;');
5148: ldbg_s('===========END of LOOP=====================');
5231: l(' h_ct_score(detcnt) := 0; ');
5232: l(' END IF; ');
5233: l(' detcnt := detcnt +1;');
5234: l(' END IF;');
5235: ds(fnd_log.level_statement);
5236: dc(fnd_log.level_statement,'In eval_contact_level l_org_contact_id = ','l_org_contact_id');
5237: dc(fnd_log.level_statement,'In eval_contact_level l_ct_party_id = ','l_ct_party_id');
5238: dc(fnd_log.level_statement,'In eval_contact_level l_score = ','l_score');
5239: de;
5232: l(' END IF; ');
5233: l(' detcnt := detcnt +1;');
5234: l(' END IF;');
5235: ds(fnd_log.level_statement);
5236: dc(fnd_log.level_statement,'In eval_contact_level l_org_contact_id = ','l_org_contact_id');
5237: dc(fnd_log.level_statement,'In eval_contact_level l_ct_party_id = ','l_ct_party_id');
5238: dc(fnd_log.level_statement,'In eval_contact_level l_score = ','l_score');
5239: de;
5240: l(' END LOOP;');
5233: l(' detcnt := detcnt +1;');
5234: l(' END IF;');
5235: ds(fnd_log.level_statement);
5236: dc(fnd_log.level_statement,'In eval_contact_level l_org_contact_id = ','l_org_contact_id');
5237: dc(fnd_log.level_statement,'In eval_contact_level l_ct_party_id = ','l_ct_party_id');
5238: dc(fnd_log.level_statement,'In eval_contact_level l_score = ','l_score');
5239: de;
5240: l(' END LOOP;');
5241: ldbg_s('===========END of LOOP=====================');
5234: l(' END IF;');
5235: ds(fnd_log.level_statement);
5236: dc(fnd_log.level_statement,'In eval_contact_level l_org_contact_id = ','l_org_contact_id');
5237: dc(fnd_log.level_statement,'In eval_contact_level l_ct_party_id = ','l_ct_party_id');
5238: dc(fnd_log.level_statement,'In eval_contact_level l_score = ','l_score');
5239: de;
5240: l(' END LOOP;');
5241: ldbg_s('===========END of LOOP=====================');
5242: l(' CLOSE l_contact_cur;');
5421: l(' end if;');
5422: end if;
5423:
5424: l(' END IF;');
5425: ds(fnd_log.level_statement);
5426: dc(fnd_log.level_statement,'In eval_cpt_level l_contact_pt_id = ','l_contact_pt_id');
5427: dc(fnd_log.level_statement,'In eval_cpt_level l_cpt_party_id = ','l_cpt_party_id');
5428: dc(fnd_log.level_statement,'In eval_cpt_level l_score = ','l_score');
5429: de;
5422: end if;
5423:
5424: l(' END IF;');
5425: ds(fnd_log.level_statement);
5426: dc(fnd_log.level_statement,'In eval_cpt_level l_contact_pt_id = ','l_contact_pt_id');
5427: dc(fnd_log.level_statement,'In eval_cpt_level l_cpt_party_id = ','l_cpt_party_id');
5428: dc(fnd_log.level_statement,'In eval_cpt_level l_score = ','l_score');
5429: de;
5430: l(' END IF;');
5423:
5424: l(' END IF;');
5425: ds(fnd_log.level_statement);
5426: dc(fnd_log.level_statement,'In eval_cpt_level l_contact_pt_id = ','l_contact_pt_id');
5427: dc(fnd_log.level_statement,'In eval_cpt_level l_cpt_party_id = ','l_cpt_party_id');
5428: dc(fnd_log.level_statement,'In eval_cpt_level l_score = ','l_score');
5429: de;
5430: l(' END IF;');
5431: l(' END LOOP;');
5424: l(' END IF;');
5425: ds(fnd_log.level_statement);
5426: dc(fnd_log.level_statement,'In eval_cpt_level l_contact_pt_id = ','l_contact_pt_id');
5427: dc(fnd_log.level_statement,'In eval_cpt_level l_cpt_party_id = ','l_cpt_party_id');
5428: dc(fnd_log.level_statement,'In eval_cpt_level l_score = ','l_score');
5429: de;
5430: l(' END IF;');
5431: l(' END LOOP;');
5432: ldbg_s('===========END of LOOP=====================');
5478: l(' other_acq_criteria_exists := TRUE; ');
5479: l(' ELSE');
5480: l(' other_acq_criteria_exists := FALSE; ');
5481: l(' END IF; ');
5482: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
5483: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
5484: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
5485: --End of Bug No:5218095
5486: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
5479: l(' ELSE');
5480: l(' other_acq_criteria_exists := FALSE; ');
5481: l(' END IF; ');
5482: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
5483: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
5484: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
5485: --End of Bug No:5218095
5486: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
5487: --start of Bug No:5218095
5480: l(' other_acq_criteria_exists := FALSE; ');
5481: l(' END IF; ');
5482: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
5483: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
5484: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
5485: --End of Bug No:5218095
5486: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
5487: --start of Bug No:5218095
5488: l(' IF ( call_max_score(p_index) < l_threshold) THEN ');
5525: l('');
5526:
5527: ldbg_s('--------------------------------');
5528: ldbg_s('Entering Procedure find_parties');
5529: ds(fnd_log.level_statement);
5530: dc(fnd_log.level_statement,'Input Parameters are :');
5531: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5532: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5533: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5526:
5527: ldbg_s('--------------------------------');
5528: ldbg_s('Entering Procedure find_parties');
5529: ds(fnd_log.level_statement);
5530: dc(fnd_log.level_statement,'Input Parameters are :');
5531: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5532: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5533: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5534: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5527: ldbg_s('--------------------------------');
5528: ldbg_s('Entering Procedure find_parties');
5529: ds(fnd_log.level_statement);
5530: dc(fnd_log.level_statement,'Input Parameters are :');
5531: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5532: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5533: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5534: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5535: dc(fnd_log.level_statement,'p_dup_party_id = ','p_dup_party_id');
5528: ldbg_s('Entering Procedure find_parties');
5529: ds(fnd_log.level_statement);
5530: dc(fnd_log.level_statement,'Input Parameters are :');
5531: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5532: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5533: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5534: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5535: dc(fnd_log.level_statement,'p_dup_party_id = ','p_dup_party_id');
5536: de;
5529: ds(fnd_log.level_statement);
5530: dc(fnd_log.level_statement,'Input Parameters are :');
5531: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5532: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5533: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5534: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5535: dc(fnd_log.level_statement,'p_dup_party_id = ','p_dup_party_id');
5536: de;
5537:
5530: dc(fnd_log.level_statement,'Input Parameters are :');
5531: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5532: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5533: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5534: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5535: dc(fnd_log.level_statement,'p_dup_party_id = ','p_dup_party_id');
5536: de;
5537:
5538: l(' -- ************************************');
5531: dc(fnd_log.level_statement,'p_match_type = ','p_match_type');
5532: dc(fnd_log.level_statement,'p_restrict_sql = ','p_restrict_sql');
5533: dc(fnd_log.level_statement,'p_dup_set_id = ','p_dup_set_id');
5534: dc(fnd_log.level_statement,'p_search_merged = ','p_search_merged');
5535: dc(fnd_log.level_statement,'p_dup_party_id = ','p_dup_party_id');
5536: de;
5537:
5538: l(' -- ************************************');
5539: l(' -- STEP 1. Initialization and error checks');
5650: l(' defcpt := 1;');
5651: l(' END IF;');
5652: l('');
5653:
5654: ds(fnd_log.level_statement);
5655: ldbg_s('------------------------');
5656: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5657: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5658: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5652: l('');
5653:
5654: ds(fnd_log.level_statement);
5655: ldbg_s('------------------------');
5656: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5657: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5658: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5659: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5660: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5653:
5654: ds(fnd_log.level_statement);
5655: ldbg_s('------------------------');
5656: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5657: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5658: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5659: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5660: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5661: dc(fnd_log.level_statement,'In find_parties l_search_ctx_id = ','l_search_ctx_id');
5654: ds(fnd_log.level_statement);
5655: ldbg_s('------------------------');
5656: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5657: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5658: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5659: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5660: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5661: dc(fnd_log.level_statement,'In find_parties l_search_ctx_id = ','l_search_ctx_id');
5662: de;
5655: ldbg_s('------------------------');
5656: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5657: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5658: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5659: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5660: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5661: dc(fnd_log.level_statement,'In find_parties l_search_ctx_id = ','l_search_ctx_id');
5662: de;
5663:
5656: dc(fnd_log.level_statement,'In find_parties l_match_str = ','l_match_str');
5657: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5658: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5659: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5660: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5661: dc(fnd_log.level_statement,'In find_parties l_search_ctx_id = ','l_search_ctx_id');
5662: de;
5663:
5664: IF l_max_score=1 THEN
5657: dc(fnd_log.level_statement,'In find_parties l_party_contains_str = ','l_party_contains_str');
5658: dc(fnd_log.level_statement,'In find_parties l_party_site_contains_str = ','l_party_site_contains_str');
5659: dc(fnd_log.level_statement,'In find_parties l_contact_contains_str = ','l_contact_contains_str');
5660: dc(fnd_log.level_statement,'In find_parties l_contact_pt_contains_str = ','l_contact_pt_contains_str');
5661: dc(fnd_log.level_statement,'In find_parties l_search_ctx_id = ','l_search_ctx_id');
5662: de;
5663:
5664: IF l_max_score=1 THEN
5665: ldbg_s('In find_parties l_max_score = 1');
5680: l(' do_eval(I);');
5681: l(' END LOOP;');
5682:
5683: IF l_purpose = 'S' THEN
5684: d(fnd_log.level_statement,'In find_parties. This is a Search Rule. Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
5685: ELSE
5686: d(fnd_log.level_statement,'In find_parties. This is a Duplicate Identification Rule. Evaluating Matches. Threshold : '||l_match_threshold);
5687: END IF;
5688:
5682:
5683: IF l_purpose = 'S' THEN
5684: d(fnd_log.level_statement,'In find_parties. This is a Search Rule. Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
5685: ELSE
5686: d(fnd_log.level_statement,'In find_parties. This is a Duplicate Identification Rule. Evaluating Matches. Threshold : '||l_match_threshold);
5687: END IF;
5688:
5689: l(' x_num_matches := 0;');
5690: l(' l_num_eval := 0;');
5695: l(' END IF;');
5696:
5697: l(' WHILE l_party_id IS NOT NULL LOOP');
5698: l(' l_num_eval:= l_num_eval+1;');
5699: ds(fnd_log.level_statement);
5700: ldbg_s('----------------------');
5701: dc(fnd_log.level_statement,'In find_parties Match Party ID = ','H_SCORES(l_party_id).PARTY_ID');
5702: IF l_purpose = 'S' THEN
5703: dc(fnd_log.level_statement,'In find_parties Score = ','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
5697: l(' WHILE l_party_id IS NOT NULL LOOP');
5698: l(' l_num_eval:= l_num_eval+1;');
5699: ds(fnd_log.level_statement);
5700: ldbg_s('----------------------');
5701: dc(fnd_log.level_statement,'In find_parties Match Party ID = ','H_SCORES(l_party_id).PARTY_ID');
5702: IF l_purpose = 'S' THEN
5703: dc(fnd_log.level_statement,'In find_parties Score = ','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
5704: ELSE
5705: dc(fnd_log.level_statement,'In find_parties Score = ','H_SCORES(l_party_id).TOTAL_SCORE');
5699: ds(fnd_log.level_statement);
5700: ldbg_s('----------------------');
5701: dc(fnd_log.level_statement,'In find_parties Match Party ID = ','H_SCORES(l_party_id).PARTY_ID');
5702: IF l_purpose = 'S' THEN
5703: dc(fnd_log.level_statement,'In find_parties Score = ','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
5704: ELSE
5705: dc(fnd_log.level_statement,'In find_parties Score = ','H_SCORES(l_party_id).TOTAL_SCORE');
5706: END IF;
5707: de;
5701: dc(fnd_log.level_statement,'In find_parties Match Party ID = ','H_SCORES(l_party_id).PARTY_ID');
5702: IF l_purpose = 'S' THEN
5703: dc(fnd_log.level_statement,'In find_parties Score = ','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
5704: ELSE
5705: dc(fnd_log.level_statement,'In find_parties Score = ','H_SCORES(l_party_id).TOTAL_SCORE');
5706: END IF;
5707: de;
5708: IF l_purpose = 'S' THEN
5709: ldbg_s('In find_parties inserting Search Rule results into HZ_MATCHED_PARTIES_GT');
5764: ELSE ---Start of Code Change for Match Rule Set
5765: l(' BEGIN');
5766: l('');
5767:
5768: d(fnd_log.level_procedure,'find_parties(+)');
5769: ds(fnd_log.level_statement);
5770: dc(fnd_log.level_statement,'Input Parameters:');
5771: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5772: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5765: l(' BEGIN');
5766: l('');
5767:
5768: d(fnd_log.level_procedure,'find_parties(+)');
5769: ds(fnd_log.level_statement);
5770: dc(fnd_log.level_statement,'Input Parameters:');
5771: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5772: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5773: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5766: l('');
5767:
5768: d(fnd_log.level_procedure,'find_parties(+)');
5769: ds(fnd_log.level_statement);
5770: dc(fnd_log.level_statement,'Input Parameters:');
5771: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5772: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5773: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5774: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5767:
5768: d(fnd_log.level_procedure,'find_parties(+)');
5769: ds(fnd_log.level_statement);
5770: dc(fnd_log.level_statement,'Input Parameters:');
5771: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5772: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5773: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5774: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5775: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
5768: d(fnd_log.level_procedure,'find_parties(+)');
5769: ds(fnd_log.level_statement);
5770: dc(fnd_log.level_statement,'Input Parameters:');
5771: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5772: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5773: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5774: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5775: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
5776: de;
5769: ds(fnd_log.level_statement);
5770: dc(fnd_log.level_statement,'Input Parameters:');
5771: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5772: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5773: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5774: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5775: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
5776: de;
5777: pop_conditions(p_rule_id,'find_parties','p_rule_id,p_party_search_rec,p_party_site_list,
5770: dc(fnd_log.level_statement,'Input Parameters:');
5771: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5772: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5773: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5774: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5775: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
5776: de;
5777: pop_conditions(p_rule_id,'find_parties','p_rule_id,p_party_search_rec,p_party_site_list,
5778: p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,p_dup_party_id,
5771: dc(fnd_log.level_statement,'p_match_type','p_match_type');
5772: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
5773: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
5774: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
5775: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
5776: de;
5777: pop_conditions(p_rule_id,'find_parties','p_rule_id,p_party_search_rec,p_party_site_list,
5778: p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,p_dup_party_id,
5779: p_dup_set_id,p_dup_batch_id,p_ins_details,x_search_ctx_id,x_num_matches','PARTY');
5777: pop_conditions(p_rule_id,'find_parties','p_rule_id,p_party_search_rec,p_party_site_list,
5778: p_contact_list,p_contact_point_list,p_restrict_sql,p_match_type,p_search_merged,p_dup_party_id,
5779: p_dup_set_id,p_dup_batch_id,p_ins_details,x_search_ctx_id,x_num_matches','PARTY');
5780:
5781: d(fnd_log.level_procedure,'find_parties(-)');
5782: l('EXCEPTION');
5783:
5784: END IF; ---End of Code Change for Match Rule Set
5785:
6049: l(' push_eval;');
6050: l(' RETURN;');
6051: l(' END IF;');
6052: l(' END IF;');
6053: ds(fnd_log.level_statement);
6054: dc(fnd_log.level_statement,'Party Level Matches');
6055: dc(fnd_log.level_statement,'l_party_id','l_party_id');
6056: dc(fnd_log.level_statement,'l_score','l_score');
6057: de;
6050: l(' RETURN;');
6051: l(' END IF;');
6052: l(' END IF;');
6053: ds(fnd_log.level_statement);
6054: dc(fnd_log.level_statement,'Party Level Matches');
6055: dc(fnd_log.level_statement,'l_party_id','l_party_id');
6056: dc(fnd_log.level_statement,'l_score','l_score');
6057: de;
6058: l(' END LOOP;');
6051: l(' END IF;');
6052: l(' END IF;');
6053: ds(fnd_log.level_statement);
6054: dc(fnd_log.level_statement,'Party Level Matches');
6055: dc(fnd_log.level_statement,'l_party_id','l_party_id');
6056: dc(fnd_log.level_statement,'l_score','l_score');
6057: de;
6058: l(' END LOOP;');
6059: l(' CLOSE l_party_cur;');
6052: l(' END IF;');
6053: ds(fnd_log.level_statement);
6054: dc(fnd_log.level_statement,'Party Level Matches');
6055: dc(fnd_log.level_statement,'l_party_id','l_party_id');
6056: dc(fnd_log.level_statement,'l_score','l_score');
6057: de;
6058: l(' END LOOP;');
6059: l(' CLOSE l_party_cur;');
6060: l(' ROLLBACK to eval_start;');
6178: l(' h_ps_score(detcnt) := 0; ');
6179: l(' END IF; ');
6180: l(' detcnt := detcnt +1;');
6181: l(' END IF;');
6182: ds(fnd_log.level_statement);
6183: dc(fnd_log.level_statement,'Party Site Level Matches');
6184: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
6185: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
6186: dc(fnd_log.level_statement,'l_score','l_score');
6179: l(' END IF; ');
6180: l(' detcnt := detcnt +1;');
6181: l(' END IF;');
6182: ds(fnd_log.level_statement);
6183: dc(fnd_log.level_statement,'Party Site Level Matches');
6184: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
6185: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
6186: dc(fnd_log.level_statement,'l_score','l_score');
6187: de;
6180: l(' detcnt := detcnt +1;');
6181: l(' END IF;');
6182: ds(fnd_log.level_statement);
6183: dc(fnd_log.level_statement,'Party Site Level Matches');
6184: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
6185: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
6186: dc(fnd_log.level_statement,'l_score','l_score');
6187: de;
6188: l(' END IF;');
6181: l(' END IF;');
6182: ds(fnd_log.level_statement);
6183: dc(fnd_log.level_statement,'Party Site Level Matches');
6184: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
6185: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
6186: dc(fnd_log.level_statement,'l_score','l_score');
6187: de;
6188: l(' END IF;');
6189: l(' END LOOP;');
6182: ds(fnd_log.level_statement);
6183: dc(fnd_log.level_statement,'Party Site Level Matches');
6184: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
6185: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
6186: dc(fnd_log.level_statement,'l_score','l_score');
6187: de;
6188: l(' END IF;');
6189: l(' END LOOP;');
6190: l(' CLOSE l_party_site_cur;');
6237: l(' h_ct_score(detcnt) := 0; ');
6238: l(' END IF; ');
6239: l(' detcnt := detcnt +1;');
6240: l(' END IF;');
6241: ds(fnd_log.level_statement);
6242: dc(fnd_log.level_statement,'Contact Level Matches');
6243: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
6244: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
6245: dc(fnd_log.level_statement,'l_score','l_score');
6238: l(' END IF; ');
6239: l(' detcnt := detcnt +1;');
6240: l(' END IF;');
6241: ds(fnd_log.level_statement);
6242: dc(fnd_log.level_statement,'Contact Level Matches');
6243: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
6244: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
6245: dc(fnd_log.level_statement,'l_score','l_score');
6246: de;
6239: l(' detcnt := detcnt +1;');
6240: l(' END IF;');
6241: ds(fnd_log.level_statement);
6242: dc(fnd_log.level_statement,'Contact Level Matches');
6243: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
6244: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
6245: dc(fnd_log.level_statement,'l_score','l_score');
6246: de;
6247: l(' END LOOP;');
6240: l(' END IF;');
6241: ds(fnd_log.level_statement);
6242: dc(fnd_log.level_statement,'Contact Level Matches');
6243: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
6244: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
6245: dc(fnd_log.level_statement,'l_score','l_score');
6246: de;
6247: l(' END LOOP;');
6248: l(' CLOSE l_contact_cur;');
6241: ds(fnd_log.level_statement);
6242: dc(fnd_log.level_statement,'Contact Level Matches');
6243: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
6244: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
6245: dc(fnd_log.level_statement,'l_score','l_score');
6246: de;
6247: l(' END LOOP;');
6248: l(' CLOSE l_contact_cur;');
6249: l(' ROLLBACK to eval_start;');
6432: l(' end if;');
6433: end if;
6434:
6435: l(' END IF;');
6436: ds(fnd_log.level_statement);
6437: dc(fnd_log.level_statement,'Contact pt Level Matches');
6438: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
6439: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
6440: dc(fnd_log.level_statement,'l_score','l_score');
6433: end if;
6434:
6435: l(' END IF;');
6436: ds(fnd_log.level_statement);
6437: dc(fnd_log.level_statement,'Contact pt Level Matches');
6438: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
6439: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
6440: dc(fnd_log.level_statement,'l_score','l_score');
6441: de;
6434:
6435: l(' END IF;');
6436: ds(fnd_log.level_statement);
6437: dc(fnd_log.level_statement,'Contact pt Level Matches');
6438: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
6439: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
6440: dc(fnd_log.level_statement,'l_score','l_score');
6441: de;
6442: l(' END IF;');
6435: l(' END IF;');
6436: ds(fnd_log.level_statement);
6437: dc(fnd_log.level_statement,'Contact pt Level Matches');
6438: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
6439: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
6440: dc(fnd_log.level_statement,'l_score','l_score');
6441: de;
6442: l(' END IF;');
6443: l(' END LOOP;');
6436: ds(fnd_log.level_statement);
6437: dc(fnd_log.level_statement,'Contact pt Level Matches');
6438: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
6439: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
6440: dc(fnd_log.level_statement,'l_score','l_score');
6441: de;
6442: l(' END IF;');
6443: l(' END LOOP;');
6444: l(' CLOSE l_contact_pt_cur;');
6487: l(' other_acq_criteria_exists := TRUE; ');
6488: l(' ELSE');
6489: l(' other_acq_criteria_exists := FALSE; ');
6490: l(' END IF; ');
6491: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
6492: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
6493: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
6494: --End of Bug No:5218095
6495: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
6488: l(' ELSE');
6489: l(' other_acq_criteria_exists := FALSE; ');
6490: l(' END IF; ');
6491: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
6492: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
6493: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
6494: --End of Bug No:5218095
6495: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
6496: --start of Bug No:5218095
6489: l(' other_acq_criteria_exists := FALSE; ');
6490: l(' END IF; ');
6491: dc(fnd_log.level_statement,'count of entities having acquisition attributes = ','acq_cnt');
6492: dc(fnd_log.level_statement,'call_max_score(p_index) = ','call_max_score(p_index)');
6493: dc(fnd_log.level_statement,'l_threshold = ','l_threshold');
6494: --End of Bug No:5218095
6495: l(' IF(l_match_str = '' AND '' AND other_acq_criteria_exists) THEN');
6496: --start of Bug No:5218095
6497: l(' IF ( call_max_score(p_index) < l_threshold) THEN ');
6531: l(' BEGIN');
6532: l('');
6533:
6534:
6535: d(fnd_log.level_procedure,'find_persons(+)');
6536: ds(fnd_log.level_statement);
6537: dc(fnd_log.level_statement,'Input Parameters:');
6538: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6539: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6532: l('');
6533:
6534:
6535: d(fnd_log.level_procedure,'find_persons(+)');
6536: ds(fnd_log.level_statement);
6537: dc(fnd_log.level_statement,'Input Parameters:');
6538: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6539: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6540: de;
6533:
6534:
6535: d(fnd_log.level_procedure,'find_persons(+)');
6536: ds(fnd_log.level_statement);
6537: dc(fnd_log.level_statement,'Input Parameters:');
6538: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6539: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6540: de;
6541:
6534:
6535: d(fnd_log.level_procedure,'find_persons(+)');
6536: ds(fnd_log.level_statement);
6537: dc(fnd_log.level_statement,'Input Parameters:');
6538: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6539: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6540: de;
6541:
6542: l(' -- ************************************');
6535: d(fnd_log.level_procedure,'find_persons(+)');
6536: ds(fnd_log.level_statement);
6537: dc(fnd_log.level_statement,'Input Parameters:');
6538: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6539: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6540: de;
6541:
6542: l(' -- ************************************');
6543: l(' -- STEP 1. Initialization and error checks');
6587: l(' defcpt := 1;');
6588: l(' END IF;');
6589: l('');
6590:
6591: ds(fnd_log.level_statement);
6592: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6593: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6594: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6595: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6588: l(' END IF;');
6589: l('');
6590:
6591: ds(fnd_log.level_statement);
6592: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6593: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6594: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6595: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6596: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6589: l('');
6590:
6591: ds(fnd_log.level_statement);
6592: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6593: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6594: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6595: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6596: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6597: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
6590:
6591: ds(fnd_log.level_statement);
6592: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6593: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6594: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6595: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6596: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6597: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
6598: de;
6591: ds(fnd_log.level_statement);
6592: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6593: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6594: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6595: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6596: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6597: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
6598: de;
6599:
6592: dc(fnd_log.level_statement,'l_match_str','l_match_str');
6593: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6594: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6595: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6596: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6597: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
6598: de;
6599:
6600: /**** Call all 4 evaluation procedures ***********/
6593: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
6594: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
6595: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
6596: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
6597: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
6598: de;
6599:
6600: /**** Call all 4 evaluation procedures ***********/
6601: l(' FOR I in 1..5 LOOP');
6603: l(' END LOOP;');
6604: l(' IF l_contact_contains_str IS NOT NULL THEN');
6605: l(' eval_contact_level(l_contact_contains_str,p_ins_details,l_contact_max_score);');
6606: l(' END IF;');
6607: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
6608:
6609: l(' x_num_matches := 0;');
6610: l(' l_num_eval := 0;');
6611: l(' IF l_match_str = '' OR '' THEN');
6616:
6617:
6618: l(' WHILE l_party_id IS NOT NULL LOOP');
6619: l(' l_num_eval:= l_num_eval+1;');
6620: ds(fnd_log.level_statement);
6621: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
6622: IF l_purpose = 'S' THEN
6623: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
6624: ELSE
6617:
6618: l(' WHILE l_party_id IS NOT NULL LOOP');
6619: l(' l_num_eval:= l_num_eval+1;');
6620: ds(fnd_log.level_statement);
6621: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
6622: IF l_purpose = 'S' THEN
6623: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
6624: ELSE
6625: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
6619: l(' l_num_eval:= l_num_eval+1;');
6620: ds(fnd_log.level_statement);
6621: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
6622: IF l_purpose = 'S' THEN
6623: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
6624: ELSE
6625: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
6626: END IF;
6627: de;
6621: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
6622: IF l_purpose = 'S' THEN
6623: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
6624: ELSE
6625: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
6626: END IF;
6627: de;
6628: IF l_purpose = 'S' THEN
6629: l(' IF (H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
6670: l(' END IF;');
6671: l(' END LOOP;');
6672:
6673: l(' HZ_DQM_SEARCH_UTIL.set_num_eval(l_num_eval);');
6674: d(fnd_log.level_procedure,'find_persons(-)');
6675:
6676:
6677: l('EXCEPTION');
6678: l(' WHEN L_RETURN_IMM_EXC THEN');
6690: l('END find_persons;');
6691: l('');
6692: ELSE ---Start of Code Change for Match Rule Set
6693: l('BEGIN');
6694: d(fnd_log.level_procedure,'find_persons(+)');
6695: ds(fnd_log.level_statement);
6696: dc(fnd_log.level_statement,'Input Parameters:');
6697: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6698: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6691: l('');
6692: ELSE ---Start of Code Change for Match Rule Set
6693: l('BEGIN');
6694: d(fnd_log.level_procedure,'find_persons(+)');
6695: ds(fnd_log.level_statement);
6696: dc(fnd_log.level_statement,'Input Parameters:');
6697: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6698: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6699: de;
6692: ELSE ---Start of Code Change for Match Rule Set
6693: l('BEGIN');
6694: d(fnd_log.level_procedure,'find_persons(+)');
6695: ds(fnd_log.level_statement);
6696: dc(fnd_log.level_statement,'Input Parameters:');
6697: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6698: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6699: de;
6700: 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');
6693: l('BEGIN');
6694: d(fnd_log.level_procedure,'find_persons(+)');
6695: ds(fnd_log.level_statement);
6696: dc(fnd_log.level_statement,'Input Parameters:');
6697: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6698: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6699: de;
6700: 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');
6701: d(fnd_log.level_procedure,'find_persons(-)');
6694: d(fnd_log.level_procedure,'find_persons(+)');
6695: ds(fnd_log.level_statement);
6696: dc(fnd_log.level_statement,'Input Parameters:');
6697: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6698: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6699: de;
6700: 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');
6701: d(fnd_log.level_procedure,'find_persons(-)');
6702: l('EXCEPTION');
6697: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6698: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6699: de;
6700: 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');
6701: d(fnd_log.level_procedure,'find_persons(-)');
6702: l('EXCEPTION');
6703: l(' WHEN FND_API.G_EXC_ERROR THEN');
6704: l(' RAISE FND_API.G_EXC_ERROR;');
6705: l(' WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN');
6748: l('');
6749: l(' BEGIN');
6750:
6751:
6752: d(fnd_log.level_procedure,'find_party_details(+)');
6753: ds(fnd_log.level_statement);
6754: dc(fnd_log.level_statement,'Input Parameters:');
6755: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6756: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6749: l(' BEGIN');
6750:
6751:
6752: d(fnd_log.level_procedure,'find_party_details(+)');
6753: ds(fnd_log.level_statement);
6754: dc(fnd_log.level_statement,'Input Parameters:');
6755: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6756: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6757: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6750:
6751:
6752: d(fnd_log.level_procedure,'find_party_details(+)');
6753: ds(fnd_log.level_statement);
6754: dc(fnd_log.level_statement,'Input Parameters:');
6755: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6756: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6757: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6758: de;
6751:
6752: d(fnd_log.level_procedure,'find_party_details(+)');
6753: ds(fnd_log.level_statement);
6754: dc(fnd_log.level_statement,'Input Parameters:');
6755: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6756: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6757: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6758: de;
6759:
6752: d(fnd_log.level_procedure,'find_party_details(+)');
6753: ds(fnd_log.level_statement);
6754: dc(fnd_log.level_statement,'Input Parameters:');
6755: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6756: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6757: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6758: de;
6759:
6760: l(' find_parties(p_rule_id,p_party_search_rec,p_party_site_list, p_contact_list, p_contact_point_list,');
6753: ds(fnd_log.level_statement);
6754: dc(fnd_log.level_statement,'Input Parameters:');
6755: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6756: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6757: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6758: de;
6759:
6760: l(' find_parties(p_rule_id,p_party_search_rec,p_party_site_list, p_contact_list, p_contact_point_list,');
6761: l(' p_restrict_sql,p_match_type,p_search_merged,null,null, null,''Y'',');
6769: l(' DELETE FROM HZ_MATCHED_CPTS_GT cpt WHERE SEARCH_CONTEXT_ID = x_search_ctx_id ');
6770: l(' AND NOT EXISTS ');
6771: l(' (SELECT 1 FROM HZ_MATCHED_PARTIES_GT p WHERE SEARCH_CONTEXT_ID = x_search_ctx_id AND p.PARTY_ID = cpt.PARTY_ID);');
6772:
6773: d(fnd_log.level_procedure,'find_party_details(-)');
6774:
6775:
6776: l('EXCEPTION');
6777: l(' WHEN FND_API.G_EXC_ERROR THEN');
6811: l(' l_use_contact_cpt_flag VARCHAR2(1) := ''Y'';');
6812: l('');
6813: l('BEGIN');
6814: l('');
6815: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
6816: ds(fnd_log.level_statement);
6817: dc(fnd_log.level_statement,'Input Parameters:');
6818: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6819: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6812: l('');
6813: l('BEGIN');
6814: l('');
6815: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
6816: ds(fnd_log.level_statement);
6817: dc(fnd_log.level_statement,'Input Parameters:');
6818: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6819: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6820: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6813: l('BEGIN');
6814: l('');
6815: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
6816: ds(fnd_log.level_statement);
6817: dc(fnd_log.level_statement,'Input Parameters:');
6818: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6819: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6820: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6821: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6814: l('');
6815: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
6816: ds(fnd_log.level_statement);
6817: dc(fnd_log.level_statement,'Input Parameters:');
6818: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6819: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6820: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6821: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6822: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6815: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
6816: ds(fnd_log.level_statement);
6817: dc(fnd_log.level_statement,'Input Parameters:');
6818: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6819: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6820: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6821: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6822: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6823: de;
6816: ds(fnd_log.level_statement);
6817: dc(fnd_log.level_statement,'Input Parameters:');
6818: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6819: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6820: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6821: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6822: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6823: de;
6824: l('');
6817: dc(fnd_log.level_statement,'Input Parameters:');
6818: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6819: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6820: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6821: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6822: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6823: de;
6824: l('');
6825: l(' --Fix for bug 4417124 ');
6818: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6819: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6820: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6821: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
6822: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
6823: de;
6824: l('');
6825: l(' --Fix for bug 4417124 ');
6826: l('');
6887: l(' hz_utility_pub.user_id,p_dup_batch_id);'); --Bug No: 4244529
6888: l(' ELSE');
6889: l(' x_dup_set_id := NULL;');
6890: l(' END IF;');
6891: d(fnd_log.level_procedure,'find_duplicate_parties(-)');
6892:
6893:
6894: l('EXCEPTION');
6895: l(' WHEN FND_API.G_EXC_ERROR THEN');
6936:
6937: l(' BEGIN ');
6938:
6939:
6940: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
6941: ds(fnd_log.level_statement);
6942: dc(fnd_log.level_statement,'Input Parameters:');
6943: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6944: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6937: l(' BEGIN ');
6938:
6939:
6940: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
6941: ds(fnd_log.level_statement);
6942: dc(fnd_log.level_statement,'Input Parameters:');
6943: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6944: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6945: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6938:
6939:
6940: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
6941: ds(fnd_log.level_statement);
6942: dc(fnd_log.level_statement,'Input Parameters:');
6943: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6944: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6945: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6946: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6939:
6940: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
6941: ds(fnd_log.level_statement);
6942: dc(fnd_log.level_statement,'Input Parameters:');
6943: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6944: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6945: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6946: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6947: de;
6940: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
6941: ds(fnd_log.level_statement);
6942: dc(fnd_log.level_statement,'Input Parameters:');
6943: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6944: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6945: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6946: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6947: de;
6948:
6941: ds(fnd_log.level_statement);
6942: dc(fnd_log.level_statement,'Input Parameters:');
6943: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6944: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6945: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6946: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6947: de;
6948:
6949: l(' p_party_site_list(1) := p_party_site_id; ');
6942: dc(fnd_log.level_statement,'Input Parameters:');
6943: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
6944: dc(fnd_log.level_statement,'p_party_id','p_party_id');
6945: dc(fnd_log.level_statement,'p_match_type','p_match_type');
6946: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
6947: de;
6948:
6949: l(' p_party_site_list(1) := p_party_site_id; ');
6950: l(' OPEN get_cpts_for_party_sites;');
6980: l(' p_match_type, ');
6981: l(' p_party_site_id, ');
6982: l(' x_search_ctx_id,');
6983: l(' x_num_matches);');
6984: d(fnd_log.level_procedure,'find_duplicate_party_sites(-)');
6985:
6986:
6987: l('EXCEPTION');
6988: l(' WHEN FND_API.G_EXC_ERROR THEN');
7030:
7031: l('BEGIN ');
7032:
7033:
7034: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
7035: ds(fnd_log.level_statement);
7036: dc(fnd_log.level_statement,'Input Parameters:');
7037: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7038: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7031: l('BEGIN ');
7032:
7033:
7034: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
7035: ds(fnd_log.level_statement);
7036: dc(fnd_log.level_statement,'Input Parameters:');
7037: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7038: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7039: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7032:
7033:
7034: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
7035: ds(fnd_log.level_statement);
7036: dc(fnd_log.level_statement,'Input Parameters:');
7037: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7038: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7039: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7040: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7033:
7034: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
7035: ds(fnd_log.level_statement);
7036: dc(fnd_log.level_statement,'Input Parameters:');
7037: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7038: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7039: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7040: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7041: de;
7034: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
7035: ds(fnd_log.level_statement);
7036: dc(fnd_log.level_statement,'Input Parameters:');
7037: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7038: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7039: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7040: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7041: de;
7042:
7035: ds(fnd_log.level_statement);
7036: dc(fnd_log.level_statement,'Input Parameters:');
7037: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7038: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7039: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7040: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7041: de;
7042:
7043:
7036: dc(fnd_log.level_statement,'Input Parameters:');
7037: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
7038: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7039: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7040: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7041: de;
7042:
7043:
7044: l(' p_contact_ids(1) := p_org_contact_id; ');
7076: l(' p_org_contact_id, ');
7077: l(' x_search_ctx_id, ');
7078: l(' x_num_matches);');
7079: l(' ');
7080: d(fnd_log.level_procedure,'find_duplicate_contacts(-)');
7081:
7082:
7083: l('EXCEPTION');
7084: l(' WHEN FND_API.G_EXC_ERROR THEN');
7115: l('');
7116: l('BEGIN');
7117:
7118:
7119: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
7120: ds(fnd_log.level_statement);
7121: dc(fnd_log.level_statement,'Input Parameters:');
7122: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7123: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7116: l('BEGIN');
7117:
7118:
7119: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
7120: ds(fnd_log.level_statement);
7121: dc(fnd_log.level_statement,'Input Parameters:');
7122: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7123: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7124: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7117:
7118:
7119: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
7120: ds(fnd_log.level_statement);
7121: dc(fnd_log.level_statement,'Input Parameters:');
7122: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7123: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7124: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7125: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7118:
7119: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
7120: ds(fnd_log.level_statement);
7121: dc(fnd_log.level_statement,'Input Parameters:');
7122: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7123: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7124: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7125: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7126: de;
7119: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
7120: ds(fnd_log.level_statement);
7121: dc(fnd_log.level_statement,'Input Parameters:');
7122: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7123: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7124: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7125: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7126: de;
7127:
7120: ds(fnd_log.level_statement);
7121: dc(fnd_log.level_statement,'Input Parameters:');
7122: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7123: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7124: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7125: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7126: de;
7127:
7128: l(' contact_point_ids(1) := p_contact_point_id; ');
7121: dc(fnd_log.level_statement,'Input Parameters:');
7122: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
7123: dc(fnd_log.level_statement,'p_party_id','p_party_id');
7124: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7125: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7126: de;
7127:
7128: l(' contact_point_ids(1) := p_contact_point_id; ');
7129: l(' get_search_criteria ( ');
7152: l(' p_match_type, ');
7153: l(' p_contact_point_id, ');
7154: l(' x_search_ctx_id, ');
7155: l(' x_num_matches ); ');
7156: d(fnd_log.level_procedure,'find_duplicate_contact_points(-)');
7157:
7158:
7159: l('EXCEPTION');
7160: l(' WHEN FND_API.G_EXC_ERROR THEN');
7294: l(' FIRST BOOLEAN := TRUE; ');
7295: l('');
7296: l('BEGIN');
7297:
7298: d(fnd_log.level_procedure,'call_api_dynamic(+)');
7299: l('');
7300: FOR I in 1..20 LOOP
7301: l(' IF p_attrib_id'||I||' IS NOT NULL THEN');
7302: l(' AttrVals(p_attrib_id'||I||'):=p_attrib_val'||I||';');
7320: AND s.attribute_id = a.attribute_id) LOOP
7321: l(' IF AttrVals.EXISTS('||ATTRS.attribute_id||') THEN');
7322: IF ATTRS.entity_name='PARTY' THEN
7323: l(' l_party_rec.'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7324: d(fnd_log.level_statement,'l_party_rec.'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7325: ELSIF ATTRS.entity_name='PARTY_SITES' THEN
7326: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7327: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7328: ELSIF ATTRS.entity_name='CONTACTS' THEN
7323: l(' l_party_rec.'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7324: d(fnd_log.level_statement,'l_party_rec.'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7325: ELSIF ATTRS.entity_name='PARTY_SITES' THEN
7326: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7327: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7328: ELSIF ATTRS.entity_name='CONTACTS' THEN
7329: l(' l_contact_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7330: d(fnd_log.level_statement,'l_contact_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7331: ELSIF ATTRS.entity_name='CONTACT_POINTS' THEN
7326: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7327: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7328: ELSIF ATTRS.entity_name='CONTACTS' THEN
7329: l(' l_contact_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7330: d(fnd_log.level_statement,'l_contact_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7331: ELSIF ATTRS.entity_name='CONTACT_POINTS' THEN
7332: BEGIN
7333: SELECT tag INTO l_cpt_type FROM fnd_lookup_values
7334: WHERE lookup_type = 'HZ_DQM_CPT_ATTR_TYPE'
7344: l(' FOR I in 1..l_cpt_list.COUNT LOOP');
7345: l(' IF l_cpt_list(I).CONTACT_POINT_TYPE=l_cpt_type THEN');
7346: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7347: l(' FIRST := TRUE;');
7348: ds(fnd_log.level_statement);
7349: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
7350: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7351: de;
7352: l(' END IF;');
7345: l(' IF l_cpt_list(I).CONTACT_POINT_TYPE=l_cpt_type THEN');
7346: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7347: l(' FIRST := TRUE;');
7348: ds(fnd_log.level_statement);
7349: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
7350: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7351: de;
7352: l(' END IF;');
7353: l(' END LOOP;');
7346: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7347: l(' FIRST := TRUE;');
7348: ds(fnd_log.level_statement);
7349: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
7350: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7351: de;
7352: l(' END IF;');
7353: l(' END LOOP;');
7354: l(' IF not FIRST THEN');
7354: l(' IF not FIRST THEN');
7355: l(' l_idx := l_cpt_list.COUNT+1;');
7356: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
7357: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7358: ds(fnd_log.level_statement);
7359: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
7360: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7361: de;
7362: l(' END IF;');
7355: l(' l_idx := l_cpt_list.COUNT+1;');
7356: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
7357: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7358: ds(fnd_log.level_statement);
7359: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
7360: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7361: de;
7362: l(' END IF;');
7363: END IF;
7356: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
7357: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
7358: ds(fnd_log.level_statement);
7359: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
7360: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
7361: de;
7362: l(' END IF;');
7363: END IF;
7364: l(' END IF;');
7394: l(' get_matching_contact_points(p_rule_id,p_party_id, l_cpt_list,');
7395: l(' p_restrict_sql,p_match_type,NULL,');
7396: l(' x_search_ctx_id,x_num_matches);');
7397: l(' END IF;');
7398: d(fnd_log.level_procedure,'call_api_dynamic(-)');
7399:
7400:
7401: l('EXCEPTION');
7402: l(' WHEN FND_API.G_EXC_ERROR THEN');
7494: l(' ');
7495: l(' BEGIN');
7496:
7497:
7498: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7499: ds(fnd_log.level_statement);
7500: dc(fnd_log.level_statement,'Input Parameters:');
7501: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7502: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7495: l(' BEGIN');
7496:
7497:
7498: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7499: ds(fnd_log.level_statement);
7500: dc(fnd_log.level_statement,'Input Parameters:');
7501: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7502: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7503: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7496:
7497:
7498: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7499: ds(fnd_log.level_statement);
7500: dc(fnd_log.level_statement,'Input Parameters:');
7501: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7502: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7503: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7504: de;
7497:
7498: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7499: ds(fnd_log.level_statement);
7500: dc(fnd_log.level_statement,'Input Parameters:');
7501: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7502: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7503: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7504: de;
7505: l('');
7498: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7499: ds(fnd_log.level_statement);
7500: dc(fnd_log.level_statement,'Input Parameters:');
7501: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7502: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7503: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7504: de;
7505: l('');
7506: l(' -- ************************************');
7499: ds(fnd_log.level_statement);
7500: dc(fnd_log.level_statement,'Input Parameters:');
7501: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7502: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7503: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7504: de;
7505: l('');
7506: l(' -- ************************************');
7507: l(' -- STEP 1. Initialization and error checks');
7528: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
7529: l(' x_search_ctx_id := l_search_ctx_id;');
7530: l('');
7531:
7532: ds(fnd_log.level_statement);
7533: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7534: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
7535: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7536: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7529: l(' x_search_ctx_id := l_search_ctx_id;');
7530: l('');
7531:
7532: ds(fnd_log.level_statement);
7533: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7534: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
7535: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7536: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7537: de;
7530: l('');
7531:
7532: ds(fnd_log.level_statement);
7533: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7534: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
7535: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7536: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7537: de;
7538:
7531:
7532: ds(fnd_log.level_statement);
7533: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7534: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
7535: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7536: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7537: de;
7538:
7539: l(' IF l_party_site_contains_str IS NULL THEN');
7532: ds(fnd_log.level_statement);
7533: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7534: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
7535: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7536: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7537: de;
7538:
7539: l(' IF l_party_site_contains_str IS NULL THEN');
7540: l(' defps := 1;');
7556: l(' l_match_ps_list(l_cnt):= l_party_site_id ;');
7557: l(' l_cnt:=l_cnt+1;');
7558: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
7559: 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);');
7560: ds(fnd_log.level_statement);
7561: dc(fnd_log.level_statement,'Party Site Level Matches');
7562: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
7563: dc(fnd_log.level_statement,'l_score','l_score');
7564: de;
7557: l(' l_cnt:=l_cnt+1;');
7558: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
7559: 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);');
7560: ds(fnd_log.level_statement);
7561: dc(fnd_log.level_statement,'Party Site Level Matches');
7562: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
7563: dc(fnd_log.level_statement,'l_score','l_score');
7564: de;
7565:
7558: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
7559: 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);');
7560: ds(fnd_log.level_statement);
7561: dc(fnd_log.level_statement,'Party Site Level Matches');
7562: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
7563: dc(fnd_log.level_statement,'l_score','l_score');
7564: de;
7565:
7566: l(' END IF; ');
7559: 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);');
7560: ds(fnd_log.level_statement);
7561: dc(fnd_log.level_statement,'Party Site Level Matches');
7562: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
7563: dc(fnd_log.level_statement,'l_score','l_score');
7564: de;
7565:
7566: l(' END IF; ');
7567: l(' END LOOP;');
7611: 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);');
7612: l(' END IF;');
7613: l(' END IF;');
7614: l(' END IF; ');
7615: ds(fnd_log.level_statement);
7616: dc(fnd_log.level_statement,'Contact_point Level Matches');
7617: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
7618: dc(fnd_log.level_statement,'l_score','l_score');
7619: de;
7612: l(' END IF;');
7613: l(' END IF;');
7614: l(' END IF; ');
7615: ds(fnd_log.level_statement);
7616: dc(fnd_log.level_statement,'Contact_point Level Matches');
7617: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
7618: dc(fnd_log.level_statement,'l_score','l_score');
7619: de;
7620: l(' END LOOP;');
7613: l(' END IF;');
7614: l(' END IF; ');
7615: ds(fnd_log.level_statement);
7616: dc(fnd_log.level_statement,'Contact_point Level Matches');
7617: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
7618: dc(fnd_log.level_statement,'l_score','l_score');
7619: de;
7620: l(' END LOOP;');
7621: l(' CLOSE l_contact_pt_cur;');
7614: l(' END IF; ');
7615: ds(fnd_log.level_statement);
7616: dc(fnd_log.level_statement,'Contact_point Level Matches');
7617: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
7618: dc(fnd_log.level_statement,'l_score','l_score');
7619: de;
7620: l(' END LOOP;');
7621: l(' CLOSE l_contact_pt_cur;');
7622: l(' ROLLBACK TO eval_start;');
7622: l(' ROLLBACK TO eval_start;');
7623: l(' END IF;');
7624: l(' x_num_matches := 0;');
7625: l(' l_party_site_id := H_SCORES.FIRST;');
7626: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7627: l(' WHILE l_party_site_id IS NOT NULL LOOP');
7628: ds(fnd_log.level_statement);
7629: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
7630: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
7624: l(' x_num_matches := 0;');
7625: l(' l_party_site_id := H_SCORES.FIRST;');
7626: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7627: l(' WHILE l_party_site_id IS NOT NULL LOOP');
7628: ds(fnd_log.level_statement);
7629: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
7630: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
7631: de;
7632: l(' IF l_match_str = '' OR '' THEN');
7625: l(' l_party_site_id := H_SCORES.FIRST;');
7626: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7627: l(' WHILE l_party_site_id IS NOT NULL LOOP');
7628: ds(fnd_log.level_statement);
7629: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
7630: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
7631: de;
7632: l(' IF l_match_str = '' OR '' THEN');
7633: --Start of Bug No: 4162385
7626: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7627: l(' WHILE l_party_site_id IS NOT NULL LOOP');
7628: ds(fnd_log.level_statement);
7629: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
7630: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
7631: de;
7632: l(' IF l_match_str = '' OR '' THEN');
7633: --Start of Bug No: 4162385
7634: IF l_purpose = 'D' THEN
7657: l(' END LOOP;');
7658: ELSE ---Start of Code Change for Match Rule Set
7659: l(' ');
7660: l(' BEGIN');
7661: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7662: ds(fnd_log.level_statement);
7663: dc(fnd_log.level_statement,'Input Parameters:');
7664: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7665: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7658: ELSE ---Start of Code Change for Match Rule Set
7659: l(' ');
7660: l(' BEGIN');
7661: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7662: ds(fnd_log.level_statement);
7663: dc(fnd_log.level_statement,'Input Parameters:');
7664: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7665: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7666: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7659: l(' ');
7660: l(' BEGIN');
7661: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7662: ds(fnd_log.level_statement);
7663: dc(fnd_log.level_statement,'Input Parameters:');
7664: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7665: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7666: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7667: de;
7660: l(' BEGIN');
7661: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7662: ds(fnd_log.level_statement);
7663: dc(fnd_log.level_statement,'Input Parameters:');
7664: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7665: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7666: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7667: de;
7668: l('');
7661: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
7662: ds(fnd_log.level_statement);
7663: dc(fnd_log.level_statement,'Input Parameters:');
7664: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7665: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7666: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7667: de;
7668: l('');
7669: 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');
7662: ds(fnd_log.level_statement);
7663: dc(fnd_log.level_statement,'Input Parameters:');
7664: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7665: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7666: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
7667: de;
7668: l('');
7669: 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');
7670:
7668: l('');
7669: 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');
7670:
7671: END IF; ---End of Code Change for Match Rule Set
7672: d(fnd_log.level_procedure,'get_matching_party_sites(-)');
7673:
7674: l('EXCEPTION');
7675: l(' WHEN FND_API.G_EXC_ERROR THEN');
7676: l(' RAISE FND_API.G_EXC_ERROR;');
7765: l(' ');
7766: l(' BEGIN');
7767:
7768:
7769: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7770: ds(fnd_log.level_statement);
7771: dc(fnd_log.level_statement,'Input Parameters:');
7772: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7773: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7766: l(' BEGIN');
7767:
7768:
7769: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7770: ds(fnd_log.level_statement);
7771: dc(fnd_log.level_statement,'Input Parameters:');
7772: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7773: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7774: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7767:
7768:
7769: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7770: ds(fnd_log.level_statement);
7771: dc(fnd_log.level_statement,'Input Parameters:');
7772: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7773: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7774: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7775: de;
7768:
7769: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7770: ds(fnd_log.level_statement);
7771: dc(fnd_log.level_statement,'Input Parameters:');
7772: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7773: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7774: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7775: de;
7776:
7769: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7770: ds(fnd_log.level_statement);
7771: dc(fnd_log.level_statement,'Input Parameters:');
7772: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7773: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7774: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7775: de;
7776:
7777: l('');
7770: ds(fnd_log.level_statement);
7771: dc(fnd_log.level_statement,'Input Parameters:');
7772: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7773: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7774: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7775: de;
7776:
7777: l('');
7778: l(' -- ************************************');
7800: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
7801: l(' x_search_ctx_id := l_search_ctx_id;');
7802: l('');
7803:
7804: ds(fnd_log.level_statement);
7805: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7806: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
7807: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7808: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7801: l(' x_search_ctx_id := l_search_ctx_id;');
7802: l('');
7803:
7804: ds(fnd_log.level_statement);
7805: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7806: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
7807: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7808: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7809: de;
7802: l('');
7803:
7804: ds(fnd_log.level_statement);
7805: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7806: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
7807: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7808: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7809: de;
7810:
7803:
7804: ds(fnd_log.level_statement);
7805: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7806: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
7807: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7808: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7809: de;
7810:
7811: l(' IF l_contact_contains_str IS NULL THEN');
7804: ds(fnd_log.level_statement);
7805: dc(fnd_log.level_statement,'l_match_str','l_match_str');
7806: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
7807: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
7808: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
7809: de;
7810:
7811: l(' IF l_contact_contains_str IS NULL THEN');
7812: l(' defct := 1;');
7828:
7829: l(' l_score := GET_CONTACTS_SCORE(l_match_idx'||l_c_param_list||');');
7830: 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);');
7831:
7832: ds(fnd_log.level_statement);
7833: dc(fnd_log.level_statement,'Contact Level Matches');
7834: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
7835: dc(fnd_log.level_statement,'l_score','l_score');
7836: de;
7829: l(' l_score := GET_CONTACTS_SCORE(l_match_idx'||l_c_param_list||');');
7830: 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);');
7831:
7832: ds(fnd_log.level_statement);
7833: dc(fnd_log.level_statement,'Contact Level Matches');
7834: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
7835: dc(fnd_log.level_statement,'l_score','l_score');
7836: de;
7837:
7830: 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);');
7831:
7832: ds(fnd_log.level_statement);
7833: dc(fnd_log.level_statement,'Contact Level Matches');
7834: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
7835: dc(fnd_log.level_statement,'l_score','l_score');
7836: de;
7837:
7838: l(' END IF; ');
7831:
7832: ds(fnd_log.level_statement);
7833: dc(fnd_log.level_statement,'Contact Level Matches');
7834: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
7835: dc(fnd_log.level_statement,'l_score','l_score');
7836: de;
7837:
7838: l(' END IF; ');
7839: l(' END LOOP;');
7884: l(' END IF;');
7885: l(' END IF;');
7886: l(' END IF; ');
7887: l(' END LOOP;');
7888: ds(fnd_log.level_statement);
7889: dc(fnd_log.level_statement,'Contact_point Level Matches');
7890: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
7891: dc(fnd_log.level_statement,'l_score','l_score');
7892: de;
7885: l(' END IF;');
7886: l(' END IF; ');
7887: l(' END LOOP;');
7888: ds(fnd_log.level_statement);
7889: dc(fnd_log.level_statement,'Contact_point Level Matches');
7890: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
7891: dc(fnd_log.level_statement,'l_score','l_score');
7892: de;
7893: l(' CLOSE l_contact_pt_cur;');
7886: l(' END IF; ');
7887: l(' END LOOP;');
7888: ds(fnd_log.level_statement);
7889: dc(fnd_log.level_statement,'Contact_point Level Matches');
7890: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
7891: dc(fnd_log.level_statement,'l_score','l_score');
7892: de;
7893: l(' CLOSE l_contact_pt_cur;');
7894: l(' END IF;');
7887: l(' END LOOP;');
7888: ds(fnd_log.level_statement);
7889: dc(fnd_log.level_statement,'Contact_point Level Matches');
7890: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
7891: dc(fnd_log.level_statement,'l_score','l_score');
7892: de;
7893: l(' CLOSE l_contact_pt_cur;');
7894: l(' END IF;');
7895: l(' x_num_matches := 0;');
7893: l(' CLOSE l_contact_pt_cur;');
7894: l(' END IF;');
7895: l(' x_num_matches := 0;');
7896: l(' l_org_contact_id := H_SCORES.FIRST;');
7897: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7898: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
7899: l(' IF l_match_str = '' OR '' THEN');
7900: ds(fnd_log.level_statement);
7901: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
7896: l(' l_org_contact_id := H_SCORES.FIRST;');
7897: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7898: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
7899: l(' IF l_match_str = '' OR '' THEN');
7900: ds(fnd_log.level_statement);
7901: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
7902: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
7903: de;
7904: --Start of Bug No: 4162385
7897: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
7898: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
7899: l(' IF l_match_str = '' OR '' THEN');
7900: ds(fnd_log.level_statement);
7901: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
7902: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
7903: de;
7904: --Start of Bug No: 4162385
7905: IF l_purpose = 'D' THEN
7898: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
7899: l(' IF l_match_str = '' OR '' THEN');
7900: ds(fnd_log.level_statement);
7901: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
7902: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
7903: de;
7904: --Start of Bug No: 4162385
7905: IF l_purpose = 'D' THEN
7906: l_entity_score_lh := 'H_SCORES(l_org_contact_id).TOTAL_SCORE';
7934: l(' END LOOP;');
7935: ELSE ---Start of Code Change for Match Rule Set
7936: l(' ');
7937: l(' BEGIN');
7938: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7939: ds(fnd_log.level_statement);
7940: dc(fnd_log.level_statement,'Input Parameters:');
7941: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7942: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7935: ELSE ---Start of Code Change for Match Rule Set
7936: l(' ');
7937: l(' BEGIN');
7938: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7939: ds(fnd_log.level_statement);
7940: dc(fnd_log.level_statement,'Input Parameters:');
7941: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7942: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7943: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7936: l(' ');
7937: l(' BEGIN');
7938: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7939: ds(fnd_log.level_statement);
7940: dc(fnd_log.level_statement,'Input Parameters:');
7941: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7942: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7943: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7944: de;
7937: l(' BEGIN');
7938: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7939: ds(fnd_log.level_statement);
7940: dc(fnd_log.level_statement,'Input Parameters:');
7941: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7942: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7943: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7944: de;
7945: 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');
7938: d(fnd_log.level_procedure,'get_matching_contacts(+)');
7939: ds(fnd_log.level_statement);
7940: dc(fnd_log.level_statement,'Input Parameters:');
7941: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7942: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7943: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7944: de;
7945: 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');
7946: END IF; ---End of Code Change for Match Rule Set
7939: ds(fnd_log.level_statement);
7940: dc(fnd_log.level_statement,'Input Parameters:');
7941: dc(fnd_log.level_statement,'p_match_type','p_match_type');
7942: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
7943: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
7944: de;
7945: 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');
7946: END IF; ---End of Code Change for Match Rule Set
7947:
7944: de;
7945: 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');
7946: END IF; ---End of Code Change for Match Rule Set
7947:
7948: d(fnd_log.level_procedure,'get_matching_contacts(-)');
7949:
7950: l('EXCEPTION');
7951: l(' WHEN FND_API.G_EXC_ERROR THEN');
7952: l(' RAISE FND_API.G_EXC_ERROR;');
8022: l(' BEGIN');
8023:
8024:
8025:
8026: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8027: ds(fnd_log.level_statement);
8028: dc(fnd_log.level_statement,'Input Parameters:');
8029: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8030: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8023:
8024:
8025:
8026: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8027: ds(fnd_log.level_statement);
8028: dc(fnd_log.level_statement,'Input Parameters:');
8029: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8030: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8031: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8024:
8025:
8026: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8027: ds(fnd_log.level_statement);
8028: dc(fnd_log.level_statement,'Input Parameters:');
8029: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8030: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8031: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8032: de;
8025:
8026: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8027: ds(fnd_log.level_statement);
8028: dc(fnd_log.level_statement,'Input Parameters:');
8029: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8030: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8031: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8032: de;
8033:
8026: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8027: ds(fnd_log.level_statement);
8028: dc(fnd_log.level_statement,'Input Parameters:');
8029: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8030: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8031: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8032: de;
8033:
8034: l('');
8027: ds(fnd_log.level_statement);
8028: dc(fnd_log.level_statement,'Input Parameters:');
8029: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8030: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8031: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8032: de;
8033:
8034: l('');
8035: l(' -- ************************************');
8058: l(' -- Setup Search Context ID');
8059: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
8060: l(' x_search_ctx_id := l_search_ctx_id;');
8061:
8062: ds(fnd_log.level_statement);
8063: dc(fnd_log.level_statement,'l_match_str','l_match_str');
8064: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
8065: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
8066: de;
8059: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
8060: l(' x_search_ctx_id := l_search_ctx_id;');
8061:
8062: ds(fnd_log.level_statement);
8063: dc(fnd_log.level_statement,'l_match_str','l_match_str');
8064: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
8065: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
8066: de;
8067:
8060: l(' x_search_ctx_id := l_search_ctx_id;');
8061:
8062: ds(fnd_log.level_statement);
8063: dc(fnd_log.level_statement,'l_match_str','l_match_str');
8064: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
8065: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
8066: de;
8067:
8068: l('');
8061:
8062: ds(fnd_log.level_statement);
8063: dc(fnd_log.level_statement,'l_match_str','l_match_str');
8064: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
8065: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
8066: de;
8067:
8068: l('');
8069: l(' IF l_contact_pt_contains_str IS NOT NULL THEN');
8080: l(' H_CONTACT_POINT_ID(cnt) := l_contact_pt_id;');
8081: l(' H_PARTY_ID(cnt) := l_cpt_party_id;');
8082: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
8083: l(' cnt := cnt+1;');
8084: ds(fnd_log.level_statement);
8085: dc(fnd_log.level_statement,'Contact Point Matches');
8086: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
8087: dc(fnd_log.level_statement,'l_score','l_score');
8088: de;
8081: l(' H_PARTY_ID(cnt) := l_cpt_party_id;');
8082: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
8083: l(' cnt := cnt+1;');
8084: ds(fnd_log.level_statement);
8085: dc(fnd_log.level_statement,'Contact Point Matches');
8086: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
8087: dc(fnd_log.level_statement,'l_score','l_score');
8088: de;
8089:
8082: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
8083: l(' cnt := cnt+1;');
8084: ds(fnd_log.level_statement);
8085: dc(fnd_log.level_statement,'Contact Point Matches');
8086: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
8087: dc(fnd_log.level_statement,'l_score','l_score');
8088: de;
8089:
8090: l(' END IF; ');
8083: l(' cnt := cnt+1;');
8084: ds(fnd_log.level_statement);
8085: dc(fnd_log.level_statement,'Contact Point Matches');
8086: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
8087: dc(fnd_log.level_statement,'l_score','l_score');
8088: de;
8089:
8090: l(' END IF; ');
8091: l(' END LOOP;');
8090: l(' END IF; ');
8091: l(' END LOOP;');
8092: l(' CLOSE l_contact_pt_cur;');
8093:
8094: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
8095: l(' x_num_matches := 0; ');
8096: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
8097: ds(fnd_log.level_statement);
8098: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
8093:
8094: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
8095: l(' x_num_matches := 0; ');
8096: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
8097: ds(fnd_log.level_statement);
8098: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
8099: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
8100: de;
8101: --Start of Bug No: 4162385
8094: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
8095: l(' x_num_matches := 0; ');
8096: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
8097: ds(fnd_log.level_statement);
8098: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
8099: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
8100: de;
8101: --Start of Bug No: 4162385
8102: IF l_purpose = 'D' THEN
8095: l(' x_num_matches := 0; ');
8096: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
8097: ds(fnd_log.level_statement);
8098: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
8099: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
8100: de;
8101: --Start of Bug No: 4162385
8102: IF l_purpose = 'D' THEN
8103: l_entity_score_lh := 'H_SCORE(I)';
8116: l(' END LOOP; ');
8117: l(' END IF;');
8118: ELSE ---Start of Code Change for Match Rule Set
8119: l(' BEGIN');
8120: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8121: ds(fnd_log.level_statement);
8122: dc(fnd_log.level_statement,'Input Parameters:');
8123: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8124: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8117: l(' END IF;');
8118: ELSE ---Start of Code Change for Match Rule Set
8119: l(' BEGIN');
8120: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8121: ds(fnd_log.level_statement);
8122: dc(fnd_log.level_statement,'Input Parameters:');
8123: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8124: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8125: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8118: ELSE ---Start of Code Change for Match Rule Set
8119: l(' BEGIN');
8120: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8121: ds(fnd_log.level_statement);
8122: dc(fnd_log.level_statement,'Input Parameters:');
8123: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8124: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8125: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8126: de;
8119: l(' BEGIN');
8120: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8121: ds(fnd_log.level_statement);
8122: dc(fnd_log.level_statement,'Input Parameters:');
8123: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8124: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8125: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8126: de;
8127: 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');
8120: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
8121: ds(fnd_log.level_statement);
8122: dc(fnd_log.level_statement,'Input Parameters:');
8123: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8124: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8125: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8126: de;
8127: 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');
8128:
8121: ds(fnd_log.level_statement);
8122: dc(fnd_log.level_statement,'Input Parameters:');
8123: dc(fnd_log.level_statement,'p_match_type','p_match_type');
8124: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
8125: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
8126: de;
8127: 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');
8128:
8129: END IF; ---End of Code Change for Match Rule Set
8126: de;
8127: 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');
8128:
8129: END IF; ---End of Code Change for Match Rule Set
8130: d(fnd_log.level_procedure,'get_matching_contact_points(-)');
8131:
8132: l('EXCEPTION');
8133: l(' WHEN FND_API.G_EXC_ERROR THEN');
8134: l(' RAISE FND_API.G_EXC_ERROR;');
8220: l(' l_use_contact_cpt_info BOOLEAN:=TRUE;');
8221: l('');
8222: l(' BEGIN');
8223: l('');
8224: d(fnd_log.level_statement,'get_score_details(+)');
8225: l(' -- ************************************');
8226: l(' -- STEP 1. Initialization and error checks');
8227: l('');
8228: 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);');
8362: 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);');
8363: l(' END IF;');
8364: l(' CLOSE l_contact_pt_cur;');
8365: l(' END IF;');
8366: d(fnd_log.level_procedure,'get_score_details(-)');
8367: ELSE ---Start of Code Change for Match Rule Set
8368: l(' BEGIN');
8369: l('');
8370: d(fnd_log.level_statement,'get_score_details(+)');
8366: d(fnd_log.level_procedure,'get_score_details(-)');
8367: ELSE ---Start of Code Change for Match Rule Set
8368: l(' BEGIN');
8369: l('');
8370: d(fnd_log.level_statement,'get_score_details(+)');
8371: 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');
8372: d(fnd_log.level_procedure,'get_score_details(-)');
8373: END IF; ---End of Code Change for Match Rule Set
8374:
8368: l(' BEGIN');
8369: l('');
8370: d(fnd_log.level_statement,'get_score_details(+)');
8371: 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');
8372: d(fnd_log.level_procedure,'get_score_details(-)');
8373: END IF; ---End of Code Change for Match Rule Set
8374:
8375: l('EXCEPTION');
8376: l(' WHEN FND_API.G_EXC_ERROR THEN');
8843: l(' ) RETURN NUMBER IS');
8844: END IF;
8845: l(' total NUMBER := 0;');
8846: l(' BEGIN');
8847: d(fnd_log.level_procedure,'GET_PARTY_SCORE ');
8848: l(' IF g_score_until_thresh AND (total)>=g_thres_score THEN');
8849: l(' RETURN total;');
8850: l(' END IF;');
8851: FOR SECATTRS IN (
9837: l(' push_eval;');
9838: l(' RETURN;');
9839: l(' END IF;');
9840: l(' END IF;');
9841: ds(fnd_log.level_statement);
9842: dc(fnd_log.level_statement,'Party Level Matches');
9843: dc(fnd_log.level_statement,'l_party_id','l_party_id');
9844: dc(fnd_log.level_statement,'l_score','l_score');
9845: de;
9838: l(' RETURN;');
9839: l(' END IF;');
9840: l(' END IF;');
9841: ds(fnd_log.level_statement);
9842: dc(fnd_log.level_statement,'Party Level Matches');
9843: dc(fnd_log.level_statement,'l_party_id','l_party_id');
9844: dc(fnd_log.level_statement,'l_score','l_score');
9845: de;
9846: l(' END LOOP;');
9839: l(' END IF;');
9840: l(' END IF;');
9841: ds(fnd_log.level_statement);
9842: dc(fnd_log.level_statement,'Party Level Matches');
9843: dc(fnd_log.level_statement,'l_party_id','l_party_id');
9844: dc(fnd_log.level_statement,'l_score','l_score');
9845: de;
9846: l(' END LOOP;');
9847: l(' CLOSE l_party_cur;');
9840: l(' END IF;');
9841: ds(fnd_log.level_statement);
9842: dc(fnd_log.level_statement,'Party Level Matches');
9843: dc(fnd_log.level_statement,'l_party_id','l_party_id');
9844: dc(fnd_log.level_statement,'l_score','l_score');
9845: de;
9846: l(' END LOOP;');
9847: l(' CLOSE l_party_cur;');
9848: l(' ROLLBACK to eval_start;');
9915: l(' h_ps_party_id(detcnt) := l_ps_party_id;');
9916: l(' h_ps_score(detcnt) := round((l_score/p_emax_score)*100);');
9917: l(' detcnt := detcnt +1;');
9918: l(' END IF;');
9919: ds(fnd_log.level_statement);
9920: dc(fnd_log.level_statement,'Party Site Level Matches');
9921: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
9922: dc(fnd_log.level_statement,'l_ps_party_id','l_ps_party_id');
9923: dc(fnd_log.level_statement,'l_score','l_score');
9916: l(' h_ps_score(detcnt) := round((l_score/p_emax_score)*100);');
9917: l(' detcnt := detcnt +1;');
9918: l(' END IF;');
9919: ds(fnd_log.level_statement);
9920: dc(fnd_log.level_statement,'Party Site Level Matches');
9921: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
9922: dc(fnd_log.level_statement,'l_ps_party_id','l_ps_party_id');
9923: dc(fnd_log.level_statement,'l_score','l_score');
9924: de;
9917: l(' detcnt := detcnt +1;');
9918: l(' END IF;');
9919: ds(fnd_log.level_statement);
9920: dc(fnd_log.level_statement,'Party Site Level Matches');
9921: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
9922: dc(fnd_log.level_statement,'l_ps_party_id','l_ps_party_id');
9923: dc(fnd_log.level_statement,'l_score','l_score');
9924: de;
9925: l(' END IF;');
9918: l(' END IF;');
9919: ds(fnd_log.level_statement);
9920: dc(fnd_log.level_statement,'Party Site Level Matches');
9921: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
9922: dc(fnd_log.level_statement,'l_ps_party_id','l_ps_party_id');
9923: dc(fnd_log.level_statement,'l_score','l_score');
9924: de;
9925: l(' END IF;');
9926: l(' END LOOP;');
9919: ds(fnd_log.level_statement);
9920: dc(fnd_log.level_statement,'Party Site Level Matches');
9921: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
9922: dc(fnd_log.level_statement,'l_ps_party_id','l_ps_party_id');
9923: dc(fnd_log.level_statement,'l_score','l_score');
9924: de;
9925: l(' END IF;');
9926: l(' END LOOP;');
9927: l(' CLOSE l_party_site_cur;');
9999: l(' h_ct_party_id(detcnt) := l_ct_party_id;');
10000: l(' h_ct_score(detcnt) := round((l_score/p_emax_score)*100);');
10001: l(' detcnt := detcnt +1;');
10002: l(' END IF;');
10003: ds(fnd_log.level_statement);
10004: dc(fnd_log.level_statement,'Contact Level Matches');
10005: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10006: dc(fnd_log.level_statement,'l_ct_party_id','l_ct_party_id');
10007: dc(fnd_log.level_statement,'l_score','l_score');
10000: l(' h_ct_score(detcnt) := round((l_score/p_emax_score)*100);');
10001: l(' detcnt := detcnt +1;');
10002: l(' END IF;');
10003: ds(fnd_log.level_statement);
10004: dc(fnd_log.level_statement,'Contact Level Matches');
10005: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10006: dc(fnd_log.level_statement,'l_ct_party_id','l_ct_party_id');
10007: dc(fnd_log.level_statement,'l_score','l_score');
10008: de;
10001: l(' detcnt := detcnt +1;');
10002: l(' END IF;');
10003: ds(fnd_log.level_statement);
10004: dc(fnd_log.level_statement,'Contact Level Matches');
10005: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10006: dc(fnd_log.level_statement,'l_ct_party_id','l_ct_party_id');
10007: dc(fnd_log.level_statement,'l_score','l_score');
10008: de;
10009: l(' END LOOP;');
10002: l(' END IF;');
10003: ds(fnd_log.level_statement);
10004: dc(fnd_log.level_statement,'Contact Level Matches');
10005: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10006: dc(fnd_log.level_statement,'l_ct_party_id','l_ct_party_id');
10007: dc(fnd_log.level_statement,'l_score','l_score');
10008: de;
10009: l(' END LOOP;');
10010: l(' CLOSE l_contact_cur;');
10003: ds(fnd_log.level_statement);
10004: dc(fnd_log.level_statement,'Contact Level Matches');
10005: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10006: dc(fnd_log.level_statement,'l_ct_party_id','l_ct_party_id');
10007: dc(fnd_log.level_statement,'l_score','l_score');
10008: de;
10009: l(' END LOOP;');
10010: l(' CLOSE l_contact_cur;');
10011: l(' ROLLBACK to eval_start;');
10083: l(' h_cpt_party_id(detcnt) := l_cpt_party_id;');
10084: l(' h_cpt_score(detcnt) := round((l_score/p_emax_score)*100);');
10085: l(' detcnt := detcnt +1;');
10086: l(' END IF;');
10087: ds(fnd_log.level_statement);
10088: dc(fnd_log.level_statement,'Contact pt Level Matches');
10089: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10090: dc(fnd_log.level_statement,'l_cpt_party_id','l_cpt_party_id');
10091: dc(fnd_log.level_statement,'l_score','l_score');
10084: l(' h_cpt_score(detcnt) := round((l_score/p_emax_score)*100);');
10085: l(' detcnt := detcnt +1;');
10086: l(' END IF;');
10087: ds(fnd_log.level_statement);
10088: dc(fnd_log.level_statement,'Contact pt Level Matches');
10089: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10090: dc(fnd_log.level_statement,'l_cpt_party_id','l_cpt_party_id');
10091: dc(fnd_log.level_statement,'l_score','l_score');
10092: de;
10085: l(' detcnt := detcnt +1;');
10086: l(' END IF;');
10087: ds(fnd_log.level_statement);
10088: dc(fnd_log.level_statement,'Contact pt Level Matches');
10089: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10090: dc(fnd_log.level_statement,'l_cpt_party_id','l_cpt_party_id');
10091: dc(fnd_log.level_statement,'l_score','l_score');
10092: de;
10093: l(' END IF;');
10086: l(' END IF;');
10087: ds(fnd_log.level_statement);
10088: dc(fnd_log.level_statement,'Contact pt Level Matches');
10089: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10090: dc(fnd_log.level_statement,'l_cpt_party_id','l_cpt_party_id');
10091: dc(fnd_log.level_statement,'l_score','l_score');
10092: de;
10093: l(' END IF;');
10094: l(' END LOOP;');
10087: ds(fnd_log.level_statement);
10088: dc(fnd_log.level_statement,'Contact pt Level Matches');
10089: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10090: dc(fnd_log.level_statement,'l_cpt_party_id','l_cpt_party_id');
10091: dc(fnd_log.level_statement,'l_score','l_score');
10092: de;
10093: l(' END IF;');
10094: l(' END LOOP;');
10095: l(' CLOSE l_contact_pt_cur;');
10145: l(' BEGIN');
10146: l('');
10147:
10148:
10149: d(fnd_log.level_procedure,'find_parties(+)');
10150: ds(fnd_log.level_statement);
10151: dc(fnd_log.level_statement,'Input Parameters:');
10152: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10153: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10146: l('');
10147:
10148:
10149: d(fnd_log.level_procedure,'find_parties(+)');
10150: ds(fnd_log.level_statement);
10151: dc(fnd_log.level_statement,'Input Parameters:');
10152: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10153: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10154: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10147:
10148:
10149: d(fnd_log.level_procedure,'find_parties(+)');
10150: ds(fnd_log.level_statement);
10151: dc(fnd_log.level_statement,'Input Parameters:');
10152: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10153: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10154: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10155: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10148:
10149: d(fnd_log.level_procedure,'find_parties(+)');
10150: ds(fnd_log.level_statement);
10151: dc(fnd_log.level_statement,'Input Parameters:');
10152: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10153: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10154: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10155: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10156: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
10149: d(fnd_log.level_procedure,'find_parties(+)');
10150: ds(fnd_log.level_statement);
10151: dc(fnd_log.level_statement,'Input Parameters:');
10152: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10153: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10154: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10155: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10156: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
10157: de;
10150: ds(fnd_log.level_statement);
10151: dc(fnd_log.level_statement,'Input Parameters:');
10152: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10153: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10154: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10155: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10156: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
10157: de;
10158:
10151: dc(fnd_log.level_statement,'Input Parameters:');
10152: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10153: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10154: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10155: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10156: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
10157: de;
10158:
10159: l(' -- ************************************');
10152: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10153: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10154: dc(fnd_log.level_statement,'p_dup_set_id','p_dup_set_id');
10155: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
10156: dc(fnd_log.level_statement,'p_dup_party_id','p_dup_party_id');
10157: de;
10158:
10159: l(' -- ************************************');
10160: l(' -- STEP 1. Initialization and error checks');
10260: l(' defcpt := 1;');
10261: l(' END IF;');
10262: l('');
10263:
10264: ds(fnd_log.level_statement);
10265: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10266: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10267: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10268: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10261: l(' END IF;');
10262: l('');
10263:
10264: ds(fnd_log.level_statement);
10265: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10266: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10267: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10268: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10269: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10262: l('');
10263:
10264: ds(fnd_log.level_statement);
10265: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10266: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10267: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10268: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10269: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10270: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
10263:
10264: ds(fnd_log.level_statement);
10265: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10266: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10267: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10268: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10269: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10270: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
10271: de;
10264: ds(fnd_log.level_statement);
10265: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10266: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10267: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10268: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10269: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10270: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
10271: de;
10272:
10265: dc(fnd_log.level_statement,'l_match_str','l_match_str');
10266: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10267: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10268: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10269: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10270: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
10271: de;
10272:
10273: IF l_max_score=1 THEN
10266: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
10267: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
10268: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
10269: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
10270: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
10271: de;
10272:
10273: IF l_max_score=1 THEN
10274: l(' FOR I in 1..3 LOOP');
10288: l(' do_eval(I);');
10289: l(' END LOOP;');
10290: l('ROLLBACK to find_parties;');
10291: IF l_purpose = 'S' THEN
10292: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
10293: ELSE
10294: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||l_match_threshold);
10295: END IF;
10296:
10290: l('ROLLBACK to find_parties;');
10291: IF l_purpose = 'S' THEN
10292: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
10293: ELSE
10294: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||l_match_threshold);
10295: END IF;
10296:
10297: l(' x_num_matches := 0;');
10298: l(' l_num_eval := 0;');
10303: l(' END IF;');
10304:
10305: l(' WHILE l_party_id IS NOT NULL LOOP');
10306: l(' l_num_eval:= l_num_eval+1;');
10307: ds(fnd_log.level_statement);
10308: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
10309: IF l_purpose = 'S' THEN
10310: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
10311: ELSE
10304:
10305: l(' WHILE l_party_id IS NOT NULL LOOP');
10306: l(' l_num_eval:= l_num_eval+1;');
10307: ds(fnd_log.level_statement);
10308: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
10309: IF l_purpose = 'S' THEN
10310: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
10311: ELSE
10312: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
10306: l(' l_num_eval:= l_num_eval+1;');
10307: ds(fnd_log.level_statement);
10308: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
10309: IF l_purpose = 'S' THEN
10310: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
10311: ELSE
10312: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
10313: END IF;
10314: de;
10308: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
10309: IF l_purpose = 'S' THEN
10310: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
10311: ELSE
10312: dc(fnd_log.level_statement,'Score','H_SCORES(l_party_id).TOTAL_SCORE');
10313: END IF;
10314: de;
10315: IF l_purpose = 'S' THEN
10316: l(' IF (H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
10376: l(' l_search_ctx_id, h_cpt_id(I), h_cpt_party_id(I), h_cpt_score(I));');
10377: l(' END IF;');
10378: l('');
10379: l(' HZ_DQM_SEARCH_UTIL.set_num_eval(l_num_eval);');
10380: d(fnd_log.level_procedure,'find_parties(-)');
10381:
10382:
10383: l('EXCEPTION');
10384: l(' WHEN FND_API.G_EXC_ERROR THEN');
10622: l(' push_eval;');
10623: l(' RETURN;');
10624: l(' END IF;');
10625: l(' END IF;');
10626: ds(fnd_log.level_statement);
10627: dc(fnd_log.level_statement,'Party Level Matches');
10628: dc(fnd_log.level_statement,'l_party_id','l_party_id');
10629: dc(fnd_log.level_statement,'l_score','l_score');
10630: de;
10623: l(' RETURN;');
10624: l(' END IF;');
10625: l(' END IF;');
10626: ds(fnd_log.level_statement);
10627: dc(fnd_log.level_statement,'Party Level Matches');
10628: dc(fnd_log.level_statement,'l_party_id','l_party_id');
10629: dc(fnd_log.level_statement,'l_score','l_score');
10630: de;
10631: l(' END LOOP;');
10624: l(' END IF;');
10625: l(' END IF;');
10626: ds(fnd_log.level_statement);
10627: dc(fnd_log.level_statement,'Party Level Matches');
10628: dc(fnd_log.level_statement,'l_party_id','l_party_id');
10629: dc(fnd_log.level_statement,'l_score','l_score');
10630: de;
10631: l(' END LOOP;');
10632: l(' CLOSE l_party_cur;');
10625: l(' END IF;');
10626: ds(fnd_log.level_statement);
10627: dc(fnd_log.level_statement,'Party Level Matches');
10628: dc(fnd_log.level_statement,'l_party_id','l_party_id');
10629: dc(fnd_log.level_statement,'l_score','l_score');
10630: de;
10631: l(' END LOOP;');
10632: l(' CLOSE l_party_cur;');
10633: l(' ROLLBACK to eval_start;');
10752: l(' h_ps_party_id(detcnt) := l_person_id;');
10753: l(' h_ps_score(detcnt) := round((l_score/p_emax_score)*100);');
10754: l(' detcnt := detcnt +1;');
10755: l(' END IF;');
10756: ds(fnd_log.level_statement);
10757: dc(fnd_log.level_statement,'Party Site Level Matches');
10758: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
10759: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
10760: dc(fnd_log.level_statement,'l_score','l_score');
10753: l(' h_ps_score(detcnt) := round((l_score/p_emax_score)*100);');
10754: l(' detcnt := detcnt +1;');
10755: l(' END IF;');
10756: ds(fnd_log.level_statement);
10757: dc(fnd_log.level_statement,'Party Site Level Matches');
10758: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
10759: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
10760: dc(fnd_log.level_statement,'l_score','l_score');
10761: de;
10754: l(' detcnt := detcnt +1;');
10755: l(' END IF;');
10756: ds(fnd_log.level_statement);
10757: dc(fnd_log.level_statement,'Party Site Level Matches');
10758: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
10759: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
10760: dc(fnd_log.level_statement,'l_score','l_score');
10761: de;
10762: l(' END IF;');
10755: l(' END IF;');
10756: ds(fnd_log.level_statement);
10757: dc(fnd_log.level_statement,'Party Site Level Matches');
10758: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
10759: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
10760: dc(fnd_log.level_statement,'l_score','l_score');
10761: de;
10762: l(' END IF;');
10763: l(' END LOOP;');
10756: ds(fnd_log.level_statement);
10757: dc(fnd_log.level_statement,'Party Site Level Matches');
10758: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
10759: dc(fnd_log.level_statement,'l_ps_party_id','l_person_id');
10760: dc(fnd_log.level_statement,'l_score','l_score');
10761: de;
10762: l(' END IF;');
10763: l(' END LOOP;');
10764: l(' CLOSE l_party_site_cur;');
10807: l(' h_ct_party_id(detcnt) := l_person_id;');
10808: l(' h_ct_score(detcnt) := round((l_score/p_emax_score)*100);');
10809: l(' detcnt := detcnt +1;');
10810: l(' END IF;');
10811: ds(fnd_log.level_statement);
10812: dc(fnd_log.level_statement,'Contact Level Matches');
10813: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10814: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
10815: dc(fnd_log.level_statement,'l_score','l_score');
10808: l(' h_ct_score(detcnt) := round((l_score/p_emax_score)*100);');
10809: l(' detcnt := detcnt +1;');
10810: l(' END IF;');
10811: ds(fnd_log.level_statement);
10812: dc(fnd_log.level_statement,'Contact Level Matches');
10813: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10814: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
10815: dc(fnd_log.level_statement,'l_score','l_score');
10816: de;
10809: l(' detcnt := detcnt +1;');
10810: l(' END IF;');
10811: ds(fnd_log.level_statement);
10812: dc(fnd_log.level_statement,'Contact Level Matches');
10813: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10814: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
10815: dc(fnd_log.level_statement,'l_score','l_score');
10816: de;
10817: l(' END LOOP;');
10810: l(' END IF;');
10811: ds(fnd_log.level_statement);
10812: dc(fnd_log.level_statement,'Contact Level Matches');
10813: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10814: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
10815: dc(fnd_log.level_statement,'l_score','l_score');
10816: de;
10817: l(' END LOOP;');
10818: l(' CLOSE l_contact_cur;');
10811: ds(fnd_log.level_statement);
10812: dc(fnd_log.level_statement,'Contact Level Matches');
10813: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
10814: dc(fnd_log.level_statement,'l_ct_party_id','l_person_id');
10815: dc(fnd_log.level_statement,'l_score','l_score');
10816: de;
10817: l(' END LOOP;');
10818: l(' CLOSE l_contact_cur;');
10819: l(' ROLLBACK to eval_start;');
10908: l(' h_cpt_party_id(detcnt) := l_person_id;');
10909: l(' h_cpt_score(detcnt) := round((l_score/p_emax_score)*100);');
10910: l(' detcnt := detcnt +1;');
10911: l(' END IF;');
10912: ds(fnd_log.level_statement);
10913: dc(fnd_log.level_statement,'Contact pt Level Matches');
10914: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10915: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
10916: dc(fnd_log.level_statement,'l_score','l_score');
10909: l(' h_cpt_score(detcnt) := round((l_score/p_emax_score)*100);');
10910: l(' detcnt := detcnt +1;');
10911: l(' END IF;');
10912: ds(fnd_log.level_statement);
10913: dc(fnd_log.level_statement,'Contact pt Level Matches');
10914: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10915: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
10916: dc(fnd_log.level_statement,'l_score','l_score');
10917: de;
10910: l(' detcnt := detcnt +1;');
10911: l(' END IF;');
10912: ds(fnd_log.level_statement);
10913: dc(fnd_log.level_statement,'Contact pt Level Matches');
10914: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10915: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
10916: dc(fnd_log.level_statement,'l_score','l_score');
10917: de;
10918: l(' END IF;');
10911: l(' END IF;');
10912: ds(fnd_log.level_statement);
10913: dc(fnd_log.level_statement,'Contact pt Level Matches');
10914: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10915: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
10916: dc(fnd_log.level_statement,'l_score','l_score');
10917: de;
10918: l(' END IF;');
10919: l(' END LOOP;');
10912: ds(fnd_log.level_statement);
10913: dc(fnd_log.level_statement,'Contact pt Level Matches');
10914: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
10915: dc(fnd_log.level_statement,'l_cpt_party_id','l_person_id');
10916: dc(fnd_log.level_statement,'l_score','l_score');
10917: de;
10918: l(' END IF;');
10919: l(' END LOOP;');
10920: l(' CLOSE l_contact_pt_cur;');
10969: l(' BEGIN');
10970: l('');
10971:
10972:
10973: d(fnd_log.level_procedure,'find_persons(+)');
10974: ds(fnd_log.level_statement);
10975: dc(fnd_log.level_statement,'Input Parameters:');
10976: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10977: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10970: l('');
10971:
10972:
10973: d(fnd_log.level_procedure,'find_persons(+)');
10974: ds(fnd_log.level_statement);
10975: dc(fnd_log.level_statement,'Input Parameters:');
10976: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10977: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10978: de;
10971:
10972:
10973: d(fnd_log.level_procedure,'find_persons(+)');
10974: ds(fnd_log.level_statement);
10975: dc(fnd_log.level_statement,'Input Parameters:');
10976: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10977: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10978: de;
10979:
10972:
10973: d(fnd_log.level_procedure,'find_persons(+)');
10974: ds(fnd_log.level_statement);
10975: dc(fnd_log.level_statement,'Input Parameters:');
10976: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10977: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10978: de;
10979:
10980: l(' -- ************************************');
10973: d(fnd_log.level_procedure,'find_persons(+)');
10974: ds(fnd_log.level_statement);
10975: dc(fnd_log.level_statement,'Input Parameters:');
10976: dc(fnd_log.level_statement,'p_match_type','p_match_type');
10977: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
10978: de;
10979:
10980: l(' -- ************************************');
10981: l(' -- STEP 1. Initialization and error checks');
11023: l(' defcpt := 1;');
11024: l(' END IF;');
11025: l('');
11026:
11027: ds(fnd_log.level_statement);
11028: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11029: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11030: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11031: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11024: l(' END IF;');
11025: l('');
11026:
11027: ds(fnd_log.level_statement);
11028: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11029: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11030: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11031: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11032: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11025: l('');
11026:
11027: ds(fnd_log.level_statement);
11028: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11029: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11030: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11031: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11032: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11033: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11026:
11027: ds(fnd_log.level_statement);
11028: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11029: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11030: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11031: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11032: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11033: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11034: de;
11027: ds(fnd_log.level_statement);
11028: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11029: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11030: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11031: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11032: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11033: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11034: de;
11035:
11028: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11029: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11030: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11031: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11032: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11033: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11034: de;
11035:
11036: /**** Call all 4 evaluation procedures ***********/
11029: dc(fnd_log.level_statement,'l_party_contains_str','l_party_contains_str');
11030: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11031: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
11032: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11033: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11034: de;
11035:
11036: /**** Call all 4 evaluation procedures ***********/
11037: l(' FOR I in 1..5 LOOP');
11040: l(' ROLLBACK to find_persons;');
11041: l(' IF l_contact_contains_str IS NOT NULL THEN');
11042: l(' eval_contact_level(l_contact_contains_str,p_ins_details,l_contact_max_score);');
11043: l(' END IF;');
11044: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
11045:
11046: l(' x_num_matches := 0;');
11047: l(' l_num_eval := 0;');
11048: l(' IF l_match_str = '' OR '' THEN');
11052: l(' END IF;');
11053:
11054: l(' WHILE l_party_id IS NOT NULL LOOP');
11055: l(' l_num_eval:= l_num_eval+1;');
11056: ds(fnd_log.level_statement);
11057: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
11058: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
11059: de;
11060: l(' IF (H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
11053:
11054: l(' WHILE l_party_id IS NOT NULL LOOP');
11055: l(' l_num_eval:= l_num_eval+1;');
11056: ds(fnd_log.level_statement);
11057: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
11058: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
11059: de;
11060: l(' IF (H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
11061: l(' INSERT INTO HZ_MATCHED_PARTIES_GT (SEARCH_CONTEXT_ID, PARTY_ID, SCORE) ');
11054: l(' WHILE l_party_id IS NOT NULL LOOP');
11055: l(' l_num_eval:= l_num_eval+1;');
11056: ds(fnd_log.level_statement);
11057: dc(fnd_log.level_statement,'Match Party ID','H_SCORES(l_party_id).PARTY_ID');
11058: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)*100)');
11059: de;
11060: l(' IF (H_SCORES(l_party_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
11061: l(' INSERT INTO HZ_MATCHED_PARTIES_GT (SEARCH_CONTEXT_ID, PARTY_ID, SCORE) ');
11062: 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));');
11089: l(' l_search_ctx_id, h_cpt_id(I), h_cpt_party_id(I), h_cpt_score(I));');
11090: l(' END IF;');
11091: l('');
11092: l(' HZ_DQM_SEARCH_UTIL.set_num_eval(l_num_eval);');
11093: d(fnd_log.level_procedure,'find_persons(-)');
11094:
11095:
11096: l('EXCEPTION');
11097: l(' WHEN FND_API.G_EXC_ERROR THEN');
11151: l('');
11152: l(' BEGIN');
11153:
11154:
11155: d(fnd_log.level_procedure,'find_party_details(+)');
11156: ds(fnd_log.level_statement);
11157: dc(fnd_log.level_statement,'Input Parameters:');
11158: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11159: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11152: l(' BEGIN');
11153:
11154:
11155: d(fnd_log.level_procedure,'find_party_details(+)');
11156: ds(fnd_log.level_statement);
11157: dc(fnd_log.level_statement,'Input Parameters:');
11158: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11159: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11160: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11153:
11154:
11155: d(fnd_log.level_procedure,'find_party_details(+)');
11156: ds(fnd_log.level_statement);
11157: dc(fnd_log.level_statement,'Input Parameters:');
11158: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11159: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11160: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11161: de;
11154:
11155: d(fnd_log.level_procedure,'find_party_details(+)');
11156: ds(fnd_log.level_statement);
11157: dc(fnd_log.level_statement,'Input Parameters:');
11158: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11159: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11160: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11161: de;
11162:
11155: d(fnd_log.level_procedure,'find_party_details(+)');
11156: ds(fnd_log.level_statement);
11157: dc(fnd_log.level_statement,'Input Parameters:');
11158: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11159: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11160: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11161: de;
11162:
11163: l(' find_parties(p_rule_id,p_party_search_rec,p_party_site_list, p_contact_list, p_contact_point_list,');
11156: ds(fnd_log.level_statement);
11157: dc(fnd_log.level_statement,'Input Parameters:');
11158: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11159: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11160: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11161: de;
11162:
11163: l(' find_parties(p_rule_id,p_party_search_rec,p_party_site_list, p_contact_list, p_contact_point_list,');
11164: l(' p_restrict_sql,p_match_type,p_search_merged,null,null, null,''Y'',');
11172: l(' DELETE FROM HZ_MATCHED_CPTS_GT cpt WHERE SEARCH_CONTEXT_ID = x_search_ctx_id ');
11173: l(' AND NOT EXISTS ');
11174: l(' (SELECT 1 FROM HZ_MATCHED_PARTIES_GT p WHERE SEARCH_CONTEXT_ID = x_search_ctx_id AND p.PARTY_ID = cpt.PARTY_ID);');
11175:
11176: d(fnd_log.level_procedure,'find_party_details(-)');
11177:
11178:
11179: l('EXCEPTION');
11180: l(' WHEN FND_API.G_EXC_ERROR THEN');
11212: l('');
11213: l('BEGIN');
11214:
11215:
11216: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
11217: ds(fnd_log.level_statement);
11218: dc(fnd_log.level_statement,'Input Parameters:');
11219: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11220: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11213: l('BEGIN');
11214:
11215:
11216: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
11217: ds(fnd_log.level_statement);
11218: dc(fnd_log.level_statement,'Input Parameters:');
11219: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11220: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11221: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11214:
11215:
11216: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
11217: ds(fnd_log.level_statement);
11218: dc(fnd_log.level_statement,'Input Parameters:');
11219: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11220: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11221: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11222: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11215:
11216: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
11217: ds(fnd_log.level_statement);
11218: dc(fnd_log.level_statement,'Input Parameters:');
11219: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11220: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11221: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11222: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11223: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11216: d(fnd_log.level_procedure,'find_duplicate_parties(+)');
11217: ds(fnd_log.level_statement);
11218: dc(fnd_log.level_statement,'Input Parameters:');
11219: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11220: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11221: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11222: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11223: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11224: de;
11217: ds(fnd_log.level_statement);
11218: dc(fnd_log.level_statement,'Input Parameters:');
11219: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11220: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11221: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11222: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11223: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11224: de;
11225:
11218: dc(fnd_log.level_statement,'Input Parameters:');
11219: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11220: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11221: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11222: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11223: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11224: de;
11225:
11226: l('');
11219: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11220: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11221: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11222: dc(fnd_log.level_statement,'p_dup_batch_id','p_dup_batch_id');
11223: dc(fnd_log.level_statement,'p_search_merged','p_search_merged');
11224: de;
11225:
11226: l('');
11227: l(' get_party_for_search(');
11264: l(' hz_utility_pub.user_id,p_dup_batch_id);'); --Bug No: 4244529
11265: l(' ELSE');
11266: l(' x_dup_set_id := NULL;');
11267: l(' END IF;');
11268: d(fnd_log.level_procedure,'find_duplicate_parties(-)');
11269:
11270:
11271: l('EXCEPTION');
11272: l(' WHEN FND_API.G_EXC_ERROR THEN');
11315:
11316: l(' BEGIN ');
11317:
11318:
11319: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
11320: ds(fnd_log.level_statement);
11321: dc(fnd_log.level_statement,'Input Parameters:');
11322: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11323: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11316: l(' BEGIN ');
11317:
11318:
11319: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
11320: ds(fnd_log.level_statement);
11321: dc(fnd_log.level_statement,'Input Parameters:');
11322: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11323: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11324: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11317:
11318:
11319: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
11320: ds(fnd_log.level_statement);
11321: dc(fnd_log.level_statement,'Input Parameters:');
11322: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11323: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11324: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11325: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11318:
11319: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
11320: ds(fnd_log.level_statement);
11321: dc(fnd_log.level_statement,'Input Parameters:');
11322: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11323: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11324: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11325: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11326: de;
11319: d(fnd_log.level_procedure,'find_duplicate_party_sites(+)');
11320: ds(fnd_log.level_statement);
11321: dc(fnd_log.level_statement,'Input Parameters:');
11322: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11323: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11324: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11325: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11326: de;
11327:
11320: ds(fnd_log.level_statement);
11321: dc(fnd_log.level_statement,'Input Parameters:');
11322: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11323: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11324: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11325: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11326: de;
11327:
11328: l(' p_party_site_list(1) := p_party_site_id; ');
11321: dc(fnd_log.level_statement,'Input Parameters:');
11322: dc(fnd_log.level_statement,'p_party_site_id','p_party_site_id');
11323: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11324: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11325: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11326: de;
11327:
11328: l(' p_party_site_list(1) := p_party_site_id; ');
11329: l(' OPEN get_cpts_for_party_sites;');
11359: l(' p_match_type, ');
11360: l(' p_party_site_id, ');
11361: l(' x_search_ctx_id,');
11362: l(' x_num_matches);');
11363: d(fnd_log.level_procedure,'find_duplicate_party_sites(-)');
11364:
11365:
11366: l('EXCEPTION');
11367: l(' WHEN FND_API.G_EXC_ERROR THEN');
11411:
11412: l('BEGIN ');
11413:
11414:
11415: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
11416: ds(fnd_log.level_statement);
11417: dc(fnd_log.level_statement,'Input Parameters:');
11418: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11419: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11412: l('BEGIN ');
11413:
11414:
11415: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
11416: ds(fnd_log.level_statement);
11417: dc(fnd_log.level_statement,'Input Parameters:');
11418: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11419: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11420: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11413:
11414:
11415: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
11416: ds(fnd_log.level_statement);
11417: dc(fnd_log.level_statement,'Input Parameters:');
11418: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11419: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11420: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11421: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11414:
11415: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
11416: ds(fnd_log.level_statement);
11417: dc(fnd_log.level_statement,'Input Parameters:');
11418: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11419: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11420: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11421: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11422: de;
11415: d(fnd_log.level_procedure,'find_duplicate_contacts(+)');
11416: ds(fnd_log.level_statement);
11417: dc(fnd_log.level_statement,'Input Parameters:');
11418: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11419: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11420: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11421: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11422: de;
11423:
11416: ds(fnd_log.level_statement);
11417: dc(fnd_log.level_statement,'Input Parameters:');
11418: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11419: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11420: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11421: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11422: de;
11423:
11424:
11417: dc(fnd_log.level_statement,'Input Parameters:');
11418: dc(fnd_log.level_statement,'p_org_contact_id','p_org_contact_id');
11419: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11420: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11421: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11422: de;
11423:
11424:
11425: l(' p_contact_ids(1) := p_org_contact_id; ');
11457: l(' p_org_contact_id, ');
11458: l(' x_search_ctx_id, ');
11459: l(' x_num_matches);');
11460: l(' ');
11461: d(fnd_log.level_procedure,'find_duplicate_contacts(-)');
11462:
11463:
11464: l('EXCEPTION');
11465: l(' WHEN FND_API.G_EXC_ERROR THEN');
11498: l('');
11499: l('BEGIN');
11500:
11501:
11502: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
11503: ds(fnd_log.level_statement);
11504: dc(fnd_log.level_statement,'Input Parameters:');
11505: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11506: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11499: l('BEGIN');
11500:
11501:
11502: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
11503: ds(fnd_log.level_statement);
11504: dc(fnd_log.level_statement,'Input Parameters:');
11505: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11506: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11507: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11500:
11501:
11502: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
11503: ds(fnd_log.level_statement);
11504: dc(fnd_log.level_statement,'Input Parameters:');
11505: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11506: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11507: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11508: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11501:
11502: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
11503: ds(fnd_log.level_statement);
11504: dc(fnd_log.level_statement,'Input Parameters:');
11505: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11506: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11507: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11508: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11509: de;
11502: d(fnd_log.level_procedure,'find_duplicate_contact_points(+)');
11503: ds(fnd_log.level_statement);
11504: dc(fnd_log.level_statement,'Input Parameters:');
11505: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11506: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11507: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11508: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11509: de;
11510:
11503: ds(fnd_log.level_statement);
11504: dc(fnd_log.level_statement,'Input Parameters:');
11505: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11506: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11507: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11508: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11509: de;
11510:
11511: l(' contact_point_ids(1) := p_contact_point_id; ');
11504: dc(fnd_log.level_statement,'Input Parameters:');
11505: dc(fnd_log.level_statement,'p_contact_point_id','p_contact_point_id');
11506: dc(fnd_log.level_statement,'p_party_id','p_party_id');
11507: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11508: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11509: de;
11510:
11511: l(' contact_point_ids(1) := p_contact_point_id; ');
11512: l(' get_search_criteria ( ');
11535: l(' p_match_type, ');
11536: l(' p_contact_point_id, ');
11537: l(' x_search_ctx_id, ');
11538: l(' x_num_matches ); ');
11539: d(fnd_log.level_procedure,'find_duplicate_contact_points(-)');
11540:
11541:
11542: l('EXCEPTION');
11543: l(' WHEN FND_API.G_EXC_ERROR THEN');
11683: l(' FIRST BOOLEAN := TRUE; ');
11684: l('');
11685: l('BEGIN');
11686:
11687: d(fnd_log.level_procedure,'call_api_dynamic(+)');
11688: l('');
11689: FOR I in 1..20 LOOP
11690: l(' IF p_attrib_id'||I||' IS NOT NULL THEN');
11691: l(' AttrVals(p_attrib_id'||I||'):=p_attrib_val'||I||';');
11709: AND s.attribute_id = a.attribute_id) LOOP
11710: l(' IF AttrVals.EXISTS('||ATTRS.attribute_id||') THEN');
11711: IF ATTRS.entity_name='PARTY' THEN
11712: l(' l_party_rec.'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11713: d(fnd_log.level_statement,'l_party_rec.'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11714: ELSIF ATTRS.entity_name='PARTY_SITES' THEN
11715: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11716: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11717: ELSIF ATTRS.entity_name='CONTACTS' THEN
11712: l(' l_party_rec.'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11713: d(fnd_log.level_statement,'l_party_rec.'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11714: ELSIF ATTRS.entity_name='PARTY_SITES' THEN
11715: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11716: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11717: ELSIF ATTRS.entity_name='CONTACTS' THEN
11718: l(' l_contact_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11719: d(fnd_log.level_statement,'l_contact_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11720: ELSIF ATTRS.entity_name='CONTACT_POINTS' THEN
11715: l(' l_party_site_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11716: d(fnd_log.level_statement,'l_party_site_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11717: ELSIF ATTRS.entity_name='CONTACTS' THEN
11718: l(' l_contact_list(1).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11719: d(fnd_log.level_statement,'l_contact_list(1).'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11720: ELSIF ATTRS.entity_name='CONTACT_POINTS' THEN
11721: BEGIN
11722: SELECT tag INTO l_cpt_type FROM fnd_lookup_values
11723: WHERE lookup_type = 'HZ_DQM_CPT_ATTR_TYPE'
11733: l(' FOR I in 1..l_cpt_list.COUNT LOOP');
11734: l(' IF l_cpt_list(I).CONTACT_POINT_TYPE=l_cpt_type THEN');
11735: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11736: l(' FIRST := TRUE;');
11737: ds(fnd_log.level_statement);
11738: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
11739: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11740: de;
11741: l(' END IF;');
11734: l(' IF l_cpt_list(I).CONTACT_POINT_TYPE=l_cpt_type THEN');
11735: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11736: l(' FIRST := TRUE;');
11737: ds(fnd_log.level_statement);
11738: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
11739: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11740: de;
11741: l(' END IF;');
11742: l(' END LOOP;');
11735: l(' l_cpt_list(I).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11736: l(' FIRST := TRUE;');
11737: ds(fnd_log.level_statement);
11738: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').CONTACT_POINT_TYPE','l_cpt_type');
11739: dc(fnd_log.level_statement,'l_cpt_list(''||I||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11740: de;
11741: l(' END IF;');
11742: l(' END LOOP;');
11743: l(' IF not FIRST THEN');
11743: l(' IF not FIRST THEN');
11744: l(' l_idx := l_cpt_list.COUNT+1;');
11745: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
11746: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11747: ds(fnd_log.level_statement);
11748: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
11749: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11750: de;
11751: l(' END IF;');
11744: l(' l_idx := l_cpt_list.COUNT+1;');
11745: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
11746: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11747: ds(fnd_log.level_statement);
11748: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
11749: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11750: de;
11751: l(' END IF;');
11752: END IF;
11745: l(' l_cpt_list(l_idx).CONTACT_POINT_TYPE:=l_cpt_type;');
11746: l(' l_cpt_list(l_idx).'||ATTRS.attribute_name||':= AttrVals('||ATTRS.attribute_id||');');
11747: ds(fnd_log.level_statement);
11748: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').CONTACT_POINT_TYPE','l_cpt_type');
11749: dc(fnd_log.level_statement,'l_cpt_list(''||l_idx||'').'||ATTRS.attribute_name,'AttrVals('||ATTRS.attribute_id||')');
11750: de;
11751: l(' END IF;');
11752: END IF;
11753: l(' END IF;');
11778: l(' get_matching_contact_points(p_rule_id,p_party_id, l_cpt_list,');
11779: l(' p_restrict_sql,p_match_type,NULL,');
11780: l(' x_search_ctx_id,x_num_matches);');
11781: l(' END IF;');
11782: d(fnd_log.level_procedure,'call_api_dynamic(-)');
11783:
11784:
11785: l('EXCEPTION');
11786: l(' WHEN FND_API.G_EXC_ERROR THEN');
11875: l(' ');
11876: l(' BEGIN');
11877:
11878:
11879: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
11880: ds(fnd_log.level_statement);
11881: dc(fnd_log.level_statement,'Input Parameters:');
11882: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11883: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11876: l(' BEGIN');
11877:
11878:
11879: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
11880: ds(fnd_log.level_statement);
11881: dc(fnd_log.level_statement,'Input Parameters:');
11882: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11883: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11884: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
11877:
11878:
11879: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
11880: ds(fnd_log.level_statement);
11881: dc(fnd_log.level_statement,'Input Parameters:');
11882: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11883: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11884: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
11885: de;
11878:
11879: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
11880: ds(fnd_log.level_statement);
11881: dc(fnd_log.level_statement,'Input Parameters:');
11882: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11883: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11884: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
11885: de;
11886: l('');
11879: d(fnd_log.level_procedure,'get_matching_party_sites(+)');
11880: ds(fnd_log.level_statement);
11881: dc(fnd_log.level_statement,'Input Parameters:');
11882: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11883: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11884: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
11885: de;
11886: l('');
11887: l(' -- ************************************');
11880: ds(fnd_log.level_statement);
11881: dc(fnd_log.level_statement,'Input Parameters:');
11882: dc(fnd_log.level_statement,'p_match_type','p_match_type');
11883: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
11884: dc(fnd_log.level_statement,'p_dup_party_site_id','p_dup_party_site_id');
11885: de;
11886: l('');
11887: l(' -- ************************************');
11888: l(' -- STEP 1. Initialization and error checks');
11907: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
11908: l(' x_search_ctx_id := l_search_ctx_id;');
11909: l('');
11910:
11911: ds(fnd_log.level_statement);
11912: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11913: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11914: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11915: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11908: l(' x_search_ctx_id := l_search_ctx_id;');
11909: l('');
11910:
11911: ds(fnd_log.level_statement);
11912: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11913: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11914: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11915: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11916: de;
11909: l('');
11910:
11911: ds(fnd_log.level_statement);
11912: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11913: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11914: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11915: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11916: de;
11917:
11910:
11911: ds(fnd_log.level_statement);
11912: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11913: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11914: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11915: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11916: de;
11917:
11918: l(' IF l_party_site_contains_str IS NULL THEN');
11911: ds(fnd_log.level_statement);
11912: dc(fnd_log.level_statement,'l_match_str','l_match_str');
11913: dc(fnd_log.level_statement,'l_party_site_contains_str','l_party_site_contains_str');
11914: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
11915: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
11916: de;
11917:
11918: l(' IF l_party_site_contains_str IS NULL THEN');
11919: l(' defps := 1;');
11933: l(' l_party_site_id <> p_dup_party_site_id)) THEN ');
11934: l(' l_index := map_id(l_party_site_id);');
11935: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
11936: 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);');
11937: ds(fnd_log.level_statement);
11938: dc(fnd_log.level_statement,'Party Site Level Matches');
11939: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
11940: dc(fnd_log.level_statement,'l_score','l_score');
11941: de;
11934: l(' l_index := map_id(l_party_site_id);');
11935: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
11936: 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);');
11937: ds(fnd_log.level_statement);
11938: dc(fnd_log.level_statement,'Party Site Level Matches');
11939: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
11940: dc(fnd_log.level_statement,'l_score','l_score');
11941: de;
11942:
11935: l(' l_score := GET_PARTY_SITES_SCORE(l_match_idx'||l_ps_param_list||');');
11936: 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);');
11937: ds(fnd_log.level_statement);
11938: dc(fnd_log.level_statement,'Party Site Level Matches');
11939: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
11940: dc(fnd_log.level_statement,'l_score','l_score');
11941: de;
11942:
11943: l(' END IF; ');
11936: 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);');
11937: ds(fnd_log.level_statement);
11938: dc(fnd_log.level_statement,'Party Site Level Matches');
11939: dc(fnd_log.level_statement,'l_party_site_id','l_party_site_id');
11940: dc(fnd_log.level_statement,'l_score','l_score');
11941: de;
11942:
11943: l(' END IF; ');
11944: l(' END LOOP;');
11978: 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);');
11979: l(' END IF;');
11980: l(' END IF;');
11981: l(' END IF; ');
11982: ds(fnd_log.level_statement);
11983: dc(fnd_log.level_statement,'Contact_point Level Matches');
11984: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
11985: dc(fnd_log.level_statement,'l_score','l_score');
11986: de;
11979: l(' END IF;');
11980: l(' END IF;');
11981: l(' END IF; ');
11982: ds(fnd_log.level_statement);
11983: dc(fnd_log.level_statement,'Contact_point Level Matches');
11984: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
11985: dc(fnd_log.level_statement,'l_score','l_score');
11986: de;
11987: l(' END LOOP;');
11980: l(' END IF;');
11981: l(' END IF; ');
11982: ds(fnd_log.level_statement);
11983: dc(fnd_log.level_statement,'Contact_point Level Matches');
11984: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
11985: dc(fnd_log.level_statement,'l_score','l_score');
11986: de;
11987: l(' END LOOP;');
11988: l(' CLOSE l_contact_pt_cur;');
11981: l(' END IF; ');
11982: ds(fnd_log.level_statement);
11983: dc(fnd_log.level_statement,'Contact_point Level Matches');
11984: dc(fnd_log.level_statement,'l_party_site_id','l_cpt_ps_id');
11985: dc(fnd_log.level_statement,'l_score','l_score');
11986: de;
11987: l(' END LOOP;');
11988: l(' CLOSE l_contact_pt_cur;');
11989: l(' END IF;');
11989: l(' END IF;');
11990: l(' ROLLBACK to get_matching_party_sites ;');
11991: l(' x_num_matches := 0;');
11992: l(' l_party_site_id := H_SCORES.FIRST;');
11993: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
11994: l(' WHILE l_party_site_id IS NOT NULL LOOP');
11995: ds(fnd_log.level_statement);
11996: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
11997: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
11991: l(' x_num_matches := 0;');
11992: l(' l_party_site_id := H_SCORES.FIRST;');
11993: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
11994: l(' WHILE l_party_site_id IS NOT NULL LOOP');
11995: ds(fnd_log.level_statement);
11996: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
11997: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
11998: de;
11999: l(' IF l_match_str = '' OR '' THEN');
11992: l(' l_party_site_id := H_SCORES.FIRST;');
11993: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
11994: l(' WHILE l_party_site_id IS NOT NULL LOOP');
11995: ds(fnd_log.level_statement);
11996: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
11997: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
11998: de;
11999: l(' IF l_match_str = '' OR '' THEN');
12000: l(' IF (H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
11993: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
11994: l(' WHILE l_party_site_id IS NOT NULL LOOP');
11995: ds(fnd_log.level_statement);
11996: dc(fnd_log.level_statement,'Match Party Site ID','H_SCORES(l_party_site_id).PARTY_SITE_ID');
11997: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)*100)');
11998: de;
11999: l(' IF l_match_str = '' OR '' THEN');
12000: l(' IF (H_SCORES(l_party_site_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12001: l(' INSERT INTO HZ_MATCHED_PARTY_SITES_GT (SEARCH_CONTEXT_ID, PARTY_ID, PARTY_SITE_ID, SCORE) ');
12017: l(' END IF;');
12018: l(' l_party_site_id:=H_SCORES.NEXT(l_party_site_id);');
12019: l(' END LOOP;');
12020:
12021: d(fnd_log.level_procedure,'get_matching_party_sites(-)');
12022:
12023: l('EXCEPTION');
12024: l(' WHEN FND_API.G_EXC_ERROR THEN');
12025: l(' ROLLBACK to get_matching_party_sites ;');
12115: l(' ');
12116: l(' BEGIN');
12117:
12118:
12119: d(fnd_log.level_procedure,'get_matching_contacts(+)');
12120: ds(fnd_log.level_statement);
12121: dc(fnd_log.level_statement,'Input Parameters:');
12122: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12123: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12116: l(' BEGIN');
12117:
12118:
12119: d(fnd_log.level_procedure,'get_matching_contacts(+)');
12120: ds(fnd_log.level_statement);
12121: dc(fnd_log.level_statement,'Input Parameters:');
12122: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12123: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12124: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
12117:
12118:
12119: d(fnd_log.level_procedure,'get_matching_contacts(+)');
12120: ds(fnd_log.level_statement);
12121: dc(fnd_log.level_statement,'Input Parameters:');
12122: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12123: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12124: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
12125: de;
12118:
12119: d(fnd_log.level_procedure,'get_matching_contacts(+)');
12120: ds(fnd_log.level_statement);
12121: dc(fnd_log.level_statement,'Input Parameters:');
12122: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12123: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12124: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
12125: de;
12126:
12119: d(fnd_log.level_procedure,'get_matching_contacts(+)');
12120: ds(fnd_log.level_statement);
12121: dc(fnd_log.level_statement,'Input Parameters:');
12122: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12123: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12124: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
12125: de;
12126:
12127: l('');
12120: ds(fnd_log.level_statement);
12121: dc(fnd_log.level_statement,'Input Parameters:');
12122: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12123: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12124: dc(fnd_log.level_statement,'p_dup_contact_id','p_dup_contact_id');
12125: de;
12126:
12127: l('');
12128: l(' -- ************************************');
12148: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
12149: l(' x_search_ctx_id := l_search_ctx_id;');
12150: l('');
12151:
12152: ds(fnd_log.level_statement);
12153: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12154: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
12155: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12156: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12149: l(' x_search_ctx_id := l_search_ctx_id;');
12150: l('');
12151:
12152: ds(fnd_log.level_statement);
12153: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12154: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
12155: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12156: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12157: de;
12150: l('');
12151:
12152: ds(fnd_log.level_statement);
12153: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12154: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
12155: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12156: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12157: de;
12158:
12151:
12152: ds(fnd_log.level_statement);
12153: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12154: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
12155: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12156: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12157: de;
12158:
12159: l(' IF l_contact_contains_str IS NULL THEN');
12152: ds(fnd_log.level_statement);
12153: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12154: dc(fnd_log.level_statement,'l_contact_contains_str','l_contact_contains_str');
12155: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12156: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12157: de;
12158:
12159: l(' IF l_contact_contains_str IS NULL THEN');
12160: l(' defct := 1;');
12173: l(' l_index := map_id(l_org_contact_id);');
12174: l(' l_score := GET_CONTACTS_SCORE(l_match_idx'||l_c_param_list||');');
12175: 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);');
12176:
12177: ds(fnd_log.level_statement);
12178: dc(fnd_log.level_statement,'Contact Level Matches');
12179: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
12180: dc(fnd_log.level_statement,'l_score','l_score');
12181: de;
12174: l(' l_score := GET_CONTACTS_SCORE(l_match_idx'||l_c_param_list||');');
12175: 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);');
12176:
12177: ds(fnd_log.level_statement);
12178: dc(fnd_log.level_statement,'Contact Level Matches');
12179: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
12180: dc(fnd_log.level_statement,'l_score','l_score');
12181: de;
12182:
12175: 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);');
12176:
12177: ds(fnd_log.level_statement);
12178: dc(fnd_log.level_statement,'Contact Level Matches');
12179: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
12180: dc(fnd_log.level_statement,'l_score','l_score');
12181: de;
12182:
12183: l(' END IF; ');
12176:
12177: ds(fnd_log.level_statement);
12178: dc(fnd_log.level_statement,'Contact Level Matches');
12179: dc(fnd_log.level_statement,'l_org_contact_id','l_org_contact_id');
12180: dc(fnd_log.level_statement,'l_score','l_score');
12181: de;
12182:
12183: l(' END IF; ');
12184: l(' END LOOP;');
12219: l(' END IF;');
12220: l(' END IF;');
12221: l(' END IF; ');
12222: l(' END LOOP;');
12223: ds(fnd_log.level_statement);
12224: dc(fnd_log.level_statement,'Contact_point Level Matches');
12225: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
12226: dc(fnd_log.level_statement,'l_score','l_score');
12227: de;
12220: l(' END IF;');
12221: l(' END IF; ');
12222: l(' END LOOP;');
12223: ds(fnd_log.level_statement);
12224: dc(fnd_log.level_statement,'Contact_point Level Matches');
12225: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
12226: dc(fnd_log.level_statement,'l_score','l_score');
12227: de;
12228: l(' CLOSE l_contact_pt_cur;');
12221: l(' END IF; ');
12222: l(' END LOOP;');
12223: ds(fnd_log.level_statement);
12224: dc(fnd_log.level_statement,'Contact_point Level Matches');
12225: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
12226: dc(fnd_log.level_statement,'l_score','l_score');
12227: de;
12228: l(' CLOSE l_contact_pt_cur;');
12229: l(' END IF;');
12222: l(' END LOOP;');
12223: ds(fnd_log.level_statement);
12224: dc(fnd_log.level_statement,'Contact_point Level Matches');
12225: dc(fnd_log.level_statement,'l_org_contact_id','l_cpt_contact_id');
12226: dc(fnd_log.level_statement,'l_score','l_score');
12227: de;
12228: l(' CLOSE l_contact_pt_cur;');
12229: l(' END IF;');
12230: l(' ROLLBACK to get_matching_contacts ;');
12229: l(' END IF;');
12230: l(' ROLLBACK to get_matching_contacts ;');
12231: l(' x_num_matches := 0;');
12232: l(' l_org_contact_id := H_SCORES.FIRST;');
12233: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12234: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
12235: l(' IF l_match_str = '' OR '' THEN');
12236: ds(fnd_log.level_statement);
12237: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
12232: l(' l_org_contact_id := H_SCORES.FIRST;');
12233: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12234: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
12235: l(' IF l_match_str = '' OR '' THEN');
12236: ds(fnd_log.level_statement);
12237: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
12238: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
12239: de;
12240: -- IF l_purpose = 'S' THEN
12233: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12234: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
12235: l(' IF l_match_str = '' OR '' THEN');
12236: ds(fnd_log.level_statement);
12237: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
12238: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
12239: de;
12240: -- IF l_purpose = 'S' THEN
12241: l(' IF (H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12234: l(' WHILE l_org_contact_id IS NOT NULL LOOP');
12235: l(' IF l_match_str = '' OR '' THEN');
12236: ds(fnd_log.level_statement);
12237: dc(fnd_log.level_statement,'Match Contact ID','H_SCORES(l_org_contact_id).ORG_CONTACT_ID');
12238: dc(fnd_log.level_statement,'Score','round((H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)*100)');
12239: de;
12240: -- IF l_purpose = 'S' THEN
12241: l(' IF (H_SCORES(l_org_contact_id).TOTAL_SCORE/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12242: l(' INSERT INTO HZ_MATCHED_CONTACTS_GT (SEARCH_CONTEXT_ID, PARTY_ID, ORG_CONTACT_ID, SCORE) ');
12259: l(' END IF;');
12260: l(' l_org_contact_id:=H_SCORES.NEXT(l_org_contact_id);');
12261: l(' END LOOP;');
12262:
12263: d(fnd_log.level_procedure,'get_matching_contacts(-)');
12264:
12265: l('EXCEPTION');
12266: l(' WHEN FND_API.G_EXC_ERROR THEN');
12267: l(' ROLLBACK to get_matching_contacts ;');
12338: l(' BEGIN');
12339:
12340:
12341:
12342: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
12343: ds(fnd_log.level_statement);
12344: dc(fnd_log.level_statement,'Input Parameters:');
12345: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12346: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12339:
12340:
12341:
12342: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
12343: ds(fnd_log.level_statement);
12344: dc(fnd_log.level_statement,'Input Parameters:');
12345: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12346: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12347: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
12340:
12341:
12342: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
12343: ds(fnd_log.level_statement);
12344: dc(fnd_log.level_statement,'Input Parameters:');
12345: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12346: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12347: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
12348: de;
12341:
12342: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
12343: ds(fnd_log.level_statement);
12344: dc(fnd_log.level_statement,'Input Parameters:');
12345: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12346: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12347: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
12348: de;
12349:
12342: d(fnd_log.level_procedure,'get_matching_contact_points(+)');
12343: ds(fnd_log.level_statement);
12344: dc(fnd_log.level_statement,'Input Parameters:');
12345: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12346: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12347: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
12348: de;
12349:
12350: l('');
12343: ds(fnd_log.level_statement);
12344: dc(fnd_log.level_statement,'Input Parameters:');
12345: dc(fnd_log.level_statement,'p_match_type','p_match_type');
12346: dc(fnd_log.level_statement,'p_restrict_sql','p_restrict_sql');
12347: dc(fnd_log.level_statement,'p_dup_contact_point_id','p_dup_contact_point_id');
12348: de;
12349:
12350: l('');
12351: l(' -- ************************************');
12372: l(' -- Setup Search Context ID');
12373: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
12374: l(' x_search_ctx_id := l_search_ctx_id;');
12375:
12376: ds(fnd_log.level_statement);
12377: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12378: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12379: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12380: de;
12373: l(' SELECT hz_search_ctx_s.nextval INTO l_search_ctx_id FROM dual;');
12374: l(' x_search_ctx_id := l_search_ctx_id;');
12375:
12376: ds(fnd_log.level_statement);
12377: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12378: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12379: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12380: de;
12381:
12374: l(' x_search_ctx_id := l_search_ctx_id;');
12375:
12376: ds(fnd_log.level_statement);
12377: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12378: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12379: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12380: de;
12381:
12382: l('');
12375:
12376: ds(fnd_log.level_statement);
12377: dc(fnd_log.level_statement,'l_match_str','l_match_str');
12378: dc(fnd_log.level_statement,'l_contact_pt_contains_str','l_contact_pt_contains_str');
12379: dc(fnd_log.level_statement,'l_search_ctx_id','l_search_ctx_id');
12380: de;
12381:
12382: l('');
12383: l(' IF l_contact_pt_contains_str IS NOT NULL THEN');
12394: l(' H_CONTACT_POINT_ID(cnt) := l_contact_pt_id;');
12395: l(' H_PARTY_ID(cnt) := l_cpt_party_id;');
12396: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
12397: l(' cnt := cnt+1;');
12398: ds(fnd_log.level_statement);
12399: dc(fnd_log.level_statement,'Contact Point Matches');
12400: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
12401: dc(fnd_log.level_statement,'l_score','l_score');
12402: de;
12395: l(' H_PARTY_ID(cnt) := l_cpt_party_id;');
12396: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
12397: l(' cnt := cnt+1;');
12398: ds(fnd_log.level_statement);
12399: dc(fnd_log.level_statement,'Contact Point Matches');
12400: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
12401: dc(fnd_log.level_statement,'l_score','l_score');
12402: de;
12403:
12396: l(' H_SCORE(cnt) := GET_CONTACT_POINTS_SCORE(l_match_idx'||l_cpt_param_list||');');
12397: l(' cnt := cnt+1;');
12398: ds(fnd_log.level_statement);
12399: dc(fnd_log.level_statement,'Contact Point Matches');
12400: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
12401: dc(fnd_log.level_statement,'l_score','l_score');
12402: de;
12403:
12404: l(' END IF; ');
12397: l(' cnt := cnt+1;');
12398: ds(fnd_log.level_statement);
12399: dc(fnd_log.level_statement,'Contact Point Matches');
12400: dc(fnd_log.level_statement,'l_contact_pt_id','l_contact_pt_id');
12401: dc(fnd_log.level_statement,'l_score','l_score');
12402: de;
12403:
12404: l(' END IF; ');
12405: l(' END LOOP;');
12404: l(' END IF; ');
12405: l(' END LOOP;');
12406: l(' CLOSE l_contact_pt_cur;');
12407:
12408: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12409: l('ROLLBACK to get_matching_contact_points ;');
12410: l(' x_num_matches := 0; ');
12411: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
12412: ds(fnd_log.level_statement);
12408: d(fnd_log.level_statement,'Evaluating Matches. Threshold : '||round((l_match_threshold/l_max_score)*100));
12409: l('ROLLBACK to get_matching_contact_points ;');
12410: l(' x_num_matches := 0; ');
12411: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
12412: ds(fnd_log.level_statement);
12413: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
12414: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
12415: de;
12416: l(' IF (H_SCORE(I)/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12409: l('ROLLBACK to get_matching_contact_points ;');
12410: l(' x_num_matches := 0; ');
12411: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
12412: ds(fnd_log.level_statement);
12413: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
12414: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
12415: de;
12416: l(' IF (H_SCORE(I)/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12417: l(' INSERT INTO HZ_MATCHED_CPTS_GT(SEARCH_CONTEXT_ID,CONTACT_POINT_ID,PARTY_ID,SCORE) VALUES (');
12410: l(' x_num_matches := 0; ');
12411: l(' FOR I in 1..H_CONTACT_POINT_ID.COUNT LOOP');
12412: ds(fnd_log.level_statement);
12413: dc(fnd_log.level_statement,'Match Contact Point ID','H_CONTACT_POINT_ID(I)');
12414: dc(fnd_log.level_statement,'Score','round((H_SCORE(I)/l_entered_max_score)*100)');
12415: de;
12416: l(' IF (H_SCORE(I)/l_entered_max_score)>=('||l_match_threshold||'/'||l_max_score||') THEN');
12417: l(' INSERT INTO HZ_MATCHED_CPTS_GT(SEARCH_CONTEXT_ID,CONTACT_POINT_ID,PARTY_ID,SCORE) VALUES (');
12418: l(' l_search_ctx_id,H_CONTACT_POINT_ID(I),H_PARTY_ID(I),round(H_SCORE(I)/l_entered_max_score)*100);');
12420: l(' END IF;');
12421: l(' END LOOP; ');
12422: l(' END IF;');
12423:
12424: d(fnd_log.level_procedure,'get_matching_contact_points(-)');
12425:
12426: l('EXCEPTION');
12427: l(' WHEN FND_API.G_EXC_ERROR THEN');
12428: l(' ROLLBACK to get_matching_contact_points ;');
12513: l(' ');
12514: l(' BEGIN');
12515: l('');
12516:
12517: d(fnd_log.level_statement,'get_score_details(+)');
12518: l(' -- ************************************');
12519: l(' -- STEP 1. Initialization and error checks');
12520: l('');
12521: 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);');
12649: l(' DELETE FROM HZ_SRCH_PARTIES WHERE batch_id = -1 ;');
12650: l(' DELETE FROM HZ_SRCH_PSITES WHERE batch_id = -1 ;');
12651: l(' DELETE FROM HZ_SRCH_CONTACTS WHERE batch_id = -1 ;');
12652: l(' DELETE FROM HZ_SRCH_CPTS WHERE batch_id = -1 ;');
12653: d(fnd_log.level_procedure,'get_score_details(-)');
12654:
12655:
12656: l('EXCEPTION');
12657: l(' WHEN FND_API.G_EXC_ERROR THEN');
15873: l(' l_attrib_id18 NUMBER; ');
15874: l(' l_attrib_id19 NUMBER; ');
15875: l(' l_attrib_id20 NUMBER; ');
15876: l(' BEGIN');
15877: d(fnd_log.level_procedure,'call_api_dynamic_names(+)');
15878: d(fnd_log.level_statement,'Rule ID','p_rule_id ');
15879: l(' ');
15880: l(' IF (p_attrib_name1 IS NOT NULL) THEN ');
15881: l(' l_attrib_id1 := get_attrib_id(p_attrib_name1); ');
15874: l(' l_attrib_id19 NUMBER; ');
15875: l(' l_attrib_id20 NUMBER; ');
15876: l(' BEGIN');
15877: d(fnd_log.level_procedure,'call_api_dynamic_names(+)');
15878: d(fnd_log.level_statement,'Rule ID','p_rule_id ');
15879: l(' ');
15880: l(' IF (p_attrib_name1 IS NOT NULL) THEN ');
15881: l(' l_attrib_id1 := get_attrib_id(p_attrib_name1); ');
15882: l(' END IF; ');
15950: l(' p_attrib_val11,p_attrib_val12,p_attrib_val13,p_attrib_val14,p_attrib_val15, ');
15951: l(' p_attrib_val16,p_attrib_val17,p_attrib_val18,p_attrib_val19,p_attrib_val20, ');
15952: l(' p_restrict_sql,p_api_name,p_match_type,p_party_id,p_search_merged, ');
15953: l(' x_search_ctx_id,x_num_matches, x_return_status, x_msg_count, x_msg_data); ');
15954: d(fnd_log.level_procedure,'call_api_dynamic_names(-)');
15955: gen_exception_block;
15956: l(' END call_api_dynamic_names; ');
15957:
15958: END gen_call_api_dynamic_names;