62: IF (g_proc_level>=g_debug_level) THEN --bug 3236479
63: XTR_RISK_DEBUG_PKG.dpush(null,'QRM_PA_CALCULATIONS_P.RUN_ANALYSIS_AM');
64: END IF;
65:
66: IF FND_MSG_PUB.count_msg > 0 THEN
67: FND_MSG_PUB.initialize;
68: END IF;
69:
70: FOR i IN 1..p_analysis_names.COUNT LOOP
63: XTR_RISK_DEBUG_PKG.dpush(null,'QRM_PA_CALCULATIONS_P.RUN_ANALYSIS_AM');
64: END IF;
65:
66: IF FND_MSG_PUB.count_msg > 0 THEN
67: FND_MSG_PUB.initialize;
68: END IF;
69:
70: FOR i IN 1..p_analysis_names.COUNT LOOP
71: IF (g_proc_level>=g_debug_level) THEN
75: FETCH check_analysis INTO p_settings;
76: IF (check_analysis%NOTFOUND) THEN
77: FND_MESSAGE.set_name('QRM', 'QRM_ANA_NO_SETTING');
78: FND_MESSAGE.set_token('ANALYSIS_NAME', p_settings.analysis_name);
79: FND_MSG_PUB.add;
80: IF (g_proc_level>=g_debug_level) THEN
81: xtr_risk_debug_pkg.dlog('run_analysis_am: ' || 'analysis not found');
82: END IF;
83: ELSIF (p_settings.status = '3') THEN
89: END IF;
90: IF (dphase IN ('PENDING', 'RUNNING', 'INACTIVE')) THEN
91: FND_MESSAGE.set_name('QRM', 'QRM_ANA_RUN_IN_PROGRESS');
92: FND_MESSAGE.set_token('ANALYSIS', p_settings.analysis_name);
93: FND_MSG_PUB.add;
94: IF (g_proc_level>=g_debug_level) THEN
95: xtr_risk_debug_pkg.dlog('run_analysis_am: ' || 'status is 3');
96: END IF;
97: p_go_calculate := FALSE;
115: XTR_RISK_DEBUG_PKG.dlog('run_analysis_am: ' || 'error msg: '||p_msg);
116: END IF;
117: FND_MESSAGE.set_name('QRM', 'QRM_ANA_SUBMIT_ERROR');
118: FND_MESSAGE.set_token('ANALYSIS', p_analysis_names(i));
119: FND_MSG_PUB.add;
120: IF (g_proc_level>=g_debug_level) THEN
121: xtr_risk_debug_pkg.dlog('run_analysis_am: ' || 'request not submitted');
122: END IF;
123: ELSE