463: -- WHEN NO_RATE THEN
464: -- bug 1200912
465: IF (curr = CE_CASH_FCST.G_rp_src_currency) THEN
466: all_exist_flag := FALSE;
467: FND_MESSAGE.set_name ('CE','CE_FC_MISSING_EXCHANGE_RATE');
468: FND_MESSAGE.set_token('FROM_CURR', curr);
469: FND_MESSAGE.set_token('TO_CURR',
470: CE_CASH_FCST.G_rp_forecast_currency);
471: error_msg := FND_MESSAGE.GET;
464: -- bug 1200912
465: IF (curr = CE_CASH_FCST.G_rp_src_currency) THEN
466: all_exist_flag := FALSE;
467: FND_MESSAGE.set_name ('CE','CE_FC_MISSING_EXCHANGE_RATE');
468: FND_MESSAGE.set_token('FROM_CURR', curr);
469: FND_MESSAGE.set_token('TO_CURR',
470: CE_CASH_FCST.G_rp_forecast_currency);
471: error_msg := FND_MESSAGE.GET;
472: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
465: IF (curr = CE_CASH_FCST.G_rp_src_currency) THEN
466: all_exist_flag := FALSE;
467: FND_MESSAGE.set_name ('CE','CE_FC_MISSING_EXCHANGE_RATE');
468: FND_MESSAGE.set_token('FROM_CURR', curr);
469: FND_MESSAGE.set_token('TO_CURR',
470: CE_CASH_FCST.G_rp_forecast_currency);
471: error_msg := FND_MESSAGE.GET;
472: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
473: G_rp_forecast_header_id, null,'CE_FC_MISSING_RATE', error_msg);
467: FND_MESSAGE.set_name ('CE','CE_FC_MISSING_EXCHANGE_RATE');
468: FND_MESSAGE.set_token('FROM_CURR', curr);
469: FND_MESSAGE.set_token('TO_CURR',
470: CE_CASH_FCST.G_rp_forecast_currency);
471: error_msg := FND_MESSAGE.GET;
472: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
473: G_rp_forecast_header_id, null,'CE_FC_MISSING_RATE', error_msg);
474: END IF;
475: END;
488: FETCH bad_curr INTO curr;
489: EXIT WHEN (bad_curr%NOTFOUND OR bad_curr%NOTFOUND IS NULL);
490: BEGIN
491: all_exist_flag := FALSE;
492: FND_MESSAGE.set_name ('CE','CE_FC_BAD_CURRENCY');
493: FND_MESSAGE.set_token('BAD_CURR', curr);
494: error_msg := FND_MESSAGE.GET;
495: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
496: G_rp_forecast_header_id, null,'CE_FC_BAD_CURRENCY', error_msg);
489: EXIT WHEN (bad_curr%NOTFOUND OR bad_curr%NOTFOUND IS NULL);
490: BEGIN
491: all_exist_flag := FALSE;
492: FND_MESSAGE.set_name ('CE','CE_FC_BAD_CURRENCY');
493: FND_MESSAGE.set_token('BAD_CURR', curr);
494: error_msg := FND_MESSAGE.GET;
495: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
496: G_rp_forecast_header_id, null,'CE_FC_BAD_CURRENCY', error_msg);
497: END;
490: BEGIN
491: all_exist_flag := FALSE;
492: FND_MESSAGE.set_name ('CE','CE_FC_BAD_CURRENCY');
493: FND_MESSAGE.set_token('BAD_CURR', curr);
494: error_msg := FND_MESSAGE.GET;
495: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
496: G_rp_forecast_header_id, null,'CE_FC_BAD_CURRENCY', error_msg);
497: END;
498: END LOOP;
599: FROM fnd_currencies
600: WHERE derive_type = 'EURO';
601: EXCEPTION
602: WHEN NO_DATA_FOUND THEN
603: FND_MESSAGE.set_name ('CE','CE_FC_EURO_NOT_DEFINED');
604: error_msg := FND_MESSAGE.GET;
605: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
606: G_rp_forecast_header_id, null,'CE_FC_EURO_NOT_DEFINED',
607: error_msg);
600: WHERE derive_type = 'EURO';
601: EXCEPTION
602: WHEN NO_DATA_FOUND THEN
603: FND_MESSAGE.set_name ('CE','CE_FC_EURO_NOT_DEFINED');
604: error_msg := FND_MESSAGE.GET;
605: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
606: G_rp_forecast_header_id, null,'CE_FC_EURO_NOT_DEFINED',
607: error_msg);
608: END;
679: END IF;
680:
681: IF skip_err_log = FALSE THEN
682: all_exist_flag := FALSE;
683: FND_MESSAGE.set_name ('CE','CE_FC_MISSING_EXCHANGE_RATE');
684: FND_MESSAGE.set_token('FROM_CURR', from_curr);
685: FND_MESSAGE.set_token('TO_CURR',to_curr);
686: error_msg := FND_MESSAGE.GET;
687: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
680:
681: IF skip_err_log = FALSE THEN
682: all_exist_flag := FALSE;
683: FND_MESSAGE.set_name ('CE','CE_FC_MISSING_EXCHANGE_RATE');
684: FND_MESSAGE.set_token('FROM_CURR', from_curr);
685: FND_MESSAGE.set_token('TO_CURR',to_curr);
686: error_msg := FND_MESSAGE.GET;
687: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
688: G_rp_forecast_header_id, null,'CE_FC_MISSING_RATE',
681: IF skip_err_log = FALSE THEN
682: all_exist_flag := FALSE;
683: FND_MESSAGE.set_name ('CE','CE_FC_MISSING_EXCHANGE_RATE');
684: FND_MESSAGE.set_token('FROM_CURR', from_curr);
685: FND_MESSAGE.set_token('TO_CURR',to_curr);
686: error_msg := FND_MESSAGE.GET;
687: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
688: G_rp_forecast_header_id, null,'CE_FC_MISSING_RATE',
689: error_msg);
682: all_exist_flag := FALSE;
683: FND_MESSAGE.set_name ('CE','CE_FC_MISSING_EXCHANGE_RATE');
684: FND_MESSAGE.set_token('FROM_CURR', from_curr);
685: FND_MESSAGE.set_token('TO_CURR',to_curr);
686: error_msg := FND_MESSAGE.GET;
687: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
688: G_rp_forecast_header_id, null,'CE_FC_MISSING_RATE',
689: error_msg);
690: END IF;
699: BEGIN
700: all_exist_flag := FALSE;
701: IF (G_rp_src_curr_type = 'A'
702: OR curr = CE_CASH_FCST.G_rp_src_currency) THEN
703: FND_MESSAGE.set_name ('CE','CE_FC_BAD_CURRENCY');
704: FND_MESSAGE.set_token('BAD_CURR', curr);
705: error_msg := FND_MESSAGE.GET;
706: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
707: G_rp_forecast_header_id, null,'CE_FC_BAD_CURRENCY', error_msg);
700: all_exist_flag := FALSE;
701: IF (G_rp_src_curr_type = 'A'
702: OR curr = CE_CASH_FCST.G_rp_src_currency) THEN
703: FND_MESSAGE.set_name ('CE','CE_FC_BAD_CURRENCY');
704: FND_MESSAGE.set_token('BAD_CURR', curr);
705: error_msg := FND_MESSAGE.GET;
706: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
707: G_rp_forecast_header_id, null,'CE_FC_BAD_CURRENCY', error_msg);
708: END IF;
701: IF (G_rp_src_curr_type = 'A'
702: OR curr = CE_CASH_FCST.G_rp_src_currency) THEN
703: FND_MESSAGE.set_name ('CE','CE_FC_BAD_CURRENCY');
704: FND_MESSAGE.set_token('BAD_CURR', curr);
705: error_msg := FND_MESSAGE.GET;
706: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,
707: G_rp_forecast_header_id, null,'CE_FC_BAD_CURRENCY', error_msg);
708: END IF;
709: END;
828: WHERE gsb.set_of_books_id = G_set_of_books_id;
829:
830: IF (calendar <> G_rp_calendar_name) THEN
831: valid_period := FALSE;
832: FND_MESSAGE.set_name('CE', 'CE_FC_INVALID_PERIOD_SET_NAME');
833: FND_MESSAGE.set_token('SOB_NAME', sob_name);
834: FND_MESSAGE.set_token('START_PERIOD', G_rp_calendar_name);
835: error_msg := fnd_message.get;
836: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, G_forecast_row_id,
829:
830: IF (calendar <> G_rp_calendar_name) THEN
831: valid_period := FALSE;
832: FND_MESSAGE.set_name('CE', 'CE_FC_INVALID_PERIOD_SET_NAME');
833: FND_MESSAGE.set_token('SOB_NAME', sob_name);
834: FND_MESSAGE.set_token('START_PERIOD', G_rp_calendar_name);
835: error_msg := fnd_message.get;
836: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, G_forecast_row_id,
837: 'CE_FC_INVALID_PERIOD', error_msg);
830: IF (calendar <> G_rp_calendar_name) THEN
831: valid_period := FALSE;
832: FND_MESSAGE.set_name('CE', 'CE_FC_INVALID_PERIOD_SET_NAME');
833: FND_MESSAGE.set_token('SOB_NAME', sob_name);
834: FND_MESSAGE.set_token('START_PERIOD', G_rp_calendar_name);
835: error_msg := fnd_message.get;
836: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, G_forecast_row_id,
837: 'CE_FC_INVALID_PERIOD', error_msg);
838: END IF;
831: valid_period := FALSE;
832: FND_MESSAGE.set_name('CE', 'CE_FC_INVALID_PERIOD_SET_NAME');
833: FND_MESSAGE.set_token('SOB_NAME', sob_name);
834: FND_MESSAGE.set_token('START_PERIOD', G_rp_calendar_name);
835: error_msg := fnd_message.get;
836: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, G_forecast_row_id,
837: 'CE_FC_INVALID_PERIOD', error_msg);
838: END IF;
839: ELSE
843: EXIT WHEN sob_c%NOTFOUND or sob_c%NOTFOUND IS NULL;
844:
845: IF (calendar <> G_rp_calendar_name) THEN
846: valid_period := FALSE;
847: FND_MESSAGE.set_name('CE', 'CE_FC_INVALID_PERIOD_SET_NAME');
848: FND_MESSAGE.set_token('SOB_NAME', sob_name);
849: FND_MESSAGE.set_token('START_PERIOD', G_rp_calendar_name);
850: error_msg := fnd_message.get;
851: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, G_forecast_row_id,
844:
845: IF (calendar <> G_rp_calendar_name) THEN
846: valid_period := FALSE;
847: FND_MESSAGE.set_name('CE', 'CE_FC_INVALID_PERIOD_SET_NAME');
848: FND_MESSAGE.set_token('SOB_NAME', sob_name);
849: FND_MESSAGE.set_token('START_PERIOD', G_rp_calendar_name);
850: error_msg := fnd_message.get;
851: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, G_forecast_row_id,
852: 'CE_FC_INVALID_PERIOD', error_msg);
845: IF (calendar <> G_rp_calendar_name) THEN
846: valid_period := FALSE;
847: FND_MESSAGE.set_name('CE', 'CE_FC_INVALID_PERIOD_SET_NAME');
848: FND_MESSAGE.set_token('SOB_NAME', sob_name);
849: FND_MESSAGE.set_token('START_PERIOD', G_rp_calendar_name);
850: error_msg := fnd_message.get;
851: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, G_forecast_row_id,
852: 'CE_FC_INVALID_PERIOD', error_msg);
853: END IF;
846: valid_period := FALSE;
847: FND_MESSAGE.set_name('CE', 'CE_FC_INVALID_PERIOD_SET_NAME');
848: FND_MESSAGE.set_token('SOB_NAME', sob_name);
849: FND_MESSAGE.set_token('START_PERIOD', G_rp_calendar_name);
850: error_msg := fnd_message.get;
851: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, G_forecast_row_id,
852: 'CE_FC_INVALID_PERIOD', error_msg);
853: END IF;
854: END LOOP;
891: WHERE forecast_header_id = G_rp_forecast_header_id;
892:
893: IF (col_count = 0) THEN
894: valid_col := FALSE;
895: FND_MESSAGE.set_name('CE', 'CE_FC_NO_COLUMN');
896: error_msg := fnd_message.get;
897: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, null,
898: 'CE_FC_NO_COLUMN', error_msg);
899: END IF;
892:
893: IF (col_count = 0) THEN
894: valid_col := FALSE;
895: FND_MESSAGE.set_name('CE', 'CE_FC_NO_COLUMN');
896: error_msg := fnd_message.get;
897: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, null,
898: 'CE_FC_NO_COLUMN', error_msg);
899: END IF;
900: END IF;
947: days_to < G_min_col OR
948: days_to > G_max_col) THEN
949:
950: all_valid := FALSE;
951: FND_MESSAGE.set_name ('CE','CE_FC_COLUMN_NOT_IN_RANGE');
952: FND_MESSAGE.set_token('COLUMN', col_num);
953: error_msg := FND_MESSAGE.GET;
954: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id,
955: null,'CE_FC_COLUMN_NOT_IN_RANGE', error_msg);
948: days_to > G_max_col) THEN
949:
950: all_valid := FALSE;
951: FND_MESSAGE.set_name ('CE','CE_FC_COLUMN_NOT_IN_RANGE');
952: FND_MESSAGE.set_token('COLUMN', col_num);
953: error_msg := FND_MESSAGE.GET;
954: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id,
955: null,'CE_FC_COLUMN_NOT_IN_RANGE', error_msg);
956: END IF;
949:
950: all_valid := FALSE;
951: FND_MESSAGE.set_name ('CE','CE_FC_COLUMN_NOT_IN_RANGE');
952: FND_MESSAGE.set_token('COLUMN', col_num);
953: error_msg := FND_MESSAGE.GET;
954: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id,
955: null,'CE_FC_COLUMN_NOT_IN_RANGE', error_msg);
956: END IF;
957:
1044:
1045: IF (NOT G_gl_cash_only) THEN
1046:
1047: valid_row := FALSE;
1048: FND_MESSAGE.set_name('CE', 'CE_FC_NO_ROW');
1049: error_msg := fnd_message.get;
1050: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, null,
1051: 'CE_FC_NO_ROW', error_msg);
1052: END IF;
1045: IF (NOT G_gl_cash_only) THEN
1046:
1047: valid_row := FALSE;
1048: FND_MESSAGE.set_name('CE', 'CE_FC_NO_ROW');
1049: error_msg := fnd_message.get;
1050: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, null,
1051: 'CE_FC_NO_ROW', error_msg);
1052: END IF;
1053: END IF;
1318: commit;
1319: END IF;
1320:
1321: IF(duplicate_name)THEN
1322: FND_MESSAGE.set_name ('CE','CE_FC_DUPLICATE_FORECAST_NAME');
1323: error_msg := FND_MESSAGE.GET;
1324: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id,
1325: null,'CE_FC_DUPLICATE_FORECAST_NAME', error_msg);
1326: UPDATE ce_forecasts
1319: END IF;
1320:
1321: IF(duplicate_name)THEN
1322: FND_MESSAGE.set_name ('CE','CE_FC_DUPLICATE_FORECAST_NAME');
1323: error_msg := FND_MESSAGE.GET;
1324: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id,
1325: null,'CE_FC_DUPLICATE_FORECAST_NAME', error_msg);
1326: UPDATE ce_forecasts
1327: SET error_status = 'X'
1366: valid_pmr := FALSE;
1367: END IF;
1368:
1369: IF(not valid_pmr)THEN
1370: FND_MESSAGE.set_name('CE', 'CE_FC_PMR_MISSING_XINFO');
1371: error_msg := fnd_message.get;
1372: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, null,
1373: 'CE_FC_PMR_MISSING_XINFO', error_msg);
1374: END IF;
1367: END IF;
1368:
1369: IF(not valid_pmr)THEN
1370: FND_MESSAGE.set_name('CE', 'CE_FC_PMR_MISSING_XINFO');
1371: error_msg := fnd_message.get;
1372: CE_FORECAST_ERRORS_PKG.insert_row(G_forecast_id,G_rp_forecast_header_id, null,
1373: 'CE_FC_PMR_MISSING_XINFO', error_msg);
1374: END IF;
1375:
1809: COMMIT;
1810:
1811: IF (p_fc_name_exists = 'Y')
1812: THEN
1813: FND_MESSAGE.set_name ('CE','CE_FC_DUPLICATE_FORECAST_NAME');
1814: error_msg := FND_MESSAGE.GET;
1815: CE_FORECAST_ERRORS_PKG.insert_row(
1816: p_forecast_id,
1817: p_forecast_header_id,
1810:
1811: IF (p_fc_name_exists = 'Y')
1812: THEN
1813: FND_MESSAGE.set_name ('CE','CE_FC_DUPLICATE_FORECAST_NAME');
1814: error_msg := FND_MESSAGE.GET;
1815: CE_FORECAST_ERRORS_PKG.insert_row(
1816: p_forecast_id,
1817: p_forecast_header_id,
1818: null,
1985: COMMIT;
1986:
1987: IF (p_fc_name_exists = 'Y')
1988: THEN
1989: FND_MESSAGE.set_name ('CE','CE_FC_DUPLICATE_FORECAST_NAME');
1990: error_msg := FND_MESSAGE.GET;
1991: CE_FORECAST_ERRORS_PKG.insert_row(
1992: p_forecast_id,
1993: p_forecast_header_id,
1986:
1987: IF (p_fc_name_exists = 'Y')
1988: THEN
1989: FND_MESSAGE.set_name ('CE','CE_FC_DUPLICATE_FORECAST_NAME');
1990: error_msg := FND_MESSAGE.GET;
1991: CE_FORECAST_ERRORS_PKG.insert_row(
1992: p_forecast_id,
1993: p_forecast_header_id,
1994: null,