DBA Data[Home] [Help]

APPS.AHL_UMP_UNITMAINT_PVT dependencies on AHL_DEBUG_PUB

Line 7: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;

3:
4:
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AHL_UMP_UnitMaint_PVT';
6:
7: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;
8:
9: TYPE CounterCurTyp is REF CURSOR;
10:
11:

Line 207: AHL_DEBUG_PUB.enable_debug;

203: x_return_status := FND_API.G_RET_STS_SUCCESS;
204:
205: -- Enable Debug.
206: IF G_DEBUG='Y' THEN
207: AHL_DEBUG_PUB.enable_debug;
208: END IF;
209:
210: -- Add debug mesg.
211: IF G_DEBUG='Y' THEN

Line 212: AHL_DEBUG_PUB.debug('Begin private API:' || G_PKG_NAME || '.' || l_api_name);

208: END IF;
209:
210: -- Add debug mesg.
211: IF G_DEBUG='Y' THEN
212: AHL_DEBUG_PUB.debug('Begin private API:' || G_PKG_NAME || '.' || l_api_name);
213: END IF;
214:
215: -- Convert Value to IDs and validate.
216: -- For maintenance requirement.

Line 297: AHL_DEBUG_PUB.disable_debug;

293: p_data => x_msg_data,
294: p_encoded => fnd_api.g_false);
295:
296: -- Disable debug
297: AHL_DEBUG_PUB.disable_debug;
298:
299:
300:
301: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 309: AHL_DEBUG_PUB.disable_debug;

305: p_data => x_msg_data,
306: p_encoded => fnd_api.g_false);
307:
308: -- Disable debug
309: AHL_DEBUG_PUB.disable_debug;
310:
311: WHEN OTHERS THEN
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: Rollback to Process_UnitEffectivity_PVT;

Line 324: AHL_DEBUG_PUB.disable_debug;

320: p_data => x_msg_data,
321: p_encoded => fnd_api.g_false);
322:
323: -- Disable debug
324: AHL_DEBUG_PUB.disable_debug;
325:
326: END Process_UnitEffectivity;
327:
328: --------------------------------------------------------------------------------------------

Line 408: AHL_DEBUG_PUB.enable_debug;

404: x_return_status := FND_API.G_RET_STS_SUCCESS;
405:
406: -- Enable Debug.
407: IF G_DEBUG='Y' THEN
408: AHL_DEBUG_PUB.enable_debug;
409: END IF;
410:
411: -- Add debug mesg.
412: IF G_DEBUG='Y' THEN

Line 413: AHL_DEBUG_PUB.debug('Begin private API:' || G_PKG_NAME || '.' || l_api_name);

409: END IF;
410:
411: -- Add debug mesg.
412: IF G_DEBUG='Y' THEN
413: AHL_DEBUG_PUB.debug('Begin private API:' || G_PKG_NAME || '.' || l_api_name);
414: END IF;
415:
416: -- Convert Value to IDs and validate.
417: -- For maintenance requirement.

Line 534: AHL_DEBUG_PUB.disable_debug;

530: fnd_file.put_line(fnd_file.log, 'Building Unit Effectivity failed. Refer to the error message below.');
531: log_error_messages;
532: END IF;
533: -- Disable debug
534: AHL_DEBUG_PUB.disable_debug;
535:
536:
537:
538: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 549: AHL_DEBUG_PUB.disable_debug;

545: fnd_file.put_line(fnd_file.log, 'Building Unit Effectivity failed. Refer to the error message below.');
546: log_error_messages;
547: END IF;
548: -- Disable debug
549: AHL_DEBUG_PUB.disable_debug;
550:
551: WHEN OTHERS THEN
552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
553: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 568: AHL_DEBUG_PUB.disable_debug;

564: log_error_messages;
565: END IF;
566:
567: -- Disable debug
568: AHL_DEBUG_PUB.disable_debug;
569:
570: END Build_UnitEffectivity;
571:
572: -----------------------------

Line 601: AHL_DEBUG_PUB.enable_debug;

597: FND_MSG_PUB.Initialize;
598: retcode := 0;
599: -- Enable Debug.
600: IF G_DEBUG='Y' THEN
601: AHL_DEBUG_PUB.enable_debug;
602: END IF;
603:
604:
605: fnd_file.put_line(fnd_file.log, 'Start building Simlation Unit Effectivity for Simlation Plan ID = ' ||p_simulation_plan_id);

Line 609: AHL_DEBUG_PUB.debug('Begin private API:' || G_PKG_NAME || '.' || l_api_name);

605: fnd_file.put_line(fnd_file.log, 'Start building Simlation Unit Effectivity for Simlation Plan ID = ' ||p_simulation_plan_id);
606:
607: -- Add debug mesg.
608: IF G_DEBUG='Y' THEN
609: AHL_DEBUG_PUB.debug('Begin private API:' || G_PKG_NAME || '.' || l_api_name);
610: END IF;
611:
612: IF(p_simulation_plan_id IS NULL) THEN
613: FND_MESSAGE.Set_Name('AHL','AHL_UMP_BUE_SIMID_NOTFOUND');

Line 658: AHL_DEBUG_PUB.disable_debug;

654: fnd_file.put_line(fnd_file.log, 'Building Simlation Unit Effectivity failed. Refer to the error message below.');
655: log_error_messages;
656:
657: -- Disable debug
658: AHL_DEBUG_PUB.disable_debug;
659:
660:
661:
662: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 672: AHL_DEBUG_PUB.disable_debug;

668: fnd_file.put_line(fnd_file.log, 'Building Simlation Unit Effectivity failed. Refer to the error message below.');
669: log_error_messages;
670:
671: -- Disable debug
672: AHL_DEBUG_PUB.disable_debug;
673:
674: WHEN OTHERS THEN
675: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
676: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

Line 690: AHL_DEBUG_PUB.disable_debug;

686: log_error_messages;
687:
688:
689: -- Disable debug
690: AHL_DEBUG_PUB.disable_debug;
691:
692: END Build_SimulationPlan_UE;
693:
694: ----------------------------

Line 749: AHL_DEBUG_PUB.enable_debug;

745: -- Begin Processing
746:
747: -- Enable Debug (optional)
748: IF G_DEBUG='Y' THEN
749: AHL_DEBUG_PUB.enable_debug;
750: END IF;
751:
752: -- Check if the user is authorized: is in role AHL_UMP_MR_INITIALIZE
753: -- This functionality is not available now. So allow always

Line 776: AHL_DEBUG_PUB.debug('Beginning Processing... ', 'UMP');

772: -- No special default settings required in this API
773: null;
774: END IF;
775: IF G_DEBUG='Y' THEN
776: AHL_DEBUG_PUB.debug('Beginning Processing... ', 'UMP');
777: END IF;
778: -- Start processing
779: FOR i IN p_unit_Effectivity_tbl.FIRST..p_unit_Effectivity_tbl.LAST LOOP
780: -- Initialize Return Status for this Unit Effectivity to SUCCESS

Line 787: AHL_DEBUG_PUB.debug('Resolved Values to Id for Effectivity', 'UMP');

783:
784: -- Resolve Values to Ids
785: convert_effectivity_val_to_id(l_unit_Effectivity_rec, l_temp_return_status);
786: IF G_DEBUG='Y' THEN
787: AHL_DEBUG_PUB.debug('Resolved Values to Id for Effectivity', 'UMP');
788: END IF;
789: -- Ignore errors from the resolution process
790: l_temp_return_status := FND_API.G_RET_STS_SUCCESS;
791:

Line 795: AHL_DEBUG_PUB.debug('Validated Effectivity, Status = ' || l_temp_return_status, 'UMP');

791:
792: -- Validate the current unit effectivity record
793: Validate_Effectivity(l_unit_Effectivity_rec, l_MR_Initialization_flag, l_temp_return_status);
794: IF G_DEBUG='Y' THEN
795: AHL_DEBUG_PUB.debug('Validated Effectivity, Status = ' || l_temp_return_status, 'UMP');
796:
797: END IF;
798: -- Continue processing this effectivity only if there are no errors
799: IF G_DEBUG='Y' THEN

Line 800: AHL_DEBUG_PUB.debug('About to process thresholds', 'UMP');

796:
797: END IF;
798: -- Continue processing this effectivity only if there are no errors
799: IF G_DEBUG='Y' THEN
800: AHL_DEBUG_PUB.debug('About to process thresholds', 'UMP');
801: AHL_DEBUG_PUB.debug('Count threshold:' || p_x_unit_threshold_tbl.count, 'UMP');
802: END IF;
803: IF l_temp_return_status = FND_API.G_RET_STS_SUCCESS THEN
804: -- Get all the thresholds for the current effectivity

Line 801: AHL_DEBUG_PUB.debug('Count threshold:' || p_x_unit_threshold_tbl.count, 'UMP');

797: END IF;
798: -- Continue processing this effectivity only if there are no errors
799: IF G_DEBUG='Y' THEN
800: AHL_DEBUG_PUB.debug('About to process thresholds', 'UMP');
801: AHL_DEBUG_PUB.debug('Count threshold:' || p_x_unit_threshold_tbl.count, 'UMP');
802: END IF;
803: IF l_temp_return_status = FND_API.G_RET_STS_SUCCESS THEN
804: -- Get all the thresholds for the current effectivity
805: IF (p_x_unit_threshold_tbl.COUNT > 0) THEN

Line 815: AHL_DEBUG_PUB.DEBUG('Validated Threshold', 'UMP');

811: END IF;
812: END LOOP; /* thresholds-table */
813: Validate_Thresholds(l_unit_threshold_tbl, l_temp_return_status);
814: IF G_DEBUG='Y' THEN
815: AHL_DEBUG_PUB.DEBUG('Validated Threshold', 'UMP');
816: END IF;
817: END IF;
818:
819: IF G_DEBUG='Y' THEN

Line 820: AHL_DEBUG_PUB.debug('About to process accomplishments', 'UMP');

816: END IF;
817: END IF;
818:
819: IF G_DEBUG='Y' THEN
820: AHL_DEBUG_PUB.debug('About to process accomplishments', 'UMP');
821: AHL_DEBUG_PUB.debug('Count accomplishments Tbl:' || p_x_unit_accomplish_tbl.count, 'UMP');
822: END IF;
823: -- Get all the accomplishments for the current effectivity
824: IF (p_x_unit_accomplish_tbl.COUNT > 0) THEN

Line 821: AHL_DEBUG_PUB.debug('Count accomplishments Tbl:' || p_x_unit_accomplish_tbl.count, 'UMP');

817: END IF;
818:
819: IF G_DEBUG='Y' THEN
820: AHL_DEBUG_PUB.debug('About to process accomplishments', 'UMP');
821: AHL_DEBUG_PUB.debug('Count accomplishments Tbl:' || p_x_unit_accomplish_tbl.count, 'UMP');
822: END IF;
823: -- Get all the accomplishments for the current effectivity
824: IF (p_x_unit_accomplish_tbl.COUNT > 0) THEN
825: l_counter_index := 0;

Line 835: AHL_DEBUG_PUB.debug('Validated Accomplishment', 'UMP');

831: END LOOP; /* accomplishments-table */
832: Validate_Accomplishments(l_unit_accomplish_tbl, l_unit_Effectivity_rec.ACCOMPLISHED_DATE,
833: l_unit_Effectivity_rec.STATUS_CODE, l_temp_return_status);
834: IF G_DEBUG='Y' THEN
835: AHL_DEBUG_PUB.debug('Validated Accomplishment', 'UMP');
836: END IF;
837: END IF;
838:
839: -- Proceed to updating the database only if there are no errors

Line 843: AHL_DEBUG_PUB.debug('About to update thresholds', 'UMP');

839: -- Proceed to updating the database only if there are no errors
840: IF l_temp_return_status = FND_API.G_RET_STS_SUCCESS THEN
841:
842: IF G_DEBUG='Y' THEN
843: AHL_DEBUG_PUB.debug('About to update thresholds', 'UMP');
844: END IF;
845: -- First Update the Unit Thresholds Table
846: Update_Thresholds(l_unit_Effectivity_rec,
847: l_unit_threshold_tbl);

Line 849: AHL_DEBUG_PUB.debug('About to restore thresholds', 'UMP');

845: -- First Update the Unit Thresholds Table
846: Update_Thresholds(l_unit_Effectivity_rec,
847: l_unit_threshold_tbl);
848: IF G_DEBUG='Y' THEN
849: AHL_DEBUG_PUB.debug('About to restore thresholds', 'UMP');
850: END IF;
851: -- Restore the saved thresholds in the IN OUT parameter
852: Restore_Thresholds(p_x_unit_threshold_tbl, l_unit_threshold_tbl);
853:

Line 855: AHL_DEBUG_PUB.debug('About to update accomplishments', 'UMP');

851: -- Restore the saved thresholds in the IN OUT parameter
852: Restore_Thresholds(p_x_unit_threshold_tbl, l_unit_threshold_tbl);
853:
854: IF G_DEBUG='Y' THEN
855: AHL_DEBUG_PUB.debug('About to update accomplishments', 'UMP');
856: END IF;
857: -- Next Update the Unit Accomplishments Table
858: Update_Accomplishments(l_unit_accomplish_tbl, l_unit_Effectivity_rec);
859: IF G_DEBUG='Y' THEN

Line 860: AHL_DEBUG_PUB.debug('About to restore accomplishments', 'UMP');

856: END IF;
857: -- Next Update the Unit Accomplishments Table
858: Update_Accomplishments(l_unit_accomplish_tbl, l_unit_Effectivity_rec);
859: IF G_DEBUG='Y' THEN
860: AHL_DEBUG_PUB.debug('About to restore accomplishments', 'UMP');
861: END IF;
862: -- Restore the saved accomplishments in the IN OUT parameter
863: Restore_Accomplishments(p_x_unit_accomplish_tbl, l_unit_accomplish_tbl);
864:

Line 866: AHL_DEBUG_PUB.debug('About to update unit effectivity', 'UMP');

862: -- Restore the saved accomplishments in the IN OUT parameter
863: Restore_Accomplishments(p_x_unit_accomplish_tbl, l_unit_accomplish_tbl);
864:
865: IF G_DEBUG='Y' THEN
866: AHL_DEBUG_PUB.debug('About to update unit effectivity', 'UMP');
867: END IF;
868: -- Finally update the Unit Effectivities Table
869: Update_Unit_Effectivity(l_unit_Effectivity_rec);
870: IF G_DEBUG='Y' THEN

Line 871: AHL_DEBUG_PUB.debug('Updated unit effectivity', 'UMP');

867: END IF;
868: -- Finally update the Unit Effectivities Table
869: Update_Unit_Effectivity(l_unit_Effectivity_rec);
870: IF G_DEBUG='Y' THEN
871: AHL_DEBUG_PUB.debug('Updated unit effectivity', 'UMP');
872: END IF;
873: -- SALOGAN added the following for Complex Mx - Begin
874: -- Calling API to calulate due date for SR UE's.
875: AHL_UMP_ProcessUnit_PVT.Calculate_Init_DueDate(

Line 886: AHL_DEBUG_PUB.debug('Errors from AHL_UMP_ProcessUnit_PVT.Calculate_Init_DueDate.'

882: );
883:
884: IF l_msg_count > 0 OR l_temp_return_status <> Fnd_Api.g_ret_sts_success THEN
885: IF G_DEBUG='Y' THEN
886: AHL_DEBUG_PUB.debug('Errors from AHL_UMP_ProcessUnit_PVT.Calculate_Init_DueDate.'
887: , 'Message count: ' ||
888: l_msg_count || ', Message data: ' || l_msg_data);
889: END IF;
890: FND_MSG_PUB.ADD;

Line 905: AHL_DEBUG_PUB.debug('Completed Processing. Checking for errors', 'UMP');

901: END LOOP; /* effectivity-table */
902: END IF;
903:
904: IF G_DEBUG='Y' THEN
905: AHL_DEBUG_PUB.debug('Completed Processing. Checking for errors', 'UMP');
906: END IF;
907: -- Check Error Message stack.
908: x_msg_count := FND_MSG_PUB.count_msg;
909: IF x_msg_count > 0 THEN

Line 926: AHL_DEBUG_PUB.disable_debug;

922: p_encoded => fnd_api.g_false
923: );
924:
925: -- Disable debug (if enabled)
926: AHL_DEBUG_PUB.disable_debug;
927:
928: EXCEPTION
929: WHEN FND_API.G_EXC_ERROR THEN
930: Rollback to Capture_MR_Updates_pvt;

Line 1033: -- AHL_DEBUG_PUB.enable_debug;

1029: l_visit_status VARCHAR2(100);
1030:
1031: BEGIN
1032: --IF G_DEBUG='Y' THEN
1033: -- AHL_DEBUG_PUB.enable_debug;
1034: --END IF;
1035: -- Standard call to check for call compatibility
1036: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
1037: G_PKG_NAME) THEN

Line 1059: --AHL_DEBUG_PUB.debug('Unauthorized User', 'UMP:Validate_For_Initialize');

1055: x_return_status := FND_API.G_RET_STS_ERROR;
1056: FND_MESSAGE.Set_Name('AHL','AHL_UMP_UNAUTHORIZED_USER');
1057: FND_MSG_PUB.ADD;
1058: --IF G_DEBUG='Y' THEN
1059: --AHL_DEBUG_PUB.debug('Unauthorized User', 'UMP:Validate_For_Initialize');
1060: --END IF;
1061: RAISE FND_API.G_EXC_ERROR;
1062: END IF;
1063:

Line 1069: --AHL_DEBUG_PUB.debug('Null Effectivity', 'UMP:Validate_For_Initialize');

1065: x_return_status := FND_API.G_RET_STS_ERROR;
1066: FND_MESSAGE.Set_Name('AHL','AHL_UMP_UE_ID_NULL');
1067: FND_MSG_PUB.ADD;
1068: --IF G_DEBUG='Y' THEN
1069: --AHL_DEBUG_PUB.debug('Null Effectivity', 'UMP:Validate_For_Initialize');
1070: --END IF;
1071: RAISE FND_API.G_EXC_ERROR;
1072: END IF;
1073:

Line 1084: --AHL_DEBUG_PUB.debug('Invalid Effectivity Id', 'UMP:Validate_For_Initialize');

1080: FND_MESSAGE.Set_Token('UEID', p_unit_effectivity_id);
1081: FND_MSG_PUB.ADD;
1082: CLOSE l_ue_details_csr;
1083: --IF G_DEBUG='Y' THEN
1084: --AHL_DEBUG_PUB.debug('Invalid Effectivity Id', 'UMP:Validate_For_Initialize');
1085: --END IF;
1086: RAISE FND_API.G_EXC_ERROR;
1087: ELSE
1088: --Ensure that unit is not locked

Line 1101: --AHL_DEBUG_PUB.debug('Repetitive Effectivity', 'UMP:Validate_For_Initialize');

1097: x_return_status := FND_API.G_RET_STS_ERROR;
1098: FND_MESSAGE.Set_Name('AHL','AHL_UMP_INVALID_MR_TYPE');
1099: FND_MSG_PUB.ADD;
1100: --IF G_DEBUG='Y' THEN
1101: --AHL_DEBUG_PUB.debug('Repetitive Effectivity', 'UMP:Validate_For_Initialize');
1102: --END IF;
1103: CLOSE l_ue_details_csr;
1104: RAISE FND_API.G_EXC_ERROR;
1105: ELSE

Line 1118: --AHL_DEBUG_PUB.debug('Child MR', 'UMP:Validate_For_Initialize');

1114: FND_MESSAGE.Set_Name('AHL','AHL_UMP_CHILD_MR');
1115: FND_MSG_PUB.ADD;
1116: CLOSE l_child_mr_csr;
1117: --IF G_DEBUG='Y' THEN
1118: --AHL_DEBUG_PUB.debug('Child MR', 'UMP:Validate_For_Initialize');
1119: --END IF;
1120: RAISE FND_API.G_EXC_ERROR;
1121: ELSE
1122: CLOSE l_child_mr_csr;

Line 1132: --AHL_DEBUG_PUB.debug('Invalid Status: ' || 'l_status_code', 'UMP:Validate_For_Initialize');

1128: FND_MESSAGE.Set_Name('AHL','AHL_UMP_INVALID_STATUS');
1129: FND_MESSAGE.Set_Token('STATUS', l_status_code);
1130: FND_MSG_PUB.ADD;
1131: --IF G_DEBUG='Y' THEN
1132: --AHL_DEBUG_PUB.debug('Invalid Status: ' || 'l_status_code', 'UMP:Validate_For_Initialize');
1133: --END IF;
1134: RAISE FND_API.G_EXC_ERROR;
1135: END IF;
1136:

Line 1150: --AHL_DEBUG_PUB.debug('Already Accomplished', 'UMP:Validate_For_Initialize');

1146: IF (l_temp_status_code <> 'INIT-ACCOMPLISHED' and l_last_accomplish_date IS NOT null) THEN
1147: FND_MESSAGE.Set_Name('AHL','AHL_UMP_ALRDY_ACCMPLSHD');
1148: FND_MSG_PUB.ADD;
1149: --IF G_DEBUG='Y' THEN
1150: --AHL_DEBUG_PUB.debug('Already Accomplished', 'UMP:Validate_For_Initialize');
1151: --END IF;
1152: RAISE FND_API.G_EXC_ERROR;
1153: END IF;
1154: END IF;

Line 1172: --AHL_DEBUG_PUB.debug('Has prior Initializations', 'UMP:Validate_For_Initialize');

1168: FND_MSG_PUB.ADD;
1169: END IF;
1170: CLOSE l_prior_initializations_csr;
1171: --IF G_DEBUG='Y' THEN
1172: --AHL_DEBUG_PUB.debug('Has prior Initializations', 'UMP:Validate_For_Initialize');
1173: --END IF;
1174: RAISE FND_API.G_EXC_ERROR;
1175: ELSE
1176: CLOSE l_prior_initializations_csr;

Line 1621: AHL_DEBUG_PUB.debug('Start of Validate Effectivity:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');

1617: BEGIN
1618: -- DO NOT Initialize API return status to success
1619:
1620: IF G_DEBUG='Y' THEN
1621: AHL_DEBUG_PUB.debug('Start of Validate Effectivity:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
1622: AHL_DEBUG_PUB.debug('Start Validation Set1:' || x_return_status, 'UMP');
1623: END IF;
1624:
1625: -- Check if the unit effectivity id is not null

Line 1622: AHL_DEBUG_PUB.debug('Start Validation Set1:' || x_return_status, 'UMP');

1618: -- DO NOT Initialize API return status to success
1619:
1620: IF G_DEBUG='Y' THEN
1621: AHL_DEBUG_PUB.debug('Start of Validate Effectivity:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
1622: AHL_DEBUG_PUB.debug('Start Validation Set1:' || x_return_status, 'UMP');
1623: END IF;
1624:
1625: -- Check if the unit effectivity id is not null
1626: IF (p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID IS NULL OR p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID = FND_API.G_MISS_NUM) THEN

Line 1765: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.STATUS_CODE:' || p_unit_Effectivity_rec.STATUS_CODE, 'UMP');

1761: -- END IF;
1762: -- END IF;
1763:
1764: IF G_DEBUG='Y' THEN
1765: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.STATUS_CODE:' || p_unit_Effectivity_rec.STATUS_CODE, 'UMP');
1766: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.SET_DUE_DATE:' || p_unit_Effectivity_rec.SET_DUE_DATE, 'UMP');
1767: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.ACCOMPLISHED_DATE:' || p_unit_Effectivity_rec.ACCOMPLISHED_DATE, 'UMP');
1768: END IF;
1769:

Line 1766: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.SET_DUE_DATE:' || p_unit_Effectivity_rec.SET_DUE_DATE, 'UMP');

1762: -- END IF;
1763:
1764: IF G_DEBUG='Y' THEN
1765: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.STATUS_CODE:' || p_unit_Effectivity_rec.STATUS_CODE, 'UMP');
1766: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.SET_DUE_DATE:' || p_unit_Effectivity_rec.SET_DUE_DATE, 'UMP');
1767: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.ACCOMPLISHED_DATE:' || p_unit_Effectivity_rec.ACCOMPLISHED_DATE, 'UMP');
1768: END IF;
1769:
1770: -- Both the dates (due and accomplished) should not be set. Only one should be set.

Line 1767: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.ACCOMPLISHED_DATE:' || p_unit_Effectivity_rec.ACCOMPLISHED_DATE, 'UMP');

1763:
1764: IF G_DEBUG='Y' THEN
1765: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.STATUS_CODE:' || p_unit_Effectivity_rec.STATUS_CODE, 'UMP');
1766: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.SET_DUE_DATE:' || p_unit_Effectivity_rec.SET_DUE_DATE, 'UMP');
1767: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.ACCOMPLISHED_DATE:' || p_unit_Effectivity_rec.ACCOMPLISHED_DATE, 'UMP');
1768: END IF;
1769:
1770: -- Both the dates (due and accomplished) should not be set. Only one should be set.
1771: IF (p_unit_Effectivity_rec.STATUS_CODE IS NOT NULL) THEN

Line 2647: AHL_DEBUG_PUB.debug('In Update_Unit_Effectivity', 'UMP');

2643: FETCH l_get_unit_effectivity_csr INTO l_ue_rec;
2644: CLOSE l_get_unit_effectivity_csr;
2645:
2646: IF G_DEBUG='Y' THEN
2647: AHL_DEBUG_PUB.debug('In Update_Unit_Effectivity', 'UMP');
2648: AHL_DEBUG_PUB.debug('Unit Eff ID:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
2649: AHL_DEBUG_PUB.debug('l_status_code:' || l_status_code, 'UMP');
2650: AHL_DEBUG_PUB.debug('l_ue_rec.status_code:' || l_ue_rec.status_code, 'UMP');
2651:

Line 2648: AHL_DEBUG_PUB.debug('Unit Eff ID:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');

2644: CLOSE l_get_unit_effectivity_csr;
2645:
2646: IF G_DEBUG='Y' THEN
2647: AHL_DEBUG_PUB.debug('In Update_Unit_Effectivity', 'UMP');
2648: AHL_DEBUG_PUB.debug('Unit Eff ID:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
2649: AHL_DEBUG_PUB.debug('l_status_code:' || l_status_code, 'UMP');
2650: AHL_DEBUG_PUB.debug('l_ue_rec.status_code:' || l_ue_rec.status_code, 'UMP');
2651:
2652: END IF;

Line 2649: AHL_DEBUG_PUB.debug('l_status_code:' || l_status_code, 'UMP');

2645:
2646: IF G_DEBUG='Y' THEN
2647: AHL_DEBUG_PUB.debug('In Update_Unit_Effectivity', 'UMP');
2648: AHL_DEBUG_PUB.debug('Unit Eff ID:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
2649: AHL_DEBUG_PUB.debug('l_status_code:' || l_status_code, 'UMP');
2650: AHL_DEBUG_PUB.debug('l_ue_rec.status_code:' || l_ue_rec.status_code, 'UMP');
2651:
2652: END IF;
2653:

Line 2650: AHL_DEBUG_PUB.debug('l_ue_rec.status_code:' || l_ue_rec.status_code, 'UMP');

2646: IF G_DEBUG='Y' THEN
2647: AHL_DEBUG_PUB.debug('In Update_Unit_Effectivity', 'UMP');
2648: AHL_DEBUG_PUB.debug('Unit Eff ID:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
2649: AHL_DEBUG_PUB.debug('l_status_code:' || l_status_code, 'UMP');
2650: AHL_DEBUG_PUB.debug('l_ue_rec.status_code:' || l_ue_rec.status_code, 'UMP');
2651:
2652: END IF;
2653:
2654: -- If there are no accomplishments during initialization, reset status to null

Line 3146: AHL_DEBUG_PUB.debug('Terminating Descendent with ue_id ' || p_descendent_ue_id, 'UMP');

3142: l_ue_rec l_get_unit_effectivity_csr%rowtype;
3143:
3144: BEGIN
3145: IF G_DEBUG='Y' THEN
3146: AHL_DEBUG_PUB.debug('Terminating Descendent with ue_id ' || p_descendent_ue_id, 'UMP');
3147: END IF;
3148: OPEN l_get_unit_effectivity_csr(p_descendent_ue_id);
3149: FETCH l_get_unit_effectivity_csr INTO l_ue_rec;
3150: CLOSE l_get_unit_effectivity_csr;

Line 3977: AHL_DEBUG_PUB.debug('Entering Match_Counters_with_FMP', 'UMP');

3973: AND UA.unit_effectivity_id = p_unit_effectivity_id;
3974:
3975: BEGIN
3976: IF G_DEBUG='Y' THEN
3977: AHL_DEBUG_PUB.debug('Entering Match_Counters_with_FMP', 'UMP');
3978: AHL_DEBUG_PUB.debug('Input CSI:MR:' || p_item_instance_id || ':' || p_mr_header_id, 'UMP');
3979: AHL_DEBUG_PUB.debug('p_unit_effectivity_id:' || p_unit_effectivity_id, 'UMP');
3980: END IF;
3981: -- Initialize API return status to success

Line 3978: AHL_DEBUG_PUB.debug('Input CSI:MR:' || p_item_instance_id || ':' || p_mr_header_id, 'UMP');

3974:
3975: BEGIN
3976: IF G_DEBUG='Y' THEN
3977: AHL_DEBUG_PUB.debug('Entering Match_Counters_with_FMP', 'UMP');
3978: AHL_DEBUG_PUB.debug('Input CSI:MR:' || p_item_instance_id || ':' || p_mr_header_id, 'UMP');
3979: AHL_DEBUG_PUB.debug('p_unit_effectivity_id:' || p_unit_effectivity_id, 'UMP');
3980: END IF;
3981: -- Initialize API return status to success
3982: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3979: AHL_DEBUG_PUB.debug('p_unit_effectivity_id:' || p_unit_effectivity_id, 'UMP');

3975: BEGIN
3976: IF G_DEBUG='Y' THEN
3977: AHL_DEBUG_PUB.debug('Entering Match_Counters_with_FMP', 'UMP');
3978: AHL_DEBUG_PUB.debug('Input CSI:MR:' || p_item_instance_id || ':' || p_mr_header_id, 'UMP');
3979: AHL_DEBUG_PUB.debug('p_unit_effectivity_id:' || p_unit_effectivity_id, 'UMP');
3980: END IF;
3981: -- Initialize API return status to success
3982: x_return_status := FND_API.G_RET_STS_SUCCESS;
3983:

Line 4017: AHL_DEBUG_PUB.debug('Match_Counters_with_FMP: Effectivities list from FMP: ' || l_fmp_eff, 'UMP');

4013: l_fmp_eff := l_fmp_eff || l_effectivities_tbl(i).MR_EFFECTIVITY_ID || ',';
4014: END LOOP;
4015: l_fmp_eff := rtrim(l_fmp_eff, ',') || ')';
4016: IF G_DEBUG='Y' THEN
4017: AHL_DEBUG_PUB.debug('Match_Counters_with_FMP: Effectivities list from FMP: ' || l_fmp_eff, 'UMP');
4018: END IF;
4019: END IF;
4020:
4021: -- Counters for the given MR

Line 4042: AHL_DEBUG_PUB.debug('Match_Counters_with_FMP: Final SQL: ' || l_temp_sql_str, 'UMP');

4038: l_acc_sql := l_acc_sql || ' order by counter_name ';
4039:
4040: l_temp_sql_str := l_fmp_sql || ' INTERSECT ' || l_inst_sql || ' MINUS ' || l_acc_sql;
4041: IF G_DEBUG='Y' THEN
4042: AHL_DEBUG_PUB.debug('Match_Counters_with_FMP: Final SQL: ' || l_temp_sql_str, 'UMP');
4043:
4044: END IF;
4045: OPEN l_counters_csr for l_temp_sql_str USING p_item_instance_id, p_unit_effectivity_id;
4046: l_counters_msg := '';

Line 4059: AHL_DEBUG_PUB.debug('Count of l_effectivities_tbl:' || l_effectivities_tbl.count , 'UMP');

4055: l_counters_msg := rtrim(l_counters_msg, ',');
4056: x_counters := l_counters_msg;*/
4057:
4058: IF G_DEBUG='Y' THEN
4059: AHL_DEBUG_PUB.debug('Count of l_effectivities_tbl:' || l_effectivities_tbl.count , 'UMP');
4060: AHL_DEBUG_PUB.debug('p_unit_effectivity_id:' || p_unit_effectivity_id, 'UMP');
4061: END IF;
4062:
4063: IF (l_effectivities_tbl.COUNT = 0) THEN

Line 4060: AHL_DEBUG_PUB.debug('p_unit_effectivity_id:' || p_unit_effectivity_id, 'UMP');

4056: x_counters := l_counters_msg;*/
4057:
4058: IF G_DEBUG='Y' THEN
4059: AHL_DEBUG_PUB.debug('Count of l_effectivities_tbl:' || l_effectivities_tbl.count , 'UMP');
4060: AHL_DEBUG_PUB.debug('p_unit_effectivity_id:' || p_unit_effectivity_id, 'UMP');
4061: END IF;
4062:
4063: IF (l_effectivities_tbl.COUNT = 0) THEN
4064: RETURN;

Line 4080: AHL_DEBUG_PUB.debug('x_counters:' || x_counters, 'UMP');

4076: l_counters_msg := rtrim(l_counters_msg, ',');
4077: x_counters := l_counters_msg;
4078:
4079: IF G_DEBUG='Y' THEN
4080: AHL_DEBUG_PUB.debug('x_counters:' || x_counters, 'UMP');
4081: AHL_DEBUG_PUB.debug('Exiting Match_Counters_with_FMP', 'UMP');
4082:
4083: END IF;
4084: END Match_Counters_with_FMP;

Line 4081: AHL_DEBUG_PUB.debug('Exiting Match_Counters_with_FMP', 'UMP');

4077: x_counters := l_counters_msg;
4078:
4079: IF G_DEBUG='Y' THEN
4080: AHL_DEBUG_PUB.debug('x_counters:' || x_counters, 'UMP');
4081: AHL_DEBUG_PUB.debug('Exiting Match_Counters_with_FMP', 'UMP');
4082:
4083: END IF;
4084: END Match_Counters_with_FMP;
4085:

Line 4421: AHL_DEBUG_PUB.enable_debug;

4417: SAVEPOINT Terminate_MR_Instances_pvt;
4418:
4419: -- Enable Debug (optional)
4420: IF G_DEBUG='Y' THEN
4421: AHL_DEBUG_PUB.enable_debug;
4422: END IF;
4423:
4424: IF G_DEBUG='Y' THEN
4425: AHL_DEBUG_PUB.debug('Beginning Processing... ', 'UMP-TERMINATE: ');

Line 4425: AHL_DEBUG_PUB.debug('Beginning Processing... ', 'UMP-TERMINATE: ');

4421: AHL_DEBUG_PUB.enable_debug;
4422: END IF;
4423:
4424: IF G_DEBUG='Y' THEN
4425: AHL_DEBUG_PUB.debug('Beginning Processing... ', 'UMP-TERMINATE: ');
4426: END IF;
4427: -- Standard call to check for call compatibility
4428: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
4429: G_PKG_NAME) THEN

Line 4434: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');

4430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4431: END IF;
4432:
4433: IF G_DEBUG='Y' THEN
4434: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');
4435: AHL_DEBUG_PUB.debug('Input Parameters:');
4436: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4437: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4438: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);

Line 4435: AHL_DEBUG_PUB.debug('Input Parameters:');

4431: END IF;
4432:
4433: IF G_DEBUG='Y' THEN
4434: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');
4435: AHL_DEBUG_PUB.debug('Input Parameters:');
4436: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4437: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4438: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4439: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);

Line 4436: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);

4432:
4433: IF G_DEBUG='Y' THEN
4434: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');
4435: AHL_DEBUG_PUB.debug('Input Parameters:');
4436: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4437: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4438: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4439: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4440: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);

Line 4437: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);

4433: IF G_DEBUG='Y' THEN
4434: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');
4435: AHL_DEBUG_PUB.debug('Input Parameters:');
4436: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4437: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4438: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4439: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4440: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4441: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);

Line 4438: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);

4434: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');
4435: AHL_DEBUG_PUB.debug('Input Parameters:');
4436: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4437: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4438: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4439: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4440: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4441: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);
4442: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);

Line 4439: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);

4435: AHL_DEBUG_PUB.debug('Input Parameters:');
4436: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4437: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4438: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4439: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4440: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4441: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);
4442: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);
4443: END IF;

Line 4440: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);

4436: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4437: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4438: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4439: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4440: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4441: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);
4442: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);
4443: END IF;
4444:

Line 4441: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);

4437: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4438: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4439: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4440: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4441: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);
4442: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);
4443: END IF;
4444:
4445: -- Initialize message list if p_init_msg_list is set to TRUE

Line 4442: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);

4438: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4439: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4440: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4441: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);
4442: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);
4443: END IF;
4444:
4445: -- Initialize message list if p_init_msg_list is set to TRUE
4446: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 4522: AHL_DEBUG_PUB.debug('l_effective_to_date = ' || l_effective_to_date);

4518: END IF;
4519: CLOSE l_get_effective_to_date;
4520:
4521: IF G_DEBUG='Y' THEN
4522: AHL_DEBUG_PUB.debug('l_effective_to_date = ' || l_effective_to_date);
4523: END IF;
4524:
4525:
4526: IF (l_new_mr_header_id IS NOT NULL) THEN

Line 4540: AHL_DEBUG_PUB.debug('l_effective_from_date = ' || l_effective_from_date);

4536: CLOSE l_get_effective_from_date;
4537: END IF;
4538:
4539: IF G_DEBUG='Y' THEN
4540: AHL_DEBUG_PUB.debug('l_effective_from_date = ' || l_effective_from_date);
4541: END IF;
4542:
4543: OPEN l_unit_effectivity_csr(l_old_mr_header_id,l_effective_to_date);
4544: LOOP

Line 4548: AHL_DEBUG_PUB.debug('l_ue_rec.unit_effectivity_id = ' || l_ue_rec.UNIT_EFFECTIVITY_ID);

4544: LOOP
4545: FETCH l_unit_effectivity_csr INTO l_ue_rec; --l_ue_id, l_repetitive_flag, l_status_code;
4546:
4547: IF G_DEBUG='Y' THEN
4548: AHL_DEBUG_PUB.debug('l_ue_rec.unit_effectivity_id = ' || l_ue_rec.UNIT_EFFECTIVITY_ID);
4549: AHL_DEBUG_PUB.debug('l_ue_rec.mr_header_id = ' || l_ue_rec.mr_header_id);
4550: AHL_DEBUG_PUB.debug('l_ue_rec.object_version_number = ' || l_ue_rec.object_version_number);
4551: END IF;
4552: EXIT WHEN l_unit_effectivity_csr%NOTFOUND;

Line 4549: AHL_DEBUG_PUB.debug('l_ue_rec.mr_header_id = ' || l_ue_rec.mr_header_id);

4545: FETCH l_unit_effectivity_csr INTO l_ue_rec; --l_ue_id, l_repetitive_flag, l_status_code;
4546:
4547: IF G_DEBUG='Y' THEN
4548: AHL_DEBUG_PUB.debug('l_ue_rec.unit_effectivity_id = ' || l_ue_rec.UNIT_EFFECTIVITY_ID);
4549: AHL_DEBUG_PUB.debug('l_ue_rec.mr_header_id = ' || l_ue_rec.mr_header_id);
4550: AHL_DEBUG_PUB.debug('l_ue_rec.object_version_number = ' || l_ue_rec.object_version_number);
4551: END IF;
4552: EXIT WHEN l_unit_effectivity_csr%NOTFOUND;
4553:

Line 4550: AHL_DEBUG_PUB.debug('l_ue_rec.object_version_number = ' || l_ue_rec.object_version_number);

4546:
4547: IF G_DEBUG='Y' THEN
4548: AHL_DEBUG_PUB.debug('l_ue_rec.unit_effectivity_id = ' || l_ue_rec.UNIT_EFFECTIVITY_ID);
4549: AHL_DEBUG_PUB.debug('l_ue_rec.mr_header_id = ' || l_ue_rec.mr_header_id);
4550: AHL_DEBUG_PUB.debug('l_ue_rec.object_version_number = ' || l_ue_rec.object_version_number);
4551: END IF;
4552: EXIT WHEN l_unit_effectivity_csr%NOTFOUND;
4553:
4554:

Line 4564: AHL_DEBUG_PUB.debug('IN if repetitive_mr_flag = N');

4560: IF (l_ue_rec.REPETITIVE_MR_FLAG = 'N'
4561: OR l_ue_rec.STATUS_CODE = 'INIT-DUE' OR l_ue_rec.defer_from_ue_id IS NOT NULL) THEN
4562:
4563: IF G_DEBUG='Y' THEN
4564: AHL_DEBUG_PUB.debug('IN if repetitive_mr_flag = N');
4565: END IF;
4566: l_ue_rec.STATUS_CODE := 'MR-TERMINATE';
4567: l_ue_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4568: l_ue_rec.ACCOMPLISHED_DATE := SYSDATE;

Line 4571: AHL_DEBUG_PUB.debug('before update record status to MR-TERMINATE');

4567: l_ue_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4568: l_ue_rec.ACCOMPLISHED_DATE := SYSDATE;
4569:
4570: IF G_DEBUG='Y' THEN
4571: AHL_DEBUG_PUB.debug('before update record status to MR-TERMINATE');
4572: END IF;
4573: AHL_UNIT_EFFECTIVITIES_PKG.UPDATE_ROW (
4574: x_unit_effectivity_id => l_ue_rec.UNIT_EFFECTIVITY_ID,
4575: x_csi_item_instance_id => l_ue_rec.CSI_ITEM_INSTANCE_ID,

Line 4633: AHL_DEBUG_PUB.debug('After update record');

4629: X_LAST_UPDATED_BY => fnd_global.user_id,
4630: X_LAST_UPDATE_LOGIN => fnd_global.login_id);
4631:
4632: IF G_DEBUG='Y' THEN
4633: AHL_DEBUG_PUB.debug('After update record');
4634: END IF;
4635:
4636: --update all descendent Unit Effectivities
4637: OPEN l_ue_descendent_csr(l_ue_rec.UNIT_EFFECTIVITY_ID);

Line 4643: AHL_DEBUG_PUB.debug('descedant ue_id' || l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);

4639: FETCH l_ue_descendent_csr INTO l_ue_descendent_rec;
4640: EXIT WHEN l_ue_descendent_csr%NOTFOUND;
4641:
4642: IF G_DEBUG='Y' THEN
4643: AHL_DEBUG_PUB.debug('descedant ue_id' || l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);
4644: END IF;
4645: l_ue_descendent_rec.STATUS_CODE := 'MR-TERMINATE';
4646: l_ue_descendent_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4647: l_ue_descendent_rec.ACCOMPLISHED_DATE := SYSDATE;

Line 4715: AHL_DEBUG_PUB.debug('In repetitive_mr_flag = Y');

4711: ELSIF (l_ue_rec.REPETITIVE_MR_FLAG = 'Y') THEN
4712: IF (nvl(l_visit_status,'X') = 'PLANNING') THEN
4713:
4714: IF G_DEBUG='Y' THEN
4715: AHL_DEBUG_PUB.debug('In repetitive_mr_flag = Y');
4716: END IF;
4717: l_ue_rec.STATUS_CODE := 'EXCEPTION';
4718: l_ue_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4719: l_ue_rec.ACCOMPLISHED_DATE := SYSDATE;

Line 4722: AHL_DEBUG_PUB.debug('Before update record status to EXCEPTION');

4718: l_ue_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4719: l_ue_rec.ACCOMPLISHED_DATE := SYSDATE;
4720:
4721: IF G_DEBUG='Y' THEN
4722: AHL_DEBUG_PUB.debug('Before update record status to EXCEPTION');
4723: END IF;
4724: AHL_UNIT_EFFECTIVITIES_PKG.UPDATE_ROW (
4725: x_unit_effectivity_id => l_ue_rec.UNIT_EFFECTIVITY_ID,
4726: x_csi_item_instance_id => l_ue_rec.CSI_ITEM_INSTANCE_ID,

Line 4785: AHL_DEBUG_PUB.debug('After update record');

4781: x_LAST_UPDATE_LOGIN => fnd_global.login_id); -- l_ue_rec.LAST_UPDATE_LOGIN );
4782:
4783:
4784: IF G_DEBUG='Y' THEN
4785: AHL_DEBUG_PUB.debug('After update record');
4786: END IF;
4787: --update all descendent Unit Effectivities
4788: OPEN l_ue_descendent_csr(l_ue_rec.UNIT_EFFECTIVITY_ID);
4789: LOOP

Line 4797: AHL_DEBUG_PUB.debug('start update status to Exception descedant ue_id' || l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);

4793: --l_ue_descendent_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4794: l_ue_descendent_rec.ACCOMPLISHED_DATE := SYSDATE;
4795:
4796: IF G_DEBUG='Y' THEN
4797: AHL_DEBUG_PUB.debug('start update status to Exception descedant ue_id' || l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);
4798: END IF;
4799: AHL_UNIT_EFFECTIVITIES_PKG.UPDATE_ROW (
4800: x_unit_effectivity_id => l_ue_descendent_rec.UNIT_EFFECTIVITY_ID,
4801: x_csi_item_instance_id => l_ue_descendent_rec.CSI_ITEM_INSTANCE_ID,

Line 4870: AHL_DEBUG_PUB.debug('start delete descedant ue_id' ||l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);

4866: FETCH l_ue_descendent_csr INTO l_ue_descendent_rec;
4867: EXIT WHEN l_ue_descendent_csr%NOTFOUND;
4868:
4869: IF G_DEBUG='Y' THEN
4870: AHL_DEBUG_PUB.debug('start delete descedant ue_id' ||l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);
4871: END IF;
4872: AHL_UNIT_EFFECTIVITIES_PKG.Delete_Row(l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);
4873: END LOOP;
4874: CLOSE l_ue_descendent_csr;

Line 4884: AHL_DEBUG_PUB.debug('Start of Processing SRs');

4880:
4881: CLOSE l_unit_effectivity_csr;
4882:
4883: IF G_DEBUG='Y' THEN
4884: AHL_DEBUG_PUB.debug('Start of Processing SRs');
4885: END IF;
4886:
4887: -- Process for SRs.
4888: -- SATRAJEN :: Changed for USAF Backporting :: Feb 2012

Line 4896: AHL_DEBUG_PUB.debug('Found ue:' || ahl_sr_ue_rec.RELATED_UE_ID);

4892: -- OPEN ahl_sr_ue_valid_csr(l_old_mr_header_id, ahl_sr_ue_rec.RELATED_UE_ID);
4893: -- FETCH ahl_sr_ue_valid_csr INTO l_junk;
4894: -- IF(ahl_sr_ue_valid_csr%FOUND)THEN
4895: IF G_DEBUG='Y' THEN
4896: AHL_DEBUG_PUB.debug('Found ue:' || ahl_sr_ue_rec.RELATED_UE_ID);
4897: END IF;
4898:
4899: l_visit_status := AHL_UMP_UTIL_PKG.get_Visit_Status ( ahl_sr_ue_rec.RELATED_UE_ID);
4900:

Line 4906: AHL_DEBUG_PUB.debug('Processing ue:' || ahl_sr_ue_rec.RELATED_UE_ID || ' for termination');

4902: -- if visit is already on the floor, we do nothing.
4903: IF (nvl(l_visit_status,'X') NOT IN ('RELEASED','CLOSED')) THEN
4904:
4905: IF G_DEBUG='Y' THEN
4906: AHL_DEBUG_PUB.debug('Processing ue:' || ahl_sr_ue_rec.RELATED_UE_ID || ' for termination');
4907: END IF;
4908:
4909: MR_Terminate (ahl_sr_ue_rec.RELATED_UE_ID);
4910:

Line 5072: AHL_DEBUG_PUB.debug('Committed Changes', 'UMP');

5068: -- Standard check of p_commit
5069: IF FND_API.TO_BOOLEAN(p_commit) THEN
5070: COMMIT WORK;
5071: IF G_DEBUG='Y' THEN
5072: AHL_DEBUG_PUB.debug('Committed Changes', 'UMP');
5073: END IF;
5074: END IF;
5075:
5076: /* commented call from here as BUE api commits. Launching concurrent program instead.

Line 5106: AHL_DEBUG_PUB.debug('Tried to submit concurrent request but failed');

5102: l_req_id := fnd_request.submit_request('AHL','AHLWUEFF',NULL,NULL,FALSE, l_old_mr_header_id,
5103: l_new_mr_header_id);
5104: IF (l_req_id = 0 OR l_req_id IS NULL) THEN
5105: IF G_debug = 'Y' THEN
5106: AHL_DEBUG_PUB.debug('Tried to submit concurrent request but failed');
5107: END IF;
5108: END IF;
5109: */
5110:

Line 5128: AHL_DEBUG_PUB.disable_debug;

5124: p_data => x_msg_data,
5125: p_encoded => fnd_api.g_false);
5126:
5127: -- Disable debug
5128: AHL_DEBUG_PUB.disable_debug;
5129:
5130: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5132: Rollback to Terminate_MR_Instances_pvt;

Line 5138: AHL_DEBUG_PUB.disable_debug;

5134: p_data => x_msg_data,
5135: p_encoded => fnd_api.g_false);
5136:
5137: -- Disable debug
5138: AHL_DEBUG_PUB.disable_debug;
5139:
5140: WHEN OTHERS THEN
5141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5142: Rollback to Terminate_MR_Instances_pvt;

Line 5159: AHL_DEBUG_PUB.disable_debug;

5155: p_encoded => fnd_api.g_false);
5156:
5157:
5158: -- Disable debug
5159: AHL_DEBUG_PUB.disable_debug;
5160:
5161: END TERMINATE_MR_INSTANCES;
5162:
5163:

Line 5632: AHL_DEBUG_PUB.debug('MR-Terminating UE record with ue_id ' || p_unit_effectivity_id, 'UMP');

5628: l_ue_rec get_unit_effectivity_csr%rowtype;
5629:
5630: BEGIN
5631: IF G_DEBUG='Y' THEN
5632: AHL_DEBUG_PUB.debug('MR-Terminating UE record with ue_id ' || p_unit_effectivity_id, 'UMP');
5633: END IF;
5634:
5635: OPEN get_unit_effectivity_csr(p_unit_effectivity_id);
5636: FETCH get_unit_effectivity_csr INTO l_ue_rec;

Line 6032: AHL_DEBUG_PUB.Debug('Start log error messages');

6028:
6029: BEGIN
6030:
6031: IF G_DEBUG = 'Y' THEN
6032: AHL_DEBUG_PUB.Debug('Start log error messages');
6033: END IF;
6034:
6035: -- Standard call to get message count.
6036: l_msg_count := FND_MSG_PUB.Count_Msg;

Line 6047: AHL_DEBUG_PUB.Debug('Err message-'||l_msg_index_out||':' || substr(l_msg_data,1,240));

6043: p_msg_index_out => l_msg_index_out );
6044:
6045: fnd_file.put_line(FND_FILE.LOG, 'Err message-'||l_msg_index_out||':' || l_msg_data);
6046: IF G_DEBUG = 'Y' THEN
6047: AHL_DEBUG_PUB.Debug('Err message-'||l_msg_index_out||':' || substr(l_msg_data,1,240));
6048: END IF;
6049:
6050: END LOOP;
6051:

Line 6053: AHL_DEBUG_PUB.Debug('Start log error messages');

6049:
6050: END LOOP;
6051:
6052: IF G_DEBUG = 'Y' THEN
6053: AHL_DEBUG_PUB.Debug('Start log error messages');
6054: END IF;
6055:
6056:
6057: END log_error_messages;