165: /*
166: * Write messages to the concurrent OUT file
167: */
168:
169: FND_MESSAGE.Set_Name('PA','PA_UTIL_ACT_FROM_DATE');
170: l_fnd_msg := p_ac_start_date||' : '||FND_MESSAGE.Get;
171: PA_DEBUG.Log_Message(p_message => l_fnd_msg
172: , p_write_mode => 1
173: , p_write_file => 'OUT'
166: * Write messages to the concurrent OUT file
167: */
168:
169: FND_MESSAGE.Set_Name('PA','PA_UTIL_ACT_FROM_DATE');
170: l_fnd_msg := p_ac_start_date||' : '||FND_MESSAGE.Get;
171: PA_DEBUG.Log_Message(p_message => l_fnd_msg
172: , p_write_mode => 1
173: , p_write_file => 'OUT'
174: );
171: PA_DEBUG.Log_Message(p_message => l_fnd_msg
172: , p_write_mode => 1
173: , p_write_file => 'OUT'
174: );
175: FND_MESSAGE.Set_Name('PA','PA_UTIL_ACT_THRU_DATE');
176: l_fnd_msg := p_ac_end_date||' : '||FND_MESSAGE.Get;
177: PA_DEBUG.Log_Message(p_message => l_fnd_msg
178: , p_write_mode => 1
179: , p_write_file => 'OUT'
172: , p_write_mode => 1
173: , p_write_file => 'OUT'
174: );
175: FND_MESSAGE.Set_Name('PA','PA_UTIL_ACT_THRU_DATE');
176: l_fnd_msg := p_ac_end_date||' : '||FND_MESSAGE.Get;
177: PA_DEBUG.Log_Message(p_message => l_fnd_msg
178: , p_write_mode => 1
179: , p_write_file => 'OUT'
180: );
177: PA_DEBUG.Log_Message(p_message => l_fnd_msg
178: , p_write_mode => 1
179: , p_write_file => 'OUT'
180: );
181: FND_MESSAGE.Set_Name('PA','PA_UTIL_ORGZ_ROLLUP_METHOD');
182: l_fnd_msg := p_org_rollup_method||' : '||FND_MESSAGE.Get;
183: PA_DEBUG.Log_Message(p_message => l_fnd_msg
184: , p_write_mode => 1
185: , p_write_file => 'OUT'
178: , p_write_mode => 1
179: , p_write_file => 'OUT'
180: );
181: FND_MESSAGE.Set_Name('PA','PA_UTIL_ORGZ_ROLLUP_METHOD');
182: l_fnd_msg := p_org_rollup_method||' : '||FND_MESSAGE.Get;
183: PA_DEBUG.Log_Message(p_message => l_fnd_msg
184: , p_write_mode => 1
185: , p_write_file => 'OUT'
186: );
183: PA_DEBUG.Log_Message(p_message => l_fnd_msg
184: , p_write_mode => 1
185: , p_write_file => 'OUT'
186: );
187: FND_MESSAGE.Set_Name('PA','PA_UTIL_FETCH_SIZE');
188: l_fnd_msg := PA_REP_UTIL_GLOB.G_util_fetch_size||' : '||FND_MESSAGE.Get;
189: PA_DEBUG.Log_Message(p_message => l_fnd_msg
190: , p_write_mode => 1
191: , p_write_file => 'OUT'
184: , p_write_mode => 1
185: , p_write_file => 'OUT'
186: );
187: FND_MESSAGE.Set_Name('PA','PA_UTIL_FETCH_SIZE');
188: l_fnd_msg := PA_REP_UTIL_GLOB.G_util_fetch_size||' : '||FND_MESSAGE.Get;
189: PA_DEBUG.Log_Message(p_message => l_fnd_msg
190: , p_write_mode => 1
191: , p_write_file => 'OUT'
192: );
189: PA_DEBUG.Log_Message(p_message => l_fnd_msg
190: , p_write_mode => 1
191: , p_write_file => 'OUT'
192: );
193: FND_MESSAGE.Set_Name('PA','PA_UTIL_SUCCESSFUL_RUN');
194: l_fnd_msg := FND_MESSAGE.Get;
195: PA_DEBUG.Log_Message(p_message => l_fnd_msg
196: , p_write_mode => 1
197: , p_write_file => 'OUT'
190: , p_write_mode => 1
191: , p_write_file => 'OUT'
192: );
193: FND_MESSAGE.Set_Name('PA','PA_UTIL_SUCCESSFUL_RUN');
194: l_fnd_msg := FND_MESSAGE.Get;
195: PA_DEBUG.Log_Message(p_message => l_fnd_msg
196: , p_write_mode => 1
197: , p_write_file => 'OUT'
198: );
214: PA_DEBUG.g_err_stage := '100 : The Given Date Range is Invalid';
215: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
216: END IF;
217:
218: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_DATE_RANGE');
219: l_fnd_msg := FND_MESSAGE.Get;
220: PA_DEBUG.Log_Message(p_message => l_fnd_msg
221: , p_write_mode => 1
222: , p_write_file => 'OUT');
215: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
216: END IF;
217:
218: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_DATE_RANGE');
219: l_fnd_msg := FND_MESSAGE.Get;
220: PA_DEBUG.Log_Message(p_message => l_fnd_msg
221: , p_write_mode => 1
222: , p_write_file => 'OUT');
223: PA_Debug.Reset_Curr_Function;
296: IF l_debug ='Y'THEN -- bug 2674619
297: PA_DEBUG.g_err_stage := '400 : There is no matching PA period for the given Start Date';
298: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
299: END IF;
300: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_START_DATE_PA');
301: l_fnd_msg := FND_MESSAGE.Get;
302: PA_DEBUG.Log_Message(p_message => l_fnd_msg
303: , p_write_mode => 1
304: , p_write_file => 'OUT');
297: PA_DEBUG.g_err_stage := '400 : There is no matching PA period for the given Start Date';
298: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
299: END IF;
300: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_START_DATE_PA');
301: l_fnd_msg := FND_MESSAGE.Get;
302: PA_DEBUG.Log_Message(p_message => l_fnd_msg
303: , p_write_mode => 1
304: , p_write_file => 'OUT');
305: PA_Debug.Reset_Curr_Function;
329: IF l_debug ='Y'THEN -- bug 2674619
330: PA_DEBUG.g_err_stage := '450 : There is no matching GL period for the given Start Date';
331: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
332: END IF;
333: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_START_DATE_GL');
334: l_fnd_msg := FND_MESSAGE.Get;
335: PA_DEBUG.Log_Message(p_message => l_fnd_msg
336: , p_write_mode => 1
337: , p_write_file => 'OUT');
330: PA_DEBUG.g_err_stage := '450 : There is no matching GL period for the given Start Date';
331: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
332: END IF;
333: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_START_DATE_GL');
334: l_fnd_msg := FND_MESSAGE.Get;
335: PA_DEBUG.Log_Message(p_message => l_fnd_msg
336: , p_write_mode => 1
337: , p_write_file => 'OUT');
338: PA_Debug.Reset_Curr_Function;
363: IF l_debug ='Y'THEN -- bug 2674619
364: PA_DEBUG.g_err_stage := '700 : Oracle Projects Not Installed .. Not Running Acutals';
365: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
366: END IF;
367: FND_MESSAGE.Set_Name('PA','PA_UTIL_PA_NOT_INSTALLED');
368: l_fnd_msg := FND_MESSAGE.Get;
369: PA_DEBUG.Log_Message(p_message => l_fnd_msg
370: , p_write_mode => 1
371: , p_write_file => 'OUT');
364: PA_DEBUG.g_err_stage := '700 : Oracle Projects Not Installed .. Not Running Acutals';
365: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
366: END IF;
367: FND_MESSAGE.Set_Name('PA','PA_UTIL_PA_NOT_INSTALLED');
368: l_fnd_msg := FND_MESSAGE.Get;
369: PA_DEBUG.Log_Message(p_message => l_fnd_msg
370: , p_write_mode => 1
371: , p_write_file => 'OUT');
372: PA_Debug.Reset_Curr_Function;
384: AND ORG_HIERARCHY_VERSION_ID = pa_rep_util_glob.G_implementation_details.G_org_structure_version_id
385: ;
386:
387: IF ( l_orghier_date_after > l_orghier_date_before) then
388: FND_MESSAGE.Set_Name('PA','PA_UTIL_ORGZ_HIER_CHANGE');
389: l_fnd_msg := FND_MESSAGE.Get;
390: PA_DEBUG.Log_Message(p_message => l_fnd_msg);
391: PA_DEBUG.Log_Message(p_message => l_fnd_msg
392: , p_write_mode => 1
385: ;
386:
387: IF ( l_orghier_date_after > l_orghier_date_before) then
388: FND_MESSAGE.Set_Name('PA','PA_UTIL_ORGZ_HIER_CHANGE');
389: l_fnd_msg := FND_MESSAGE.Get;
390: PA_DEBUG.Log_Message(p_message => l_fnd_msg);
391: PA_DEBUG.Log_Message(p_message => l_fnd_msg
392: , p_write_mode => 1
393: , p_write_file => 'OUT'
392: , p_write_mode => 1
393: , p_write_file => 'OUT'
394: );
395: ELSE
396: FND_MESSAGE.Set_Name('PA','PA_UTIL_SUCCESSFUL_RUN');
397: l_fnd_msg := FND_MESSAGE.Get;
398: PA_DEBUG.Log_Message(p_message => l_fnd_msg);
399: PA_DEBUG.Log_Message(p_message => l_fnd_msg
400: , p_write_mode => 1
393: , p_write_file => 'OUT'
394: );
395: ELSE
396: FND_MESSAGE.Set_Name('PA','PA_UTIL_SUCCESSFUL_RUN');
397: l_fnd_msg := FND_MESSAGE.Get;
398: PA_DEBUG.Log_Message(p_message => l_fnd_msg);
399: PA_DEBUG.Log_Message(p_message => l_fnd_msg
400: , p_write_mode => 1
401: , p_write_file => 'OUT'
507: /*
508: * Write messages to the concurrent OUT file
509: */
510:
511: FND_MESSAGE.Set_Name('PA','PA_UTIL_FCT_FROM_DATE');
512: l_fnd_msg := p_fc_start_date||' : '||FND_MESSAGE.Get;
513: PA_DEBUG.Log_Message(p_message => l_fnd_msg
514: , p_write_mode => 1
515: , p_write_file => 'OUT'
508: * Write messages to the concurrent OUT file
509: */
510:
511: FND_MESSAGE.Set_Name('PA','PA_UTIL_FCT_FROM_DATE');
512: l_fnd_msg := p_fc_start_date||' : '||FND_MESSAGE.Get;
513: PA_DEBUG.Log_Message(p_message => l_fnd_msg
514: , p_write_mode => 1
515: , p_write_file => 'OUT'
516: );
513: PA_DEBUG.Log_Message(p_message => l_fnd_msg
514: , p_write_mode => 1
515: , p_write_file => 'OUT'
516: );
517: FND_MESSAGE.Set_Name('PA','PA_UTIL_FCT_THRU_DATE');
518: l_fnd_msg := p_fc_end_date||' : '||FND_MESSAGE.Get;
519: PA_DEBUG.Log_Message(p_message => l_fnd_msg
520: , p_write_mode => 1
521: , p_write_file => 'OUT'
514: , p_write_mode => 1
515: , p_write_file => 'OUT'
516: );
517: FND_MESSAGE.Set_Name('PA','PA_UTIL_FCT_THRU_DATE');
518: l_fnd_msg := p_fc_end_date||' : '||FND_MESSAGE.Get;
519: PA_DEBUG.Log_Message(p_message => l_fnd_msg
520: , p_write_mode => 1
521: , p_write_file => 'OUT'
522: );
519: PA_DEBUG.Log_Message(p_message => l_fnd_msg
520: , p_write_mode => 1
521: , p_write_file => 'OUT'
522: );
523: FND_MESSAGE.Set_Name('PA','PA_UTIL_ORGZ_ROLLUP_METHOD');
524: l_fnd_msg := p_org_rollup_method||' : '||FND_MESSAGE.Get;
525: PA_DEBUG.Log_Message(p_message => l_fnd_msg
526: , p_write_mode => 1
527: , p_write_file => 'OUT'
520: , p_write_mode => 1
521: , p_write_file => 'OUT'
522: );
523: FND_MESSAGE.Set_Name('PA','PA_UTIL_ORGZ_ROLLUP_METHOD');
524: l_fnd_msg := p_org_rollup_method||' : '||FND_MESSAGE.Get;
525: PA_DEBUG.Log_Message(p_message => l_fnd_msg
526: , p_write_mode => 1
527: , p_write_file => 'OUT'
528: );
525: PA_DEBUG.Log_Message(p_message => l_fnd_msg
526: , p_write_mode => 1
527: , p_write_file => 'OUT'
528: );
529: FND_MESSAGE.Set_Name('PA','PA_UTIL_FETCH_SIZE');
530: l_fnd_msg := PA_REP_UTIL_GLOB.G_util_fetch_size||' : '||FND_MESSAGE.Get;
531: PA_DEBUG.Log_Message(p_message => l_fnd_msg
532: , p_write_mode => 1
533: , p_write_file => 'OUT'
526: , p_write_mode => 1
527: , p_write_file => 'OUT'
528: );
529: FND_MESSAGE.Set_Name('PA','PA_UTIL_FETCH_SIZE');
530: l_fnd_msg := PA_REP_UTIL_GLOB.G_util_fetch_size||' : '||FND_MESSAGE.Get;
531: PA_DEBUG.Log_Message(p_message => l_fnd_msg
532: , p_write_mode => 1
533: , p_write_file => 'OUT'
534: );
531: PA_DEBUG.Log_Message(p_message => l_fnd_msg
532: , p_write_mode => 1
533: , p_write_file => 'OUT'
534: );
535: FND_MESSAGE.Set_Name('PA','PA_UTIL_SUCCESSFUL_RUN');
536: l_fnd_msg := FND_MESSAGE.Get;
537: PA_DEBUG.Log_Message(p_message => l_fnd_msg
538: , p_write_mode => 1
539: , p_write_file => 'OUT'
532: , p_write_mode => 1
533: , p_write_file => 'OUT'
534: );
535: FND_MESSAGE.Set_Name('PA','PA_UTIL_SUCCESSFUL_RUN');
536: l_fnd_msg := FND_MESSAGE.Get;
537: PA_DEBUG.Log_Message(p_message => l_fnd_msg
538: , p_write_mode => 1
539: , p_write_file => 'OUT'
540: );
556: IF l_debug ='Y'THEN -- bug 2674619
557: PA_DEBUG.g_err_stage := '100 : The Given Date Range is Invalid';
558: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
559: END IF;
560: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_DATE_RANGE');
561: l_fnd_msg := FND_MESSAGE.Get;
562: PA_DEBUG.Log_Message(p_message => l_fnd_msg
563: , p_write_mode => 1
564: , p_write_file => 'OUT');
557: PA_DEBUG.g_err_stage := '100 : The Given Date Range is Invalid';
558: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
559: END IF;
560: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_DATE_RANGE');
561: l_fnd_msg := FND_MESSAGE.Get;
562: PA_DEBUG.Log_Message(p_message => l_fnd_msg
563: , p_write_mode => 1
564: , p_write_file => 'OUT');
565: PA_Debug.Reset_Curr_Function;
637: IF l_debug ='Y'THEN -- bug 2674619
638: PA_DEBUG.g_err_stage := '350 : There is no matching PA period for the given Start Date';
639: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
640: END IF;
641: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_START_DATE_PA');
642: l_fnd_msg := FND_MESSAGE.Get;
643: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage
644: , p_write_mode => 1
645: , p_write_file => 'OUT');
638: PA_DEBUG.g_err_stage := '350 : There is no matching PA period for the given Start Date';
639: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
640: END IF;
641: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_START_DATE_PA');
642: l_fnd_msg := FND_MESSAGE.Get;
643: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage
644: , p_write_mode => 1
645: , p_write_file => 'OUT');
646: PA_Debug.Reset_Curr_Function;
670: IF l_debug ='Y'THEN -- bug 2674619
671: PA_DEBUG.g_err_stage := '400 : There is no matching GL period for the given Start Date';
672: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
673: END IF;
674: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_START_DATE_GL');
675: l_fnd_msg := FND_MESSAGE.Get;
676: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage
677: , p_write_mode => 1
678: , p_write_file => 'OUT');
671: PA_DEBUG.g_err_stage := '400 : There is no matching GL period for the given Start Date';
672: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
673: END IF;
674: FND_MESSAGE.Set_Name('PA','PA_UTIL_INVALID_START_DATE_GL');
675: l_fnd_msg := FND_MESSAGE.Get;
676: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage
677: , p_write_mode => 1
678: , p_write_file => 'OUT');
679: PA_Debug.Reset_Curr_Function;
706:
707: PA_DEBUG.g_err_stage := '400 : Oracle PRM Not Installed ... Not Running Forecast';
708: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
709: END IF;
710: FND_MESSAGE.Set_Name('PA','PA_UTIL_PRM_NOT_INSTALLED');
711: l_fnd_msg := FND_MESSAGE.Get;
712: PA_DEBUG.Log_Message(p_message => l_fnd_msg
713: , p_write_mode => 1
714: , p_write_file => 'OUT');
707: PA_DEBUG.g_err_stage := '400 : Oracle PRM Not Installed ... Not Running Forecast';
708: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
709: END IF;
710: FND_MESSAGE.Set_Name('PA','PA_UTIL_PRM_NOT_INSTALLED');
711: l_fnd_msg := FND_MESSAGE.Get;
712: PA_DEBUG.Log_Message(p_message => l_fnd_msg
713: , p_write_mode => 1
714: , p_write_file => 'OUT');
715: PA_DEBUG.Reset_Curr_Function;
727: AND ORG_HIERARCHY_VERSION_ID = pa_rep_util_glob.G_implementation_details.G_org_structure_version_id
728: ;
729:
730: IF ( l_orghier_date_after > l_orghier_date_before) then
731: FND_MESSAGE.Set_Name('PA','PA_UTIL_ORGZ_HIER_CHANGE');
732: l_fnd_msg := FND_MESSAGE.Get;
733: PA_DEBUG.Log_Message(p_message => l_fnd_msg);
734: PA_DEBUG.Log_Message(p_message => l_fnd_msg
735: , p_write_mode => 1
728: ;
729:
730: IF ( l_orghier_date_after > l_orghier_date_before) then
731: FND_MESSAGE.Set_Name('PA','PA_UTIL_ORGZ_HIER_CHANGE');
732: l_fnd_msg := FND_MESSAGE.Get;
733: PA_DEBUG.Log_Message(p_message => l_fnd_msg);
734: PA_DEBUG.Log_Message(p_message => l_fnd_msg
735: , p_write_mode => 1
736: , p_write_file => 'OUT'
735: , p_write_mode => 1
736: , p_write_file => 'OUT'
737: );
738: ELSE
739: FND_MESSAGE.Set_Name('PA','PA_UTIL_SUCCESSFUL_RUN');
740: l_fnd_msg := FND_MESSAGE.Get;
741: PA_DEBUG.Log_Message(p_message => l_fnd_msg);
742: PA_DEBUG.Log_Message(p_message => l_fnd_msg
743: , p_write_mode => 1
736: , p_write_file => 'OUT'
737: );
738: ELSE
739: FND_MESSAGE.Set_Name('PA','PA_UTIL_SUCCESSFUL_RUN');
740: l_fnd_msg := FND_MESSAGE.Get;
741: PA_DEBUG.Log_Message(p_message => l_fnd_msg);
742: PA_DEBUG.Log_Message(p_message => l_fnd_msg
743: , p_write_mode => 1
744: , p_write_file => 'OUT'