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.IEX_SCORE_NEW_PVT dependencies on IEX_SCORE_NEW_PVT

Line 1: PACKAGE BODY IEX_SCORE_NEW_PVT AS

1: PACKAGE BODY IEX_SCORE_NEW_PVT AS
2: /* $Header: iexvscfb.pls 120.21.12010000.2 2008/12/10 18:57:41 ehuh ship $ */
3:
4:
5: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IEX_SCORE_NEW_PVT';

Line 5: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IEX_SCORE_NEW_PVT';

1: PACKAGE BODY IEX_SCORE_NEW_PVT AS
2: /* $Header: iexvscfb.pls 120.21.12010000.2 2008/12/10 18:57:41 ehuh ship $ */
3:
4:
5: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IEX_SCORE_NEW_PVT';
6: G_FILE_NAME CONSTANT VARCHAR2(12) := 'iexvscfb.pls';
7: --G_Debug_Level NUMBER := to_number(nvl(fnd_profile.value('IEX_DEBUG_LEVEL'), '0'));
8: G_Batch_Size NUMBER ;
9: PG_DEBUG NUMBER ;

Line 177: NVL(SCORE_RANGE_LOW, IEX_SCORE_NEW_PVT.G_MIN_SCORE),

173: IS
174:
175: CURSOR c_chk_range(p_score_id NUMBER) IS
176: SELECT NVL(WEIGHT_REQUIRED, 'N'),
177: NVL(SCORE_RANGE_LOW, IEX_SCORE_NEW_PVT.G_MIN_SCORE),
178: NVL(SCORE_RANGE_HIGH, IEX_SCORE_NEW_PVT.G_MAX_SCORE),
179: NVL(OUT_OF_RANGE_RULE, IEX_SCORE_NEW_PVT.G_RULE)
180: FROM IEX_SCORES
181: WHERE SCORE_ID = p_score_id;

Line 178: NVL(SCORE_RANGE_HIGH, IEX_SCORE_NEW_PVT.G_MAX_SCORE),

174:
175: CURSOR c_chk_range(p_score_id NUMBER) IS
176: SELECT NVL(WEIGHT_REQUIRED, 'N'),
177: NVL(SCORE_RANGE_LOW, IEX_SCORE_NEW_PVT.G_MIN_SCORE),
178: NVL(SCORE_RANGE_HIGH, IEX_SCORE_NEW_PVT.G_MAX_SCORE),
179: NVL(OUT_OF_RANGE_RULE, IEX_SCORE_NEW_PVT.G_RULE)
180: FROM IEX_SCORES
181: WHERE SCORE_ID = p_score_id;
182:

Line 179: NVL(OUT_OF_RANGE_RULE, IEX_SCORE_NEW_PVT.G_RULE)

175: CURSOR c_chk_range(p_score_id NUMBER) IS
176: SELECT NVL(WEIGHT_REQUIRED, 'N'),
177: NVL(SCORE_RANGE_LOW, IEX_SCORE_NEW_PVT.G_MIN_SCORE),
178: NVL(SCORE_RANGE_HIGH, IEX_SCORE_NEW_PVT.G_MAX_SCORE),
179: NVL(OUT_OF_RANGE_RULE, IEX_SCORE_NEW_PVT.G_RULE)
180: FROM IEX_SCORES
181: WHERE SCORE_ID = p_score_id;
182:
183: l_weight_required VARCHAR2(3);

Line 206: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;

202: WHEN NO_DATA_FOUND THEN
203: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
204: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: Error getting score range: ' || sqlerrm);
205: END IF;
206: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;
207: l_low := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
208: l_high := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
209: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
210: WHEN OTHERS THEN

Line 207: l_low := IEX_SCORE_NEW_PVT.G_MIN_SCORE;

203: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
204: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: Error getting score range: ' || sqlerrm);
205: END IF;
206: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;
207: l_low := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
208: l_high := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
209: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
210: WHEN OTHERS THEN
211: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 208: l_high := IEX_SCORE_NEW_PVT.G_MAX_SCORE;

204: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: Error getting score range: ' || sqlerrm);
205: END IF;
206: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;
207: l_low := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
208: l_high := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
209: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
210: WHEN OTHERS THEN
211: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
212: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: Error getting scr range: ' || sqlerrm);

Line 209: l_rule := IEX_SCORE_NEW_PVT.G_RULE;

205: END IF;
206: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;
207: l_low := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
208: l_high := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
209: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
210: WHEN OTHERS THEN
211: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
212: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: Error getting scr range: ' || sqlerrm);
213: END IF;

Line 214: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;

210: WHEN OTHERS THEN
211: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
212: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: Error getting scr range: ' || sqlerrm);
213: END IF;
214: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;
215: l_low := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
216: l_high := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
217: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
218: END;

Line 215: l_low := IEX_SCORE_NEW_PVT.G_MIN_SCORE;

211: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
212: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: Error getting scr range: ' || sqlerrm);
213: END IF;
214: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;
215: l_low := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
216: l_high := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
217: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
218: END;
219:

Line 216: l_high := IEX_SCORE_NEW_PVT.G_MAX_SCORE;

212: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: Error getting scr range: ' || sqlerrm);
213: END IF;
214: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;
215: l_low := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
216: l_high := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
217: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
218: END;
219:
220: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 217: l_rule := IEX_SCORE_NEW_PVT.G_RULE;

213: END IF;
214: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;
215: l_low := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
216: l_high := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
217: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
218: END;
219:
220: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
221: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: weight:' || l_weight_required);

Line 227: IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED := l_weight_required;

223: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: high:' || l_high);
224: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: rule:' || l_rule);
225: END IF;
226:
227: IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED := l_weight_required;
228: IEX_SCORE_NEW_PVT.G_MIN_SCORE := l_low;
229: IEX_SCORE_NEW_PVT.G_MAX_SCORE := l_high;
230: IEX_SCORE_NEW_PVT.G_RULE := l_rule;
231:

Line 228: IEX_SCORE_NEW_PVT.G_MIN_SCORE := l_low;

224: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: rule:' || l_rule);
225: END IF;
226:
227: IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED := l_weight_required;
228: IEX_SCORE_NEW_PVT.G_MIN_SCORE := l_low;
229: IEX_SCORE_NEW_PVT.G_MAX_SCORE := l_high;
230: IEX_SCORE_NEW_PVT.G_RULE := l_rule;
231:
232: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 229: IEX_SCORE_NEW_PVT.G_MAX_SCORE := l_high;

225: END IF;
226:
227: IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED := l_weight_required;
228: IEX_SCORE_NEW_PVT.G_MIN_SCORE := l_low;
229: IEX_SCORE_NEW_PVT.G_MAX_SCORE := l_high;
230: IEX_SCORE_NEW_PVT.G_RULE := l_rule;
231:
232: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
233: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_weight:' || IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED);

Line 230: IEX_SCORE_NEW_PVT.G_RULE := l_rule;

226:
227: IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED := l_weight_required;
228: IEX_SCORE_NEW_PVT.G_MIN_SCORE := l_low;
229: IEX_SCORE_NEW_PVT.G_MAX_SCORE := l_high;
230: IEX_SCORE_NEW_PVT.G_RULE := l_rule;
231:
232: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
233: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_weight:' || IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED);
234: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_low:' || IEX_SCORE_NEW_PVT.G_MIN_SCORE);

Line 233: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_weight:' || IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED);

229: IEX_SCORE_NEW_PVT.G_MAX_SCORE := l_high;
230: IEX_SCORE_NEW_PVT.G_RULE := l_rule;
231:
232: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
233: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_weight:' || IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED);
234: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_low:' || IEX_SCORE_NEW_PVT.G_MIN_SCORE);
235: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_high:' || IEX_SCORE_NEW_PVT.G_MAX_SCORE);
236: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_rule:' || IEX_SCORE_NEW_PVT.G_RULE);
237: END IF;

Line 234: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_low:' || IEX_SCORE_NEW_PVT.G_MIN_SCORE);

230: IEX_SCORE_NEW_PVT.G_RULE := l_rule;
231:
232: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
233: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_weight:' || IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED);
234: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_low:' || IEX_SCORE_NEW_PVT.G_MIN_SCORE);
235: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_high:' || IEX_SCORE_NEW_PVT.G_MAX_SCORE);
236: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_rule:' || IEX_SCORE_NEW_PVT.G_RULE);
237: END IF;
238:

Line 235: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_high:' || IEX_SCORE_NEW_PVT.G_MAX_SCORE);

231:
232: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
233: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_weight:' || IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED);
234: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_low:' || IEX_SCORE_NEW_PVT.G_MIN_SCORE);
235: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_high:' || IEX_SCORE_NEW_PVT.G_MAX_SCORE);
236: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_rule:' || IEX_SCORE_NEW_PVT.G_RULE);
237: END IF;
238:
239: END getScoreRange;

Line 236: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_rule:' || IEX_SCORE_NEW_PVT.G_RULE);

232: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
233: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_weight:' || IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED);
234: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_low:' || IEX_SCORE_NEW_PVT.G_MIN_SCORE);
235: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_high:' || IEX_SCORE_NEW_PVT.G_MAX_SCORE);
236: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScoreRange: g_rule:' || IEX_SCORE_NEW_PVT.G_RULE);
237: END IF;
238:
239: END getScoreRange;
240:

Line 267: X_SCORE_COMP_TBL OUT NOCOPY IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL)

263: || in 11.5.11.
264: || 1. new column METRIC_FLAG in iex_score_components
265: */
266: PROCEDURE getComponents(P_SCORE_ID IN NUMBER,
267: X_SCORE_COMP_TBL OUT NOCOPY IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL)
268: IS
269:
270: -- clchang updated the cursor 10/18/04 with metric_flag;
271: --

Line 285: l_score_comp_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL;

281: WHERE SCORE_ID = p_score_id
282: AND NVL(METRIC_FLAG, 'N') = 'N';
283:
284:
285: l_score_comp_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL;
286: i NUMBER := 0;
287: l_score_comp_id NUMBER;
288: l_score_component_weight NUMBER(3,2);
289: l_score_comp_value VARCHAR2(2000);

Line 367: procedure getScores(p_score_comp_tbl IN IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL,

363: ||
364: || 11/02/04 acaraujo x_scores_tbl returns the bridge to the next concurrent prog.
365: || and scores are store as per the G_BATCH_SIZE to the history table
366: */
367: procedure getScores(p_score_comp_tbl IN IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL,
368: t_object_ids IN IEX_FILTER_PUB.UNIVERSE_IDS,
369: x_scores_tbl OUT NOCOPY IEX_SCORE_NEW_PVT.SCORES_TBL)
370: IS
371:

Line 369: x_scores_tbl OUT NOCOPY IEX_SCORE_NEW_PVT.SCORES_TBL)

365: || and scores are store as per the G_BATCH_SIZE to the history table
366: */
367: procedure getScores(p_score_comp_tbl IN IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL,
368: t_object_ids IN IEX_FILTER_PUB.UNIVERSE_IDS,
369: x_scores_tbl OUT NOCOPY IEX_SCORE_NEW_PVT.SCORES_TBL)
370: IS
371:
372: l_api_name varchar2(10) ;
373: l_universe_size number := 0;

Line 381: --l_raw_score number := IEX_SCORE_NEW_PVT.G_MIN_SCORE;

377: l_weight_required VARCHAR2(3);
378: l_low varchar2(2000);
379: l_high varchar2(2000);
380: l_rule varchar2(20);
381: --l_raw_score number := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
382: l_raw_score number := 0;
383: l_value VARCHAR2(2000);
384: l_new_value VARCHAR2(2000);
385:

Line 389: l_score_comp_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL ;

385:
386: l_running_score number := 0;
387: l_component_score number := 0;
388: l_count2 number := 0;
389: l_score_comp_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL ;
390: l_score_component_id NUMBER;
391: l_score_component_sql VARCHAR2(2500);
392: l_scores_tbl IEX_SCORE_NEW_PVT.SCORES_TBL;
393: vSql varchar2(2500);

Line 392: l_scores_tbl IEX_SCORE_NEW_PVT.SCORES_TBL;

388: l_count2 number := 0;
389: l_score_comp_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL ;
390: l_score_component_id NUMBER;
391: l_score_component_sql VARCHAR2(2500);
392: l_scores_tbl IEX_SCORE_NEW_PVT.SCORES_TBL;
393: vSql varchar2(2500);
394:
395: type COMPONENT_RANGE is table of NUMBER
396: index by binary_integer;

Line 402: l_new_scores_tbl IEX_SCORE_NEW_PVT.NEW_SCORES_TBL ;

398: i NUMBER := 0;
399: l_execute_style VARCHAR2(1); -- are we using select or function call
400:
401: --- Begin - Andre Araujo - 11/02/2004 - New storage mode, this one respects the commit size - TAR 4040621.994
402: l_new_scores_tbl IEX_SCORE_NEW_PVT.NEW_SCORES_TBL ;
403: l_objects_tbl IEX_SCORE_NEW_PVT.SCORE_OBJECTS_TBL ;
404: l_scorecount number := 0;
405: l_bridge NUMBER;
406: --- End - Andre Araujo - 11/02/2004 - New storage mode, this one respects the commit size - TAR 4040621.994

Line 403: l_objects_tbl IEX_SCORE_NEW_PVT.SCORE_OBJECTS_TBL ;

399: l_execute_style VARCHAR2(1); -- are we using select or function call
400:
401: --- Begin - Andre Araujo - 11/02/2004 - New storage mode, this one respects the commit size - TAR 4040621.994
402: l_new_scores_tbl IEX_SCORE_NEW_PVT.NEW_SCORES_TBL ;
403: l_objects_tbl IEX_SCORE_NEW_PVT.SCORE_OBJECTS_TBL ;
404: l_scorecount number := 0;
405: l_bridge NUMBER;
406: --- End - Andre Araujo - 11/02/2004 - New storage mode, this one respects the commit size - TAR 4040621.994
407:

Line 591: -- l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;

587: -- IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScores: l_raw_score=' || l_raw_score);
588: -- END IF;
589: --
590: --
591: -- l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;
592: --
593: -- -- if weight_required <> Y, sum(score of each comp);
594: -- IF (l_weight_required = 'Y') THEN
595: -- --l_running_score:=l_running_score + round((l_raw_score * l_score_comp_tbl(l_count2).SCORE_COMP_WEIGHT));

Line 637: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then

633: -- clchang updated the score logic
634: /***************
635: -- if the score value falls above or below the hard coded floor / ceiling we will force the score
636: -- to the floor or ceiling
637: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
638: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
639: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
640: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
641: end if;

Line 638: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;

634: /***************
635: -- if the score value falls above or below the hard coded floor / ceiling we will force the score
636: -- to the floor or ceiling
637: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
638: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
639: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
640: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
641: end if;
642: *******************************************/

Line 639: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then

635: -- if the score value falls above or below the hard coded floor / ceiling we will force the score
636: -- to the floor or ceiling
637: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
638: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
639: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
640: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
641: end if;
642: *******************************************/
643:

Line 640: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;

636: -- to the floor or ceiling
637: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
638: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
639: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
640: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
641: end if;
642: *******************************************/
643:
644: /*********************

Line 658: l_rule := IEX_SCORE_NEW_PVT.G_RULE;

654: * if the rule is farthest, then the final score should be 999;
655: ***********************************************************************/
656:
657: -- get the final score
658: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
659: IF (l_rule = 'CLOSEST') THEN
660: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
661: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
662: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then

Line 660: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then

656:
657: -- get the final score
658: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
659: IF (l_rule = 'CLOSEST') THEN
660: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
661: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
662: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
663: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
664: end if;

Line 661: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;

657: -- get the final score
658: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
659: IF (l_rule = 'CLOSEST') THEN
660: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
661: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
662: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
663: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
664: end if;
665: ELSE

Line 662: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then

658: l_rule := IEX_SCORE_NEW_PVT.G_RULE;
659: IF (l_rule = 'CLOSEST') THEN
660: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
661: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
662: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
663: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
664: end if;
665: ELSE
666: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then

Line 663: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;

659: IF (l_rule = 'CLOSEST') THEN
660: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
661: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
662: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
663: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
664: end if;
665: ELSE
666: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
667: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;

Line 666: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then

662: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
663: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
664: end if;
665: ELSE
666: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
667: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
668: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
669: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
670: end if;

Line 667: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;

663: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
664: end if;
665: ELSE
666: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
667: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
668: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
669: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
670: end if;
671: END IF;

Line 668: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then

664: end if;
665: ELSE
666: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
667: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
668: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
669: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
670: end if;
671: END IF;
672: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 669: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;

665: ELSE
666: if l_running_score < IEX_SCORE_NEW_PVT.G_MIN_SCORE then
667: l_running_score := IEX_SCORE_NEW_PVT.G_MAX_SCORE;
668: elsif l_running_score > IEX_SCORE_NEW_PVT.G_MAX_SCORE then
669: l_running_score := IEX_SCORE_NEW_PVT.G_MIN_SCORE;
670: end if;
671: END IF;
672: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
673: IEX_DEBUG_PUB.logMessage('IEX_SCORE: getScores: score:' || l_running_score);

Line 760: l_components_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL;-- for testGetComponents / testGetScores

756: l_msg_data VARCHAR2(32767);
757:
758: --vPLSQL varchar2(5000);
759: l_universe IEX_FILTER_PUB.UNIVERSE_IDS; -- for TestUniverse / testGetScores
760: l_components_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL;-- for testGetComponents / testGetScores
761: l_scores_tbl IEX_SCORE_NEW_PVT.SCORES_TBL; -- fore testGetScores
762: b_valid BOOLEAN;
763: l_object_type VARCHAR2(25);
764: l_universe_size NUMBER := 0;

Line 761: l_scores_tbl IEX_SCORE_NEW_PVT.SCORES_TBL; -- fore testGetScores

757:
758: --vPLSQL varchar2(5000);
759: l_universe IEX_FILTER_PUB.UNIVERSE_IDS; -- for TestUniverse / testGetScores
760: l_components_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL;-- for testGetComponents / testGetScores
761: l_scores_tbl IEX_SCORE_NEW_PVT.SCORES_TBL; -- fore testGetScores
762: b_valid BOOLEAN;
763: l_object_type VARCHAR2(25);
764: l_universe_size NUMBER := 0;
765: l_conc_prog_name VARCHAR2(1000);

Line 828: iex_score_new_pvt.getComponents(p_score_id => p_score_id ,

824: from iex_scores
825: where score_id = p_score_id;
826:
827: -- enumerate components for this scoring engine
828: iex_score_new_pvt.getComponents(p_score_id => p_score_id ,
829: X_SCORE_COMP_TBL => l_components_tbl);
830:
831: if l_components_tbl is null or l_components_tbl.count < 1 then
832: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 893: iex_score_new_pvt.getScoreRange(p_score_id => p_score_id );

889:
890: -- begin clchang added 10/20/04 for 11.5.11 score engine enhancement
891: -- get the score_range_low, score_range_high, out_of_range_rule, and
892: -- weight_required of this given score engine;
893: iex_score_new_pvt.getScoreRange(p_score_id => p_score_id );
894: -- if weight_required is Y, then chk weight of each comp is null or not;
895: IF (IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED = 'Y') Then
896: FOR i in 1..l_components_tbl.count
897: LOOP

Line 895: IF (IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED = 'Y') Then

891: -- get the score_range_low, score_range_high, out_of_range_rule, and
892: -- weight_required of this given score engine;
893: iex_score_new_pvt.getScoreRange(p_score_id => p_score_id );
894: -- if weight_required is Y, then chk weight of each comp is null or not;
895: IF (IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED = 'Y') Then
896: FOR i in 1..l_components_tbl.count
897: LOOP
898: if (l_components_tbl(i).score_comp_weight is null) then
899: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 913: iex_score_new_pvt.getScores(p_score_comp_tbl => l_components_tbl,

909: END IF;
910: -- end clchang added 10/20/04 for 11.5.11 score engine enhancement
911:
912: -- get the scores for the Universe
913: iex_score_new_pvt.getScores(p_score_comp_tbl => l_components_tbl,
914: t_object_ids => l_universe,
915: x_scores_tbl => l_scores_tbl);
916:
917: end loop;

Line 1098: l_components_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL; -- for testGetComponents / testGetScores

1094:
1095: IS
1096: --vPLSQL varchar2(5000);
1097: l_universe IEX_FILTER_PUB.UNIVERSE_IDS; -- for TestUniverse / testGetScores
1098: l_components_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL; -- for testGetComponents / testGetScores
1099:
1100: l_scores_tbl IEX_SCORE_NEW_PVT.SCORES_TBL; -- fore testGetScores
1101: l_score_id number ;
1102: l_object_type varchar2(25) ;

Line 1100: l_scores_tbl IEX_SCORE_NEW_PVT.SCORES_TBL; -- fore testGetScores

1096: --vPLSQL varchar2(5000);
1097: l_universe IEX_FILTER_PUB.UNIVERSE_IDS; -- for TestUniverse / testGetScores
1098: l_components_tbl IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL; -- for testGetComponents / testGetScores
1099:
1100: l_scores_tbl IEX_SCORE_NEW_PVT.SCORES_TBL; -- fore testGetScores
1101: l_score_id number ;
1102: l_object_type varchar2(25) ;
1103: b_valid boolean;
1104:

Line 1119: b_valid := iex_score_new_pvt.checkObject_Compatibility(p_score_id => l_score_id ,

1115: FND_MSG_PUB.Add;
1116: return -1;
1117: end if;
1118:
1119: b_valid := iex_score_new_pvt.checkObject_Compatibility(p_score_id => l_score_id ,
1120: p_object_type => l_object_type);
1121: if not b_Valid then
1122: FND_MESSAGE.Set_Name('IEX', 'IEX_INVALID_SCORING_ENGINE');
1123: FND_MSG_PUB.Add;

Line 1127: IEX_SCORE_NEW_PVT.getCOMPONENTS(p_score_id => l_score_id,

1123: FND_MSG_PUB.Add;
1124: return -1;
1125: end if;
1126:
1127: IEX_SCORE_NEW_PVT.getCOMPONENTS(p_score_id => l_score_id,
1128: x_score_comp_tbl => l_components_tbl);
1129:
1130: -- in case of singular object scoring we can ignore universe?
1131: l_universe(1) := p_object_id;

Line 1138: -- iex_score_new_pvt.getScores(p_score_comp_tbl => l_components_tbl,

1134:
1135: l_scores_tbl(1) := get1Score( l_components_tbl, p_object_id );
1136:
1137: return l_scores_tbl(1);
1138: -- iex_score_new_pvt.getScores(p_score_comp_tbl => l_components_tbl,
1139: -- t_object_ids => l_universe,
1140: -- x_scores_tbl => l_scores_tbl);
1141: --
1142: -- if (l_scores_tbl is not null) and (l_scores_tbl.count > 0) then

Line 1254: IEX_SCORE_NEW_PVT.scoreObjects(p_api_version => 1.0,

1250: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Running Scoring Engine: ' || to_char(l_num_score_engines(x)));
1251: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Operating Unit: ' || nvl(mo_global.get_ou_name(mo_global.get_current_org_id), 'All')); --Added for moac
1252: if l_num_score_engines(x) is not null then
1253: BEGIN
1254: IEX_SCORE_NEW_PVT.scoreObjects(p_api_version => 1.0,
1255: p_init_msg_list => FND_API.G_TRUE,
1256: p_commit => FND_API.G_TRUE,
1257: x_return_status => l_return_status,
1258: x_msg_count => l_msg_count,

Line 1650: p_score_id IN NUMBER ) return IEX_SCORE_NEW_PVT.SCORE_HISTORY_TBL

1646: function getScoreHistory (p_score_object_id IN NUMBER,
1647: p_score_object_code IN VARCHAR2,
1648: p_from_date IN DATE ,
1649: p_to_date IN DATE ,
1650: p_score_id IN NUMBER ) return IEX_SCORE_NEW_PVT.SCORE_HISTORY_TBL
1651: IS
1652:
1653: l_score_hist_tbl IEX_SCORE_NEW_PVT.SCORE_HISTORY_TBL;
1654: vPLSQL VARCHAR2(200);

Line 1653: l_score_hist_tbl IEX_SCORE_NEW_PVT.SCORE_HISTORY_TBL;

1649: p_to_date IN DATE ,
1650: p_score_id IN NUMBER ) return IEX_SCORE_NEW_PVT.SCORE_HISTORY_TBL
1651: IS
1652:
1653: l_score_hist_tbl IEX_SCORE_NEW_PVT.SCORE_HISTORY_TBL;
1654: vPLSQL VARCHAR2(200);
1655: l_total NUMBER(38) ;
1656: i NUMBER ;
1657: j NUMBER ;

Line 1792: p_objects_tbl IN IEX_SCORE_NEW_PVT.SCORE_OBJECTS_TBL,

1788: || Major Modifications: when who what
1789: ||
1790: */
1791: procedure storeScoreHistory ( p_score_id IN NUMBER default null,
1792: p_objects_tbl IN IEX_SCORE_NEW_PVT.SCORE_OBJECTS_TBL,
1793: p_scores_tbl IN IEX_SCORE_NEW_PVT.NEW_SCORES_TBL)
1794: IS
1795:
1796: i NUMBER := 1;

Line 1793: p_scores_tbl IN IEX_SCORE_NEW_PVT.NEW_SCORES_TBL)

1789: ||
1790: */
1791: procedure storeScoreHistory ( p_score_id IN NUMBER default null,
1792: p_objects_tbl IN IEX_SCORE_NEW_PVT.SCORE_OBJECTS_TBL,
1793: p_scores_tbl IN IEX_SCORE_NEW_PVT.NEW_SCORES_TBL)
1794: IS
1795:
1796: i NUMBER := 1;
1797: n NUMBER := 1;

Line 1902: p_objects_tbl IN IEX_SCORE_NEW_PVT.SCORE_OBJECTS_TBL,

1898: || Major Modifications: when who what
1899: ||
1900: */
1901: procedure storeDelBuffers ( p_score_id IN NUMBER default null,
1902: p_objects_tbl IN IEX_SCORE_NEW_PVT.SCORE_OBJECTS_TBL,
1903: p_scores_tbl IN IEX_SCORE_NEW_PVT.NEW_SCORES_TBL,
1904: p_bridge IN NUMBER default null)
1905: IS
1906: i NUMBER := 1;

Line 1903: p_scores_tbl IN IEX_SCORE_NEW_PVT.NEW_SCORES_TBL,

1899: ||
1900: */
1901: procedure storeDelBuffers ( p_score_id IN NUMBER default null,
1902: p_objects_tbl IN IEX_SCORE_NEW_PVT.SCORE_OBJECTS_TBL,
1903: p_scores_tbl IN IEX_SCORE_NEW_PVT.NEW_SCORES_TBL,
1904: p_bridge IN NUMBER default null)
1905: IS
1906: i NUMBER := 1;
1907: n NUMBER := 1;

Line 2017: function get1Score ( p_score_comp_tbl IN IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL, p_object_id IN NUMBER ) return NUMBER

2013: ||
2014: || Major Modifications: when who what
2015: ||
2016: */
2017: function get1Score ( p_score_comp_tbl IN IEX_SCORE_NEW_PVT.SCORE_ENG_COMP_TBL, p_object_id IN NUMBER ) return NUMBER
2018: IS
2019:
2020: l_score_component_id NUMBER;
2021: l_score_component_sql VARCHAR2(2500);

Line 2183: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;

2179: IEX_DEBUG_PUB.logMessage('IEX_SCORE: get1Score: l_raw_score=' || l_raw_score);
2180: END IF;
2181:
2182:
2183: l_weight_required := IEX_SCORE_NEW_PVT.G_WEIGHT_REQUIRED;
2184:
2185: -- if weight_required <> Y, sum(score of each comp);
2186: IF (l_weight_required = 'Y') THEN
2187: --l_running_score:=l_running_score + round((l_raw_score * l_score_comp_tbl(l_count2).SCORE_COMP_WEIGHT));

Line 2254: END IEX_SCORE_NEW_PVT;

2250: G_RULE := 'CLOSEST';
2251: G_WEIGHT_REQUIRED := 'N';
2252:
2253:
2254: END IEX_SCORE_NEW_PVT;