446: END IF;
447: END IF;
448:
449: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
450: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY , ' BEFORE Calling TABLE HANDLER AHL_UNIT_EFFECTIVITIES_PKG.Insert_Row' );
451: END IF;
452:
453:
454: -- bachandr Bug # 13916897
462:
463: --******************************
464: -- Call Table Handler.
465: --******************************
466: AHL_UNIT_EFFECTIVITIES_PKG.Insert_Row (
467: X_ROWID => l_rowid,
468: X_UNIT_EFFECTIVITY_ID => l_unit_effectivity_id,
469: X_MANUALLY_PLANNED_FLAG => 'Y',
470: X_LOG_SERIES_CODE => null,
531: -- BACHANDR - NR project end
532: );
533:
534: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
535: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY , ' AFTER Calling TABLE HANDLER AHL_UNIT_EFFECTIVITIES_PKG.Insert_Row' );
536: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY , ' Unit Effectivity ID:' || l_unit_effectivity_id);
537: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY , ' Return Status:' || x_return_status);
538: END IF;
539:
1397:
1398: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1399: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to Delete Unit Effectivity with UNIT_EFFECTIVITY_ID = ' || l_rel_dtls_rec.RELATED_UE_ID || ' for a Group MR');
1400: END IF;
1401: AHL_UNIT_EFFECTIVITIES_PKG.DELETE_ROW(X_UNIT_EFFECTIVITY_ID => l_rel_dtls_rec.RELATED_UE_ID);
1402: END LOOP;
1403: -- Delete the MR Relationship and UE
1404: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1405: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to Delete Relationship with RELATIONSHIP_ID = ' || l_relationship_id);
1408:
1409: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1410: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to Delete Unit Effectivity with UNIT_EFFECTIVITY_ID = ' || p_sr_mr_association_tbl(i).UNIT_EFFECTIVITY_ID);
1411: END IF;
1412: AHL_UNIT_EFFECTIVITIES_PKG.DELETE_ROW(X_UNIT_EFFECTIVITY_ID => p_sr_mr_association_tbl(i).UNIT_EFFECTIVITY_ID);
1413:
1414: END IF; -- Disassociation Record
1415: END LOOP; -- All Association/Disassociation Records
1416:
1811: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1812: END IF;
1813:
1814:
1815: AHL_UNIT_EFFECTIVITIES_PKG.Insert_Row (
1816: X_ROWID => l_temp_row_id,
1817: X_UNIT_EFFECTIVITY_ID => x_ue_id,
1818: X_MANUALLY_PLANNED_FLAG => 'Y',
1819: X_LOG_SERIES_CODE => null,
2253: ELSE
2254: l_temp_tolerance_flag := l_curr_ue_rec.TOLERANCE_FLAG;
2255: END IF;
2256: -- Update the unit effectivity
2257: AHL_UNIT_EFFECTIVITIES_PKG.UPDATE_ROW(
2258: X_UNIT_EFFECTIVITY_ID => l_curr_ue_rec.UNIT_EFFECTIVITY_ID,
2259: X_MANUALLY_PLANNED_FLAG => l_curr_ue_rec.MANUALLY_PLANNED_FLAG,
2260: X_LOG_SERIES_CODE => l_curr_ue_rec.LOG_SERIES_CODE,
2261: X_LOG_SERIES_NUMBER => l_curr_ue_rec.LOG_SERIES_NUMBER,
2453: END IF;
2454: -- bachandr Bug # 13916897
2455:
2456: -- Update the unit effectivity
2457: AHL_UNIT_EFFECTIVITIES_PKG.UPDATE_ROW(
2458: X_UNIT_EFFECTIVITY_ID => l_curr_ue_rec.UNIT_EFFECTIVITY_ID,
2459: X_MANUALLY_PLANNED_FLAG => l_curr_ue_rec.MANUALLY_PLANNED_FLAG,
2460: X_LOG_SERIES_CODE => l_curr_ue_rec.LOG_SERIES_CODE,
2461: X_LOG_SERIES_NUMBER => l_curr_ue_rec.LOG_SERIES_NUMBER,
2691: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2692: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleted Relationship with UE_RELATIONSHIP_ID = ' || rel_and_ue_id_rec.UE_RELATIONSHIP_ID);
2693: END IF;
2694: -- Next delete the unit effectivity
2695: AHL_UNIT_EFFECTIVITIES_PKG.DELETE_ROW(X_UNIT_EFFECTIVITY_ID => rel_and_ue_id_rec.RELATED_UE_ID);
2696: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2697: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleted Unit Effectivity with UNIT_EFFECTIVITY_ID = ' || rel_and_ue_id_rec.RELATED_UE_ID);
2698: END IF;
2699: END LOOP;
2698: END IF;
2699: END LOOP;
2700:
2701: -- Delete the SR's Unit Effectivity
2702: AHL_UNIT_EFFECTIVITIES_PKG.DELETE_ROW(X_UNIT_EFFECTIVITY_ID => p_sr_ue_id);
2703: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2704: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleted Unit Effectivity with UNIT_EFFECTIVITY_ID = ' || p_sr_ue_id);
2705: END IF;
2706: END IF; -- Planned or Not