eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

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 205: AHL_DEBUG_PUB.enable_debug;

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

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

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

Line 295: AHL_DEBUG_PUB.disable_debug;

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

Line 307: AHL_DEBUG_PUB.disable_debug;

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

Line 322: AHL_DEBUG_PUB.disable_debug;

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

Line 402: AHL_DEBUG_PUB.enable_debug;

398: x_return_status := FND_API.G_RET_STS_SUCCESS;
399:
400: -- Enable Debug.
401: IF G_DEBUG='Y' THEN
402: AHL_DEBUG_PUB.enable_debug;
403: END IF;
404:
405: -- Add debug mesg.
406: IF G_DEBUG='Y' THEN

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

403: END IF;
404:
405: -- Add debug mesg.
406: IF G_DEBUG='Y' THEN
407: AHL_DEBUG_PUB.debug('Begin private API:' || G_PKG_NAME || '.' || l_api_name);
408: END IF;
409:
410: -- Convert Value to IDs and validate.
411: -- For maintenance requirement.

Line 523: AHL_DEBUG_PUB.disable_debug;

519: fnd_file.put_line(fnd_file.log, 'Building Unit Effectivity failed. Refer to the error message below.');
520: log_error_messages;
521: END IF;
522: -- Disable debug
523: AHL_DEBUG_PUB.disable_debug;
524:
525:
526:
527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 538: AHL_DEBUG_PUB.disable_debug;

534: fnd_file.put_line(fnd_file.log, 'Building Unit Effectivity failed. Refer to the error message below.');
535: log_error_messages;
536: END IF;
537: -- Disable debug
538: AHL_DEBUG_PUB.disable_debug;
539:
540: WHEN OTHERS THEN
541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
542: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 557: AHL_DEBUG_PUB.disable_debug;

553: log_error_messages;
554: END IF;
555:
556: -- Disable debug
557: AHL_DEBUG_PUB.disable_debug;
558:
559: END Build_UnitEffectivity;
560:
561: -----------------------------

Line 612: AHL_DEBUG_PUB.enable_debug;

608: -- Begin Processing
609:
610: -- Enable Debug (optional)
611: IF G_DEBUG='Y' THEN
612: AHL_DEBUG_PUB.enable_debug;
613: END IF;
614:
615: -- Check if the user is authorized: is in role AHL_UMP_MR_INITIALIZE
616: -- This functionality is not available now. So allow always

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

635: -- No special default settings required in this API
636: null;
637: END IF;
638: IF G_DEBUG='Y' THEN
639: AHL_DEBUG_PUB.debug('Beginning Processing... ', 'UMP');
640: END IF;
641: -- Start processing
642: FOR i IN p_unit_Effectivity_tbl.FIRST..p_unit_Effectivity_tbl.LAST LOOP
643: -- Initialize Return Status for this Unit Effectivity to SUCCESS

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

646:
647: -- Resolve Values to Ids
648: convert_effectivity_val_to_id(l_unit_Effectivity_rec, l_temp_return_status);
649: IF G_DEBUG='Y' THEN
650: AHL_DEBUG_PUB.debug('Resolved Values to Id for Effectivity', 'UMP');
651: END IF;
652: -- Ignore errors from the resolution process
653: l_temp_return_status := FND_API.G_RET_STS_SUCCESS;
654:

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

654:
655: -- Validate the current unit effectivity record
656: Validate_Effectivity(l_unit_Effectivity_rec, l_MR_Initialization_flag, l_temp_return_status);
657: IF G_DEBUG='Y' THEN
658: AHL_DEBUG_PUB.debug('Validated Effectivity, Status = ' || l_temp_return_status, 'UMP');
659:
660: END IF;
661: -- Continue processing this effectivity only if there are no errors
662: IF G_DEBUG='Y' THEN

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

659:
660: END IF;
661: -- Continue processing this effectivity only if there are no errors
662: IF G_DEBUG='Y' THEN
663: AHL_DEBUG_PUB.debug('About to process thresholds', 'UMP');
664: AHL_DEBUG_PUB.debug('Count threshold:' || p_x_unit_threshold_tbl.count, 'UMP');
665: END IF;
666: IF l_temp_return_status = FND_API.G_RET_STS_SUCCESS THEN
667: -- Get all the thresholds for the current effectivity

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

660: END IF;
661: -- Continue processing this effectivity only if there are no errors
662: IF G_DEBUG='Y' THEN
663: AHL_DEBUG_PUB.debug('About to process thresholds', 'UMP');
664: AHL_DEBUG_PUB.debug('Count threshold:' || p_x_unit_threshold_tbl.count, 'UMP');
665: END IF;
666: IF l_temp_return_status = FND_API.G_RET_STS_SUCCESS THEN
667: -- Get all the thresholds for the current effectivity
668: IF (p_x_unit_threshold_tbl.COUNT > 0) THEN

Line 678: AHL_DEBUG_PUB.debug('Validated Threshold', 'UMP');

674: END IF;
675: END LOOP; /* thresholds-table */
676: Validate_Thresholds(l_unit_threshold_tbl, l_temp_return_status);
677: IF G_DEBUG='Y' THEN
678: AHL_DEBUG_PUB.debug('Validated Threshold', 'UMP');
679: END IF;
680: END IF;
681:
682: IF G_DEBUG='Y' THEN

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

679: END IF;
680: END IF;
681:
682: IF G_DEBUG='Y' THEN
683: AHL_DEBUG_PUB.debug('About to process accomplishments', 'UMP');
684: AHL_DEBUG_PUB.debug('Count accomplishments Tbl:' || p_x_unit_accomplish_tbl.count, 'UMP');
685: END IF;
686: -- Get all the accomplishments for the current effectivity
687: IF (p_x_unit_accomplish_tbl.COUNT > 0) THEN

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

680: END IF;
681:
682: IF G_DEBUG='Y' THEN
683: AHL_DEBUG_PUB.debug('About to process accomplishments', 'UMP');
684: AHL_DEBUG_PUB.debug('Count accomplishments Tbl:' || p_x_unit_accomplish_tbl.count, 'UMP');
685: END IF;
686: -- Get all the accomplishments for the current effectivity
687: IF (p_x_unit_accomplish_tbl.COUNT > 0) THEN
688: l_counter_index := 0;

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

694: END LOOP; /* accomplishments-table */
695: Validate_Accomplishments(l_unit_accomplish_tbl, l_unit_Effectivity_rec.ACCOMPLISHED_DATE,
696: l_unit_Effectivity_rec.STATUS_CODE, l_temp_return_status);
697: IF G_DEBUG='Y' THEN
698: AHL_DEBUG_PUB.debug('Validated Accomplishment', 'UMP');
699: END IF;
700: END IF;
701:
702: -- Proceed to updating the database only if there are no errors

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

702: -- Proceed to updating the database only if there are no errors
703: IF l_temp_return_status = FND_API.G_RET_STS_SUCCESS THEN
704:
705: IF G_DEBUG='Y' THEN
706: AHL_DEBUG_PUB.debug('About to update thresholds', 'UMP');
707: END IF;
708: -- First Update the Unit Thresholds Table
709: Update_Thresholds(l_unit_Effectivity_rec,
710: l_unit_threshold_tbl);

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

708: -- First Update the Unit Thresholds Table
709: Update_Thresholds(l_unit_Effectivity_rec,
710: l_unit_threshold_tbl);
711: IF G_DEBUG='Y' THEN
712: AHL_DEBUG_PUB.debug('About to restore thresholds', 'UMP');
713: END IF;
714: -- Restore the saved thresholds in the IN OUT parameter
715: Restore_Thresholds(p_x_unit_threshold_tbl, l_unit_threshold_tbl);
716:

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

714: -- Restore the saved thresholds in the IN OUT parameter
715: Restore_Thresholds(p_x_unit_threshold_tbl, l_unit_threshold_tbl);
716:
717: IF G_DEBUG='Y' THEN
718: AHL_DEBUG_PUB.debug('About to update accomplishments', 'UMP');
719: END IF;
720: -- Next Update the Unit Accomplishments Table
721: Update_Accomplishments(l_unit_accomplish_tbl, l_unit_Effectivity_rec);
722: IF G_DEBUG='Y' THEN

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

719: END IF;
720: -- Next Update the Unit Accomplishments Table
721: Update_Accomplishments(l_unit_accomplish_tbl, l_unit_Effectivity_rec);
722: IF G_DEBUG='Y' THEN
723: AHL_DEBUG_PUB.debug('About to restore accomplishments', 'UMP');
724: END IF;
725: -- Restore the saved accomplishments in the IN OUT parameter
726: Restore_Accomplishments(p_x_unit_accomplish_tbl, l_unit_accomplish_tbl);
727:

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

725: -- Restore the saved accomplishments in the IN OUT parameter
726: Restore_Accomplishments(p_x_unit_accomplish_tbl, l_unit_accomplish_tbl);
727:
728: IF G_DEBUG='Y' THEN
729: AHL_DEBUG_PUB.debug('About to update unit effectivity', 'UMP');
730: END IF;
731: -- Finally update the Unit Effectivities Table
732: Update_Unit_Effectivity(l_unit_Effectivity_rec);
733: IF G_DEBUG='Y' THEN

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

730: END IF;
731: -- Finally update the Unit Effectivities Table
732: Update_Unit_Effectivity(l_unit_Effectivity_rec);
733: IF G_DEBUG='Y' THEN
734: AHL_DEBUG_PUB.debug('Updated unit effectivity', 'UMP');
735: END IF;
736: END IF;
737: END IF;
738:

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

742: END LOOP; /* effectivity-table */
743: END IF;
744:
745: IF G_DEBUG='Y' THEN
746: AHL_DEBUG_PUB.debug('Completed Processing. Checking for errors', 'UMP');
747: END IF;
748: -- Check Error Message stack.
749: x_msg_count := FND_MSG_PUB.count_msg;
750: IF x_msg_count > 0 THEN

Line 767: AHL_DEBUG_PUB.disable_debug;

763: p_encoded => fnd_api.g_false
764: );
765:
766: -- Disable debug (if enabled)
767: AHL_DEBUG_PUB.disable_debug;
768:
769: EXCEPTION
770: WHEN FND_API.G_EXC_ERROR THEN
771: Rollback to Capture_MR_Updates_pvt;

Line 861: -- AHL_DEBUG_PUB.enable_debug;

857: l_visit_status VARCHAR2(100);
858:
859: BEGIN
860: --IF G_DEBUG='Y' THEN
861: -- AHL_DEBUG_PUB.enable_debug;
862: --END IF;
863: -- Standard call to check for call compatibility
864: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
865: G_PKG_NAME) THEN

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

883: x_return_status := FND_API.G_RET_STS_ERROR;
884: FND_MESSAGE.Set_Name('AHL','AHL_UMP_UNAUTHORIZED_USER');
885: FND_MSG_PUB.ADD;
886: --IF G_DEBUG='Y' THEN
887: --AHL_DEBUG_PUB.debug('Unauthorized User', 'UMP:Validate_For_Initialize');
888: --END IF;
889: RAISE FND_API.G_EXC_ERROR;
890: END IF;
891:

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

893: x_return_status := FND_API.G_RET_STS_ERROR;
894: FND_MESSAGE.Set_Name('AHL','AHL_UMP_UE_ID_NULL');
895: FND_MSG_PUB.ADD;
896: --IF G_DEBUG='Y' THEN
897: --AHL_DEBUG_PUB.debug('Null Effectivity', 'UMP:Validate_For_Initialize');
898: --END IF;
899: RAISE FND_API.G_EXC_ERROR;
900: END IF;
901:

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

908: FND_MESSAGE.Set_Token('UEID', p_unit_effectivity_id);
909: FND_MSG_PUB.ADD;
910: CLOSE l_ue_details_csr;
911: --IF G_DEBUG='Y' THEN
912: --AHL_DEBUG_PUB.debug('Invalid Effectivity Id', 'UMP:Validate_For_Initialize');
913: --END IF;
914: RAISE FND_API.G_EXC_ERROR;
915: ELSE
916: --Ensure that unit is not locked

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

925: x_return_status := FND_API.G_RET_STS_ERROR;
926: FND_MESSAGE.Set_Name('AHL','AHL_UMP_INVALID_MR_TYPE');
927: FND_MSG_PUB.ADD;
928: --IF G_DEBUG='Y' THEN
929: --AHL_DEBUG_PUB.debug('Repetitive Effectivity', 'UMP:Validate_For_Initialize');
930: --END IF;
931: CLOSE l_ue_details_csr;
932: RAISE FND_API.G_EXC_ERROR;
933: ELSE

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

942: FND_MESSAGE.Set_Name('AHL','AHL_UMP_CHILD_MR');
943: FND_MSG_PUB.ADD;
944: CLOSE l_child_mr_csr;
945: --IF G_DEBUG='Y' THEN
946: --AHL_DEBUG_PUB.debug('Child MR', 'UMP:Validate_For_Initialize');
947: --END IF;
948: RAISE FND_API.G_EXC_ERROR;
949: ELSE
950: CLOSE l_child_mr_csr;

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

956: FND_MESSAGE.Set_Name('AHL','AHL_UMP_INVALID_STATUS');
957: FND_MESSAGE.Set_Token('STATUS', l_status_code);
958: FND_MSG_PUB.ADD;
959: --IF G_DEBUG='Y' THEN
960: --AHL_DEBUG_PUB.debug('Invalid Status: ' || 'l_status_code', 'UMP:Validate_For_Initialize');
961: --END IF;
962: RAISE FND_API.G_EXC_ERROR;
963: END IF;
964:

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

970: IF (l_temp_status_code <> 'INIT-ACCOMPLISHED' and l_last_accomplish_date IS NOT null) THEN
971: FND_MESSAGE.Set_Name('AHL','AHL_UMP_ALRDY_ACCMPLSHD');
972: FND_MSG_PUB.ADD;
973: --IF G_DEBUG='Y' THEN
974: --AHL_DEBUG_PUB.debug('Already Accomplished', 'UMP:Validate_For_Initialize');
975: --END IF;
976: RAISE FND_API.G_EXC_ERROR;
977: END IF;
978:

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

989: FND_MSG_PUB.ADD;
990: END IF;
991: CLOSE l_prior_initializations_csr;
992: --IF G_DEBUG='Y' THEN
993: --AHL_DEBUG_PUB.debug('Has prior Initializations', 'UMP:Validate_For_Initialize');
994: --END IF;
995: RAISE FND_API.G_EXC_ERROR;
996: ELSE
997: CLOSE l_prior_initializations_csr;

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

1408: BEGIN
1409: -- DO NOT Initialize API return status to success
1410:
1411: IF G_DEBUG='Y' THEN
1412: AHL_DEBUG_PUB.debug('Start of Validate Effectivity:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
1413: AHL_DEBUG_PUB.debug('Start Validation Set1:' || x_return_status, 'UMP');
1414: END IF;
1415:
1416: -- Check if the unit effectivity id is not null

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

1409: -- DO NOT Initialize API return status to success
1410:
1411: IF G_DEBUG='Y' THEN
1412: AHL_DEBUG_PUB.debug('Start of Validate Effectivity:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
1413: AHL_DEBUG_PUB.debug('Start Validation Set1:' || x_return_status, 'UMP');
1414: END IF;
1415:
1416: -- Check if the unit effectivity id is not null
1417: 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 1519: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.STATUS_CODE:' || p_unit_Effectivity_rec.STATUS_CODE, 'UMP');

1515: -- END IF;
1516: -- END IF;
1517:
1518: IF G_DEBUG='Y' THEN
1519: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.STATUS_CODE:' || p_unit_Effectivity_rec.STATUS_CODE, 'UMP');
1520: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.SET_DUE_DATE:' || p_unit_Effectivity_rec.SET_DUE_DATE, 'UMP');
1521: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.ACCOMPLISHED_DATE:' || p_unit_Effectivity_rec.ACCOMPLISHED_DATE, 'UMP');
1522: END IF;
1523:

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

1516: -- END IF;
1517:
1518: IF G_DEBUG='Y' THEN
1519: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.STATUS_CODE:' || p_unit_Effectivity_rec.STATUS_CODE, 'UMP');
1520: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.SET_DUE_DATE:' || p_unit_Effectivity_rec.SET_DUE_DATE, 'UMP');
1521: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.ACCOMPLISHED_DATE:' || p_unit_Effectivity_rec.ACCOMPLISHED_DATE, 'UMP');
1522: END IF;
1523:
1524: -- Both the dates (due and accomplished) should not be set. Only one should be set.

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

1517:
1518: IF G_DEBUG='Y' THEN
1519: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.STATUS_CODE:' || p_unit_Effectivity_rec.STATUS_CODE, 'UMP');
1520: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.SET_DUE_DATE:' || p_unit_Effectivity_rec.SET_DUE_DATE, 'UMP');
1521: AHL_DEBUG_PUB.debug('p_unit_Effectivity_rec.ACCOMPLISHED_DATE:' || p_unit_Effectivity_rec.ACCOMPLISHED_DATE, 'UMP');
1522: END IF;
1523:
1524: -- Both the dates (due and accomplished) should not be set. Only one should be set.
1525: IF (p_unit_Effectivity_rec.STATUS_CODE IS NOT NULL) THEN

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

2333: FETCH l_get_unit_effectivity_csr INTO l_ue_rec;
2334: CLOSE l_get_unit_effectivity_csr;
2335:
2336: IF G_DEBUG='Y' THEN
2337: AHL_DEBUG_PUB.debug('In Update_Unit_Effectivity', 'UMP');
2338: AHL_DEBUG_PUB.debug('Unit Eff ID:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
2339: AHL_DEBUG_PUB.debug('l_status_code:' || l_status_code, 'UMP');
2340: AHL_DEBUG_PUB.debug('l_ue_rec.status_code:' || l_ue_rec.status_code, 'UMP');
2341:

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

2334: CLOSE l_get_unit_effectivity_csr;
2335:
2336: IF G_DEBUG='Y' THEN
2337: AHL_DEBUG_PUB.debug('In Update_Unit_Effectivity', 'UMP');
2338: AHL_DEBUG_PUB.debug('Unit Eff ID:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
2339: AHL_DEBUG_PUB.debug('l_status_code:' || l_status_code, 'UMP');
2340: AHL_DEBUG_PUB.debug('l_ue_rec.status_code:' || l_ue_rec.status_code, 'UMP');
2341:
2342: END IF;

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

2335:
2336: IF G_DEBUG='Y' THEN
2337: AHL_DEBUG_PUB.debug('In Update_Unit_Effectivity', 'UMP');
2338: AHL_DEBUG_PUB.debug('Unit Eff ID:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
2339: AHL_DEBUG_PUB.debug('l_status_code:' || l_status_code, 'UMP');
2340: AHL_DEBUG_PUB.debug('l_ue_rec.status_code:' || l_ue_rec.status_code, 'UMP');
2341:
2342: END IF;
2343:

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

2336: IF G_DEBUG='Y' THEN
2337: AHL_DEBUG_PUB.debug('In Update_Unit_Effectivity', 'UMP');
2338: AHL_DEBUG_PUB.debug('Unit Eff ID:' || p_unit_Effectivity_rec.UNIT_EFFECTIVITY_ID, 'UMP');
2339: AHL_DEBUG_PUB.debug('l_status_code:' || l_status_code, 'UMP');
2340: AHL_DEBUG_PUB.debug('l_ue_rec.status_code:' || l_ue_rec.status_code, 'UMP');
2341:
2342: END IF;
2343:
2344: -- If there are no accomplishments during initialization, reset status to null

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

2830: l_ue_rec l_get_unit_effectivity_csr%rowtype;
2831:
2832: BEGIN
2833: IF G_DEBUG='Y' THEN
2834: AHL_DEBUG_PUB.debug('Terminating Descendent with ue_id ' || p_descendent_ue_id, 'UMP');
2835: END IF;
2836: OPEN l_get_unit_effectivity_csr(p_descendent_ue_id);
2837: FETCH l_get_unit_effectivity_csr INTO l_ue_rec;
2838: CLOSE l_get_unit_effectivity_csr;

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

3660: AND UA.unit_effectivity_id = p_unit_effectivity_id;
3661:
3662: BEGIN
3663: IF G_DEBUG='Y' THEN
3664: AHL_DEBUG_PUB.debug('Entering Match_Counters_with_FMP', 'UMP');
3665: AHL_DEBUG_PUB.debug('Input CSI:MR:' || p_item_instance_id || ':' || p_mr_header_id, 'UMP');
3666: AHL_DEBUG_PUB.debug('p_unit_effectivity_id:' || p_unit_effectivity_id, 'UMP');
3667: END IF;
3668: -- Initialize API return status to success

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

3661:
3662: BEGIN
3663: IF G_DEBUG='Y' THEN
3664: AHL_DEBUG_PUB.debug('Entering Match_Counters_with_FMP', 'UMP');
3665: AHL_DEBUG_PUB.debug('Input CSI:MR:' || p_item_instance_id || ':' || p_mr_header_id, 'UMP');
3666: AHL_DEBUG_PUB.debug('p_unit_effectivity_id:' || p_unit_effectivity_id, 'UMP');
3667: END IF;
3668: -- Initialize API return status to success
3669: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

3662: BEGIN
3663: IF G_DEBUG='Y' THEN
3664: AHL_DEBUG_PUB.debug('Entering Match_Counters_with_FMP', 'UMP');
3665: AHL_DEBUG_PUB.debug('Input CSI:MR:' || p_item_instance_id || ':' || p_mr_header_id, 'UMP');
3666: AHL_DEBUG_PUB.debug('p_unit_effectivity_id:' || p_unit_effectivity_id, 'UMP');
3667: END IF;
3668: -- Initialize API return status to success
3669: x_return_status := FND_API.G_RET_STS_SUCCESS;
3670:

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

3700: l_fmp_eff := l_fmp_eff || l_effectivities_tbl(i).MR_EFFECTIVITY_ID || ',';
3701: END LOOP;
3702: l_fmp_eff := rtrim(l_fmp_eff, ',') || ')';
3703: IF G_DEBUG='Y' THEN
3704: AHL_DEBUG_PUB.debug('Match_Counters_with_FMP: Effectivities list from FMP: ' || l_fmp_eff, 'UMP');
3705: END IF;
3706: END IF;
3707:
3708: -- Counters for the given MR

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

3725: l_acc_sql := l_acc_sql || ' order by counter_name ';
3726:
3727: l_temp_sql_str := l_fmp_sql || ' INTERSECT ' || l_inst_sql || ' MINUS ' || l_acc_sql;
3728: IF G_DEBUG='Y' THEN
3729: AHL_DEBUG_PUB.debug('Match_Counters_with_FMP: Final SQL: ' || l_temp_sql_str, 'UMP');
3730:
3731: END IF;
3732: OPEN l_counters_csr for l_temp_sql_str USING p_item_instance_id, p_unit_effectivity_id;
3733: l_counters_msg := '';

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

3742: l_counters_msg := rtrim(l_counters_msg, ',');
3743: x_counters := l_counters_msg;*/
3744:
3745: IF G_DEBUG='Y' THEN
3746: AHL_DEBUG_PUB.debug('Count of l_effectivities_tbl:' || l_effectivities_tbl.count , 'UMP');
3747: END IF;
3748:
3749: IF (l_effectivities_tbl.COUNT = 0) THEN
3750: RETURN;

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

3762: l_counters_msg := rtrim(l_counters_msg, ',');
3763: x_counters := l_counters_msg;
3764:
3765: IF G_DEBUG='Y' THEN
3766: AHL_DEBUG_PUB.debug('x_counters:' || x_counters, 'UMP');
3767: AHL_DEBUG_PUB.debug('Exiting Match_Counters_with_FMP', 'UMP');
3768:
3769: END IF;
3770: END Match_Counters_with_FMP;

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

3763: x_counters := l_counters_msg;
3764:
3765: IF G_DEBUG='Y' THEN
3766: AHL_DEBUG_PUB.debug('x_counters:' || x_counters, 'UMP');
3767: AHL_DEBUG_PUB.debug('Exiting Match_Counters_with_FMP', 'UMP');
3768:
3769: END IF;
3770: END Match_Counters_with_FMP;
3771:

Line 4098: AHL_DEBUG_PUB.enable_debug;

4094: SAVEPOINT Terminate_MR_Instances_pvt;
4095:
4096: -- Enable Debug (optional)
4097: IF G_DEBUG='Y' THEN
4098: AHL_DEBUG_PUB.enable_debug;
4099: END IF;
4100:
4101: IF G_DEBUG='Y' THEN
4102: AHL_DEBUG_PUB.debug('Beginning Processing... ', 'UMP-TERMINATE: ');

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

4098: AHL_DEBUG_PUB.enable_debug;
4099: END IF;
4100:
4101: IF G_DEBUG='Y' THEN
4102: AHL_DEBUG_PUB.debug('Beginning Processing... ', 'UMP-TERMINATE: ');
4103: END IF;
4104: -- Standard call to check for call compatibility
4105: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
4106: G_PKG_NAME) THEN

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

4107: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4108: END IF;
4109:
4110: IF G_DEBUG='Y' THEN
4111: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');
4112: AHL_DEBUG_PUB.debug('Input Parameters:');
4113: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4114: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4115: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);

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

4108: END IF;
4109:
4110: IF G_DEBUG='Y' THEN
4111: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');
4112: AHL_DEBUG_PUB.debug('Input Parameters:');
4113: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4114: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4115: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4116: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);

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

4109:
4110: IF G_DEBUG='Y' THEN
4111: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');
4112: AHL_DEBUG_PUB.debug('Input Parameters:');
4113: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4114: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4115: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4116: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4117: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);

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

4110: IF G_DEBUG='Y' THEN
4111: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');
4112: AHL_DEBUG_PUB.debug('Input Parameters:');
4113: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4114: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4115: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4116: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4117: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4118: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);

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

4111: AHL_DEBUG_PUB.debug('After call compatible api ', 'UMP-TERMINATE:');
4112: AHL_DEBUG_PUB.debug('Input Parameters:');
4113: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4114: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4115: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4116: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4117: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4118: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);
4119: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);

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

4112: AHL_DEBUG_PUB.debug('Input Parameters:');
4113: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4114: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4115: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4116: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4117: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4118: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);
4119: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);
4120: END IF;

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

4113: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4114: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4115: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4116: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4117: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4118: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);
4119: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);
4120: END IF;
4121:

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

4114: AHL_DEBUG_PUB.debug('p_old_mr_header_id: ' || p_old_mr_header_id);
4115: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4116: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4117: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4118: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);
4119: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);
4120: END IF;
4121:
4122: -- Initialize message list if p_init_msg_list is set to TRUE

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

4115: AHL_DEBUG_PUB.debug('p_old_mr_title: ' || p_old_mr_title);
4116: AHL_DEBUG_PUB.debug('p_old_version_number: ' || p_old_version_number);
4117: AHL_DEBUG_PUB.debug('p_new_mr_header_id: ' || p_new_mr_header_id);
4118: AHL_DEBUG_PUB.debug('p_new_mr_title: ' || p_new_mr_title);
4119: AHL_DEBUG_PUB.debug('p_new_version_number: ' || p_new_version_number);
4120: END IF;
4121:
4122: -- Initialize message list if p_init_msg_list is set to TRUE
4123: IF FND_API.To_Boolean(p_init_msg_list) THEN

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

4194: END IF;
4195: CLOSE l_get_effective_to_date;
4196:
4197: IF G_DEBUG='Y' THEN
4198: AHL_DEBUG_PUB.debug('l_effective_to_date = ' || l_effective_to_date);
4199: END IF;
4200:
4201:
4202: IF (l_new_mr_header_id IS NOT NULL) THEN

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

4212: CLOSE l_get_effective_from_date;
4213: END IF;
4214:
4215: IF G_DEBUG='Y' THEN
4216: AHL_DEBUG_PUB.debug('l_effective_from_date = ' || l_effective_from_date);
4217: END IF;
4218:
4219: OPEN l_unit_effectivity_csr(l_old_mr_header_id);
4220: LOOP

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

4220: LOOP
4221: FETCH l_unit_effectivity_csr INTO l_ue_rec; --l_ue_id, l_repetitive_flag, l_status_code;
4222:
4223: IF G_DEBUG='Y' THEN
4224: AHL_DEBUG_PUB.debug('l_ue_rec.unit_effectivity_id = ' || l_ue_rec.UNIT_EFFECTIVITY_ID);
4225: AHL_DEBUG_PUB.debug('l_ue_rec.mr_header_id = ' || l_ue_rec.mr_header_id);
4226: AHL_DEBUG_PUB.debug('l_ue_rec.object_version_number = ' || l_ue_rec.object_version_number);
4227: END IF;
4228: EXIT WHEN l_unit_effectivity_csr%NOTFOUND;

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

4221: FETCH l_unit_effectivity_csr INTO l_ue_rec; --l_ue_id, l_repetitive_flag, l_status_code;
4222:
4223: IF G_DEBUG='Y' THEN
4224: AHL_DEBUG_PUB.debug('l_ue_rec.unit_effectivity_id = ' || l_ue_rec.UNIT_EFFECTIVITY_ID);
4225: AHL_DEBUG_PUB.debug('l_ue_rec.mr_header_id = ' || l_ue_rec.mr_header_id);
4226: AHL_DEBUG_PUB.debug('l_ue_rec.object_version_number = ' || l_ue_rec.object_version_number);
4227: END IF;
4228: EXIT WHEN l_unit_effectivity_csr%NOTFOUND;
4229:

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

4222:
4223: IF G_DEBUG='Y' THEN
4224: AHL_DEBUG_PUB.debug('l_ue_rec.unit_effectivity_id = ' || l_ue_rec.UNIT_EFFECTIVITY_ID);
4225: AHL_DEBUG_PUB.debug('l_ue_rec.mr_header_id = ' || l_ue_rec.mr_header_id);
4226: AHL_DEBUG_PUB.debug('l_ue_rec.object_version_number = ' || l_ue_rec.object_version_number);
4227: END IF;
4228: EXIT WHEN l_unit_effectivity_csr%NOTFOUND;
4229:
4230:

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

4236: IF (l_ue_rec.REPETITIVE_MR_FLAG = 'N'
4237: OR l_ue_rec.STATUS_CODE = 'INIT-DUE' OR l_ue_rec.defer_from_ue_id IS NOT NULL) THEN
4238:
4239: IF G_DEBUG='Y' THEN
4240: AHL_DEBUG_PUB.debug('IN if repetitive_mr_flag = N');
4241: END IF;
4242: l_ue_rec.STATUS_CODE := 'MR-TERMINATE';
4243: l_ue_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4244: l_ue_rec.ACCOMPLISHED_DATE := SYSDATE;

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

4243: l_ue_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4244: l_ue_rec.ACCOMPLISHED_DATE := SYSDATE;
4245:
4246: IF G_DEBUG='Y' THEN
4247: AHL_DEBUG_PUB.debug('before update record status to MR-TERMINATE');
4248: END IF;
4249: AHL_UNIT_EFFECTIVITIES_PKG.UPDATE_ROW (
4250: x_unit_effectivity_id => l_ue_rec.UNIT_EFFECTIVITY_ID,
4251: x_csi_item_instance_id => l_ue_rec.CSI_ITEM_INSTANCE_ID,

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

4305: X_LAST_UPDATED_BY => fnd_global.user_id,
4306: X_LAST_UPDATE_LOGIN => fnd_global.login_id);
4307:
4308: IF G_DEBUG='Y' THEN
4309: AHL_DEBUG_PUB.debug('After update record');
4310: END IF;
4311:
4312: --update all descendent Unit Effectivities
4313: OPEN l_ue_descendent_csr(l_ue_rec.UNIT_EFFECTIVITY_ID);

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

4315: FETCH l_ue_descendent_csr INTO l_ue_descendent_rec;
4316: EXIT WHEN l_ue_descendent_csr%NOTFOUND;
4317:
4318: IF G_DEBUG='Y' THEN
4319: AHL_DEBUG_PUB.debug('descedant ue_id' || l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);
4320: END IF;
4321: l_ue_descendent_rec.STATUS_CODE := 'MR-TERMINATE';
4322: l_ue_descendent_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4323: l_ue_descendent_rec.ACCOMPLISHED_DATE := SYSDATE;

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

4387: ELSIF (l_ue_rec.REPETITIVE_MR_FLAG = 'Y') THEN
4388: IF (nvl(l_visit_status,'X') = 'PLANNING') THEN
4389:
4390: IF G_DEBUG='Y' THEN
4391: AHL_DEBUG_PUB.debug('In repetitive_mr_flag = Y');
4392: END IF;
4393: l_ue_rec.STATUS_CODE := 'EXCEPTION';
4394: l_ue_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4395: l_ue_rec.ACCOMPLISHED_DATE := SYSDATE;

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

4394: l_ue_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4395: l_ue_rec.ACCOMPLISHED_DATE := SYSDATE;
4396:
4397: IF G_DEBUG='Y' THEN
4398: AHL_DEBUG_PUB.debug('Before update record status to EXCEPTION');
4399: END IF;
4400: AHL_UNIT_EFFECTIVITIES_PKG.UPDATE_ROW (
4401: x_unit_effectivity_id => l_ue_rec.UNIT_EFFECTIVITY_ID,
4402: x_csi_item_instance_id => l_ue_rec.CSI_ITEM_INSTANCE_ID,

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

4457: x_LAST_UPDATE_LOGIN => fnd_global.login_id); -- l_ue_rec.LAST_UPDATE_LOGIN );
4458:
4459:
4460: IF G_DEBUG='Y' THEN
4461: AHL_DEBUG_PUB.debug('After update record');
4462: END IF;
4463: --update all descendent Unit Effectivities
4464: OPEN l_ue_descendent_csr(l_ue_rec.UNIT_EFFECTIVITY_ID);
4465: LOOP

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

4469: --l_ue_descendent_rec.MESSAGE_CODE := 'TERMINATE-W-NEW-REV';
4470: l_ue_descendent_rec.ACCOMPLISHED_DATE := SYSDATE;
4471:
4472: IF G_DEBUG='Y' THEN
4473: AHL_DEBUG_PUB.debug('start update status to Exception descedant ue_id' || l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);
4474: END IF;
4475: AHL_UNIT_EFFECTIVITIES_PKG.UPDATE_ROW (
4476: x_unit_effectivity_id => l_ue_descendent_rec.UNIT_EFFECTIVITY_ID,
4477: x_csi_item_instance_id => l_ue_descendent_rec.CSI_ITEM_INSTANCE_ID,

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

4542: FETCH l_ue_descendent_csr INTO l_ue_descendent_rec;
4543: EXIT WHEN l_ue_descendent_csr%NOTFOUND;
4544:
4545: IF G_DEBUG='Y' THEN
4546: AHL_DEBUG_PUB.debug('start delete descedant ue_id' ||l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);
4547: END IF;
4548: AHL_UNIT_EFFECTIVITIES_PKG.Delete_Row(l_ue_descendent_rec.UNIT_EFFECTIVITY_ID);
4549: END LOOP;
4550: CLOSE l_ue_descendent_csr;

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

4556:
4557: CLOSE l_unit_effectivity_csr;
4558:
4559: IF G_DEBUG='Y' THEN
4560: AHL_DEBUG_PUB.debug('Start of Processing SRs');
4561: END IF;
4562:
4563: -- Process for SRs.
4564: FOR ahl_sr_ue_rec IN ahl_sr_ue_csr LOOP

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

4565: OPEN ahl_sr_ue_valid_csr(l_old_mr_header_id, ahl_sr_ue_rec.RELATED_UE_ID);
4566: FETCH ahl_sr_ue_valid_csr INTO l_junk;
4567: IF(ahl_sr_ue_valid_csr%FOUND)THEN
4568: IF G_DEBUG='Y' THEN
4569: AHL_DEBUG_PUB.debug('Found ue:' || ahl_sr_ue_rec.RELATED_UE_ID);
4570: END IF;
4571:
4572: l_visit_status := AHL_UMP_UTIL_PKG.get_Visit_Status ( ahl_sr_ue_rec.RELATED_UE_ID);
4573:

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

4575: -- if visit is already on the floor, we do nothing.
4576: IF (nvl(l_visit_status,'X') NOT IN ('RELEASED','CLOSED')) THEN
4577:
4578: IF G_DEBUG='Y' THEN
4579: AHL_DEBUG_PUB.debug('Processing ue:' || ahl_sr_ue_rec.RELATED_UE_ID || ' for termination');
4580: END IF;
4581:
4582: MR_Terminate (ahl_sr_ue_rec.RELATED_UE_ID);
4583:

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

4734: -- Standard check of p_commit
4735: IF FND_API.TO_BOOLEAN(p_commit) THEN
4736: COMMIT WORK;
4737: IF G_DEBUG='Y' THEN
4738: AHL_DEBUG_PUB.debug('Committed Changes', 'UMP');
4739: END IF;
4740: END IF;
4741:
4742: /* commented call from here as BUE api commits. Launching concurrent program instead.

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

4768: l_req_id := fnd_request.submit_request('AHL','AHLWUEFF',NULL,NULL,FALSE, l_old_mr_header_id,
4769: l_new_mr_header_id);
4770: IF (l_req_id = 0 OR l_req_id IS NULL) THEN
4771: IF G_debug = 'Y' THEN
4772: AHL_DEBUG_PUB.debug('Tried to submit concurrent request but failed');
4773: END IF;
4774: END IF;
4775: */
4776:

Line 4794: AHL_DEBUG_PUB.disable_debug;

4790: p_data => x_msg_data,
4791: p_encoded => fnd_api.g_false);
4792:
4793: -- Disable debug
4794: AHL_DEBUG_PUB.disable_debug;
4795:
4796: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4797: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4798: Rollback to Terminate_MR_Instances_pvt;

Line 4804: AHL_DEBUG_PUB.disable_debug;

4800: p_data => x_msg_data,
4801: p_encoded => fnd_api.g_false);
4802:
4803: -- Disable debug
4804: AHL_DEBUG_PUB.disable_debug;
4805:
4806: WHEN OTHERS THEN
4807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4808: Rollback to Terminate_MR_Instances_pvt;

Line 4820: AHL_DEBUG_PUB.disable_debug;

4816: p_encoded => fnd_api.g_false);
4817:
4818:
4819: -- Disable debug
4820: AHL_DEBUG_PUB.disable_debug;
4821:
4822:
4823: END TERMINATE_MR_INSTANCES;
4824:

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

5257: l_ue_rec get_unit_effectivity_csr%rowtype;
5258:
5259: BEGIN
5260: IF G_DEBUG='Y' THEN
5261: AHL_DEBUG_PUB.debug('MR-Terminating UE record with ue_id ' || p_unit_effectivity_id, 'UMP');
5262: END IF;
5263:
5264: OPEN get_unit_effectivity_csr(p_unit_effectivity_id);
5265: FETCH get_unit_effectivity_csr INTO l_ue_rec;

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

5602:
5603: BEGIN
5604:
5605: IF G_DEBUG = 'Y' THEN
5606: AHL_DEBUG_PUB.Debug('Start log error messages');
5607: END IF;
5608:
5609: -- Standard call to get message count.
5610: l_msg_count := FND_MSG_PUB.Count_Msg;

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

5617: p_msg_index_out => l_msg_index_out );
5618:
5619: fnd_file.put_line(FND_FILE.LOG, 'Err message-'||l_msg_index_out||':' || l_msg_data);
5620: IF G_DEBUG = 'Y' THEN
5621: AHL_DEBUG_PUB.Debug('Err message-'||l_msg_index_out||':' || substr(l_msg_data,1,240));
5622: END IF;
5623:
5624: END LOOP;
5625:

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

5623:
5624: END LOOP;
5625:
5626: IF G_DEBUG = 'Y' THEN
5627: AHL_DEBUG_PUB.Debug('Start log error messages');
5628: END IF;
5629:
5630:
5631: END log_error_messages;