502: G_FILE_DEBUG := TRUE;
503:
504: EXCEPTION
505: WHEN UTL_FILE.INVALID_PATH THEN
506: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_INVALID_PATH' );
507: FND_MESSAGE.SET_TOKEN( 'FILE_DIR', G_FILE_PATH );
508: FND_MSG_PUB.ADD;
509: G_FILE_DEBUG := FALSE;
510: G_COUNT := 0;
503:
504: EXCEPTION
505: WHEN UTL_FILE.INVALID_PATH THEN
506: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_INVALID_PATH' );
507: FND_MESSAGE.SET_TOKEN( 'FILE_DIR', G_FILE_PATH );
508: FND_MSG_PUB.ADD;
509: G_FILE_DEBUG := FALSE;
510: G_COUNT := 0;
511: RAISE FND_API.G_EXC_ERROR;
510: G_COUNT := 0;
511: RAISE FND_API.G_EXC_ERROR;
512:
513: WHEN UTL_FILE.INVALID_MODE THEN
514: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_INVALID_MODE' );
515: FND_MESSAGE.SET_TOKEN( 'TEMP_FILE', G_FILE_NAME );
516: FND_MESSAGE.SET_TOKEN( 'FILE_MODE', 'w' );
517: FND_MSG_PUB.ADD;
518: G_FILE_DEBUG := FALSE;
511: RAISE FND_API.G_EXC_ERROR;
512:
513: WHEN UTL_FILE.INVALID_MODE THEN
514: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_INVALID_MODE' );
515: FND_MESSAGE.SET_TOKEN( 'TEMP_FILE', G_FILE_NAME );
516: FND_MESSAGE.SET_TOKEN( 'FILE_MODE', 'w' );
517: FND_MSG_PUB.ADD;
518: G_FILE_DEBUG := FALSE;
519: G_COUNT := 0;
512:
513: WHEN UTL_FILE.INVALID_MODE THEN
514: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_INVALID_MODE' );
515: FND_MESSAGE.SET_TOKEN( 'TEMP_FILE', G_FILE_NAME );
516: FND_MESSAGE.SET_TOKEN( 'FILE_MODE', 'w' );
517: FND_MSG_PUB.ADD;
518: G_FILE_DEBUG := FALSE;
519: G_COUNT := 0;
520: RAISE FND_API.G_EXC_ERROR;
519: G_COUNT := 0;
520: RAISE FND_API.G_EXC_ERROR;
521:
522: WHEN UTL_FILE.INVALID_OPERATION THEN
523: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_INVALID_OPERATN' );
524: FND_MESSAGE.SET_TOKEN( 'TEMP_FILE', G_FILE_NAME );
525: FND_MESSAGE.SET_TOKEN( 'TEMP_DIR', G_FILE_PATH );
526: FND_MSG_PUB.ADD;
527: G_FILE_DEBUG := FALSE;
520: RAISE FND_API.G_EXC_ERROR;
521:
522: WHEN UTL_FILE.INVALID_OPERATION THEN
523: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_INVALID_OPERATN' );
524: FND_MESSAGE.SET_TOKEN( 'TEMP_FILE', G_FILE_NAME );
525: FND_MESSAGE.SET_TOKEN( 'TEMP_DIR', G_FILE_PATH );
526: FND_MSG_PUB.ADD;
527: G_FILE_DEBUG := FALSE;
528: G_COUNT := 0;
521:
522: WHEN UTL_FILE.INVALID_OPERATION THEN
523: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_INVALID_OPERATN' );
524: FND_MESSAGE.SET_TOKEN( 'TEMP_FILE', G_FILE_NAME );
525: FND_MESSAGE.SET_TOKEN( 'TEMP_DIR', G_FILE_PATH );
526: FND_MSG_PUB.ADD;
527: G_FILE_DEBUG := FALSE;
528: G_COUNT := 0;
529: RAISE FND_API.G_EXC_ERROR;
593: END IF;
594: END IF;
595:
596: IF l_error THEN
597: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
598: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
599: FND_MSG_PUB.ADD;
600: x_return_status := FND_API.G_RET_STS_ERROR;
601: END IF;
594: END IF;
595:
596: IF l_error THEN
597: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
598: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
599: FND_MSG_PUB.ADD;
600: x_return_status := FND_API.G_RET_STS_ERROR;
601: END IF;
602:
631: END IF;
632: END IF;
633:
634: IF l_error THEN
635: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
636: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
637: FND_MSG_PUB.ADD;
638: x_return_status := FND_API.G_RET_STS_ERROR;
639: END IF;
632: END IF;
633:
634: IF l_error THEN
635: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
636: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
637: FND_MSG_PUB.ADD;
638: x_return_status := FND_API.G_RET_STS_ERROR;
639: END IF;
640:
669: END IF;
670: END IF;
671:
672: IF l_error THEN
673: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
674: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
675: FND_MSG_PUB.ADD;
676: x_return_status := FND_API.G_RET_STS_ERROR;
677: END IF;
670: END IF;
671:
672: IF l_error THEN
673: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
674: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
675: FND_MSG_PUB.ADD;
676: x_return_status := FND_API.G_RET_STS_ERROR;
677: END IF;
678:
749: END IF;
750: END IF;
751:
752: IF l_error THEN
753: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
754: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
755: FND_MSG_PUB.ADD;
756: x_return_status := FND_API.G_RET_STS_ERROR;
757: END IF;
750: END IF;
751:
752: IF l_error THEN
753: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
754: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
755: FND_MSG_PUB.ADD;
756: x_return_status := FND_API.G_RET_STS_ERROR;
757: END IF;
758:
788: END IF;
789: END IF;
790:
791: IF l_error THEN
792: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
793: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
794: FND_MSG_PUB.ADD;
795: x_return_status := FND_API.G_RET_STS_ERROR;
796: END IF;
789: END IF;
790:
791: IF l_error THEN
792: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
793: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
794: FND_MSG_PUB.ADD;
795: x_return_status := FND_API.G_RET_STS_ERROR;
796: END IF;
797:
827: END IF;
828: END IF;
829:
830: IF l_error THEN
831: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
832: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
833: FND_MSG_PUB.ADD;
834: x_return_status := FND_API.G_RET_STS_ERROR;
835: END IF;
828: END IF;
829:
830: IF l_error THEN
831: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_COLUMN' );
832: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
833: FND_MSG_PUB.ADD;
834: x_return_status := FND_API.G_RET_STS_ERROR;
835: END IF;
836:
908: ( l_start_date IS NULL OR
909: l_start_date = FND_API.G_MISS_DATE OR
910: l_start_date > l_end_date )
911: THEN
912: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DATE_GREATER' );
913: FND_MESSAGE.SET_TOKEN( 'DATE2', p_end_date_column_name );
914: FND_MESSAGE.SET_TOKEN( 'DATE1', p_start_date_column_name );
915: FND_MSG_PUB.ADD;
916: x_return_status := FND_API.G_RET_STS_ERROR;
909: l_start_date = FND_API.G_MISS_DATE OR
910: l_start_date > l_end_date )
911: THEN
912: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DATE_GREATER' );
913: FND_MESSAGE.SET_TOKEN( 'DATE2', p_end_date_column_name );
914: FND_MESSAGE.SET_TOKEN( 'DATE1', p_start_date_column_name );
915: FND_MSG_PUB.ADD;
916: x_return_status := FND_API.G_RET_STS_ERROR;
917: END IF;
910: l_start_date > l_end_date )
911: THEN
912: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_DATE_GREATER' );
913: FND_MESSAGE.SET_TOKEN( 'DATE2', p_end_date_column_name );
914: FND_MESSAGE.SET_TOKEN( 'DATE1', p_start_date_column_name );
915: FND_MSG_PUB.ADD;
916: x_return_status := FND_API.G_RET_STS_ERROR;
917: END IF;
918:
956:
957: BEGIN
958:
959: IF p_column_value = FND_API.G_MISS_CHAR THEN
960: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
961: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
962: FND_MSG_PUB.ADD;
963: x_return_status := FND_API.G_RET_STS_ERROR;
964: END IF;
957: BEGIN
958:
959: IF p_column_value = FND_API.G_MISS_CHAR THEN
960: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
961: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
962: FND_MSG_PUB.ADD;
963: x_return_status := FND_API.G_RET_STS_ERROR;
964: END IF;
965:
973:
974: BEGIN
975:
976: IF p_column_value = FND_API.G_MISS_NUM THEN
977: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
978: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
979: FND_MSG_PUB.ADD;
980: x_return_status := FND_API.G_RET_STS_ERROR;
981: END IF;
974: BEGIN
975:
976: IF p_column_value = FND_API.G_MISS_NUM THEN
977: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
978: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
979: FND_MSG_PUB.ADD;
980: x_return_status := FND_API.G_RET_STS_ERROR;
981: END IF;
982:
990:
991: BEGIN
992:
993: IF p_column_value = FND_API.G_MISS_DATE THEN
994: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
995: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
996: FND_MSG_PUB.ADD;
997: x_return_status := FND_API.G_RET_STS_ERROR;
998: END IF;
991: BEGIN
992:
993: IF p_column_value = FND_API.G_MISS_DATE THEN
994: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_NONUPDATEABLE_TO_NULL' );
995: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
996: FND_MSG_PUB.ADD;
997: x_return_status := FND_API.G_RET_STS_ERROR;
998: END IF;
999:
1059: END IF;
1060: END IF;
1061:
1062: IF l_error THEN
1063: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_LOOKUP' );
1064: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
1065: FND_MESSAGE.SET_TOKEN( 'LOOKUP_TYPE', p_lookup_type );
1066: FND_MSG_PUB.ADD;
1067: x_return_status := FND_API.G_RET_STS_ERROR;
1060: END IF;
1061:
1062: IF l_error THEN
1063: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_LOOKUP' );
1064: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
1065: FND_MESSAGE.SET_TOKEN( 'LOOKUP_TYPE', p_lookup_type );
1066: FND_MSG_PUB.ADD;
1067: x_return_status := FND_API.G_RET_STS_ERROR;
1068: END IF;
1061:
1062: IF l_error THEN
1063: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_INVALID_LOOKUP' );
1064: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
1065: FND_MESSAGE.SET_TOKEN( 'LOOKUP_TYPE', p_lookup_type );
1066: FND_MSG_PUB.ADD;
1067: x_return_status := FND_API.G_RET_STS_ERROR;
1068: END IF;
1069: END IF;
1155: UTL_FILE.fclose( G_FILE );
1156: G_FILE_DEBUG := FALSE;
1157: EXCEPTION
1158: WHEN UTL_FILE.INVALID_FILEHANDLE THEN
1159: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_INVALID_HANDLE' );
1160: FND_MESSAGE.SET_TOKEN( 'TEMP_FILE', G_FILE_NAME );
1161: FND_MSG_PUB.ADD;
1162: G_FILE_DEBUG := FALSE;
1163: G_COUNT := 0;
1156: G_FILE_DEBUG := FALSE;
1157: EXCEPTION
1158: WHEN UTL_FILE.INVALID_FILEHANDLE THEN
1159: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_INVALID_HANDLE' );
1160: FND_MESSAGE.SET_TOKEN( 'TEMP_FILE', G_FILE_NAME );
1161: FND_MSG_PUB.ADD;
1162: G_FILE_DEBUG := FALSE;
1163: G_COUNT := 0;
1164: RAISE FND_API.G_EXC_ERROR;
1163: G_COUNT := 0;
1164: RAISE FND_API.G_EXC_ERROR;
1165:
1166: WHEN UTL_FILE.WRITE_ERROR THEN
1167: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_WRITE_ERROR' );
1168: FND_MESSAGE.SET_TOKEN( 'TEMP_FILE', G_FILE_NAME );
1169: FND_MSG_PUB.ADD;
1170: G_FILE_DEBUG := FALSE;
1171: G_COUNT := 0;
1164: RAISE FND_API.G_EXC_ERROR;
1165:
1166: WHEN UTL_FILE.WRITE_ERROR THEN
1167: FND_MESSAGE.SET_NAME( 'FND', 'CONC-TEMPFILE_WRITE_ERROR' );
1168: FND_MESSAGE.SET_TOKEN( 'TEMP_FILE', G_FILE_NAME );
1169: FND_MSG_PUB.ADD;
1170: G_FILE_DEBUG := FALSE;
1171: G_COUNT := 0;
1172: RAISE FND_API.G_EXC_ERROR;
1574: l_return_value := fnd_installation.get_app_info(
1575: p_app_short_name, l_status, l_industry, l_schema_name);
1576:
1577: IF l_schema_name IS NULL THEN
1578: fnd_message.set_name('FND','FND_NO_SCHEMA_NAME');
1579: fnd_message.set_token('SCHEMA_NAME',p_app_short_name);
1580: fnd_msg_pub.add;
1581: RAISE fnd_api.g_exc_unexpected_error;
1582: ELSE
1575: p_app_short_name, l_status, l_industry, l_schema_name);
1576:
1577: IF l_schema_name IS NULL THEN
1578: fnd_message.set_name('FND','FND_NO_SCHEMA_NAME');
1579: fnd_message.set_token('SCHEMA_NAME',p_app_short_name);
1580: fnd_msg_pub.add;
1581: RAISE fnd_api.g_exc_unexpected_error;
1582: ELSE
1583: RETURN l_schema_name;
1865: isColumnHasValue (
1866: p_api_version, p_create_update_flag,
1867: p_column_value, p_default_value, p_old_column_value) = 'Y'
1868: THEN
1869: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OBSOLETE_COLUMN' );
1870: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
1871: FND_MSG_PUB.ADD;
1872: x_return_status := FND_API.G_RET_STS_ERROR;
1873: END IF;
1866: p_api_version, p_create_update_flag,
1867: p_column_value, p_default_value, p_old_column_value) = 'Y'
1868: THEN
1869: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_OBSOLETE_COLUMN' );
1870: FND_MESSAGE.SET_TOKEN( 'COLUMN', p_column );
1871: FND_MSG_PUB.ADD;
1872: x_return_status := FND_API.G_RET_STS_ERROR;
1873: END IF;
1874:
2206:
2207: EXCEPTION
2208: WHEN errors_received THEN
2209: error_msg := fnd_flex_descval.encoded_error_message;
2210: FND_MESSAGE.SET_ENCODED(error_msg);
2211: FND_MSG_PUB.Add;
2212: return l_return;
2213: WHEN others THEN
2214: return l_return;
2342:
2343: EXCEPTION
2344: WHEN errors_received THEN
2345: error_msg := fnd_flex_descval.encoded_error_message;
2346: FND_MESSAGE.SET_ENCODED(error_msg);
2347: FND_MSG_PUB.Add;
2348: return l_return;
2349: WHEN others THEN
2350: return l_return;
2683: -- 1. Set the Message Name
2684: -- 2. Set the token(s).
2685: -- 3. get translated message and return it.
2686:
2687: FND_MESSAGE.SET_NAME(app_short_name,message_name);
2688: -- not using the CASE statement to make it backward compatible.
2689: IF token1_name IS NOT NULL THEN
2690: FND_MESSAGE.SET_TOKEN(token1_name,token1_value);
2691: END IF;
2686:
2687: FND_MESSAGE.SET_NAME(app_short_name,message_name);
2688: -- not using the CASE statement to make it backward compatible.
2689: IF token1_name IS NOT NULL THEN
2690: FND_MESSAGE.SET_TOKEN(token1_name,token1_value);
2691: END IF;
2692: IF token2_name IS NOT NULL THEN
2693: FND_MESSAGE.SET_TOKEN(token2_name,token2_value);
2694: END IF;
2689: IF token1_name IS NOT NULL THEN
2690: FND_MESSAGE.SET_TOKEN(token1_name,token1_value);
2691: END IF;
2692: IF token2_name IS NOT NULL THEN
2693: FND_MESSAGE.SET_TOKEN(token2_name,token2_value);
2694: END IF;
2695: IF token3_name IS NOT NULL THEN
2696: FND_MESSAGE.SET_TOKEN(token3_name,token3_value);
2697: END IF;
2692: IF token2_name IS NOT NULL THEN
2693: FND_MESSAGE.SET_TOKEN(token2_name,token2_value);
2694: END IF;
2695: IF token3_name IS NOT NULL THEN
2696: FND_MESSAGE.SET_TOKEN(token3_name,token3_value);
2697: END IF;
2698: IF token4_name IS NOT NULL THEN
2699: FND_MESSAGE.SET_TOKEN(token4_name,token4_value);
2700: END IF;
2695: IF token3_name IS NOT NULL THEN
2696: FND_MESSAGE.SET_TOKEN(token3_name,token3_value);
2697: END IF;
2698: IF token4_name IS NOT NULL THEN
2699: FND_MESSAGE.SET_TOKEN(token4_name,token4_value);
2700: END IF;
2701: IF token5_name IS NOT NULL THEN
2702: FND_MESSAGE.SET_TOKEN(token5_name,token5_value);
2703: END IF;
2698: IF token4_name IS NOT NULL THEN
2699: FND_MESSAGE.SET_TOKEN(token4_name,token4_value);
2700: END IF;
2701: IF token5_name IS NOT NULL THEN
2702: FND_MESSAGE.SET_TOKEN(token5_name,token5_value);
2703: END IF;
2704:
2705: return FND_MESSAGE.get;
2706:
2701: IF token5_name IS NOT NULL THEN
2702: FND_MESSAGE.SET_TOKEN(token5_name,token5_value);
2703: END IF;
2704:
2705: return FND_MESSAGE.get;
2706:
2707: EXCEPTION
2708: WHEN NO_DATA_FOUND THEN
2709: return 'NO MESSAGE FOUND';