DBA Data[Home] [Help]

APPS.IEX_STRATEGY_CNT_PUB dependencies on FND_LOG

Line 177: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation aborted. ' );

173: l_return_status := FND_API.G_RET_STS_SUCCESS;
174:
175: /* Check the required profiles for Strategy Concurrent before starting */
176: if (NVL(FND_PROFILE.VALUE('IEX_STRATEGY_DISABLED'), 'N') = 'Y') then
177: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation aborted. ' );
178: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Disabled by Profile ');
179: return;
180: end if;
181:

Line 178: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Disabled by Profile ');

174:
175: /* Check the required profiles for Strategy Concurrent before starting */
176: if (NVL(FND_PROFILE.VALUE('IEX_STRATEGY_DISABLED'), 'N') = 'Y') then
177: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation aborted. ' );
178: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Disabled by Profile ');
179: return;
180: end if;
181:
182: if (l_DefaultStrategyLevel = 50) Then

Line 183: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );

179: return;
180: end if;
181:
182: if (l_DefaultStrategyLevel = 50) Then
183: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );
184: write_log(FND_LOG.LEVEL_UNEXPECTED, 'No Default Strategy Run Level from IEX_APP_PREFERENCES ');
185: b_Skip := 'T';
186: end if;
187:

Line 184: write_log(FND_LOG.LEVEL_UNEXPECTED, 'No Default Strategy Run Level from IEX_APP_PREFERENCES ');

180: end if;
181:
182: if (l_DefaultStrategyLevel = 50) Then
183: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );
184: write_log(FND_LOG.LEVEL_UNEXPECTED, 'No Default Strategy Run Level from IEX_APP_PREFERENCES ');
185: b_Skip := 'T';
186: end if;
187:
188: l_StrategyTempID := NVL(to_number(FND_PROFILE.VALUE('IEX_STRATEGY_DEFAULT_TEMPLATE')), 0);

Line 190: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );

186: end if;
187:
188: l_StrategyTempID := NVL(to_number(FND_PROFILE.VALUE('IEX_STRATEGY_DEFAULT_TEMPLATE')), 0);
189: if (l_StrategyTempID = 0) Then
190: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );
191: write_log(FND_LOG.LEVEL_UNEXPECTED, 'No Default Strategy Template Profile ');
192: b_Skip := 'T';
193: end if;
194:

Line 191: write_log(FND_LOG.LEVEL_UNEXPECTED, 'No Default Strategy Template Profile ');

187:
188: l_StrategyTempID := NVL(to_number(FND_PROFILE.VALUE('IEX_STRATEGY_DEFAULT_TEMPLATE')), 0);
189: if (l_StrategyTempID = 0) Then
190: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );
191: write_log(FND_LOG.LEVEL_UNEXPECTED, 'No Default Strategy Template Profile ');
192: b_Skip := 'T';
193: end if;
194:
195: if (l_default_rs_ID = 0) Then

Line 196: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );

192: b_Skip := 'T';
193: end if;
194:
195: if (l_default_rs_ID = 0) Then
196: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );
197: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Default Resource Profile not set. IEX: Strategy Default Resource ');
198: b_Skip := 'T';
199: end if;
200:

Line 197: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Default Resource Profile not set. IEX: Strategy Default Resource ');

193: end if;
194:
195: if (l_default_rs_ID = 0) Then
196: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );
197: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Default Resource Profile not set. IEX: Strategy Default Resource ');
198: b_Skip := 'T';
199: end if;
200:
201: if (l_resource_ID = 0) Then

Line 202: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );

198: b_Skip := 'T';
199: end if;
200:
201: if (l_resource_ID = 0) Then
202: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );
203: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Fulfilment Resource Profile not set. ');
204: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Fulfilment Resource should be configured for fulfilment ');
205: b_Skip := 'T';
206: end if;

Line 203: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Fulfilment Resource Profile not set. ');

199: end if;
200:
201: if (l_resource_ID = 0) Then
202: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );
203: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Fulfilment Resource Profile not set. ');
204: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Fulfilment Resource should be configured for fulfilment ');
205: b_Skip := 'T';
206: end if;
207:

Line 204: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Fulfilment Resource should be configured for fulfilment ');

200:
201: if (l_resource_ID = 0) Then
202: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation stopped. ' );
203: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Fulfilment Resource Profile not set. ');
204: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Fulfilment Resource should be configured for fulfilment ');
205: b_Skip := 'T';
206: end if;
207:
208: if (b_Skip = 'T') then

Line 213: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation started. ' );

209: retcode := '2';
210: return;
211: end if;
212:
213: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation started. ' );
214: -- Standard Start of API savepoint
215: SAVEPOINT START_STRY_CONT;
216:
217: begin

Line 225: write_log(FND_LOG.LEVEL_UNEXPECTED, 'pre-delinquency strategy template flag = ' ||pre_delinquency_flag);

221: WHEN OTHERS THEN
222: fnd_file.put_line(FND_FILE.LOG, 'Pre Delinquency flag raised exception; sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);
223: end;
224:
225: write_log(FND_LOG.LEVEL_UNEXPECTED, 'pre-delinquency strategy template flag = ' ||pre_delinquency_flag);
226:
227: -- Begin - Andre Araujo -- 01/18/2005 - 4924879 - Improve performance by selecting less records
228: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Do not automatically switch strategies flag = ' ||l_ignore_switch);
229: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Grace Period = ' || l_graceperiod);

Line 228: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Do not automatically switch strategies flag = ' ||l_ignore_switch);

224:
225: write_log(FND_LOG.LEVEL_UNEXPECTED, 'pre-delinquency strategy template flag = ' ||pre_delinquency_flag);
226:
227: -- Begin - Andre Araujo -- 01/18/2005 - 4924879 - Improve performance by selecting less records
228: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Do not automatically switch strategies flag = ' ||l_ignore_switch);
229: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Grace Period = ' || l_graceperiod);
230: -- End - Andre Araujo -- 01/18/2005 - 4924879 - Improve performance by selecting less records
231:
232: write_log(FND_LOG.LEVEL_STATEMENT, 'Delinquency cursor started ');

Line 229: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Grace Period = ' || l_graceperiod);

225: write_log(FND_LOG.LEVEL_UNEXPECTED, 'pre-delinquency strategy template flag = ' ||pre_delinquency_flag);
226:
227: -- Begin - Andre Araujo -- 01/18/2005 - 4924879 - Improve performance by selecting less records
228: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Do not automatically switch strategies flag = ' ||l_ignore_switch);
229: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Grace Period = ' || l_graceperiod);
230: -- End - Andre Araujo -- 01/18/2005 - 4924879 - Improve performance by selecting less records
231:
232: write_log(FND_LOG.LEVEL_STATEMENT, 'Delinquency cursor started ');
233:

Line 232: write_log(FND_LOG.LEVEL_STATEMENT, 'Delinquency cursor started ');

228: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Do not automatically switch strategies flag = ' ||l_ignore_switch);
229: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy Grace Period = ' || l_graceperiod);
230: -- End - Andre Araujo -- 01/18/2005 - 4924879 - Improve performance by selecting less records
231:
232: write_log(FND_LOG.LEVEL_STATEMENT, 'Delinquency cursor started ');
233:
234: /* Check the strategy Run level */
235: /* ctlee - add status and pass it to GetTemplateId 7/3/2003 */
236: IF l_DefaultStrategyLevel = 10 THEN

Line 378: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

374: l_stry_cnt_rec.status;
375: /* ctlee - add status and pass it to GetTemplateId 7/3/2003 */
376:
377: if c_open_delinquencies%FOUND then
378: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
379: write_log(FND_LOG.LEVEL_STATEMENT, 'Delinquency_id = '
380: || l_stry_cnt_rec.delinquency_id
381: || ' object Id = ' || l_stry_cnt_rec.object_id
382: || ' object_type = ' || l_stry_cnt_rec.object_type

Line 379: write_log(FND_LOG.LEVEL_STATEMENT, 'Delinquency_id = '

375: /* ctlee - add status and pass it to GetTemplateId 7/3/2003 */
376:
377: if c_open_delinquencies%FOUND then
378: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
379: write_log(FND_LOG.LEVEL_STATEMENT, 'Delinquency_id = '
380: || l_stry_cnt_rec.delinquency_id
381: || ' object Id = ' || l_stry_cnt_rec.object_id
382: || ' object_type = ' || l_stry_cnt_rec.object_type
383: || ' jtf_object Type ' || l_stry_cnt_rec.jtf_object_type

Line 408: -- IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

404: --
405: -- Open c_Score_Exists(l_stry_cnt_rec.jtf_object_id, l_stry_cnt_rec.jtf_object_type);
406: -- fetch c_Score_Exists into l_stry_cnt_rec.score_value;
407: -- Close c_Score_Exists;
408: -- IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
409: -- write_log(FND_LOG.LEVEL_STATEMENT, ' Got New Score using c_Score_Exists '
410: -- || ' jtf_object Type ' || l_stry_cnt_rec.jtf_object_type
411: -- || ' jtf_object id ' || l_stry_cnt_rec.jtf_object_id
412: -- || ' Score Value = ' || l_stry_cnt_rec.score_value );

Line 409: -- write_log(FND_LOG.LEVEL_STATEMENT, ' Got New Score using c_Score_Exists '

405: -- Open c_Score_Exists(l_stry_cnt_rec.jtf_object_id, l_stry_cnt_rec.jtf_object_type);
406: -- fetch c_Score_Exists into l_stry_cnt_rec.score_value;
407: -- Close c_Score_Exists;
408: -- IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
409: -- write_log(FND_LOG.LEVEL_STATEMENT, ' Got New Score using c_Score_Exists '
410: -- || ' jtf_object Type ' || l_stry_cnt_rec.jtf_object_type
411: -- || ' jtf_object id ' || l_stry_cnt_rec.jtf_object_id
412: -- || ' Score Value = ' || l_stry_cnt_rec.score_value );
413: -- end if;

Line 427: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

423: Open c_Score_Exists(l_stry_cnt_rec.jtf_object_id, l_stry_cnt_rec.jtf_object_type);
424: fetch c_Score_Exists into l_stry_cnt_rec.score_value;
425: Close c_Score_Exists;
426:
427: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
428: write_log(FND_LOG.LEVEL_STATEMENT, ' Got New Score using c_Score_Exists '
429: || '; jtf_object Type= ' || l_stry_cnt_rec.jtf_object_type
430: || '; jtf_object id= ' || l_stry_cnt_rec.jtf_object_id
431: || '; Score Value = ' || l_stry_cnt_rec.score_value );

Line 428: write_log(FND_LOG.LEVEL_STATEMENT, ' Got New Score using c_Score_Exists '

424: fetch c_Score_Exists into l_stry_cnt_rec.score_value;
425: Close c_Score_Exists;
426:
427: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
428: write_log(FND_LOG.LEVEL_STATEMENT, ' Got New Score using c_Score_Exists '
429: || '; jtf_object Type= ' || l_stry_cnt_rec.jtf_object_type
430: || '; jtf_object id= ' || l_stry_cnt_rec.jtf_object_id
431: || '; Score Value = ' || l_stry_cnt_rec.score_value );
432: end if;

Line 440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

436: -- but if a customer scores the delinquency we should use the delinquency score to set the strategy
437: Open c_score_exists_del(l_stry_cnt_rec.payment_schedule_id, 'IEX_INVOICES', l_stry_cnt_rec.delinquency_id, 'IEX_DELINQUENCY');
438: fetch c_score_exists_del into l_stry_cnt_rec.score_value, l_score_object_id, l_score_object_code;
439: Close c_score_exists_del;
440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
441: write_log(FND_LOG.LEVEL_STATEMENT, ' Got New Score using c_Score_Exists_del '
442: || '; jtf_object Type= ' || l_score_object_code
443: || '; jtf_object id= ' || l_score_object_id
444: || '; Score Value = ' || l_stry_cnt_rec.score_value );

Line 441: write_log(FND_LOG.LEVEL_STATEMENT, ' Got New Score using c_Score_Exists_del '

437: Open c_score_exists_del(l_stry_cnt_rec.payment_schedule_id, 'IEX_INVOICES', l_stry_cnt_rec.delinquency_id, 'IEX_DELINQUENCY');
438: fetch c_score_exists_del into l_stry_cnt_rec.score_value, l_score_object_id, l_score_object_code;
439: Close c_score_exists_del;
440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
441: write_log(FND_LOG.LEVEL_STATEMENT, ' Got New Score using c_Score_Exists_del '
442: || '; jtf_object Type= ' || l_score_object_code
443: || '; jtf_object id= ' || l_score_object_id
444: || '; Score Value = ' || l_stry_cnt_rec.score_value );
445: end if;

Line 502: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

498: order by c.creation_date desc;
499: END IF;
500: loop
501: fetch c_gracePeriod into vGracePeriod;
502: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
503: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy grace Period ' || vGracePeriod );
504: end if;
505: if c_gracePeriod%notfound then
506: exit;

Line 503: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy grace Period ' || vGracePeriod );

499: END IF;
500: loop
501: fetch c_gracePeriod into vGracePeriod;
502: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
503: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy grace Period ' || vGracePeriod );
504: end if;
505: if c_gracePeriod%notfound then
506: exit;
507: end if;

Line 572: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status = ' || vStrategyStatus );

568: Close C_Strategy_Exists;
569:
570: vOrginalStrategyStatus :=vStrategyStatus; --Added for bug#5202312 by schekuri on 05-May-2006
571:
572: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status = ' || vStrategyStatus );
573: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Score Value = ' || vScoreValue );
574: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Id = ' || vStrategyId );
575: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Template Id = ' || vStrategyTemplateId );
576: write_log(FND_LOG.LEVEL_PROCEDURE, 'score_history/delinquency Score Value = ' || l_stry_cnt_rec.score_value );

Line 573: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Score Value = ' || vScoreValue );

569:
570: vOrginalStrategyStatus :=vStrategyStatus; --Added for bug#5202312 by schekuri on 05-May-2006
571:
572: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status = ' || vStrategyStatus );
573: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Score Value = ' || vScoreValue );
574: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Id = ' || vStrategyId );
575: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Template Id = ' || vStrategyTemplateId );
576: write_log(FND_LOG.LEVEL_PROCEDURE, 'score_history/delinquency Score Value = ' || l_stry_cnt_rec.score_value );
577:

Line 574: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Id = ' || vStrategyId );

570: vOrginalStrategyStatus :=vStrategyStatus; --Added for bug#5202312 by schekuri on 05-May-2006
571:
572: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status = ' || vStrategyStatus );
573: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Score Value = ' || vScoreValue );
574: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Id = ' || vStrategyId );
575: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Template Id = ' || vStrategyTemplateId );
576: write_log(FND_LOG.LEVEL_PROCEDURE, 'score_history/delinquency Score Value = ' || l_stry_cnt_rec.score_value );
577:
578: if (vStrategyStatus = 'OPEN' or vStrategyStatus = 'PENDING') then

Line 575: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Template Id = ' || vStrategyTemplateId );

571:
572: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status = ' || vStrategyStatus );
573: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Score Value = ' || vScoreValue );
574: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Id = ' || vStrategyId );
575: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Template Id = ' || vStrategyTemplateId );
576: write_log(FND_LOG.LEVEL_PROCEDURE, 'score_history/delinquency Score Value = ' || l_stry_cnt_rec.score_value );
577:
578: if (vStrategyStatus = 'OPEN' or vStrategyStatus = 'PENDING') then
579: begin

Line 576: write_log(FND_LOG.LEVEL_PROCEDURE, 'score_history/delinquency Score Value = ' || l_stry_cnt_rec.score_value );

572: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status = ' || vStrategyStatus );
573: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Score Value = ' || vScoreValue );
574: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Id = ' || vStrategyId );
575: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Template Id = ' || vStrategyTemplateId );
576: write_log(FND_LOG.LEVEL_PROCEDURE, 'score_history/delinquency Score Value = ' || l_stry_cnt_rec.score_value );
577:
578: if (vStrategyStatus = 'OPEN' or vStrategyStatus = 'PENDING') then
579: begin
580: select strategy_rank, decode(score_tolerance, null, 0, score_tolerance), change_strategy_yn

Line 589: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

585: vStrategyRank := '0';
586: vScoreTolerance := 0;
587: vChangeStrategy := 'N';
588: end;
589: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
590: write_log(FND_LOG.LEVEL_PROCEDURE, 'Get Strategy Template Details of = ' || vStrategyTemplateId || ' of Strategy ID = ' || vStrategyID );
591: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Rank = ' || vStrategyRank );
592: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy score tolerance = ' || vScoreTolerance );
593: write_log(FND_LOG.LEVEL_PROCEDURE, 'Change Strategy = ' || vChangeStrategy );

Line 590: write_log(FND_LOG.LEVEL_PROCEDURE, 'Get Strategy Template Details of = ' || vStrategyTemplateId || ' of Strategy ID = ' || vStrategyID );

586: vScoreTolerance := 0;
587: vChangeStrategy := 'N';
588: end;
589: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
590: write_log(FND_LOG.LEVEL_PROCEDURE, 'Get Strategy Template Details of = ' || vStrategyTemplateId || ' of Strategy ID = ' || vStrategyID );
591: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Rank = ' || vStrategyRank );
592: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy score tolerance = ' || vScoreTolerance );
593: write_log(FND_LOG.LEVEL_PROCEDURE, 'Change Strategy = ' || vChangeStrategy );
594: END IF;

Line 591: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Rank = ' || vStrategyRank );

587: vChangeStrategy := 'N';
588: end;
589: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
590: write_log(FND_LOG.LEVEL_PROCEDURE, 'Get Strategy Template Details of = ' || vStrategyTemplateId || ' of Strategy ID = ' || vStrategyID );
591: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Rank = ' || vStrategyRank );
592: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy score tolerance = ' || vScoreTolerance );
593: write_log(FND_LOG.LEVEL_PROCEDURE, 'Change Strategy = ' || vChangeStrategy );
594: END IF;
595:

Line 592: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy score tolerance = ' || vScoreTolerance );

588: end;
589: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
590: write_log(FND_LOG.LEVEL_PROCEDURE, 'Get Strategy Template Details of = ' || vStrategyTemplateId || ' of Strategy ID = ' || vStrategyID );
591: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Rank = ' || vStrategyRank );
592: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy score tolerance = ' || vScoreTolerance );
593: write_log(FND_LOG.LEVEL_PROCEDURE, 'Change Strategy = ' || vChangeStrategy );
594: END IF;
595:
596: -- score in iex_strategies diff from score_histories/iex_delinquencies_all table

Line 593: write_log(FND_LOG.LEVEL_PROCEDURE, 'Change Strategy = ' || vChangeStrategy );

589: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
590: write_log(FND_LOG.LEVEL_PROCEDURE, 'Get Strategy Template Details of = ' || vStrategyTemplateId || ' of Strategy ID = ' || vStrategyID );
591: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Rank = ' || vStrategyRank );
592: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy score tolerance = ' || vScoreTolerance );
593: write_log(FND_LOG.LEVEL_PROCEDURE, 'Change Strategy = ' || vChangeStrategy );
594: END IF;
595:
596: -- score in iex_strategies diff from score_histories/iex_delinquencies_all table
597: -- and score history out of the strategy template score tolerance

Line 620: -- write_log(FND_LOG.LEVEL_PROCEDURE, 'cancel strategy id = ' || vStrategyId );

616:
617: -- cancel strategy
618: -- begin bug 4944801 ctlee 01/18/2006, cancel strategy only if the new strategy template id different from the old one
619: -- BEGIN
620: -- write_log(FND_LOG.LEVEL_PROCEDURE, 'cancel strategy id = ' || vStrategyId );
621: -- IEX_STRATEGY_WF.SEND_SIGNAL(process => 'IEXSTRY',
622: -- strategy_id => vStrategyId,
623: -- status => 'CANCELLED' ) ;
624: -- EXCEPTION

Line 626: -- write_log(FND_LOG.LEVEL_PROCEDURE, 'cancel strategy exception occurred = ' );

622: -- strategy_id => vStrategyId,
623: -- status => 'CANCELLED' ) ;
624: -- EXCEPTION
625: -- WHEN OTHERS THEN
626: -- write_log(FND_LOG.LEVEL_PROCEDURE, 'cancel strategy exception occurred = ' );
627: -- UPDATE IEX_STRATEGIES SET STATUS_code = 'CANCELLED' WHERE STRATEGY_ID = vStrategyId;
628: -- END;
629: -- end bug 4944801 ctlee 01/18/2006, cancel strategy only if the new strategy template id different from the old one
630: vStrategyStatus := 'CANCELLED';

Line 647: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

643: p_stry_cnt_rec => l_stry_cnt_rec,
644: x_strategy_template_id => l_strategy_template_id
645: );
646:
647: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
648: write_log(FND_LOG.LEVEL_PROCEDURE, 'Delinquency ID ' || l_stry_cnt_rec.delinquency_id ||
649: ' Strategy Template ID selected ' || l_strategy_template_id );
650: end if;
651:

Line 648: write_log(FND_LOG.LEVEL_PROCEDURE, 'Delinquency ID ' || l_stry_cnt_rec.delinquency_id ||

644: x_strategy_template_id => l_strategy_template_id
645: );
646:
647: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
648: write_log(FND_LOG.LEVEL_PROCEDURE, 'Delinquency ID ' || l_stry_cnt_rec.delinquency_id ||
649: ' Strategy Template ID selected ' || l_strategy_template_id );
650: end if;
651:
652:

Line 666: write_log(FND_LOG.LEVEL_PROCEDURE, 'same template and continue, strategy template id = ' || vStrategyTemplateId );

662: if (l_strategy_template_id = vStrategyTemplateId and vOrginalStrategyStatus <> l_StratStatusClosed and
663: vOrginalStrategyStatus <> l_StratStatusCancelled) then
664: --End bug#5202312 schekuri 05-May-2006
665:
666: write_log(FND_LOG.LEVEL_PROCEDURE, 'same template and continue, strategy template id = ' || vStrategyTemplateId );
667: goto nextRec; -- continue to the loop for the next record, no need to change strategy
668:
669: --Begin Bug#5126770 schekuri 04-Apr-2006
670: --Added IF condition to the following block of code to avoid junk Cancellation of Strategies

Line 675: write_log(FND_LOG.LEVEL_PROCEDURE, 'cancel strategy id = ' || vStrategyId );

671: --Also enclosed the block of code between BEGIN and END and
672: --moved the exception handler from the outer block
673: elsif vStrategyId IS NOT NULL AND vStrategyStatus1 = 'CANCELLED' THEN
674: BEGIN
675: write_log(FND_LOG.LEVEL_PROCEDURE, 'cancel strategy id = ' || vStrategyId );
676: IEX_STRATEGY_WF.SEND_SIGNAL(process => 'IEXSTRY',
677: strategy_id => vStrategyId,
678: status => 'CANCELLED' ) ;
679: EXCEPTION

Line 682: write_log(FND_LOG.LEVEL_PROCEDURE, 'cancel strategy exception occurred = ' || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);

678: status => 'CANCELLED' ) ;
679: EXCEPTION
680: WHEN OTHERS THEN
681: -- Added for bug 5877743 by gnramasa on 28-02-2007
682: write_log(FND_LOG.LEVEL_PROCEDURE, 'cancel strategy exception occurred = ' || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);
683: UPDATE IEX_STRATEGIES SET STATUS_code = 'CANCELLED',
684: last_update_date=sysdate --Added for bug#7594370 by PNAVEENK
685: WHERE STRATEGY_ID = vStrategyId;
686: END;

Line 694: /*write_log(FND_LOG.LEVEL_PROCEDURE, 'cancel strategy exception occurred = ' );

690: WHEN OTHERS THEN
691: --Begin bug#5126770 schekuri 04-Apr-2006
692: --Moved the exception handler to the inner block
693: NULL;
694: /*write_log(FND_LOG.LEVEL_PROCEDURE, 'cancel strategy exception occurred = ' );
695: UPDATE IEX_STRATEGIES SET STATUS_code = 'CANCELLED' WHERE STRATEGY_ID = vStrategyId;*/
696: --End bug#5126770 schekuri 04-Apr-2006
697: END;
698: -- end bug 4944801 ctlee 01/18/2006

Line 703: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

699:
700:
701: --Start bug 6794510 gnramasa 7th feb 2008
702: if (NVL(FND_PROFILE.VALUE('IEX_SKIP_DEFAULT_STRATEGY_ASSIGNMENT'), 'N') = 'Y') then
703: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
704: IEX_DEBUG_PUB.LogMessage( 'Skip Default Strategy Assignment Profile value is: Y' );
705: IEX_DEBUG_PUB.LogMessage( 'l_strategy_template_id: '|| l_strategy_template_id);
706: IEX_DEBUG_PUB.LogMessage( 'l_StrategyTempID: '|| l_StrategyTempID);
707: END IF;

Line 709: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

705: IEX_DEBUG_PUB.LogMessage( 'l_strategy_template_id: '|| l_strategy_template_id);
706: IEX_DEBUG_PUB.LogMessage( 'l_StrategyTempID: '|| l_StrategyTempID);
707: END IF;
708: IF l_strategy_template_id = l_StrategyTempID THEN
709: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
710: IEX_DEBUG_PUB.LogMessage( 'Strategy creation aborted. ' );
711: IEX_DEBUG_PUB.LogMessage( 'Skip Default Strategy Assignment by Profile ');
712: END IF;
713: goto nextRec; -- continue to the loop for the next record, no need to change strategy

Line 782: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

778: l_strategy_rec.org_id := l_org_id ;
779: else
780: l_strategy_rec.org_id := null;
781: end if;
782: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
783: write_log(FND_LOG.LEVEL_STATEMENT, 'Calling Create strategy for Delinquency ID '
784: || l_strategy_rec.delinquency_id);
785: end if;
786: Begin

Line 783: write_log(FND_LOG.LEVEL_STATEMENT, 'Calling Create strategy for Delinquency ID '

779: else
780: l_strategy_rec.org_id := null;
781: end if;
782: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
783: write_log(FND_LOG.LEVEL_STATEMENT, 'Calling Create strategy for Delinquency ID '
784: || l_strategy_rec.delinquency_id);
785: end if;
786: Begin
787: -- bug 4141678 begin - ctlee

Line 804: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

800: );
801:
802: l_strategy_rec.strategy_id := l_strategy_id;
803:
804: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
805: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
806: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy created. id = ' || l_strategy_id);
807: end if;
808: -- bug 4141678 begin - ctlee

Line 805: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);

801:
802: l_strategy_rec.strategy_id := l_strategy_id;
803:
804: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
805: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
806: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy created. id = ' || l_strategy_id);
807: end if;
808: -- bug 4141678 begin - ctlee
809: -- EXCEPTION

Line 806: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy created. id = ' || l_strategy_id);

802: l_strategy_rec.strategy_id := l_strategy_id;
803:
804: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
805: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
806: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy created. id = ' || l_strategy_id);
807: end if;
808: -- bug 4141678 begin - ctlee
809: -- EXCEPTION
810: -- WHEN OTHERS THEN

Line 811: -- write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy create Return status = ' ||

807: end if;
808: -- bug 4141678 begin - ctlee
809: -- EXCEPTION
810: -- WHEN OTHERS THEN
811: -- write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy create Return status = ' ||
812: -- l_return_status || ' ' || sqlerrm );
813: -- retcode := '2';
814: -- return;
815: -- END;

Line 819: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

815: -- END;
816: -- bug 4141678 end - ctlee
817:
818:
819: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
820: write_log(FND_LOG.LEVEL_STATEMENT, 'Calling Workflow creation for Delinquency ID '
821: || l_strategy_rec.strategy_id);
822: end if;
823:

Line 820: write_log(FND_LOG.LEVEL_STATEMENT, 'Calling Workflow creation for Delinquency ID '

816: -- bug 4141678 end - ctlee
817:
818:
819: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
820: write_log(FND_LOG.LEVEL_STATEMENT, 'Calling Workflow creation for Delinquency ID '
821: || l_strategy_rec.strategy_id);
822: end if;
823:
824: -- BEGIN

Line 839: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

835: x_msg_count=>l_msg_count,
836: x_msg_data=>l_msg_data
837: );
838:
839: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
840: write_log(FND_LOG.LEVEL_STATEMENT, 'Workflow Launch Return status = '
841: || l_return_status) ;
842: end if;
843: EXCEPTION

Line 840: write_log(FND_LOG.LEVEL_STATEMENT, 'Workflow Launch Return status = '

836: x_msg_data=>l_msg_data
837: );
838:
839: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
840: write_log(FND_LOG.LEVEL_STATEMENT, 'Workflow Launch Return status = '
841: || l_return_status) ;
842: end if;
843: EXCEPTION
844: WHEN OTHERS THEN

Line 869: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

865: -- bug 4141678 end - ctlee
866: end;
867: end if; /* if template id is -1 then donot generate streategy */
868: end if; /* check status */
869: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
870: write_log(FND_LOG.LEVEL_STATEMENT, 'Delinquency cursor ends' );
871: end if;
872: ELSE -- fetch failed, so exit loop
873: EXIT;

Line 870: write_log(FND_LOG.LEVEL_STATEMENT, 'Delinquency cursor ends' );

866: end;
867: end if; /* if template id is -1 then donot generate streategy */
868: end if; /* check status */
869: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
870: write_log(FND_LOG.LEVEL_STATEMENT, 'Delinquency cursor ends' );
871: end if;
872: ELSE -- fetch failed, so exit loop
873: EXIT;
874: end if; /* found cursor */

Line 884: write_log(FND_LOG.LEVEL_UNEXPECTED, 'commit count = ' || l_commit_count);

880: if (l_save_count > 0) then
881: l_commit_count := l_commit_count + 1;
882: commit work;
883: end if;
884: write_log(FND_LOG.LEVEL_UNEXPECTED, 'commit count = ' || l_commit_count);
885: -- bug 4141678 end - ctlee
886:
887: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Delinquency cursor EXIT ');
888: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation completed ' );

Line 887: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Delinquency cursor EXIT ');

883: end if;
884: write_log(FND_LOG.LEVEL_UNEXPECTED, 'commit count = ' || l_commit_count);
885: -- bug 4141678 end - ctlee
886:
887: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Delinquency cursor EXIT ');
888: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation completed ' );
889:
890: close c_open_delinquencies;
891:

Line 888: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation completed ' );

884: write_log(FND_LOG.LEVEL_UNEXPECTED, 'commit count = ' || l_commit_count);
885: -- bug 4141678 end - ctlee
886:
887: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Delinquency cursor EXIT ');
888: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy creation completed ' );
889:
890: close c_open_delinquencies;
891:
892: EXCEPTION

Line 953: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor started ');

949: l_return_status := FND_API.G_RET_STS_SUCCESS;
950: -- Standard Start of API savepoint
951: SAVEPOINT CLOSE_STRY_CONT;
952:
953: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor started ');
954:
955: FOR f_strategy_rec in C_Open_strategies loop
956:
957: /* Create the strategy record */

Line 963: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy ID ' || l_stry_cnt_rec.strategy_id

959: l_stry_cnt_rec.delinquency_id := f_strategy_rec.delinquency_id;
960: l_stry_cnt_rec.object_id := f_strategy_rec.object_id;
961: l_stry_cnt_rec.object_type := f_strategy_rec.object_type;
962:
963: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy ID ' || l_stry_cnt_rec.strategy_id
964: || ' Delinquency ID ' || l_stry_cnt_rec.delinquency_id
965: || ' Object ID ' || l_stry_cnt_rec.object_id
966: || ' Object Type ' || l_stry_cnt_rec.object_type
967: || ' Strategy Template ID ' || l_strategy_template_id );

Line 969: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status ' || vStrategyStatus );

965: || ' Object ID ' || l_stry_cnt_rec.object_id
966: || ' Object Type ' || l_stry_cnt_rec.object_type
967: || ' Strategy Template ID ' || l_strategy_template_id );
968:
969: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status ' || vStrategyStatus );
970:
971: l_itemtype := 'IEXSTRY';
972: l_itemkey := to_char(l_stry_cnt_rec.strategy_id);
973:

Line 981: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Closed. id = ' || l_stry_cnt_rec.strategy_id);

977: strategy_id => l_itemkey,
978: status => l_StratStatusClosed
979: );
980:
981: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Closed. id = ' || l_stry_cnt_rec.strategy_id);
982:
983: EXCEPTION
984: WHEN OTHERS THEN
985: fnd_file.put_line(FND_FILE.LOG, 'Strategy Closed Raised Exception = ' ||

Line 989: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor ends' );

985: fnd_file.put_line(FND_FILE.LOG, 'Strategy Closed Raised Exception = ' ||
986: l_stry_cnt_rec.strategy_id || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);
987: END;
988:
989: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor ends' );
990:
991: END loop;
992: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor EXIT ');
993:

Line 992: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor EXIT ');

988:
989: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor ends' );
990:
991: END loop;
992: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor EXIT ');
993:
994: EXCEPTION
995: WHEN OTHERS THEN
996: fnd_file.put_line(FND_FILE.LOG, 'Close Strategy raised exception ' || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);

Line 1042: write_log(FND_LOG.LEVEL_STATEMENT,' Profile Name IEX: Strategy Disabled (IEX_STRATEGY_DISABLED) set to YES ');

1038: -- Initialize API return status to SUCCESS
1039: l_return_status := FND_API.G_RET_STS_SUCCESS;
1040:
1041: if (NVL(FND_PROFILE.VALUE('IEX_STRATEGY_DISABLED'), 'N') = 'Y') then
1042: write_log(FND_LOG.LEVEL_STATEMENT,' Profile Name IEX: Strategy Disabled (IEX_STRATEGY_DISABLED) set to YES ');
1043: return;
1044: end if;
1045: -- Standard Start of API savepoint
1046: SAVEPOINT CLOSE_STRY_CONT;

Line 1049: --IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN -- commented by gnramasa on 29/08/2006 for bug # 5487449

1045: -- Standard Start of API savepoint
1046: SAVEPOINT CLOSE_STRY_CONT;
1047:
1048:
1049: --IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN -- commented by gnramasa on 29/08/2006 for bug # 5487449
1050: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor started ');
1051: --end if;
1052:
1053: IF l_DefaultStrategyLevel = 10 THEN

Line 1050: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor started ');

1046: SAVEPOINT CLOSE_STRY_CONT;
1047:
1048:
1049: --IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN -- commented by gnramasa on 29/08/2006 for bug # 5487449
1050: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor started ');
1051: --end if;
1052:
1053: IF l_DefaultStrategyLevel = 10 THEN
1054: OPEN c_open_strategies

Line 1131: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1127: FETCH c_open_strategies INTO l_strategy_id, l_Strategy_template_id, vStrategyStatus ;
1128: if c_open_strategies%FOUND then
1129:
1130:
1131: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1132: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy ID ' || l_strategy_id
1133: || ' Strategy Status ' || vStrategyStatus
1134: || ' Strategy Template ID ' || l_strategy_template_id );
1135:

Line 1132: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy ID ' || l_strategy_id

1128: if c_open_strategies%FOUND then
1129:
1130:
1131: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1132: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy ID ' || l_strategy_id
1133: || ' Strategy Status ' || vStrategyStatus
1134: || ' Strategy Template ID ' || l_strategy_template_id );
1135:
1136: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status ' || vStrategyStatus );

Line 1136: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status ' || vStrategyStatus );

1132: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy ID ' || l_strategy_id
1133: || ' Strategy Status ' || vStrategyStatus
1134: || ' Strategy Template ID ' || l_strategy_template_id );
1135:
1136: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Status ' || vStrategyStatus );
1137: end if;
1138:
1139: l_itemtype := 'IEXSTRY';
1140: l_itemkey := to_char(l_strategy_id);

Line 1149: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1145: strategy_id => l_itemkey,
1146: status => l_StratStatusClosed
1147: );
1148:
1149: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1150: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Closed. id = ' || l_strategy_id);
1151: end if;
1152:
1153: EXCEPTION

Line 1150: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Closed. id = ' || l_strategy_id);

1146: status => l_StratStatusClosed
1147: );
1148:
1149: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1150: write_log(FND_LOG.LEVEL_PROCEDURE, 'Strategy Closed. id = ' || l_strategy_id);
1151: end if;
1152:
1153: EXCEPTION
1154: WHEN OTHERS THEN

Line 1160: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1156: || l_strategy_id || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);
1157: retcode := '2';
1158: END;
1159:
1160: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1161: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor ends' );
1162: end if;
1163: ELSE -- fetch failed, so exit loop
1164: EXIT;

Line 1161: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor ends' );

1157: retcode := '2';
1158: END;
1159:
1160: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1161: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor ends' );
1162: end if;
1163: ELSE -- fetch failed, so exit loop
1164: EXIT;
1165: end if;

Line 1167: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor EXIT ');

1163: ELSE -- fetch failed, so exit loop
1164: EXIT;
1165: end if;
1166: END loop;
1167: write_log(FND_LOG.LEVEL_STATEMENT, 'Close Strategy cursor EXIT ');
1168: close c_open_strategies;
1169: EXCEPTION
1170: WHEN OTHERS THEN
1171: fnd_file.put_line(FND_FILE.LOG, 'Close Strategy raised exception ' || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);

Line 1243: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1239: into l_DefaultStrategyLevel,l_StrategyLevelName
1240: from iex_app_preferences_vl
1241: where preference_name = 'COLLECTIONS STRATEGY LEVEL' and enabled_flag = 'Y';
1242:
1243: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1244: write_log(FND_LOG.LEVEL_STATEMENT, ' Strategy level is: ' || l_DefaultStrategyLevel);
1245: END IF;
1246:
1247: if l_DefaultStrategyLevel = 10 then

Line 1244: write_log(FND_LOG.LEVEL_STATEMENT, ' Strategy level is: ' || l_DefaultStrategyLevel);

1240: from iex_app_preferences_vl
1241: where preference_name = 'COLLECTIONS STRATEGY LEVEL' and enabled_flag = 'Y';
1242:
1243: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1244: write_log(FND_LOG.LEVEL_STATEMENT, ' Strategy level is: ' || l_DefaultStrategyLevel);
1245: END IF;
1246:
1247: if l_DefaultStrategyLevel = 10 then
1248: for r_party in c_party_onhold_st loop

Line 1249: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1245: END IF;
1246:
1247: if l_DefaultStrategyLevel = 10 then
1248: for r_party in c_party_onhold_st loop
1249: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1250: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for party id : = ' || r_party.party_id);
1251: END IF;
1252: iex_strategy_pub.set_strategy(
1253: P_Api_Version_Number => 2.0,

Line 1250: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for party id : = ' || r_party.party_id);

1246:
1247: if l_DefaultStrategyLevel = 10 then
1248: for r_party in c_party_onhold_st loop
1249: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1250: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for party id : = ' || r_party.party_id);
1251: END IF;
1252: iex_strategy_pub.set_strategy(
1253: P_Api_Version_Number => 2.0,
1254: P_Init_Msg_List => 'F',

Line 1264: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1260: p_DelinquencyID => null,
1261: p_ObjectType => 'PARTY',
1262: p_ObjectID => r_party.party_id,
1263: p_Status => 'OPEN');
1264: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1265: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
1266: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_party.strategy_id);
1267: END IF;
1268: end loop;

Line 1265: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);

1261: p_ObjectType => 'PARTY',
1262: p_ObjectID => r_party.party_id,
1263: p_Status => 'OPEN');
1264: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1265: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
1266: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_party.strategy_id);
1267: END IF;
1268: end loop;
1269: elsif l_DefaultStrategyLevel = 20 then

Line 1266: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_party.strategy_id);

1262: p_ObjectID => r_party.party_id,
1263: p_Status => 'OPEN');
1264: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1265: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
1266: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_party.strategy_id);
1267: END IF;
1268: end loop;
1269: elsif l_DefaultStrategyLevel = 20 then
1270: for r_account in c_account_onhold_st loop

Line 1271: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1267: END IF;
1268: end loop;
1269: elsif l_DefaultStrategyLevel = 20 then
1270: for r_account in c_account_onhold_st loop
1271: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1272: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for account id: = ' || r_account.cust_account_id);
1273: END IF;
1274: iex_strategy_pub.set_strategy(
1275: P_Api_Version_Number => 2.0,

Line 1272: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for account id: = ' || r_account.cust_account_id);

1268: end loop;
1269: elsif l_DefaultStrategyLevel = 20 then
1270: for r_account in c_account_onhold_st loop
1271: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1272: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for account id: = ' || r_account.cust_account_id);
1273: END IF;
1274: iex_strategy_pub.set_strategy(
1275: P_Api_Version_Number => 2.0,
1276: P_Init_Msg_List => 'F',

Line 1286: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1282: p_DelinquencyID => null,
1283: p_ObjectType => 'ACCOUNT',
1284: p_ObjectID => r_account.cust_account_id,
1285: p_Status => 'OPEN');
1286: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1287: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
1288: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_account.strategy_id);
1289: END IF;
1290: end loop;

Line 1287: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);

1283: p_ObjectType => 'ACCOUNT',
1284: p_ObjectID => r_account.cust_account_id,
1285: p_Status => 'OPEN');
1286: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1287: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
1288: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_account.strategy_id);
1289: END IF;
1290: end loop;
1291: elsif l_DefaultStrategyLevel = 30 then

Line 1288: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_account.strategy_id);

1284: p_ObjectID => r_account.cust_account_id,
1285: p_Status => 'OPEN');
1286: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1287: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
1288: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_account.strategy_id);
1289: END IF;
1290: end loop;
1291: elsif l_DefaultStrategyLevel = 30 then
1292: for r_billto in c_billto_onhold_st loop

Line 1293: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1289: END IF;
1290: end loop;
1291: elsif l_DefaultStrategyLevel = 30 then
1292: for r_billto in c_billto_onhold_st loop
1293: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1294: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for customer site use id : = ' || r_billto.billto_id);
1295: END IF;
1296: iex_strategy_pub.set_strategy(
1297: P_Api_Version_Number => 2.0,

Line 1294: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for customer site use id : = ' || r_billto.billto_id);

1290: end loop;
1291: elsif l_DefaultStrategyLevel = 30 then
1292: for r_billto in c_billto_onhold_st loop
1293: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1294: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Update strategy for customer site use id : = ' || r_billto.billto_id);
1295: END IF;
1296: iex_strategy_pub.set_strategy(
1297: P_Api_Version_Number => 2.0,
1298: P_Init_Msg_List => 'F',

Line 1308: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1304: p_DelinquencyID => null,
1305: p_ObjectType => 'BILL_TO',
1306: p_ObjectID => r_billto.billto_id,
1307: p_Status => 'OPEN');
1308: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1309: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
1310: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_billto.strategy_id);
1311: END IF;
1312: end loop;

Line 1309: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);

1305: p_ObjectType => 'BILL_TO',
1306: p_ObjectID => r_billto.billto_id,
1307: p_Status => 'OPEN');
1308: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1309: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
1310: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_billto.strategy_id);
1311: END IF;
1312: end loop;
1313: else

Line 1310: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_billto.strategy_id);

1306: p_ObjectID => r_billto.billto_id,
1307: p_Status => 'OPEN');
1308: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1309: write_log(FND_LOG.LEVEL_PROCEDURE, 'Return status = ' || l_return_status);
1310: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_billto.strategy_id);
1311: END IF;
1312: end loop;
1313: else
1314: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

Line 1314: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1310: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Strategy updated. id = ' || r_billto.strategy_id);
1311: END IF;
1312: end loop;
1313: else
1314: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1315: write_log(FND_LOG.LEVEL_STATEMENT, ' Strategy level is: ' || l_DefaultStrategyLevel || ', no need to update the strategy');
1316: END IF;
1317: end if;
1318: EXCEPTION

Line 1315: write_log(FND_LOG.LEVEL_STATEMENT, ' Strategy level is: ' || l_DefaultStrategyLevel || ', no need to update the strategy');

1311: END IF;
1312: end loop;
1313: else
1314: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1315: write_log(FND_LOG.LEVEL_STATEMENT, ' Strategy level is: ' || l_DefaultStrategyLevel || ', no need to update the strategy');
1316: END IF;
1317: end if;
1318: EXCEPTION
1319: when others then

Line 1320: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1316: END IF;
1317: end if;
1318: EXCEPTION
1319: when others then
1320: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1321: write_log(FND_LOG.LEVEL_STATEMENT, ' In PROCESS_ONHOLD_STRATEGIES when others exception');
1322: END IF;
1323: END PROCESS_ONHOLD_STRATEGIES;
1324: --End Bug#7248296 28-07-2008 barathsr

Line 1321: write_log(FND_LOG.LEVEL_STATEMENT, ' In PROCESS_ONHOLD_STRATEGIES when others exception');

1317: end if;
1318: EXCEPTION
1319: when others then
1320: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1321: write_log(FND_LOG.LEVEL_STATEMENT, ' In PROCESS_ONHOLD_STRATEGIES when others exception');
1322: END IF;
1323: END PROCESS_ONHOLD_STRATEGIES;
1324: --End Bug#7248296 28-07-2008 barathsr
1325:

Line 1374: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1370: vstr4 := ' where CUST_ACCOUNT_id = :AcctId ';
1371: vstr5 := ' where party_id = :PartyId ';
1372: vstr6 := ' where customer_site_use_id = :CustomerSiteUseId ';
1373:
1374: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1375: write_log(FND_LOG.LEVEL_STATEMENT, 'GetStrategyTempID: Object_Type = '
1376: || p_stry_cnt_rec.object_type || ' Delinquency ID = ' || p_stry_cnt_rec.delinquency_id
1377: || ' Strategy Level ' || l_DefaultStrategyLevel || ' Score ' || p_stry_cnt_rec.score_value
1378: || ' Party ID ' || p_stry_cnt_rec.party_cust_id || ' Account ID ' || p_stry_cnt_rec.cust_account_id

Line 1375: write_log(FND_LOG.LEVEL_STATEMENT, 'GetStrategyTempID: Object_Type = '

1371: vstr5 := ' where party_id = :PartyId ';
1372: vstr6 := ' where customer_site_use_id = :CustomerSiteUseId ';
1373:
1374: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1375: write_log(FND_LOG.LEVEL_STATEMENT, 'GetStrategyTempID: Object_Type = '
1376: || p_stry_cnt_rec.object_type || ' Delinquency ID = ' || p_stry_cnt_rec.delinquency_id
1377: || ' Strategy Level ' || l_DefaultStrategyLevel || ' Score ' || p_stry_cnt_rec.score_value
1378: || ' Party ID ' || p_stry_cnt_rec.party_cust_id || ' Account ID ' || p_stry_cnt_rec.cust_account_id
1379: || ' CUSTOMER_SITE_USE ID ' || p_stry_cnt_rec.customer_site_use_id );

Line 1464: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1460: /* Get the Strategy Template for requested Category Type */
1461: LOOP
1462: FETCH C_StrategyTemp INTO c_rec_Strategy_temp_id, c_Rec_Strategy_Rank, c_Rec_ENTITY_NAME, c_rec_active_flag ;
1463:
1464: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1465: write_log(FND_LOG.LEVEL_STATEMENT,
1466: ' Get Strategy Template: Inside Cursor. Entity Name '
1467: || c_Rec_Entity_Name
1468: || ' Temp ' || c_rec_Strategy_temp_id

Line 1465: write_log(FND_LOG.LEVEL_STATEMENT,

1461: LOOP
1462: FETCH C_StrategyTemp INTO c_rec_Strategy_temp_id, c_Rec_Strategy_Rank, c_Rec_ENTITY_NAME, c_rec_active_flag ;
1463:
1464: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1465: write_log(FND_LOG.LEVEL_STATEMENT,
1466: ' Get Strategy Template: Inside Cursor. Entity Name '
1467: || c_Rec_Entity_Name
1468: || ' Temp ' || c_rec_Strategy_temp_id
1469: || ' c_rec_active_flag ' || c_rec_active_flag

Line 1521: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1517: ' and rownum < 2 ';
1518: */
1519: end if;
1520:
1521: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1522: write_log(FND_LOG.LEVEL_STATEMENT, ' Dynamic SQL in GetStrategyTemplate '
1523: || c_DynSql );
1524: end if;
1525:

Line 1522: write_log(FND_LOG.LEVEL_STATEMENT, ' Dynamic SQL in GetStrategyTemplate '

1518: */
1519: end if;
1520:
1521: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1522: write_log(FND_LOG.LEVEL_STATEMENT, ' Dynamic SQL in GetStrategyTemplate '
1523: || c_DynSql );
1524: end if;
1525:
1526: --Execute Immediate c_DynSql into v_Exists;

Line 1538: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1534: v_SkipTemp := 'T';
1535: END;
1536: end if;
1537:
1538: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1539: write_log(FND_LOG.LEVEL_STATEMENT, ' Get Strategy Template: ' || c_Rec_Strategy_Temp_id ||
1540: ' Skip Flag ' || v_SkipTemp );
1541: end if;
1542:

Line 1539: write_log(FND_LOG.LEVEL_STATEMENT, ' Get Strategy Template: ' || c_Rec_Strategy_Temp_id ||

1535: END;
1536: end if;
1537:
1538: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1539: write_log(FND_LOG.LEVEL_STATEMENT, ' Get Strategy Template: ' || c_Rec_Strategy_Temp_id ||
1540: ' Skip Flag ' || v_SkipTemp );
1541: end if;
1542:
1543: if v_SkipTemp <> 'T' then

Line 1546: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1542:
1543: if v_SkipTemp <> 'T' then
1544:
1545: if p_stry_cnt_rec.score_value >= C_Rec_Strategy_Rank then
1546: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1547: write_log(FND_LOG.LEVEL_STATEMENT, ' Found Template: ' || c_Rec_Strategy_Temp_id );
1548: end if;
1549: x_strategy_template_id := c_rec_Strategy_temp_id;
1550: return;

Line 1547: write_log(FND_LOG.LEVEL_STATEMENT, ' Found Template: ' || c_Rec_Strategy_Temp_id );

1543: if v_SkipTemp <> 'T' then
1544:
1545: if p_stry_cnt_rec.score_value >= C_Rec_Strategy_Rank then
1546: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1547: write_log(FND_LOG.LEVEL_STATEMENT, ' Found Template: ' || c_Rec_Strategy_Temp_id );
1548: end if;
1549: x_strategy_template_id := c_rec_Strategy_temp_id;
1550: return;
1551: end if;

Line 1707: FND_LOG.STRING(mesg_level, l_schema || l_dot || l_module , mesg);

1703: l_dot := '.';
1704: l_module := 'strategy';
1705: if (mesg_level >= l_msgLevel) then
1706: fnd_file.put_line(FND_FILE.LOG, mesg);
1707: FND_LOG.STRING(mesg_level, l_schema || l_dot || l_module , mesg);
1708: end if;
1709: END;
1710: --Bug# 6870773 Naveen
1711: PROCEDURE update_strat_org

Line 1862: write_log(FND_LOG.LEVEL_STATEMENT, 'In API update_strat_org raised Exception ' || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);

1858: end if;
1859:
1860: EXCEPTION
1861: WHEN OTHERS THEN
1862: write_log(FND_LOG.LEVEL_STATEMENT, 'In API update_strat_org raised Exception ' || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);
1863: fnd_file.put_line(FND_FILE.LOG, 'In API update_strat_org raised Exception ' || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);
1864: rollback;
1865:
1866: END;

Line 1893: l_MsgLevel := FND_LOG.LEVEL_UNEXPECTED;

1889: l_StratObjectFilterType := 'IEXSTRAT';
1890:
1891: l_enabled := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'), 'N');
1892: if (l_enabled = 'N') then
1893: l_MsgLevel := FND_LOG.LEVEL_UNEXPECTED;
1894: else
1895: l_MsgLevel := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
1896: end if;
1897: l_DefaultTempID := GetDefaultStrategyTempID;

Line 1895: l_MsgLevel := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);

1891: l_enabled := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'), 'N');
1892: if (l_enabled = 'N') then
1893: l_MsgLevel := FND_LOG.LEVEL_UNEXPECTED;
1894: else
1895: l_MsgLevel := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
1896: end if;
1897: l_DefaultTempID := GetDefaultStrategyTempID;
1898:
1899: -- Start for bug # 5487449 on 28/08/2006 by gnramasa

Line 1900: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Default Template ID ' || l_DefaultTempID || ' Profile Name IEX: Strategy Default Template (IEX_STRATEGY_DEFAULT_TEMPLATE)');

1896: end if;
1897: l_DefaultTempID := GetDefaultStrategyTempID;
1898:
1899: -- Start for bug # 5487449 on 28/08/2006 by gnramasa
1900: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Default Template ID ' || l_DefaultTempID || ' Profile Name IEX: Strategy Default Template (IEX_STRATEGY_DEFAULT_TEMPLATE)');
1901: begin
1902: select STRATEGY_NAME ,ENABLED_FLAG
1903: into l_DefaultTempName, l_EnabledFlag
1904: from iex_strategy_templates_vl

Line 1907: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Default Template Name :' || l_DefaultTempName || ' , Enabled Flag :' || l_EnabledFlag );

1903: into l_DefaultTempName, l_EnabledFlag
1904: from iex_strategy_templates_vl
1905: where STRATEGY_TEMP_ID=l_DefaultTempID;
1906:
1907: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Default Template Name :' || l_DefaultTempName || ' , Enabled Flag :' || l_EnabledFlag );
1908: EXCEPTION
1909: WHEN OTHERS THEN
1910: fnd_file.put_line(FND_FILE.LOG, 'Default Template Name raised Exception ' || SQLCODE || ' ' || SQLERRM);
1911: END;

Line 1919: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Resource Id :' || l_default_rs_id || ' Profile Name IEX: Strategy Assignment Default Resource (IEX_STRY_DEFAULT_RESOURCE) , Resource Name :' || l_SourceName || ' , User Name :' || l_UserName);

1915: select SOURCE_NAME,USER_NAME
1916: into l_SourceName,l_UserName
1917: from jtf_rs_resource_extns
1918: where RESOURCE_ID=l_default_rs_id;
1919: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Resource Id :' || l_default_rs_id || ' Profile Name IEX: Strategy Assignment Default Resource (IEX_STRY_DEFAULT_RESOURCE) , Resource Name :' || l_SourceName || ' , User Name :' || l_UserName);
1920: EXCEPTION
1921: WHEN OTHERS THEN
1922: fnd_file.put_line(FND_FILE.LOG, 'Resource Name raised Exception ' || SQLCODE || ' ' || SQLERRM);
1923: END;

Line 1927: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Work Item Assignment Collector level from Profile (IEX: Territory Access Level) :'-- (IEX: Collector Access Level) :'

1923: END;
1924: -- Start for bug # 5877743 on 28/02/2007 by gnramasa
1925: begin
1926: --Begin Bug#7205287 31-Jul-2008 barathsr
1927: write_log(FND_LOG.LEVEL_UNEXPECTED, 'Work Item Assignment Collector level from Profile (IEX: Territory Access Level) :'-- (IEX: Collector Access Level) :'
1928: || NVL(fnd_profile.value('IEX_ACCESS_LEVEL'), 'PARTY'));
1929: --End Bug#7205287 31-Jul-2008 barathsr
1930: EXCEPTION
1931: WHEN OTHERS THEN

Line 1940: write_log(FND_LOG.LEVEL_STATEMENT, 'Current Strategy Level ' || l_DefaultStrategyLevel || ' , ' || l_StrategyLevelName);

1936: select decode(preference_value, 'CUSTOMER', 10, 'ACCOUNT', 20, 'BILL_TO', 30, 'DELINQUENCY', 40, 50),preference_value
1937: into l_DefaultStrategyLevel,l_StrategyLevelName
1938: from iex_app_preferences_vl
1939: where preference_name = 'COLLECTIONS STRATEGY LEVEL' and enabled_flag = l_Yes;
1940: write_log(FND_LOG.LEVEL_STATEMENT, 'Current Strategy Level ' || l_DefaultStrategyLevel || ' , ' || l_StrategyLevelName);
1941: -- End for bug # 5487449 on 28/08/2006 by gnramasa
1942: EXCEPTION
1943: WHEN OTHERS THEN
1944: fnd_file.put_line(FND_FILE.LOG, 'Strategy Level Rised Exception ' || ' sqlcode = ' || sqlcode || ' sqlerrm = ' || sqlerrm);