[Home] [Help]
637: END IF;
638:
639: IF(p_x_df_header_rec.operation_flag = G_OP_DELETE) THEN
640: -- delete schedules records
641: DELETE AHL_UNIT_THRESHOLDS WHERE UNIT_DEFERRAL_ID = p_x_df_header_rec.unit_deferral_id;
642: -- delete header records.
643: AHL_UNIT_DEFERRALS_PKG.delete_row(x_unit_deferral_id => p_x_df_header_rec.unit_deferral_id);
644: ELSIF(p_x_df_header_rec.operation_flag = G_OP_CREATE) THEN
645: --setting object version number for create
707: IF(p_x_df_header_rec.skip_mr_flag = G_YES_FLAG OR p_x_df_header_rec.cancel_flag = G_YES_FLAG)THEN
708: p_x_df_header_rec.set_due_date := null;
709: p_x_df_header_rec.affect_due_calc_flag := G_NO_FLAG;
710: -- Delete all records in unit thresholds
711: DELETE AHL_UNIT_THRESHOLDS WHERE UNIT_DEFERRAL_ID = p_x_df_header_rec.unit_deferral_id;
712: END IF;
713: p_x_df_header_rec.approval_status_code := 'DRAFT';
714: AHL_UNIT_DEFERRALS_PKG.update_row(
715: x_unit_deferral_id => p_x_df_header_rec.unit_deferral_id,
2031:
2032:
2033: FOR i IN p_x_df_schedules_tbl.FIRST..p_x_df_schedules_tbl.LAST LOOP
2034: IF(p_x_df_schedules_tbl(i).operation_flag = G_OP_DELETE) THEN
2035: AHL_UNIT_THRESHOLDS_PKG.delete_row(p_x_df_schedules_tbl(i).unit_threshold_id);
2036: END IF;
2037: END LOOP;
2038:
2039: FOR i IN p_x_df_schedules_tbl.FIRST..p_x_df_schedules_tbl.LAST LOOP
2044: p_x_df_schedules_tbl(i).last_updated_by := fnd_global.user_id;
2045: p_x_df_schedules_tbl(i).last_update_date := SYSDATE;
2046: p_x_df_schedules_tbl(i).last_update_login := fnd_global.user_id;
2047:
2048: AHL_UNIT_THRESHOLDS_PKG.update_row(
2049: p_unit_threshold_id => p_x_df_schedules_tbl(i).unit_threshold_id,
2050: p_object_version_number => p_x_df_schedules_tbl(i).object_version_number,
2051: p_last_updated_by => p_x_df_schedules_tbl(i).last_updated_by,
2052: p_last_update_date => p_x_df_schedules_tbl(i).last_update_date,
2084: p_x_df_schedules_tbl(i).last_updated_by := fnd_global.user_id;
2085: p_x_df_schedules_tbl(i).last_update_date := SYSDATE;
2086: p_x_df_schedules_tbl(i).last_update_login := fnd_global.user_id;
2087:
2088: AHL_UNIT_THRESHOLDS_PKG.insert_row(
2089: p_x_unit_threshold_id => p_x_df_schedules_tbl(i).unit_threshold_id,
2090: p_object_version_number => p_x_df_schedules_tbl(i).object_version_number,
2091: p_created_by => p_x_df_schedules_tbl(i).created_by,
2092: p_creation_date => p_x_df_schedules_tbl(i).creation_date,
2221: AND CO.counter_name = MR.counter_name; */
2222:
2223:
2224: CURSOR valid_df_rec_del_csr(p_unit_threshold_id IN NUMBER, p_object_version_number IN NUMBER) IS
2225: SELECT 'x' FROM ahl_unit_thresholds
2226: WHERE object_version_number = p_object_version_number
2227: AND unit_threshold_id = p_unit_threshold_id;
2228:
2229: l_exists VARCHAR2(1);
2312: CURSOR df_schedules_csr(p_unit_threshold_id IN NUMBER, p_object_version_number IN NUMBER) IS
2313: SELECT unit_deferral_id,counter_id,counter_value,ctr_value_type_code,attribute_category, attribute1,attribute2, attribute3, attribute4,
2314: attribute5, attribute6, attribute7, attribute8, attribute9, attribute10, attribute11,
2315: attribute12, attribute13, attribute14, attribute15
2316: FROM ahl_unit_thresholds
2317: WHERE object_version_number= p_object_version_number
2318: AND unit_threshold_id = p_unit_threshold_id;
2319:
2320: l_df_schedules_rec AHL_PRD_DF_PVT.df_schedules_rec_type;
2674: l_count2 NUMBER;
2675:
2676: CURSOR counter_values_csr(p_unit_deferral_id IN NUMBER) IS
2677: SELECT UT.counter_id, CO.name, UT.counter_value, UT.ctr_value_type_code,CO.uom_code
2678: FROM CS_COUNTERS CO,ahl_unit_thresholds UT
2679: WHERE CO.counter_id = UT.counter_id
2680: AND UT.unit_deferral_id = p_unit_deferral_id;
2681:
2682: l_counter_id NUMBER;
2766: );
2767: END IF;
2768:
2769: -- df schedule validity for the the unit_deferral_id.
2770: SELECT count(*) INTO l_count1 from (SELECT counter_id FROM ahl_unit_thresholds
2771: WHERE unit_deferral_id = p_df_header_rec.unit_deferral_id);
2772:
2773: SELECT count(*) INTO l_count2 from (SELECT DISTINCT counter_id FROM ahl_unit_thresholds
2774: WHERE unit_deferral_id = p_df_header_rec.unit_deferral_id);
2769: -- df schedule validity for the the unit_deferral_id.
2770: SELECT count(*) INTO l_count1 from (SELECT counter_id FROM ahl_unit_thresholds
2771: WHERE unit_deferral_id = p_df_header_rec.unit_deferral_id);
2772:
2773: SELECT count(*) INTO l_count2 from (SELECT DISTINCT counter_id FROM ahl_unit_thresholds
2774: WHERE unit_deferral_id = p_df_header_rec.unit_deferral_id);
2775: IF(l_count1 <> l_count2) THEN
2776: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_PRD_DF_CNT_NAME_REP');
2777: FND_MSG_PUB.ADD;
5228: WHERE defer_from_ue_id = UD.unit_effectivity_id
5229: );
5230:
5231: CURSOR redundant_threshold_csr(p_unit_deferral_id IN NUMBER) IS
5232: SELECT unit_threshold_id FROM ahl_unit_thresholds
5233: WHERE unit_deferral_id = p_unit_deferral_id;
5234:
5235:
5236: BEGIN
5341: END IF;
5342:
5343: FOR redundant_deferral_rec IN redundant_deferral_ue_csr(p_unit_effectivity_id) LOOP
5344: FOR redundant_threshold_rec IN redundant_threshold_csr(redundant_deferral_rec.unit_deferral_id) LOOP
5345: AHL_UNIT_THRESHOLDS_PKG.delete_row(redundant_threshold_rec.unit_threshold_id);
5346: END LOOP;
5347: AHL_UNIT_DEFERRALS_PKG.delete_row(redundant_deferral_rec.unit_deferral_id);
5348: END LOOP;
5349:
5487: -- fetch deferral schedule rec
5488: CURSOR df_schedule_tbl_csr(p_unit_deferral_id IN NUMBER) IS
5489: SELECT UT.unit_threshold_id,UT.object_version_number,UT.unit_deferral_id, UT.counter_id,
5490: CO.name, UT.counter_value, UT.ctr_value_type_code,MU.unit_of_measure
5491: FROM MTL_UNITS_OF_MEASURE_VL MU, CS_COUNTERS CO,ahl_unit_thresholds UT
5492: WHERE MU.uom_code = CO.uom_code
5493: AND CO.counter_id = UT.counter_id
5494: AND UT.unit_deferral_id = p_unit_deferral_id
5495: ORDER BY CO.name;
5889:
5890: l_unit_deferral_id NUMBER;
5891:
5892: CURSOR redundant_threshold_csr(p_unit_deferral_id IN NUMBER) IS
5893: SELECT unit_threshold_id FROM ahl_unit_thresholds
5894: WHERE unit_deferral_id = p_unit_deferral_id;
5895:
5896: BEGIN
5897: OPEN unit_deferral_csr(p_unit_effectivity_id);
5899: IF(unit_deferral_csr%NOTFOUND)THEN
5900: RETURN FALSE;
5901: ELSE
5902: FOR redundant_threshold_rec IN redundant_threshold_csr(l_unit_deferral_id) LOOP
5903: AHL_UNIT_THRESHOLDS_PKG.delete_row(redundant_threshold_rec.unit_threshold_id);
5904: END LOOP;
5905: AHL_UNIT_DEFERRALS_PKG.delete_row(l_unit_deferral_id);
5906: END IF;
5907: RETURN TRUE;