DBA Data[Home] [Help]

APPS.AHL_APPR_DEPT_SHIFTS_PUB dependencies on FND_LOG

Line 217: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

213: l_counter NUMBER:=0;
214: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
215: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.TRANSLATE_VALUE_ID';
216: BEGIN
217: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
218: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');
219: END IF;
220: x_return_status:=FND_API.G_RET_STS_SUCCESS;
221: IF p_x_appr_deptshift_rec.ORGANIZATION_NAME IS NULL OR p_x_appr_deptshift_rec.ORGANIZATION_NAME=FND_API.G_MISS_CHAR

Line 218: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');

214: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
215: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.TRANSLATE_VALUE_ID';
216: BEGIN
217: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
218: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');
219: END IF;
220: x_return_status:=FND_API.G_RET_STS_SUCCESS;
221: IF p_x_appr_deptshift_rec.ORGANIZATION_NAME IS NULL OR p_x_appr_deptshift_rec.ORGANIZATION_NAME=FND_API.G_MISS_CHAR
222: THEN

Line 340: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

336: CLOSE get_bom_workdays;
337: END IF;
338:
339: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
340: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
341: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_x_appr_deptshift_rec.ORGANIZATION_ID = ' || p_x_appr_deptshift_rec.ORGANIZATION_ID ||
342: ', p_x_appr_deptshift_rec.SUBINVENTORY = ' || p_x_appr_deptshift_rec.SUBINVENTORY ||
343: ', p_x_appr_deptshift_rec.INV_LOCATOR_ID = ' || p_x_appr_deptshift_rec.INV_LOCATOR_ID ||
344: ', p_x_appr_deptshift_rec.LOCATOR_SEGMENTS = ' || p_x_appr_deptshift_rec.LOCATOR_SEGMENTS);

Line 341: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_x_appr_deptshift_rec.ORGANIZATION_ID = ' || p_x_appr_deptshift_rec.ORGANIZATION_ID ||

337: END IF;
338:
339: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
340: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
341: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_x_appr_deptshift_rec.ORGANIZATION_ID = ' || p_x_appr_deptshift_rec.ORGANIZATION_ID ||
342: ', p_x_appr_deptshift_rec.SUBINVENTORY = ' || p_x_appr_deptshift_rec.SUBINVENTORY ||
343: ', p_x_appr_deptshift_rec.INV_LOCATOR_ID = ' || p_x_appr_deptshift_rec.INV_LOCATOR_ID ||
344: ', p_x_appr_deptshift_rec.LOCATOR_SEGMENTS = ' || p_x_appr_deptshift_rec.LOCATOR_SEGMENTS);
345: END IF;

Line 370: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

366: p_x_appr_deptshift_rec.INV_LOCATOR_ID := 0;
367: END IF;
368: CLOSE get_inv_loc_id;
369: END IF;
370: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
371: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_x_appr_deptshift_rec.INV_LOCATOR_ID = ' || p_x_appr_deptshift_rec.INV_LOCATOR_ID);
372: END IF;
373:
374: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 371: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_x_appr_deptshift_rec.INV_LOCATOR_ID = ' || p_x_appr_deptshift_rec.INV_LOCATOR_ID);

367: END IF;
368: CLOSE get_inv_loc_id;
369: END IF;
370: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
371: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_x_appr_deptshift_rec.INV_LOCATOR_ID = ' || p_x_appr_deptshift_rec.INV_LOCATOR_ID);
372: END IF;
373:
374: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
375: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 374: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

370: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
371: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_x_appr_deptshift_rec.INV_LOCATOR_ID = ' || p_x_appr_deptshift_rec.INV_LOCATOR_ID);
372: END IF;
373:
374: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
375: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
376: END IF;
377: -- End Changes by rbhavsar on Nov 27, 2007 for ER 5854712
378:

Line 375: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

371: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_x_appr_deptshift_rec.INV_LOCATOR_ID = ' || p_x_appr_deptshift_rec.INV_LOCATOR_ID);
372: END IF;
373:
374: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
375: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
376: END IF;
377: -- End Changes by rbhavsar on Nov 27, 2007 for ER 5854712
378:
379: EXCEPTION

Line 439: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

435: l_status_id NUMBER;
436: -- End Changes by rbhavsar on Nov 27, 2007 for ER 5854712
437:
438: BEGIN
439: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
440: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');
441: END IF;
442: x_return_status:=FND_API.G_RET_STS_SUCCESS;
443:

Line 440: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');

436: -- End Changes by rbhavsar on Nov 27, 2007 for ER 5854712
437:
438: BEGIN
439: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
440: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');
441: END IF;
442: x_return_status:=FND_API.G_RET_STS_SUCCESS;
443:
444: IF p_appr_deptshift_rec.DML_OPERATION='C' or p_appr_deptshift_rec.DML_OPERATION='U' THEN

Line 445: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

441: END IF;
442: x_return_status:=FND_API.G_RET_STS_SUCCESS;
443:
444: IF p_appr_deptshift_rec.DML_OPERATION='C' or p_appr_deptshift_rec.DML_OPERATION='U' THEN
445: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
446: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
447: 'ORGANIZATION_NAME = ' || p_appr_deptshift_rec.ORGANIZATION_NAME ||
448: ', DEPT_DESCRIPTION = ' || p_appr_deptshift_rec.DEPT_DESCRIPTION ||
449: ', CALENDAR_DESCRIPTION = ' || p_appr_deptshift_rec.CALENDAR_DESCRIPTION ||

Line 446: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

442: x_return_status:=FND_API.G_RET_STS_SUCCESS;
443:
444: IF p_appr_deptshift_rec.DML_OPERATION='C' or p_appr_deptshift_rec.DML_OPERATION='U' THEN
445: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
446: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
447: 'ORGANIZATION_NAME = ' || p_appr_deptshift_rec.ORGANIZATION_NAME ||
448: ', DEPT_DESCRIPTION = ' || p_appr_deptshift_rec.DEPT_DESCRIPTION ||
449: ', CALENDAR_DESCRIPTION = ' || p_appr_deptshift_rec.CALENDAR_DESCRIPTION ||
450: ', SHIFT_NUM = ' || p_appr_deptshift_rec.SHIFT_NUM ||

Line 488: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

484: END IF;
485:
486: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
487: IF p_appr_deptshift_rec.DML_OPERATION='C' or p_appr_deptshift_rec.DML_OPERATION='U' THEN
488: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
489: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_appr_deptshift_rec.ORGANIZATION_ID = ' || p_appr_deptshift_rec.ORGANIZATION_ID ||
490: ',p_appr_deptshift_rec.SUBINVENTORY = ' || p_appr_deptshift_rec.SUBINVENTORY ||
491: ',p_appr_deptshift_rec.INV_LOCATOR_ID = ' || p_appr_deptshift_rec.INV_LOCATOR_ID ||
492: ',p_appr_deptshift_rec.LOCATOR_SEGMENTS = ' || p_appr_deptshift_rec.LOCATOR_SEGMENTS);

Line 489: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_appr_deptshift_rec.ORGANIZATION_ID = ' || p_appr_deptshift_rec.ORGANIZATION_ID ||

485:
486: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
487: IF p_appr_deptshift_rec.DML_OPERATION='C' or p_appr_deptshift_rec.DML_OPERATION='U' THEN
488: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
489: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_appr_deptshift_rec.ORGANIZATION_ID = ' || p_appr_deptshift_rec.ORGANIZATION_ID ||
490: ',p_appr_deptshift_rec.SUBINVENTORY = ' || p_appr_deptshift_rec.SUBINVENTORY ||
491: ',p_appr_deptshift_rec.INV_LOCATOR_ID = ' || p_appr_deptshift_rec.INV_LOCATOR_ID ||
492: ',p_appr_deptshift_rec.LOCATOR_SEGMENTS = ' || p_appr_deptshift_rec.LOCATOR_SEGMENTS);
493: END IF;

Line 539: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

535: CLOSE validate_inv_loc_id;
536: END IF;
537: END IF; -- DML_OPERATION='C'
538:
539: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
540: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
541: END IF;
542: -- End Changes by rbhavsar on Nov 27, 2007 for ER 5854712
543:

Line 540: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

536: END IF;
537: END IF; -- DML_OPERATION='C'
538:
539: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
540: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
541: END IF;
542: -- End Changes by rbhavsar on Nov 27, 2007 for ER 5854712
543:
544: EXCEPTION

Line 599: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

595: l_check_flag VARCHAR2(1):='Y';
596: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
597: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.CREATE_APPR_DEPT_SHIFTS';
598: BEGIN
599: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
600: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');
601: END IF;
602:
603: SAVEPOINT CREATE_APPR_DEPT_SHIFTS;

Line 600: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');

596: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
597: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.CREATE_APPR_DEPT_SHIFTS';
598: BEGIN
599: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
600: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');
601: END IF;
602:
603: SAVEPOINT CREATE_APPR_DEPT_SHIFTS;
604:

Line 631: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

627: l_appr_deptshift_rec.INV_LOCATOR_ID := NULL;
628: END IF;
629:
630: -- Debug info.
631: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
632: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to call TRANSLATE_VALUE_ID');
633: END IF;
634:
635: TRANSLATE_VALUE_ID

Line 632: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to call TRANSLATE_VALUE_ID');

628: END IF;
629:
630: -- Debug info.
631: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
632: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to call TRANSLATE_VALUE_ID');
633: END IF;
634:
635: TRANSLATE_VALUE_ID
636: (

Line 642: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

638: x_msg_count =>l_msg_count,
639: x_msg_data =>l_msg_data,
640: p_x_appr_deptshift_rec =>l_appr_deptshift_rec
641: );
642: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
643: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from TRANSLATE_VALUE_ID. x_return_status = ' || x_return_status);
644: END IF;
645: l_msg_count := FND_MSG_PUB.count_msg;
646: IF l_msg_count > 0

Line 643: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from TRANSLATE_VALUE_ID. x_return_status = ' || x_return_status);

639: x_msg_data =>l_msg_data,
640: p_x_appr_deptshift_rec =>l_appr_deptshift_rec
641: );
642: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
643: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from TRANSLATE_VALUE_ID. x_return_status = ' || x_return_status);
644: END IF;
645: l_msg_count := FND_MSG_PUB.count_msg;
646: IF l_msg_count > 0
647: THEN

Line 672: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

668: x_msg_count =>l_msg_count,
669: x_msg_data =>l_msg_data,
670: p_appr_deptshift_rec =>l_appr_deptshift_rec);
671: END IF;
672: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
673: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from VALIDATE_APPR_DEPT_SHIFT. x_return_status = ' || x_return_status);
674: END IF;
675:
676: l_msg_count := FND_MSG_PUB.count_msg;

Line 673: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from VALIDATE_APPR_DEPT_SHIFT. x_return_status = ' || x_return_status);

669: x_msg_data =>l_msg_data,
670: p_appr_deptshift_rec =>l_appr_deptshift_rec);
671: END IF;
672: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
673: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from VALIDATE_APPR_DEPT_SHIFT. x_return_status = ' || x_return_status);
674: END IF;
675:
676: l_msg_count := FND_MSG_PUB.count_msg;
677:

Line 686: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

682: RAISE FND_API.G_EXC_ERROR;
683: END IF;
684:
685: -- insert process goes here
686: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
687: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to insert into table.');
688: END IF;
689: IF l_appr_deptshift_rec.DML_OPERATION='C'
690: THEN

Line 687: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to insert into table.');

683: END IF;
684:
685: -- insert process goes here
686: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
687: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to insert into table.');
688: END IF;
689: IF l_appr_deptshift_rec.DML_OPERATION='C'
690: THEN
691: Select AHL_DEPARTMENT_SHIFTS_S.nextval into

Line 776: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)

772: returning l_DEPARTMENT_SHIFTS_ID into p_x_appr_deptshift_rec.AHL_DEPARTMENT_SHIFTS_ID;
773:
774: --p_x_appr_deptshift_rec.AHL_DEPARTMENT_SHIFTS_ID := l_DEPARTMENT_SHIFTS_ID;
775:
776: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
777: THEN
778: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
779: ' AHL_DEPARTMENT_SHIFTS_ID = ' || p_x_appr_deptshift_rec.AHL_DEPARTMENT_SHIFTS_ID ||
780: ' OBJECT_VERSION_NUMBER = ' || p_x_appr_deptshift_rec.OBJECT_VERSION_NUMBER ||

Line 778: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,

774: --p_x_appr_deptshift_rec.AHL_DEPARTMENT_SHIFTS_ID := l_DEPARTMENT_SHIFTS_ID;
775:
776: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)
777: THEN
778: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,
779: ' AHL_DEPARTMENT_SHIFTS_ID = ' || p_x_appr_deptshift_rec.AHL_DEPARTMENT_SHIFTS_ID ||
780: ' OBJECT_VERSION_NUMBER = ' || p_x_appr_deptshift_rec.OBJECT_VERSION_NUMBER ||
781: ' DEPARTMENT_ID = ' || p_x_appr_deptshift_rec.DEPARTMENT_ID ||
782: ' CALENDAR_CODE = ' || p_x_appr_deptshift_rec.CALENDAR_CODE ||

Line 793: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

789:
790: IF FND_API.TO_BOOLEAN(p_commit) THEN
791: COMMIT;
792: END IF;
793: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
794: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
795: END IF;
796:
797: EXCEPTION

Line 794: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

790: IF FND_API.TO_BOOLEAN(p_commit) THEN
791: COMMIT;
792: END IF;
793: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
794: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
795: END IF;
796:
797: EXCEPTION
798: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 856: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

852: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
853: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.DELETE_APPR_DEPT_SHIFTS';
854:
855: BEGIN
856: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
857: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');
858: END IF;
859:
860: SAVEPOINT DELETE_DEPT_SHIFTS;

Line 857: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');

853: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.DELETE_APPR_DEPT_SHIFTS';
854:
855: BEGIN
856: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
857: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');
858: END IF;
859:
860: SAVEPOINT DELETE_DEPT_SHIFTS;
861:

Line 928: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

924:
925: IF FND_API.TO_BOOLEAN(p_commit) THEN
926: COMMIT;
927: END IF;
928: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
929: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
930: END IF;
931:
932: EXCEPTION

Line 929: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

925: IF FND_API.TO_BOOLEAN(p_commit) THEN
926: COMMIT;
927: END IF;
928: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
929: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
930: END IF;
931:
932: EXCEPTION
933: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 990: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

986: l_check_flag VARCHAR2(1):='Y';
987: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
988: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.CREATE_APPR_DEPT_SHIFTS';
989: BEGIN
990: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
991: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');
992: END IF;
993:
994: SAVEPOINT EDIT_APPR_DEPT_SHIFTS;

Line 991: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');

987: -- Added by rbhavsar on Nov 27, 2007 for ER 5854712
988: L_DEBUG_KEY CONSTANT VARCHAR2(150) := G_LOG_PREFIX || '.CREATE_APPR_DEPT_SHIFTS';
989: BEGIN
990: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
991: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure.');
992: END IF;
993:
994: SAVEPOINT EDIT_APPR_DEPT_SHIFTS;
995:

Line 1022: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1018: l_appr_deptshift_rec.INV_LOCATOR_ID := NULL;
1019: END IF;
1020:
1021: -- Debug info.
1022: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1023: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to call TRANSLATE_VALUE_ID');
1024: END IF;
1025:
1026: TRANSLATE_VALUE_ID

Line 1023: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to call TRANSLATE_VALUE_ID');

1019: END IF;
1020:
1021: -- Debug info.
1022: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1023: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to call TRANSLATE_VALUE_ID');
1024: END IF;
1025:
1026: TRANSLATE_VALUE_ID
1027: (

Line 1033: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1029: x_msg_count =>l_msg_count,
1030: x_msg_data =>l_msg_data,
1031: p_x_appr_deptshift_rec =>l_appr_deptshift_rec
1032: );
1033: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1034: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from TRANSLATE_VALUE_ID. x_return_status = ' || x_return_status);
1035: END IF;
1036: l_msg_count := FND_MSG_PUB.count_msg;
1037: IF l_msg_count > 0

Line 1034: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from TRANSLATE_VALUE_ID. x_return_status = ' || x_return_status);

1030: x_msg_data =>l_msg_data,
1031: p_x_appr_deptshift_rec =>l_appr_deptshift_rec
1032: );
1033: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1034: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from TRANSLATE_VALUE_ID. x_return_status = ' || x_return_status);
1035: END IF;
1036: l_msg_count := FND_MSG_PUB.count_msg;
1037: IF l_msg_count > 0
1038: THEN

Line 1063: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1059: x_msg_count =>l_msg_count,
1060: x_msg_data =>l_msg_data,
1061: p_appr_deptshift_rec =>l_appr_deptshift_rec);
1062: END IF;
1063: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1064: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from VALIDATE_APPR_DEPT_SHIFT. x_return_status = ' || x_return_status);
1065: END IF;
1066:
1067: l_msg_count := FND_MSG_PUB.count_msg;

Line 1064: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from VALIDATE_APPR_DEPT_SHIFT. x_return_status = ' || x_return_status);

1060: x_msg_data =>l_msg_data,
1061: p_appr_deptshift_rec =>l_appr_deptshift_rec);
1062: END IF;
1063: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1064: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from VALIDATE_APPR_DEPT_SHIFT. x_return_status = ' || x_return_status);
1065: END IF;
1066:
1067: l_msg_count := FND_MSG_PUB.count_msg;
1068:

Line 1077: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1073: RAISE FND_API.G_EXC_ERROR;
1074: END IF;
1075:
1076: -- insert process goes here
1077: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1078: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to insert into table.');
1079: END IF;
1080: IF l_appr_deptshift_rec.DML_OPERATION = 'U'
1081: THEN

Line 1078: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to insert into table.');

1074: END IF;
1075:
1076: -- insert process goes here
1077: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1078: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to insert into table.');
1079: END IF;
1080: IF l_appr_deptshift_rec.DML_OPERATION = 'U'
1081: THEN
1082: /*Select AHL_DEPARTMENT_SHIFTS_S.nextval into

Line 1139: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1135:
1136: IF FND_API.TO_BOOLEAN(p_commit) THEN
1137: COMMIT;
1138: END IF;
1139: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1140: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
1141: END IF;
1142:
1143: EXCEPTION

Line 1140: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

1136: IF FND_API.TO_BOOLEAN(p_commit) THEN
1137: COMMIT;
1138: END IF;
1139: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1140: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
1141: END IF;
1142:
1143: EXCEPTION
1144: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN