DBA Data[Home] [Help]

APPS.PV_OPP_MATCH_PUB dependencies on FND_MSG_PUB

Line 225: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,

221: -------------------- Exception --------------------------
222: EXCEPTION
223: WHEN FND_API.G_EXC_ERROR THEN
224: x_return_status := FND_API.G_RET_STS_ERROR;
225: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
226: p_count => x_msg_count,
227: p_data => x_msg_data);
228:
229: WHEN FND_API.g_exc_unexpected_error THEN

Line 231: FND_MSG_PUB.count_and_get(

227: p_data => x_msg_data);
228:
229: WHEN FND_API.g_exc_unexpected_error THEN
230: x_return_status := FND_API.g_ret_sts_unexp_error;
231: FND_MSG_PUB.count_and_get(
232: p_encoded => FND_API.g_false,
233: p_count => x_msg_count,
234: p_data => x_msg_data
235: );

Line 238: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

234: p_data => x_msg_data
235: );
236:
237: WHEN OTHERS THEN
238: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
239: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
240: END IF;
241:
242: x_return_status := FND_API.G_RET_STS_ERROR;

Line 239: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

235: );
236:
237: WHEN OTHERS THEN
238: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
239: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
240: END IF;
241:
242: x_return_status := FND_API.G_RET_STS_ERROR;
243: FND_MSG_PUB.count_and_get(

Line 243: FND_MSG_PUB.count_and_get(

239: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
240: END IF;
241:
242: x_return_status := FND_API.G_RET_STS_ERROR;
243: FND_MSG_PUB.count_and_get(
244: p_encoded => FND_API.g_false,
245: p_count => x_msg_count,
246: p_data => x_msg_data
247: );

Line 332: FND_MSG_PUB.initialize;

328:
329: BEGIN
330: -------------------- initialize -------------------------
331: IF FND_API.to_boolean(p_init_msg_list) THEN
332: FND_MSG_PUB.initialize;
333: END IF;
334:
335: IF NOT FND_API.compatible_api_call(
336: l_api_version,

Line 352: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

348: -- ------------------------------------------------------------------------
349: -- Make sure that either p_user_name or p_resource IS NOT NULL.
350: -- ------------------------------------------------------------------------
351: IF (p_user_name IS NULL AND p_resource_id IS NULL) THEN
352: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
353: p_msg_name => 'PV_NO_USERNAME_ID_DEFINED',
354: p_token1 => null,
355: p_token1_value => null,
356: p_token2 => null,

Line 389: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

385: -- ---------------------------------------------------------------------------------
386: -- Cache all the opportunity selection rules (attributes-values) in a global
387: -- PL/SQL table, g_opp_selection_tab.
388: -- ---------------------------------------------------------------------------------
389: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
390: Debug('----------------------------------------------------------------');
391: Debug('g_matching_engine_type: ' || g_matching_engine_type);
392: Debug('Matching Type: ' || l_matching_type);
393: Debug('----------------------------------------------------------------');

Line 400: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

396: END IF;
397:
398: Clear_Rules_Cache;
399:
400: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
401: Debug('Rule Caching............................................');
402: END IF;
403:
404: l_start := dbms_utility.get_time;

Line 407: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

403:
404: l_start := dbms_utility.get_time;
405: Cache_Rules;
406:
407: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
408: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
409: END IF;
410:
411: l_count := g_opp_selection_tab.COUNT;

Line 413: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

409: END IF;
410:
411: l_count := g_opp_selection_tab.COUNT;
412:
413: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
414: Debug('Number of Rule items Cached: ' || l_count);
415: END IF;
416:
417: i := 1;

Line 419: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

415: END IF;
416:
417: i := 1;
418:
419: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
420: Debug('Opportunity Rule Selection Starts....................................');
421: END IF;
422:
423: l_start := dbms_utility.get_time;

Line 426: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

422:
423: l_start := dbms_utility.get_time;
424:
425: WHILE (i <= l_count AND (NOT l_stop_flag)) LOOP
426: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
427: Debug('******************************************************');
428: Debug('Rule # :::' || g_opp_selection_tab(i).process_rule_id);
429: END IF;
430:

Line 436: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

432: -- If the opportunity's attribute value is not already retrieved, retrieve it.
433: -- ---------------------------------------------------------------------------
434: l_attribute_id := g_opp_selection_tab(i).attribute_id;
435:
436: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
437: Debug('Attribute ID: ' || l_attribute_id);
438: Debug('Opportunity ID: ' || p_entity_id);
439: END IF;
440:

Line 470: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

466: -- ---------------------------------------------------------------------------
467: IF (NOT l_entity_attr_value.EXISTS(l_attribute_id)) THEN
468: i := Get_Next_Rule_Index(i, g_opp_selection_tab);
469:
470: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
471: Debug('No attribute value for this attribute ' || l_attribute_id);
472: Debug('There is something wrong in the attribute setup.');
473: END IF;
474:

Line 493: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

489: -- until all rules are exhausted.
490: -- If the match succeeds, check if last_attr_flag = TRUE. If yes, there's
491: -- a match. set l_stop_flag = TRUE
492: -- ------------------------------------------------------------------------
493: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
494: Debug('Calling Check_Match...AND LOGIC...');
495: Debug('p_attribute_id: ' || l_attribute_id);
496: --Debug('p_entity_attr_value: ' || l_entity_attr_value(l_attribute_id).attribute_value);
497:

Line 529: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

525: p_return_type => l_entity_attr_value(l_attribute_id).return_type,
526: p_rule_currency_code => g_opp_selection_tab(i).currency_code
527: );
528:
529: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
530: IF (l_matched) THEN
531: Debug('Check_Match TRUE!');
532: ELSE
533: Debug('Check_Match FALSE!');

Line 557: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

553: l_concat_to_attr_val := l_concat_to_attr_val ||
554: g_opp_selection_tab(j).attribute_to_value || l_delimiter;
555: END LOOP;
556:
557: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
558: Debug('Calling Check_Match...OR Logic');
559: Debug('p_attribute_id: ' || l_attribute_id);
560: --Debug('p_entity_attr_value: ' || l_entity_attr_value(l_attribute_id).attribute_value);
561: l_attr_val_temp := l_entity_attr_value(l_attribute_id).attribute_value;

Line 591: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

587: p_return_type => l_entity_attr_value(l_attribute_id).return_type,
588: p_rule_currency_code => g_opp_selection_tab(i).currency_code
589: );
590:
591: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
592: IF (l_matched) THEN
593: Debug('Check_Match TRUE!');
594: ELSE
595: Debug('Check_Match FALSE!');

Line 630: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

626: -- The current rule is selected for this opportunity.
627: -- -------------------------------------------------------------
628: x_selected_rule_id := g_opp_selection_tab(i).process_rule_id;
629:
630: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
631: Debug('%%%%%%%Selected Rule ID: ' || x_selected_rule_id);
632: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
633: Debug('Number of rule items scanned/evaluated before finding a matching rule: ' || i);
634: END IF;

Line 643: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

639: -- of tables (operator, attribute, attribute_value) +
640: -- "selection mode" --> Only partners which match all search
641: -- attributes are returned.
642: -- -------------------------------------------------------------
643: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
644: Debug('..........................................................');
645: Debug('Calling Partner_Selection................................');
646: END IF;
647:

Line 755: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

751:
752: END IF;
753: END LOOP;
754:
755: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
756: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
757: END IF;
758:
759: IF (NOT l_stop_flag) THEN

Line 760: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

756: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
757: END IF;
758:
759: IF (NOT l_stop_flag) THEN
760: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
761: Debug('No matching rules found!!!!!');
762: END IF;
763:
764: -- -------------------------------------------------------------------------

Line 768: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

764: -- -------------------------------------------------------------------------
765: -- When no rules are found, still need to retrieve the incumbent (preferred)
766: -- partner, get its distance and details, and return it to the caller.
767: -- -------------------------------------------------------------------------
768: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
769: Debug('..........................................................');
770: Debug('Calling Partner_Selection for incumbent partner only......');
771: END IF;
772:

Line 810: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,

806: END IF;
807:
808:
809: IF (g_rule_engine_trace_flag = 'Y') THEN
810: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
811: p_count => x_msg_count,
812: p_data => x_msg_data);
813: END IF;
814:

Line 819: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,

815: -------------------- Exception --------------------------
816: EXCEPTION
817: WHEN FND_API.G_EXC_ERROR THEN
818: x_return_status := FND_API.G_RET_STS_ERROR;
819: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
820: p_count => x_msg_count,
821: p_data => x_msg_data);
822:
823: WHEN FND_API.g_exc_unexpected_error THEN

Line 825: FND_MSG_PUB.count_and_get(

821: p_data => x_msg_data);
822:
823: WHEN FND_API.g_exc_unexpected_error THEN
824: x_return_status := FND_API.g_ret_sts_unexp_error;
825: FND_MSG_PUB.count_and_get(
826: p_encoded => FND_API.g_false,
827: p_count => x_msg_count,
828: p_data => x_msg_data
829: );

Line 835: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

831: WHEN g_e_buffer_too_small THEN
832: x_return_status := l_return_status;
833:
834: WHEN OTHERS THEN
835: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
836: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
837: END IF;
838:
839: x_return_status := FND_API.G_RET_STS_ERROR;

Line 836: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

832: x_return_status := l_return_status;
833:
834: WHEN OTHERS THEN
835: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
836: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
837: END IF;
838:
839: x_return_status := FND_API.G_RET_STS_ERROR;
840: FND_MSG_PUB.count_and_get(

Line 840: FND_MSG_PUB.count_and_get(

836: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
837: END IF;
838:
839: x_return_status := FND_API.G_RET_STS_ERROR;
840: FND_MSG_PUB.count_and_get(
841: p_encoded => FND_API.g_false,
842: p_count => x_msg_count,
843: p_data => x_msg_data
844: );

Line 1012: FND_MSG_PUB.initialize;

1008:
1009: BEGIN
1010: -------------------- initialize -------------------------
1011: IF FND_API.to_boolean(p_init_msg_list) THEN
1012: FND_MSG_PUB.initialize;
1013: END IF;
1014:
1015: IF NOT FND_API.compatible_api_call(
1016: l_api_version,

Line 1032: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1028: -- ------------------------------------------------------------------------
1029: -- Make sure that either p_user_name or p_resource IS NOT NULL.
1030: -- ------------------------------------------------------------------------
1031: IF (p_user_name IS NULL AND p_resource_id IS NULL) THEN
1032: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1033: p_msg_name => 'PV_NO_USERNAME_ID_DEFINED',
1034: p_token1 => null,
1035: p_token1_value => null,
1036: p_token2 => null,

Line 1049: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1045: -- Retrieve profile value for stack trace profile option.
1046: -- ------------------------------------------------------------------------
1047: --g_rule_engine_trace_flag := NVL(FND_PROFILE.VALUE('PV_RULE_ENGINE_TRACE_ON'), 'N');
1048:
1049: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1050: Debug('............................................................');
1051: Debug('Stack trace turned on? ' || g_rule_engine_trace_flag);
1052: Debug('............................................................');
1053:

Line 1078: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1074: FOR x IN lc_get_location_id(p_entity_id) LOOP
1075: l_customer_address.location_id := x.location_id;
1076: END LOOP;
1077:
1078: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1079: Debug('***l_entity_routing.max_nearest_partner: ' || l_entity_routing.max_nearest_partner || '***');
1080: Debug('***l_entity_routing.distance_from_customer: ' || l_entity_routing.distance_from_customer || '***');
1081: END IF;
1082:

Line 1088: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1084: (l_entity_routing.max_nearest_partner IS NOT NULL OR
1085: l_entity_routing.distance_from_customer IS NOT NULL) AND
1086: l_customer_address.location_id IS NULL)
1087: THEN
1088: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1089: p_msg_name => 'PV_NO_GEOMETRY_INFO',
1090: p_token1 => 'TEXT',
1091: p_token1_value => 'Entity ID: ' || p_entity_id,
1092: p_token2 => null,

Line 1103: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1099:
1100: -- ------------------------------------------------------------------------
1101: -- Retrieve the rule's currency_code.
1102: -- ------------------------------------------------------------------------
1103: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1104: Debug ('p_incumbent_partner_only flag: ' || p_incumbent_partner_only);
1105: END IF;
1106:
1107: IF (p_incumbent_partner_only = 'N') THEN

Line 1122: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1118: l_process_rule_name := x.process_rule_name;
1119: END LOOP;
1120: END IF;
1121:
1122: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1123: p_msg_name => 'PV_DEBUG_MSG',
1124: p_token1 => 'TEXT',
1125: p_token1_value => 'This rule "' || l_process_rule_name ||
1126: '" (ID: ' || p_process_rule_id || ') does not exist',

Line 1134: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1130: g_failure_code := 'OTHER';
1131: RAISE FND_API.G_EXC_ERROR;
1132: END;
1133:
1134: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1135: Debug('Rule Currency is: ' || l_rule_currency_code);
1136: END IF;
1137:
1138: -- ========================================================================

Line 1145: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1141: -- ------------------------------------------------------------------------
1142: -- Loop through opportunity-partner attribute mappings and retrieve the
1143: -- attribute values of each of the attributes in mapping.
1144: -- ------------------------------------------------------------------------
1145: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1146: Debug('Retrieve opportunity-to-partner attribute mapping..................');
1147: END IF;
1148:
1149: FOR lc_cursor IN lc_partner_mapping LOOP

Line 1156: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1152: -- ---------------------------------------------------------------------
1153: -- Retrieve opportunity's attribute value if it hasn't already been
1154: -- retrieved.
1155: -- ---------------------------------------------------------------------
1156: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1157: Debug('Attribute ID before calling Get_Entity_Attr_Values: ' || l_attribute_id);
1158: --Debug('Entity Type: ' || p_entity);
1159: END IF;
1160:

Line 1237: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1233: END IF;
1234: END IF;
1235: END LOOP;
1236:
1237: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1238: Debug('Partner Matching/Mapping Attributes...');
1239:
1240: FOR i IN 1..l_attr_id_tbl.COUNT LOOP
1241:

Line 1328: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1324:
1325: -- ------------------------------------------------------------------------
1326: -- For debugging only...
1327: -- ------------------------------------------------------------------------
1328: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1329: FOR i IN k..l_attr_id_tbl.COUNT LOOP
1330: l_attr_val_temp := l_attr_value_tbl(i);
1331: while (l_attr_val_temp is not null) loop
1332: Debug(i || '-->' || l_attr_id_tbl(i) || ': ' || substr( l_attr_val_temp, 1, 1800 ) ||

Line 1352: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1348: ELSE
1349: l_resource_id := p_resource_id;
1350: END IF;
1351:
1352: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1353: Debug('..........................................................');
1354: Debug('Calling Form_Where_Clause.......................');
1355: END IF;
1356:

Line 1391: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1387: ELSIF (l_return_status = FND_API.g_ret_sts_unexp_error) THEN
1388: RAISE FND_API.g_exc_unexpected_error;
1389: END IF;
1390:
1391: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1392: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1393:
1394: Debug('# of Partners Matched: ' || x_partner_tbl.COUNT);
1395: Debug('Partners Matched: ');

Line 1413: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1409: IF (l_entity_routing.entity_routing_id IS NOT NULL) THEN
1410: IF (l_entity_routing.distance_uom_code = 'KILOMETERS') THEN
1411: l_distance_uom := pv_locator.g_distance_unit_km;
1412:
1413: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1414: Debug('Distance Unit: ' || l_distance_uom);
1415: END IF;
1416:
1417: ELSIF (l_entity_routing.distance_uom_code = 'MILES') THEN

Line 1420: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1416:
1417: ELSIF (l_entity_routing.distance_uom_code = 'MILES') THEN
1418: l_distance_uom := pv_locator.g_distance_unit_mile;
1419:
1420: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1421: Debug('Distance Unit: ' || l_distance_uom);
1422: END IF;
1423:
1424: ELSE

Line 1427: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1423:
1424: ELSE
1425: --l_distance_uom := pv_locator.g_distance_unit_mile;
1426:
1427: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1428: Debug('No Distance Unit Specified. Use the default from the pv_locator profile.');
1429: END IF;
1430: END IF;
1431:

Line 1435: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1431:
1432: ELSE
1433: --l_distance_uom := pv_locator.g_distance_unit_mile;
1434:
1435: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1436: Debug('No Distance Unit Specified. Use the default from the pv_locator profile.');
1437: END IF;
1438: END IF;
1439:

Line 1441: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1437: END IF;
1438: END IF;
1439:
1440:
1441: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1442: Debug('Geo Proximity and Routing Parameters..............................');
1443: Debug('Location ID: ' || l_customer_address.location_id);
1444: Debug('Distance from partner: ' || l_entity_routing.distance_from_customer);
1445: Debug('Max # of partners to be returned: ' || l_entity_routing.max_nearest_partner);

Line 1459: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1455: -- ------------------------------------------------------------------------
1456:
1457: l_partner_id_tbl := x_partner_tbl;
1458:
1459: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1460: Debug('# of Partners Sent: ' || x_partner_tbl.COUNT);
1461: END IF;
1462:
1463:

Line 1468: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1464: IF (l_partner_id_tbl.EXISTS(1) AND l_partner_id_tbl.COUNT > 0) THEN
1465: -- -------------------------------------------------------------
1466: -- Execute geo proximity API.
1467: -- -------------------------------------------------------------
1468: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1469: Debug('..........................................................');
1470: Debug('Calling pv_locator.Get_Partners..........................');
1471: Debug('# of Partners Sent: ' || l_partner_id_tbl.COUNT);
1472: END IF;

Line 1500: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1496: g_failure_code := 'ELOCATION_LOOKUP_FAILURE';
1497: RAISE FND_API.g_exc_unexpected_error;
1498: END IF;
1499:
1500: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1501: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1502: END IF;
1503:
1504: IF (x_distance_uom_returned = pv_locator.g_distance_unit_km) THEN

Line 1511: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1507: ELSIF (x_distance_uom_returned = pv_locator.g_distance_unit_mile) THEN
1508: x_distance_uom_returned := 'MILES';
1509: END IF;
1510:
1511: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1512: Debug('Distance UOM returned is: ' || x_distance_uom_returned);
1513: Debug('# of Partners Returned: ' || x_partner_tbl.COUNT);
1514: Debug('Partners Matched and distance to customer: ');
1515: END IF;

Line 1522: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1518: -- -------------------------------------------------------------
1519: -- Store partners' distance to customer.
1520: -- -------------------------------------------------------------
1521: FOR i IN 1..x_partner_tbl.COUNT LOOP
1522: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1523: Debug(x_partner_tbl(i) || ':::' || TRUNC(x_distance_tbl(i), 2));
1524: END IF;
1525:
1526: l_partner_distance_tbl(x_partner_tbl(i)) := x_distance_tbl(i);

Line 1544: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1540: -- Tie-breaker
1541: -- -------------------------------------------------------------
1542: -- IF (l_entity_routing.routing_type IN ('SERIAL', 'SINGLE') AND
1543: IF (x_partner_tbl.EXISTS(1) AND x_partner_tbl.COUNT > 1) THEN
1544: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1545: Debug('..........................................................');
1546: Debug('Calling Tie_Breaker......................................');
1547: Debug('# of Partners Sent: ' || x_partner_tbl.COUNT);
1548: END IF;

Line 1570: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1566: g_failure_code := 'OTHER';
1567: RAISE FND_API.g_exc_unexpected_error;
1568: END IF;
1569:
1570: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1571: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1572: END IF;
1573: END IF;
1574:

Line 1575: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1571: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1572: END IF;
1573: END IF;
1574:
1575: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1576: Debug('# of Partners Returned: ' || x_partner_tbl.COUNT);
1577: END IF;
1578:
1579: -- ------------------------------------------------------------------------------

Line 1599: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1595: -- Note that preferred partner(s) should always be placed on top of the
1596: -- partner list and it should never be involved in tie-breaking and
1597: -- geo proximity elimination.
1598: -- ------------------------------------------------------------------------------
1599: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1600: Debug('..........................................................');
1601: Debug('Retrieving the preferred partner..........................');
1602: END IF;
1603:

Line 1630: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1626: -- ------------------------------------------------------------------------------
1627: -- There is no preferred partner for this opportunity.
1628: -- ------------------------------------------------------------------------------
1629: IF (l_preferred_partner_party_id IS NULL) THEN
1630: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1631: Debug('There is no preferred partner..........................');
1632: END IF;
1633:
1634: -- ------------------------------------------------------------------------------

Line 1641: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1637: -- Note that l_preferred_idx is the index of the preferred partner in
1638: -- x_partner_tbl, NOT the partner ID of the preferred partner.
1639: -- ------------------------------------------------------------------------------
1640: ELSIF (l_preferred_idx IS NOT NULL) THEN
1641: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1642: Debug('Preferred Partner Party ID: ' || l_preferred_partner_party_id);
1643: END IF;
1644:
1645: IF (x_partner_tbl.COUNT > 1) THEN

Line 1657: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1653: -- ------------------------------------------------------------------------------
1654: -- The preferred partner is not in x_partner_tbl partner list.
1655: -- ------------------------------------------------------------------------------
1656: ELSE
1657: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1658: Debug('Preferred Partner Party ID: ' || l_preferred_partner_party_id);
1659: END IF;
1660: l_start := DBMS_UTILITY.get_time;
1661:

Line 1704: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1700: ELSIF (x_distance_uom_returned = pv_locator.g_distance_unit_mile) THEN
1701: x_distance_uom_returned := 'MILES';
1702: END IF;
1703:
1704: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1705: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1706: Debug('Distance Unit Returned: ' || x_distance_uom_returned);
1707: END IF;
1708:

Line 1715: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1711: -- ---------------------------------------------------------------------------
1712: FOR i IN 1..l_distance_tbl.COUNT LOOP
1713: l_partner_distance_tbl(l_partner_tbl(i)) := l_distance_tbl(i);
1714:
1715: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1716: Debug('Preferred Partner ' || l_partner_tbl(i) || ':::' ||
1717: TRUNC(l_partner_distance_tbl(l_partner_tbl(i)), 2));
1718: END IF;
1719: END LOOP;

Line 1727: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1723: -- of x_partner_tbl.
1724: -- ---------------------------------------------------------------------------
1725: j := l_partner_tbl.COUNT;
1726:
1727: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1728: Debug('# of preferred partners: ' || j);
1729: END IF;
1730:
1731: IF ((NOT x_partner_tbl.EXISTS(1)) OR x_partner_tbl.COUNT = 0) THEN

Line 1745: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1741: x_partner_tbl := l_partner_tbl;
1742: END IF;
1743:
1744:
1745: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1746: Debug('Combined partner list..........................................');
1747:
1748: FOR i IN 1..x_partner_tbl.COUNT LOOP
1749: Debug(x_partner_tbl(i));

Line 1757: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1753:
1754: -- ------------------------------------------------------------------------------
1755: -- Retreive partner's detail info.
1756: -- ------------------------------------------------------------------------------
1757: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1758: Debug('Retreive partners detail info.................................................');
1759: END IF;
1760:
1761: -- IF (x_partner_tbl.EXISTS(1) AND x_partner_tbl.COUNT > 1) THEN

Line 1763: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1759: END IF;
1760:
1761: -- IF (x_partner_tbl.EXISTS(1) AND x_partner_tbl.COUNT > 1) THEN
1762: IF (x_partner_tbl.EXISTS(1)) THEN
1763: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1764: Debug('..........................................................');
1765: Debug('Calling pv_match_v2_pub.Get_Matched_Partner_Details..........................');
1766: END IF;
1767:

Line 1785: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1781: x_msg_count => l_msg_count,
1782: x_msg_data => l_msg_data);
1783:
1784: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1785: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1786: Debug('Return Status: ' || l_return_status);
1787: END IF;
1788:
1789: g_failure_code := 'OTHER';

Line 1793: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1789: g_failure_code := 'OTHER';
1790: RAISE FND_API.G_EXC_ERROR;
1791:
1792: ELSIF (l_return_status = FND_API.g_ret_sts_unexp_error) THEN
1793: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1794: Debug('Return Status: ' || l_return_status);
1795: END IF;
1796:
1797: g_failure_code := 'OTHER';

Line 1801: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1797: g_failure_code := 'OTHER';
1798: RAISE FND_API.g_exc_unexpected_error;
1799: END IF;
1800:
1801: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1802: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1803: END IF;
1804:
1805:

Line 1821: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1817: -- ------------------------------------------------------------------
1818: -- Reassign distance to each partner.
1819: -- ------------------------------------------------------------------
1820: IF (NOT x_distance_tbl.EXISTS(1)) THEN
1821: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1822: Debug('Initialize x_distance_tbl...');
1823: END IF;
1824:
1825: x_distance_tbl := JTF_NUMBER_TABLE();

Line 1846: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1842: FOR i IN 1..x_partner_tbl.COUNT LOOP
1843: x_distance_tbl(i) := l_partner_distance_tbl(x_partner_tbl(i));
1844: END LOOP;
1845:
1846: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1847: Debug('Partner Details and distance info...........................');
1848: FOR i IN 1..x_partner_tbl.COUNT LOOP
1849: Debug(x_partner_tbl(i) || ':::' || TRUNC(x_distance_tbl(i), 2));
1850: Debug(x_partner_details(i));

Line 1874: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

1870: l_process_rule_name := x.process_rule_name;
1871: END LOOP;
1872: END IF;
1873:
1874: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
1875: p_msg_name => 'PV_NO_GEO_ROUTING_DEFINED',
1876: p_token1 => 'RULE_ID',
1877: p_token1_value => p_process_rule_id,
1878: p_token2 => 'RULE_NAME',

Line 1891: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1887: l_entity_routing.bypass_cm_ok_flag :=
1888: NVL(FND_PROFILE.VALUE('PV_CM_APPROVAL_REQUIRED'), 'N');
1889: END IF;
1890:
1891: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1892: Debug('Routing Type: ' || l_entity_routing.routing_type);
1893: Debug('Bypass CM Approval: ' || l_entity_routing.bypass_cm_ok_flag);
1894: END IF;
1895:

Line 1900: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1896: l_source_tbl.EXTEND(x_partner_tbl.COUNT);
1897: l_rank_tbl.EXTEND(x_partner_tbl.COUNT);
1898:
1899: FOR i IN 1..x_partner_tbl.COUNT LOOP
1900: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1901: Debug(x_partner_tbl(i) || ',');
1902: END IF;
1903:
1904: l_source_tbl(i) := 'MATCHING';

Line 1908: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1904: l_source_tbl(i) := 'MATCHING';
1905: l_rank_tbl(i) := i;
1906: END LOOP;
1907:
1908: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1909: Debug('Routing the opportunity to partner(s)....................');
1910: END IF;
1911:
1912: l_start := DBMS_UTILITY.get_time;

Line 1959: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1955: g_failure_code := 'ROUTING_FAILED';
1956: RAISE FND_API.g_exc_unexpected_error;
1957: END IF;
1958:
1959: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1960: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1961: END IF;
1962: END IF;
1963:

Line 1969: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,

1965: -- ---------------------------------------------------------------------------
1966: -- Get message count if the stack trace flag is turned on.
1967: -- ---------------------------------------------------------------------------
1968: IF (g_rule_engine_trace_flag = 'Y') THEN
1969: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1970: p_count => x_msg_count,
1971: p_data => x_msg_data);
1972: END IF;
1973:

Line 1983: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,

1979: g_failure_code := 'OTHER';
1980: END IF;
1981:
1982: x_return_status := FND_API.G_RET_STS_ERROR;
1983: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1984: p_count => x_msg_count,
1985: p_data => x_msg_data);
1986:
1987: -- Cause the calling program to raise the same exception!

Line 1996: FND_MSG_PUB.count_and_get(

1992: g_failure_code := 'OTHER';
1993: END IF;
1994:
1995: x_return_status := FND_API.g_ret_sts_unexp_error;
1996: FND_MSG_PUB.count_and_get(
1997: p_encoded => FND_API.g_false,
1998: p_count => x_msg_count,
1999: p_data => x_msg_data
2000: );

Line 2007: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

2003: IF (g_failure_code IS NULL) THEN
2004: g_failure_code := 'OTHER';
2005: END IF;
2006:
2007: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2008: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2009: END IF;
2010:
2011: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2008: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

2004: g_failure_code := 'OTHER';
2005: END IF;
2006:
2007: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2008: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2009: END IF;
2010:
2011: x_return_status := FND_API.G_RET_STS_ERROR;
2012: FND_MSG_PUB.count_and_get(

Line 2012: FND_MSG_PUB.count_and_get(

2008: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2009: END IF;
2010:
2011: x_return_status := FND_API.G_RET_STS_ERROR;
2012: FND_MSG_PUB.count_and_get(
2013: p_encoded => FND_API.g_false,
2014: p_count => x_msg_count,
2015: p_data => x_msg_data
2016: );

Line 2161: FND_MSG_PUB.initialize;

2157:
2158: BEGIN
2159: -------------------- initialize -------------------------
2160: IF FND_API.to_boolean(p_init_msg_list) THEN
2161: FND_MSG_PUB.initialize;
2162: END IF;
2163:
2164: IF NOT FND_API.compatible_api_call(
2165: l_api_version,

Line 2177: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2173: x_return_status := FND_API.G_RET_STS_SUCCESS;
2174:
2175: -------------------------- Source code --------------------
2176:
2177: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2178: Debug('Inside Tie-Breaking................................');
2179: END IF;
2180:
2181: -- ----------------------------------------------------------

Line 2211: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,

2207: -- If this were the case, we won't be able to determine which attribute value
2208: -- to use for tie-breaking.
2209: -- ----------------------------------------------------------------------------
2210: IF (l_party_id = l_prev_party_id) THEN
2211: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2212: p_msg_name => 'PV_MULTIPLE_ATTR_VALUES',
2213: p_token1 => 'TEXT',
2214: p_token1_value => 'Party ID: ' || l_prev_party_id,
2215: p_token2 => 'TEXT',

Line 2358: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2354:
2355:
2356: FETCH c_tie_breaking_attr INTO lc_cursor;
2357:
2358: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2359: Debug('Finding Dups Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
2360: END IF;
2361: END LOOP;
2362:

Line 2367: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2363: CLOSE c_tie_breaking_attr;
2364:
2365:
2366: -- DEBUGGING -------------------------------------------------------------
2367: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2368: Debug('Print out concatenated strings...');
2369: l_index := l_tie_breaking_tab.FIRST;
2370: l_last_index := l_tie_breaking_tab.LAST;
2371:

Line 2384: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2380:
2381: -- ------------------------------------------------------------
2382: -- Sort the partners by their concatenated attribute values
2383: -- ------------------------------------------------------------
2384: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2385: Debug('Start sorting..............................');
2386: END IF;
2387:
2388: l_start := dbms_utility.get_time;

Line 2425: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2421: * ===================================================================== */
2422:
2423:
2424: -- DEBUGGING -------------------------------------------------------------
2425: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2426: Debug('Sorting Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
2427:
2428: Debug('Printing out partner IDs after sorting...');
2429: FOR i IN 1..x_partner_tbl.COUNT LOOP

Line 2462: FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

2458:
2459: BEGIN
2460: /* --------------------------------------------------------------
2461: IF (g_rule_engine_trace_flag = 'Y') OR
2462: FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
2463: THEN
2464: * --------------------------------------------------------------- */
2465: FND_MESSAGE.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2466: FND_MESSAGE.Set_Token('TEXT', p_msg_string);

Line 2467: FND_MSG_PUB.Add;

2463: THEN
2464: * --------------------------------------------------------------- */
2465: FND_MESSAGE.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2466: FND_MESSAGE.Set_Token('TEXT', p_msg_string);
2467: FND_MSG_PUB.Add;
2468:
2469: -- END IF;
2470: END Debug;
2471: -- =================================End of Debug================================

Line 2502: IF FND_MSG_PUB.Check_Msg_Level(p_msg_level) THEN

2498: p_token3_value IN VARCHAR2 := NULL
2499: )
2500: IS
2501: BEGIN
2502: IF FND_MSG_PUB.Check_Msg_Level(p_msg_level) THEN
2503: FND_MESSAGE.Set_Name('PV', p_msg_name);
2504: FND_MESSAGE.Set_Token(p_token1, p_token1_value);
2505:
2506: IF (p_token2 IS NOT NULL) THEN

Line 2514: FND_MSG_PUB.Add;

2510: IF (p_token3 IS NOT NULL) THEN
2511: FND_MESSAGE.Set_Token(p_token3, p_token3_value);
2512: END IF;
2513:
2514: FND_MSG_PUB.Add;
2515: END IF;
2516: END Set_Message;
2517: -- ==============================End of Set_Message==============================
2518:

Line 2661: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2657: -- -------------------------------------------------------------------
2658: -- Debugging code
2659: -- -------------------------------------------------------------------
2660:
2661: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2662: l_count := g_opp_selection_tab.COUNT;
2663:
2664: FOR i IN 1..l_count LOOP
2665: Debug('===== ' || i || ' ===========================================');