50: --
51: -- HISTORY
52: --
53: -- ========================================================
54: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
55: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
56: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
57:
58: PROCEDURE Insert_Row(
51: -- HISTORY
52: --
53: -- ========================================================
54: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
55: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
56: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
57:
58: PROCEDURE Insert_Row(
59: px_program_id IN OUT NOCOPY NUMBER
52: --
53: -- ========================================================
54: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
55: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
56: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
57:
58: PROCEDURE Insert_Row(
59: px_program_id IN OUT NOCOPY NUMBER
60: ,p_PROGRAM_TYPE_ID NUMBER
417: WHERE PROGRAM_ID = p_program_id
418: AND object_version_number = p_object_version_number;
419:
420: IF (SQL%NOTFOUND) THEN
421: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
422: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
423: FND_MSG_PUB.add;
424: END IF;
425: RAISE FND_API.g_exc_error;
419:
420: IF (SQL%NOTFOUND) THEN
421: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
422: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
423: FND_MSG_PUB.add;
424: END IF;
425: RAISE FND_API.g_exc_error;
426: END IF;
427:
439: WHERE PROGRAM_ID = p_program_id
440: AND USERENV('LANG') IN (language, source_lang);
441:
442: IF (SQL%NOTFOUND) THEN
443: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
444: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
445: FND_MSG_PUB.add;
446: END IF;
447: RAISE FND_API.g_exc_error;
441:
442: IF (SQL%NOTFOUND) THEN
443: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
444: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
445: FND_MSG_PUB.add;
446: END IF;
447: RAISE FND_API.g_exc_error;
448: END IF;
449:
485: WHERE PROGRAM_ID = p_program_id
486: AND object_version_number = p_object_version_number;
487:
488: IF (SQL%NOTFOUND) THEN
489: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
490: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
491: FND_MSG_PUB.add;
492: END IF;
493: RAISE FND_API.g_exc_error;
487:
488: IF (SQL%NOTFOUND) THEN
489: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
490: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
491: FND_MSG_PUB.add;
492: END IF;
493: RAISE FND_API.g_exc_error;
494: END IF;
495:
504: WHERE PROGRAM_ID = p_program_id
505: AND USERENV('LANG') IN (language, source_lang);
506:
507: IF (SQL%NOTFOUND) THEN
508: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
509: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
510: FND_MSG_PUB.add;
511: END IF;
512: RAISE FND_API.g_exc_error;
506:
507: IF (SQL%NOTFOUND) THEN
508: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
509: FND_MESSAGE.set_name('PV', 'PV_RECORD_NOT_FOUND');
510: FND_MSG_PUB.add;
511: END IF;
512: RAISE FND_API.g_exc_error;
513: END IF;
514: