109: p_debug_mode => p_pa_debug_mode );
110: END IF;
111:
112: /* Getting token values for use by possible error messages. */
113: FND_MESSAGE.SET_NAME('PA','PA_FP_GEN_EXCEPTION_INFO');
114: l_project_name_err_token := FND_MESSAGE.GET;
115: FND_MESSAGE.SET_NAME('PA','PA_FP_GEN_EXCEPTION_INFO1');
116: l_fin_plan_type_err_token := FND_MESSAGE.GET;
117:
110: END IF;
111:
112: /* Getting token values for use by possible error messages. */
113: FND_MESSAGE.SET_NAME('PA','PA_FP_GEN_EXCEPTION_INFO');
114: l_project_name_err_token := FND_MESSAGE.GET;
115: FND_MESSAGE.SET_NAME('PA','PA_FP_GEN_EXCEPTION_INFO1');
116: l_fin_plan_type_err_token := FND_MESSAGE.GET;
117:
118: retcode := '0';
111:
112: /* Getting token values for use by possible error messages. */
113: FND_MESSAGE.SET_NAME('PA','PA_FP_GEN_EXCEPTION_INFO');
114: l_project_name_err_token := FND_MESSAGE.GET;
115: FND_MESSAGE.SET_NAME('PA','PA_FP_GEN_EXCEPTION_INFO1');
116: l_fin_plan_type_err_token := FND_MESSAGE.GET;
117:
118: retcode := '0';
119:
112: /* Getting token values for use by possible error messages. */
113: FND_MESSAGE.SET_NAME('PA','PA_FP_GEN_EXCEPTION_INFO');
114: l_project_name_err_token := FND_MESSAGE.GET;
115: FND_MESSAGE.SET_NAME('PA','PA_FP_GEN_EXCEPTION_INFO1');
116: l_fin_plan_type_err_token := FND_MESSAGE.GET;
117:
118: retcode := '0';
119:
120: sql_cursor := DBMS_SQL.OPEN_CURSOR;
324: -- gboomina added for AAI requirement 8318932 - start
325: -- Moving the plan type code here to get the plan type value beforehand
326: -- so that this will be used blow to display the plan type in output log file
327: /* The hard-coded values Project Name and the Financial Plan Type
328: should be replaced with FND Message. (This will be done
329: based on the release team response for the processing of
330: the SEED bug. */
331: BEGIN
332: SELECT name INTO l_plan_type_name FROM pa_fin_plan_types_tl
388: END IF;
389:
390:
391: IF l_plan_class_code = 'BUDGET' THEN
392: FND_MESSAGE.SET_NAME( 'PA', 'PA_FP_BUDGET_GENERATION' );
393: l_version_name := FND_MESSAGE.GET;
394: ELSIF l_plan_class_code = 'FORECAST' THEN
395: FND_MESSAGE.SET_NAME( 'PA', 'PA_FP_FORECAST_GENERATION' );
396: l_version_name := FND_MESSAGE.GET;
389:
390:
391: IF l_plan_class_code = 'BUDGET' THEN
392: FND_MESSAGE.SET_NAME( 'PA', 'PA_FP_BUDGET_GENERATION' );
393: l_version_name := FND_MESSAGE.GET;
394: ELSIF l_plan_class_code = 'FORECAST' THEN
395: FND_MESSAGE.SET_NAME( 'PA', 'PA_FP_FORECAST_GENERATION' );
396: l_version_name := FND_MESSAGE.GET;
397: END IF;
391: IF l_plan_class_code = 'BUDGET' THEN
392: FND_MESSAGE.SET_NAME( 'PA', 'PA_FP_BUDGET_GENERATION' );
393: l_version_name := FND_MESSAGE.GET;
394: ELSIF l_plan_class_code = 'FORECAST' THEN
395: FND_MESSAGE.SET_NAME( 'PA', 'PA_FP_FORECAST_GENERATION' );
396: l_version_name := FND_MESSAGE.GET;
397: END IF;
398:
399: FOR i in 1..l_count LOOP
392: FND_MESSAGE.SET_NAME( 'PA', 'PA_FP_BUDGET_GENERATION' );
393: l_version_name := FND_MESSAGE.GET;
394: ELSIF l_plan_class_code = 'FORECAST' THEN
395: FND_MESSAGE.SET_NAME( 'PA', 'PA_FP_FORECAST_GENERATION' );
396: l_version_name := FND_MESSAGE.GET;
397: END IF;
398:
399: FOR i in 1..l_count LOOP
400: l_generation_flag := 'Y';