eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PV_MATCH_V3_PUB dependencies on FND_MSG_PUB

Line 31: FND_MSG_PUB.Add;

27: PROCEDURE debug(p_msg_string IN VARCHAR2) IS
28: BEGIN
29: FND_MESSAGE.Set_Name('PV', 'PV_DEBUG_MESSAGE');
30: FND_MESSAGE.Set_Token('TEXT', p_msg_string);
31: FND_MSG_PUB.Add;
32: END debug;
33:
34:
35: PROCEDURE Cache_Rules;

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

164: -------------------- Exception --------------------------
165: EXCEPTION
166: WHEN FND_API.G_EXC_ERROR THEN
167: x_return_status := FND_API.G_RET_STS_ERROR;
168: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
169: p_count => x_msg_count,
170: p_data => x_msg_data);
171:
172: WHEN FND_API.g_exc_unexpected_error THEN

Line 174: FND_MSG_PUB.count_and_get(

170: p_data => x_msg_data);
171:
172: WHEN FND_API.g_exc_unexpected_error THEN
173: x_return_status := FND_API.g_ret_sts_unexp_error;
174: FND_MSG_PUB.count_and_get(
175: p_encoded => FND_API.g_false,
176: p_count => x_msg_count,
177: p_data => x_msg_data
178: );

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

177: p_data => x_msg_data
178: );
179:
180: WHEN OTHERS THEN
181: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
182: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
183: END IF;
184:
185: x_return_status := FND_API.G_RET_STS_ERROR;

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

178: );
179:
180: WHEN OTHERS THEN
181: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
182: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
183: END IF;
184:
185: x_return_status := FND_API.G_RET_STS_ERROR;
186: FND_MSG_PUB.count_and_get(

Line 186: FND_MSG_PUB.count_and_get(

182: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
183: END IF;
184:
185: x_return_status := FND_API.G_RET_STS_ERROR;
186: FND_MSG_PUB.count_and_get(
187: p_encoded => FND_API.g_false,
188: p_count => x_msg_count,
189: p_data => x_msg_data
190: );

Line 272: FND_MSG_PUB.initialize;

268:
269: BEGIN
270: -------------------- initialize -------------------------
271: IF FND_API.to_boolean(p_init_msg_list) THEN
272: FND_MSG_PUB.initialize;
273: END IF;
274:
275: IF NOT FND_API.compatible_api_call(
276: l_api_version,

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

288: -- ------------------------------------------------------------------------
289: -- Make sure that either p_user_name or p_resource IS NOT NULL.
290: -- ------------------------------------------------------------------------
291: IF (p_user_name IS NULL AND p_resource_id IS NULL) THEN
292: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
293: p_msg_name => 'PV_NO_USERNAME_ID_DEFINED',
294: p_token1 => null,
295: p_token1_value => null,
296: p_token2 => null,

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

324: -- ---------------------------------------------------------------------------------
325: -- Cache all the opportunity selection rules (attributes-values) in a global
326: -- PL/SQL table, g_opp_selection_tab.
327: -- ---------------------------------------------------------------------------------
328: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
329: Debug('----------------------------------------------------------------');
330: Debug('g_matching_engine_type: ' || g_matching_engine_type);
331: Debug('Matching Type: ' || l_matching_type);
332: Debug('----------------------------------------------------------------');

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

335: END IF;
336:
337: Clear_Rules_Cache;
338:
339: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
340: Debug('Rule Caching............................................');
341: END IF;
342:
343: l_start := dbms_utility.get_time;

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

342:
343: l_start := dbms_utility.get_time;
344: Cache_Rules;
345:
346: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
347: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
348: END IF;
349:
350: l_count := g_opp_selection_tab.COUNT;

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

348: END IF;
349:
350: l_count := g_opp_selection_tab.COUNT;
351:
352: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
353: Debug('Number of Rule items Cached: ' || l_count);
354: END IF;
355:
356: i := 1;

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

354: END IF;
355:
356: i := 1;
357:
358: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
359: Debug('Opportunity Rule Selection Starts....................................');
360: END IF;
361:
362: l_start := dbms_utility.get_time;

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

361:
362: l_start := dbms_utility.get_time;
363:
364: WHILE (i <= l_count AND (NOT l_stop_flag)) LOOP
365: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
366: Debug('******************************************************');
367: Debug('Rule # :::' || g_opp_selection_tab(i).process_rule_id);
368: END IF;
369:

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

371: -- If the opportunity's attribute value is not already retrieved, retrieve it.
372: -- ---------------------------------------------------------------------------
373: l_attribute_id := g_opp_selection_tab(i).attribute_id;
374:
375: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
376: Debug('Attribute ID: ' || l_attribute_id);
377: Debug('Opportunity ID: ' || p_entity_id);
378: END IF;
379:

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

405: -- ---------------------------------------------------------------------------
406: IF (NOT l_entity_attr_value.EXISTS(l_attribute_id)) THEN
407: i := Get_Next_Rule_Index(i, g_opp_selection_tab);
408:
409: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
410: Debug('No attribute value for this attribute ' || l_attribute_id);
411: Debug('There is something wrong in the attribute setup.');
412: END IF;
413:

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

428: -- until all rules are exhausted.
429: -- If the match succeeds, check if last_attr_flag = TRUE. If yes, there's
430: -- a match. set l_stop_flag = TRUE
431: -- ------------------------------------------------------------------------
432: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
433: Debug('Calling Check_Match...AND LOGIC...');
434: Debug('p_attribute_id: ' || l_attribute_id);
435: --Debug('p_entity_attr_value: ' || l_entity_attr_value(l_attribute_id).attribute_value);
436:

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

463: p_return_type => l_entity_attr_value(l_attribute_id).return_type,
464: p_rule_currency_code => g_opp_selection_tab(i).currency_code
465: );
466:
467: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
468: IF (l_matched) THEN
469: Debug('Check_Match TRUE!');
470: ELSE
471: Debug('Check_Match FALSE!');

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

491: l_concat_to_attr_val := l_concat_to_attr_val ||
492: g_opp_selection_tab(j).attribute_to_value || l_delimiter;
493: END LOOP;
494:
495: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
496: Debug('Calling Check_Match...OR Logic');
497: Debug('p_attribute_id: ' || l_attribute_id);
498: --Debug('p_entity_attr_value: ' || l_entity_attr_value(l_attribute_id).attribute_value);
499: l_attr_val_temp := l_entity_attr_value(l_attribute_id).attribute_value;

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 568: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

564: -- The current rule is selected for this opportunity.
565: -- -------------------------------------------------------------
566: x_selected_rule_id := g_opp_selection_tab(i).process_rule_id;
567:
568: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
569: Debug('%%%%%%%Selected Rule ID: ' || x_selected_rule_id);
570: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
571: Debug('Number of rule items scanned/evaluated before finding a matching rule: ' || i);
572: END IF;

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

577: -- of tables (operator, attribute, attribute_value) +
578: -- "selection mode" --> Only partners which match all search
579: -- attributes are returned.
580: -- -------------------------------------------------------------
581: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
582: Debug('..........................................................');
583: Debug('Calling Partner_Selection................................');
584: END IF;
585:

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

684: END IF;
685: END IF;
686: END LOOP;
687:
688: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
689: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
690: END IF;
691:
692: IF (NOT l_stop_flag) THEN

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

689: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
690: END IF;
691:
692: IF (NOT l_stop_flag) THEN
693: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
694: Debug('No matching rules found!!!!!');
695: END IF;
696: END IF;
697:

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

697:
698: x_partner_cnt := l_partner_cnt;
699:
700: IF (g_rule_engine_trace_flag = 'Y') THEN
701: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
702: p_count => x_msg_count,
703: p_data => x_msg_data);
704: END IF;
705:

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

706: -------------------- Exception --------------------------
707: EXCEPTION
708: WHEN FND_API.G_EXC_ERROR THEN
709: x_return_status := FND_API.G_RET_STS_ERROR;
710: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
711: p_count => x_msg_count,
712: p_data => x_msg_data);
713:
714: WHEN FND_API.g_exc_unexpected_error THEN

Line 716: FND_MSG_PUB.count_and_get(

712: p_data => x_msg_data);
713:
714: WHEN FND_API.g_exc_unexpected_error THEN
715: x_return_status := FND_API.g_ret_sts_unexp_error;
716: FND_MSG_PUB.count_and_get(
717: p_encoded => FND_API.g_false,
718: p_count => x_msg_count,
719: p_data => x_msg_data
720: );

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

722: WHEN g_e_buffer_too_small THEN
723: x_return_status := l_return_status;
724:
725: WHEN OTHERS THEN
726: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
727: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
728: END IF;
729:
730: x_return_status := FND_API.G_RET_STS_ERROR;

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

723: x_return_status := l_return_status;
724:
725: WHEN OTHERS THEN
726: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
727: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
728: END IF;
729:
730: x_return_status := FND_API.G_RET_STS_ERROR;
731: FND_MSG_PUB.count_and_get(

Line 731: FND_MSG_PUB.count_and_get(

727: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
728: END IF;
729:
730: x_return_status := FND_API.G_RET_STS_ERROR;
731: FND_MSG_PUB.count_and_get(
732: p_encoded => FND_API.g_false,
733: p_count => x_msg_count,
734: p_data => x_msg_data
735: );

Line 884: FND_MSG_PUB.initialize;

880: l_attr_val_temp VARCHAR2(4000);
881: BEGIN
882: -------------------- initialize -------------------------
883: IF FND_API.to_boolean(p_init_msg_list) THEN
884: FND_MSG_PUB.initialize;
885: END IF;
886:
887: IF NOT FND_API.compatible_api_call(
888: l_api_version,

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

900: -- ------------------------------------------------------------------------
901: -- Make sure that either p_user_name or p_resource IS NOT NULL.
902: -- ------------------------------------------------------------------------
903: IF (p_user_name IS NULL AND p_resource_id IS NULL) THEN
904: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
905: p_msg_name => 'PV_NO_USERNAME_ID_DEFINED',
906: p_token1 => null,
907: p_token1_value => null,
908: p_token2 => null,

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

917: -- Retrieve profile value for stack trace profile option.
918: -- ------------------------------------------------------------------------
919: --g_rule_engine_trace_flag := NVL(FND_PROFILE.VALUE('PV_RULE_ENGINE_TRACE_ON'), 'N');
920:
921: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
922: Debug('............................................................');
923: Debug('Stack trace turned on? ' || g_rule_engine_trace_flag);
924: Debug('............................................................');
925:

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

946: FOR x IN lc_get_location_id(p_entity_id) LOOP
947: l_customer_address.location_id := x.location_id;
948: END LOOP;
949:
950: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
951: Debug('***l_entity_routing.max_nearest_partner: ' || l_entity_routing.max_nearest_partner || '***');
952: Debug('***l_entity_routing.distance_from_customer: ' || l_entity_routing.distance_from_customer || '***');
953: END IF;
954:

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

956: (l_entity_routing.max_nearest_partner IS NOT NULL OR
957: l_entity_routing.distance_from_customer IS NOT NULL) AND
958: l_customer_address.location_id IS NULL)
959: THEN
960: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
961: p_msg_name => 'PV_NO_GEOMETRY_INFO',
962: p_token1 => 'TEXT',
963: p_token1_value => 'Entity ID: ' || p_entity_id,
964: p_token2 => null,

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

986: l_process_rule_name := x.process_rule_name;
987: END LOOP;
988: END IF;
989:
990: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
991: p_msg_name => 'PV_DEBUG_MSG',
992: p_token1 => 'TEXT',
993: p_token1_value => 'This rule "' || l_process_rule_name ||
994: '" (ID: ' || p_process_rule_id || ') does not exist',

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

998: g_failure_code := 'OTHER';
999: RAISE FND_API.G_EXC_ERROR;
1000: END;
1001:
1002: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1003: Debug('Rule Currency is: ' || l_rule_currency_code);
1004: END IF;
1005:
1006: -- ========================================================================

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

1009: -- ------------------------------------------------------------------------
1010: -- Loop through opportunity-partner attribute mappings and retrieve the
1011: -- attribute values of each of the attributes in mapping.
1012: -- ------------------------------------------------------------------------
1013: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1014: Debug('Retrieve opportunity-to-partner attribute mapping..................');
1015: END IF;
1016:
1017: FOR lc_cursor IN lc_partner_mapping LOOP

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

1020: -- ---------------------------------------------------------------------
1021: -- Retrieve opportunity's attribute value if it hasn't already been
1022: -- retrieved.
1023: -- ---------------------------------------------------------------------
1024: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1025: Debug('Attribute ID before calling Get_Entity_Attr_Values: ' || l_attribute_id);
1026: --Debug('Entity Type: ' || p_entity);
1027: END IF;
1028:

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

1101: END IF;
1102: END IF;
1103: END LOOP;
1104:
1105: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1106: Debug('Partner Matching/Mapping Attributes...');
1107:
1108: FOR i IN 1..l_attr_id_tbl.COUNT LOOP
1109:

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

1190:
1191: -- ------------------------------------------------------------------------
1192: -- For debugging only...
1193: -- ------------------------------------------------------------------------
1194: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1195: FOR i IN k..l_attr_id_tbl.COUNT LOOP
1196: --since fnd_msg_pub supports debiug message of length 1972
1197: -- we are passing split of attribute value as it may exceed 2000 length
1198: l_attr_val_temp := l_attr_value_tbl(i);

Line 1196: --since fnd_msg_pub supports debiug message of length 1972

1192: -- For debugging only...
1193: -- ------------------------------------------------------------------------
1194: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1195: FOR i IN k..l_attr_id_tbl.COUNT LOOP
1196: --since fnd_msg_pub supports debiug message of length 1972
1197: -- we are passing split of attribute value as it may exceed 2000 length
1198: l_attr_val_temp := l_attr_value_tbl(i);
1199: while (l_attr_val_temp is not null) loop
1200: Debug(i || '-->' || l_attr_id_tbl(i) || ': ' || substr( l_attr_val_temp, 1, 1800 ) ||

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

1216: ELSE
1217: l_resource_id := p_resource_id;
1218: END IF;
1219:
1220: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1221: Debug('..........................................................');
1222: Debug('Calling Form_Where_Clause.......................');
1223: END IF;
1224:

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

1255: ELSIF (l_return_status = FND_API.g_ret_sts_unexp_error) THEN
1256: RAISE FND_API.g_exc_unexpected_error;
1257: END IF;
1258:
1259: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1260: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1261:
1262: Debug('# of Partners Matched: ' || x_partner_tbl.COUNT);
1263: Debug('Partners Matched: ');

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

1277: IF (l_entity_routing.entity_routing_id IS NOT NULL) THEN
1278: IF (l_entity_routing.distance_uom_code = 'KILOMETERS') THEN
1279: l_distance_uom := pv_locator.g_distance_unit_km;
1280:
1281: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1282: Debug('Distance Unit: ' || l_distance_uom);
1283: END IF;
1284:
1285: ELSIF (l_entity_routing.distance_uom_code = 'MILES') THEN

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

1284:
1285: ELSIF (l_entity_routing.distance_uom_code = 'MILES') THEN
1286: l_distance_uom := pv_locator.g_distance_unit_mile;
1287:
1288: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1289: Debug('Distance Unit: ' || l_distance_uom);
1290: END IF;
1291:
1292: ELSE

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

1291:
1292: ELSE
1293: --l_distance_uom := pv_locator.g_distance_unit_mile;
1294:
1295: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1296: Debug('No Distance Unit Specified. Use the default from the pv_locator profile.');
1297: END IF;
1298: END IF;
1299:

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

1299:
1300: ELSE
1301: --l_distance_uom := pv_locator.g_distance_unit_mile;
1302:
1303: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1304: Debug('No Distance Unit Specified. Use the default from the pv_locator profile.');
1305: END IF;
1306: END IF;
1307:

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

1305: END IF;
1306: END IF;
1307:
1308:
1309: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1310: Debug('Geo Proximity and Routing Parameters..............................');
1311: Debug('Location ID: ' || l_customer_address.location_id);
1312: Debug('Distance from partner: ' || l_entity_routing.distance_from_customer);
1313: Debug('Max # of partners to be returned: ' || l_entity_routing.max_nearest_partner);

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

1323: -- ------------------------------------------------------------------------
1324:
1325: l_partner_id_tbl := x_partner_tbl;
1326:
1327: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1328: Debug('# of Partners Sent: ' || x_partner_tbl.COUNT);
1329: END IF;
1330:
1331:

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

1332: IF (l_partner_id_tbl.EXISTS(1) AND l_partner_id_tbl.COUNT > 0) THEN
1333: -- -------------------------------------------------------------
1334: -- Execute geo proximity API.
1335: -- -------------------------------------------------------------
1336: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1337: Debug('..........................................................');
1338: Debug('Calling pv_locator.Get_Partners..........................');
1339: Debug('# of Partners Sent: ' || l_partner_id_tbl.COUNT);
1340: END IF;

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

1364: g_failure_code := 'ELOCATION_LOOKUP_FAILURE';
1365: RAISE FND_API.g_exc_unexpected_error;
1366: END IF;
1367:
1368: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1369: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1370: END IF;
1371:
1372: IF (x_distance_uom_returned = pv_locator.g_distance_unit_km) THEN

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

1375: ELSIF (x_distance_uom_returned = pv_locator.g_distance_unit_mile) THEN
1376: x_distance_uom_returned := 'MILES';
1377: END IF;
1378:
1379: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1380: Debug('Distance UOM returned is: ' || x_distance_uom_returned);
1381: Debug('# of Partners Returned: ' || x_partner_tbl.COUNT);
1382: Debug('Partners Matched and distance to customer: ');
1383: END IF;

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

1386: -- -------------------------------------------------------------
1387: -- Store partners' distance to customer.
1388: -- -------------------------------------------------------------
1389: FOR i IN 1..x_partner_tbl.COUNT LOOP
1390: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1391: Debug(x_partner_tbl(i) || ':::' || TRUNC(x_distance_tbl(i), 2));
1392: END IF;
1393:
1394: l_partner_distance_tbl(x_partner_tbl(i)) := x_distance_tbl(i);

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

1408: -- Tie-breaker
1409: -- -------------------------------------------------------------
1410: -- IF (l_entity_routing.routing_type IN ('SERIAL', 'SINGLE') AND
1411: IF (x_partner_tbl.EXISTS(1) AND x_partner_tbl.COUNT > 1) THEN
1412: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1413: Debug('..........................................................');
1414: Debug('Calling Tie_Breaker......................................');
1415: Debug('# of Partners Sent: ' || x_partner_tbl.COUNT);
1416: END IF;

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

1434: g_failure_code := 'OTHER';
1435: RAISE FND_API.g_exc_unexpected_error;
1436: END IF;
1437:
1438: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1439: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1440: END IF;
1441: END IF;
1442:

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

1439: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1440: END IF;
1441: END IF;
1442:
1443: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1444: Debug('# of Partners Returned: ' || x_partner_tbl.COUNT);
1445: END IF;
1446:
1447: -- ------------------------------------------------------------------------------

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

1446:
1447: -- ------------------------------------------------------------------------------
1448: -- Retreive partner's detail info.
1449: -- ------------------------------------------------------------------------------
1450: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1451: Debug('Retrieve partners detail info.................................................');
1452: END IF;
1453:
1454: IF (x_partner_tbl.EXISTS(1)) THEN

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

1451: Debug('Retrieve partners detail info.................................................');
1452: END IF;
1453:
1454: IF (x_partner_tbl.EXISTS(1)) THEN
1455: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1456: Debug('..........................................................');
1457: Debug('Calling Get_Matched_Partner_Details..........................');
1458: END IF;
1459:

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

1463: FOR i IN 1..x_partner_tbl.COUNT LOOP
1464: x_distance_tbl(i) := l_partner_distance_tbl(x_partner_tbl(i));
1465: END LOOP;
1466:
1467: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1468: Debug('Partner Details and distance info...........................');
1469: FOR i IN 1..x_partner_tbl.COUNT LOOP
1470: Debug(x_partner_tbl(i) || ':::' || TRUNC(x_distance_tbl(i), 2));
1471: --Debug(x_partner_details(i));

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

1486: x_msg_data => l_msg_data
1487: );
1488:
1489: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1490: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1491: Debug('Return Status: ' || l_return_status);
1492: END IF;
1493:
1494: g_failure_code := 'OTHER';

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

1494: g_failure_code := 'OTHER';
1495: RAISE FND_API.G_EXC_ERROR;
1496:
1497: ELSIF (l_return_status = FND_API.g_ret_sts_unexp_error) THEN
1498: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1499: Debug('Return Status: ' || l_return_status);
1500: END IF;
1501:
1502: g_failure_code := 'OTHER';

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

1502: g_failure_code := 'OTHER';
1503: RAISE FND_API.g_exc_unexpected_error;
1504: END IF;
1505:
1506: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1507: Debug('Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
1508: END IF;
1509:
1510: -- ------------------------------------------------------------------

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

1510: -- ------------------------------------------------------------------
1511: -- Reassign distance to each partner.
1512: -- ------------------------------------------------------------------
1513: IF (NOT x_distance_tbl.EXISTS(1)) THEN
1514: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1515: Debug('Initialize x_distance_tbl...');
1516: END IF;
1517:
1518: x_distance_tbl := JTF_NUMBER_TABLE();

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

1525: -- ---------------------------------------------------------------------------
1526: -- Get message count if the stack trace flag is turned on.
1527: -- ---------------------------------------------------------------------------
1528: IF (g_rule_engine_trace_flag = 'Y') THEN
1529: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1530: p_count => x_msg_count,
1531: p_data => x_msg_data);
1532: END IF;
1533:

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

1539: g_failure_code := 'OTHER';
1540: END IF;
1541:
1542: x_return_status := FND_API.G_RET_STS_ERROR;
1543: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1544: p_count => x_msg_count,
1545: p_data => x_msg_data);
1546:
1547: -- Cause the calling program to raise the same exception!

Line 1556: FND_MSG_PUB.count_and_get(

1552: g_failure_code := 'OTHER';
1553: END IF;
1554:
1555: x_return_status := FND_API.g_ret_sts_unexp_error;
1556: FND_MSG_PUB.count_and_get(
1557: p_encoded => FND_API.g_false,
1558: p_count => x_msg_count,
1559: p_data => x_msg_data
1560: );

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

1563: IF (g_failure_code IS NULL) THEN
1564: g_failure_code := 'OTHER';
1565: END IF;
1566:
1567: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1568: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1569: END IF;
1570:
1571: x_return_status := FND_API.G_RET_STS_ERROR;

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

1564: g_failure_code := 'OTHER';
1565: END IF;
1566:
1567: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1568: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1569: END IF;
1570:
1571: x_return_status := FND_API.G_RET_STS_ERROR;
1572: FND_MSG_PUB.count_and_get(

Line 1572: FND_MSG_PUB.count_and_get(

1568: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1569: END IF;
1570:
1571: x_return_status := FND_API.G_RET_STS_ERROR;
1572: FND_MSG_PUB.count_and_get(
1573: p_encoded => FND_API.g_false,
1574: p_count => x_msg_count,
1575: p_data => x_msg_data
1576: );

Line 1641: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1637:
1638: l_locator_flag VARCHAR2(1) := 'Y';
1639: BEGIN
1640:
1641: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1642: debug('In '||l_api_name);
1643: END IF;
1644:
1645: IF NOT FND_API.Compatible_API_Call (l_api_version_number,

Line 1660: fnd_msg_pub.initialize;

1656: x_flagcount := JTF_VARCHAR2_TABLE_100();
1657:
1658: -- Initialize message list if p_init_msg_list is set to TRUE.
1659: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1660: fnd_msg_pub.initialize;
1661: END IF;
1662:
1663: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1664:

Line 1701: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1697: -- So l_matched_id table contains partner list as we got it from FORM_WHERE_CALUSE
1698: -- and x_matched_id contains partner list as we had it from Elocation.
1699: l_matched_id := x_matched_id;
1700:
1701: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1702: Debug('Partner from FORM_WHERE_CLAUSE '||x_matched_id.COUNT);
1703: END IF;
1704:
1705: /******************Begin of preferred partner Code comments ****************

Line 1718: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1714: OPEN lc_get_incumbent_pt (p_lead_id);
1715: FETCH lc_get_incumbent_pt INTO l_incumbent_pt_party_id;
1716: CLOSE lc_get_incumbent_pt;
1717:
1718: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1719: debug('Preferred partner for lead :'||p_lead_id||' is '||l_incumbent_pt_party_id);
1720: END IF;
1721:
1722: -- Checking to see if the preferred partner already exists in the matched partner tbl

Line 1733: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1729: WHERE a.party_id = l_incumbent_pt_party_id)
1730: LOOP
1731: l_incumbent_idx := x.idx;
1732:
1733: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1734: debug('Preferred partner already exists at matched partner list, position is '||l_incumbent_idx);
1735: END IF;
1736: END LOOP;
1737: END IF;

Line 1759: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1755: THEN
1756: -- -------------------------------------------------------------
1757: -- Retrieve location_id for this opportunity.
1758: -- -------------------------------------------------------------
1759: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1760: Debug('before retrieving locator info');
1761: END IF;
1762:
1763: BEGIN

Line 1783: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1779:
1780: Debug('Locator Flag :::' || l_locator_flag);
1781:
1782: IF l_locator_flag = 'Y' THEN
1783: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1784: Debug('Location ID: ' || l_customer_address.location_id);
1785: Debug('..........................................................');
1786: Debug('Calling pv_locator.Get_Partners..........................');
1787: Debug('# of Partners Sent: ' || l_matched_id.COUNT);

Line 1832: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1828: ELSIF (x_distance_uom_returned = pv_locator.g_distance_unit_mile) THEN
1829: x_distance_uom_returned := 'MILES';
1830: END IF;
1831:
1832: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1833: Debug('Distance UOM returned is: ' || x_distance_uom_returned);
1834: Debug('# of Partners Returned: ' || x_matched_id.COUNT);
1835: END IF;
1836:

Line 1853: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1849: LOOP
1850: l_incumbent_idx := x.idx;
1851: END LOOP;
1852:
1853: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1854: debug('location of Preferred partner in matched partner list '
1855: ||l_incumbent_idx);
1856: END IF;
1857:

Line 1875: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1871: -- ------------------------------------------------------------------------
1872: -- Getting the partner details
1873: -- ------------------------------------------------------------------------
1874: FOR i IN 1 .. x_matched_id.COUNT LOOP
1875: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1876: debug('Partner ID after prefered partner on top '||x_matched_id(i));
1877: debug('Distance after prefered partner on top '||x_distance_tbl(i));
1878: END IF;
1879: END LOOP;

Line 1908: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1904: ELSIF (x_return_status = fnd_api.g_ret_sts_unexp_error) THEN
1905: RAISE fnd_api.g_exc_unexpected_error;
1906: END IF;
1907:
1908: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1909: Debug('# of Partners Returned from matched_partner_details: ' || x_matched_id.COUNT);
1910: END IF;
1911:
1912: END IF;

Line 1919: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,

1915: COMMIT WORK;
1916: END IF;
1917:
1918: -- Standard call to get message count and if count is 1, get message info.
1919: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,
1920: p_count => x_msg_count,
1921: p_data => x_msg_data);
1922:
1923: EXCEPTION

Line 1929: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,

1925: WHEN FND_API.G_EXC_ERROR THEN
1926:
1927: x_return_status := FND_API.G_RET_STS_ERROR ;
1928:
1929: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,
1930: p_count => x_msg_count,
1931: p_data => x_msg_data);
1932:
1933: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1937: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,

1933: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1934:
1935: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1936:
1937: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,
1938: p_count => x_msg_count,
1939: p_data => x_msg_data);
1940:
1941:

Line 1944: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);

1940:
1941:
1942: WHEN OTHERS THEN
1943:
1944: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1945:
1946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1947:
1948:

Line 1949: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,

1945:
1946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1947:
1948:
1949: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,
1950: p_count => x_msg_count,
1951: p_data => x_msg_data);
1952:
1953: END Manual_Match;

Line 2212: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN

2208: -- =================================================================================
2209:
2210: BEGIN
2211:
2212: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2213: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2214: fnd_message.Set_Token('TEXT', 'In ' || l_api_name);
2215: fnd_msg_pub.Add;
2216: END IF;

Line 2215: fnd_msg_pub.Add;

2211:
2212: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2213: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2214: fnd_message.Set_Token('TEXT', 'In ' || l_api_name);
2215: fnd_msg_pub.Add;
2216: END IF;
2217:
2218: -- Standard call to check for call compatibility.
2219:

Line 2231: fnd_msg_pub.initialize;

2227:
2228: -- Initialize message list if p_init_msg_list is set to TRUE.
2229: IF FND_API.to_Boolean( p_init_msg_list )
2230: THEN
2231: fnd_msg_pub.initialize;
2232: END IF;
2233:
2234: x_incumbent_flag_tbl := JTF_VARCHAR2_TABLE_100();
2235: x_recycled_flag_tbl := JTF_VARCHAR2_TABLE_100();

Line 2238: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2234: x_incumbent_flag_tbl := JTF_VARCHAR2_TABLE_100();
2235: x_recycled_flag_tbl := JTF_VARCHAR2_TABLE_100();
2236: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2237:
2238: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2239: debug('Partner Id count before getting details '||p_matched_id.count);
2240: END IF;
2241:
2242: l_partner_id_tbl.EXTEND(p_matched_id.count);

Line 2261: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2257: debug('l_partner_id length '||l_partner_id_tbl(i));
2258: END LOOP;
2259:
2260:
2261: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2262: debug('l_partner_id length '||l_partner_id_tbl.count);
2263: END IF;
2264:
2265: OPEN lc_get_incumbent_pt (p_lead_id);

Line 2268: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN

2264:
2265: OPEN lc_get_incumbent_pt (p_lead_id);
2266: FETCH lc_get_incumbent_pt INTO l_incumbent_pt_party_id;
2267: IF l_incumbent_pt_party_id IS NULL THEN
2268: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2269: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2270: fnd_message.Set_Token('TEXT', 'Incumbent Partner party ID is null. So, setting it to be zero');
2271: fnd_msg_pub.Add;
2272: END IF;

Line 2271: fnd_msg_pub.Add;

2267: IF l_incumbent_pt_party_id IS NULL THEN
2268: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2269: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2270: fnd_message.Set_Token('TEXT', 'Incumbent Partner party ID is null. So, setting it to be zero');
2271: fnd_msg_pub.Add;
2272: END IF;
2273: l_incumbent_pt_party_id := 0;
2274: END IF;
2275: CLOSE lc_get_incumbent_pt;

Line 2283: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2279: FOR j IN 1 .. l_partner_id_tbl.COUNT LOOP
2280:
2281: l_order_table(j) := j;
2282:
2283: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2284: debug('Value of index '||j);
2285: END IF;
2286:
2287: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN

Line 2287: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN

2283: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2284: debug('Value of index '||j);
2285: END IF;
2286:
2287: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2288: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2289: fnd_message.Set_Token('TEXT', 'Checking if preferred Partner: ' || l_incumbent_pt_party_id );
2290: fnd_msg_pub.Add;
2291: END IF;

Line 2290: fnd_msg_pub.Add;

2286:
2287: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2288: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2289: fnd_message.Set_Token('TEXT', 'Checking if preferred Partner: ' || l_incumbent_pt_party_id );
2290: fnd_msg_pub.Add;
2291: END IF;
2292:
2293: IF l_partner_id_tbl(j) = l_incumbent_pt_party_id THEN
2294: x_incumbent_flag_tbl(j) := 'Y';

Line 2312: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN

2308: -- Size of Company
2309: -- All these attributes have the same SQL_TEXT for the Partner entity
2310: -- So we are using it to query diff attr values and popluating it into
2311: -- the temp table.
2312: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2313: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2314: fnd_message.Set_Token('TEXT', 'Getting Personalized columns for : ' || l_partner_id_tbl(j));
2315: fnd_msg_pub.Add;
2316: END IF;

Line 2315: fnd_msg_pub.Add;

2311: -- the temp table.
2312: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2313: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2314: fnd_message.Set_Token('TEXT', 'Getting Personalized columns for : ' || l_partner_id_tbl(j));
2315: fnd_msg_pub.Add;
2316: END IF;
2317:
2318: l_industry_table(j) := get_attribute_value(5, l_partner_id_tbl(j));
2319: l_membertype_table(j) := get_attribute_value(6, l_partner_id_tbl(j));

Line 2323: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN

2319: l_membertype_table(j) := get_attribute_value(6, l_partner_id_tbl(j));
2320: l_geography_table(j) := get_attribute_value(8, l_partner_id_tbl(j));
2321: l_capacityrating_table(j) := get_attribute_value(18, l_partner_id_tbl(j));
2322:
2323: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2324: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2325: fnd_message.Set_Token('TEXT', 'Values for Attrs :5 ' ||l_industry_table(j)||
2326: 'Values for Attrs :6 ' ||l_membertype_table(j)||
2327: 'Values for Attrs :8 ' || l_geography_table(j)||

Line 2329: fnd_msg_pub.Add;

2325: fnd_message.Set_Token('TEXT', 'Values for Attrs :5 ' ||l_industry_table(j)||
2326: 'Values for Attrs :6 ' ||l_membertype_table(j)||
2327: 'Values for Attrs :8 ' || l_geography_table(j)||
2328: 'Values for Attrs :18 ' || l_capacityrating_table(j) );
2329: fnd_msg_pub.Add;
2330: END IF;
2331:
2332:
2333: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN

Line 2333: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN

2329: fnd_msg_pub.Add;
2330: END IF;
2331:
2332:
2333: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2334: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2335: fnd_message.Set_Token('TEXT', 'Looking for recycled flag for Partner Id : ' || l_partner_id_tbl(j));
2336: fnd_msg_pub.Add;
2337: END IF;

Line 2336: fnd_msg_pub.Add;

2332:
2333: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2334: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2335: fnd_message.Set_Token('TEXT', 'Looking for recycled flag for Partner Id : ' || l_partner_id_tbl(j));
2336: fnd_msg_pub.Add;
2337: END IF;
2338:
2339: -- Check if this lead has been recycled by this partner before.
2340: -- If it has then set the recycled column to 'Y'.

Line 2346: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

2342: FETCH lc_get_recycled_flag INTO l_recycled_flag;
2343:
2344: x_recycled_flag_tbl.extend;
2345: IF lc_get_recycled_flag%FOUND AND l_recycled_flag IS NOT NULL THEN
2346: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2347: Debug( 'Recycled flag : ' || l_recycled_flag);
2348: END IF;
2349: x_recycled_flag_tbl(j) := l_recycled_flag;
2350: ELSE

Line 2409: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,

2405: COMMIT WORK;
2406: END IF;
2407:
2408: -- Standard call to get message count and if count is 1, get message info.
2409: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,
2410: p_count => x_msg_count,
2411: p_data => x_msg_data);
2412:
2413: EXCEPTION

Line 2418: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,

2414:
2415: WHEN FND_API.G_EXC_ERROR THEN
2416:
2417: x_return_status := FND_API.G_RET_STS_ERROR ;
2418: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,
2419: p_count => x_msg_count,
2420: p_data => x_msg_data);
2421:
2422: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2426: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,

2422: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2423:
2424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2425:
2426: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,
2427: p_count => x_msg_count,
2428: p_data => x_msg_data);
2429:
2430: WHEN OTHERS THEN

Line 2435: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);

2431:
2432:
2433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2434:
2435: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2436:
2437: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,
2438: p_count => x_msg_count,
2439: p_data => x_msg_data);

Line 2437: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,

2433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2434:
2435: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2436:
2437: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_FALSE,
2438: p_count => x_msg_count,
2439: p_data => x_msg_data);
2440:
2441: End get_matched_partner_details;

Line 2595: FND_MSG_PUB.initialize;

2591:
2592: BEGIN
2593: -------------------- initialize -------------------------
2594: IF FND_API.to_boolean(p_init_msg_list) THEN
2595: FND_MSG_PUB.initialize;
2596: END IF;
2597:
2598: IF NOT FND_API.compatible_api_call(
2599: l_api_version,

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

2607: x_return_status := FND_API.G_RET_STS_SUCCESS;
2608:
2609: -------------------------- Source code --------------------
2610:
2611: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2612: Debug('Inside Tie-Breaking................................');
2613: END IF;
2614:
2615: -- ----------------------------------------------------------

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

2641: -- If this were the case, we won't be able to determine which attribute value
2642: -- to use for tie-breaking.
2643: -- ----------------------------------------------------------------------------
2644: IF (l_party_id = l_prev_party_id) THEN
2645: Set_Message(p_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR,
2646: p_msg_name => 'PV_MULTIPLE_ATTR_VALUES',
2647: p_token1 => 'TEXT',
2648: p_token1_value => 'Party ID: ' || l_prev_party_id,
2649: p_token2 => 'TEXT',

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

2788:
2789:
2790: FETCH c_tie_breaking_attr INTO lc_cursor;
2791:
2792: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2793: Debug('Finding Dups Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
2794: END IF;
2795: END LOOP;
2796:

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

2797: CLOSE c_tie_breaking_attr;
2798:
2799:
2800: -- DEBUGGING -------------------------------------------------------------
2801: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2802: Debug('Print out concatenated strings...');
2803: l_index := l_tie_breaking_tab.FIRST;
2804: l_last_index := l_tie_breaking_tab.LAST;
2805:

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

2814:
2815: -- ------------------------------------------------------------
2816: -- Sort the partners by their concatenated attribute values
2817: -- ------------------------------------------------------------
2818: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2819: Debug('Start sorting..............................');
2820: END IF;
2821:
2822: l_start := dbms_utility.get_time;

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

2855: * ===================================================================== */
2856:
2857:
2858: -- DEBUGGING -------------------------------------------------------------
2859: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
2860: Debug('Sorting Elapsed Time: ' || (DBMS_UTILITY.get_time - l_start) || ' hsec');
2861:
2862: Debug('Printing out partner IDs after sorting...');
2863: FOR i IN 1..x_partner_tbl.COUNT LOOP

Line 2898: IF FND_MSG_PUB.Check_Msg_Level(p_msg_level) THEN

2894: p_token3_value IN VARCHAR2 := NULL
2895: )
2896: IS
2897: BEGIN
2898: IF FND_MSG_PUB.Check_Msg_Level(p_msg_level) THEN
2899: FND_MESSAGE.Set_Name('PV', p_msg_name);
2900: FND_MESSAGE.Set_Token(p_token1, p_token1_value);
2901:
2902: IF (p_token2 IS NOT NULL) THEN

Line 2910: FND_MSG_PUB.Add;

2906: IF (p_token3 IS NOT NULL) THEN
2907: FND_MESSAGE.Set_Token(p_token3, p_token3_value);
2908: END IF;
2909:
2910: FND_MSG_PUB.Add;
2911: END IF;
2912: END Set_Message;
2913:
2914: --=============================================================================+

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

3762: -- -------------------------------------------------------------------
3763: -- Debugging code
3764: -- -------------------------------------------------------------------
3765:
3766: IF (g_rule_engine_trace_flag = 'Y') OR FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
3767: l_count := g_opp_selection_tab.COUNT;
3768:
3769: FOR i IN 1..l_count LOOP
3770: Debug('===== ' || i || ' ===========================================');