[Home] [Help]
384: l_rowid VARCHAR2(30);
385:
386: CURSOR unit_deferral_id_csr(p_unit_effectivity_id In NUMBER) IS
387: SELECT unit_deferral_id, object_version_number
388: from ahl_unit_deferrals_b
389: WHERE unit_deferral_type = 'DEFERRAL'
390: AND unit_effectivity_id = p_unit_effectivity_id;
391:
392: l_unit_deferral_id NUMBER;
909: and mr.version_number >= def.version_number;*/
910:
911: -- to check whether this deferral record can be updated or deleted
912: CURSOR valid_deferral_up_csr(p_unit_deferral_id IN NUMBER) IS
913: SELECT 'x' from ahl_unit_deferrals_b
914: WHERE approval_status_code IN ('DRAFT','DEFERRAL_REJECTED')
915: AND unit_deferral_type = 'DEFERRAL'
916: AND unit_deferral_id = p_unit_deferral_id;
917:
2203: p_df_schedules_tbl IN AHL_PRD_DF_PVT.df_schedules_tbl_type)IS
2204:
2205:
2206: CURSOR valid_counter_csr(p_unit_deferral_id IN NUMBER,p_counter_id IN NUMBER) IS
2207: --SELECT 'x' FROM CSI_CP_COUNTERS_V CO, AHL_UNIT_EFFECTIVITIES_APP_V UE,AHL_UNIT_DEFERRALS_B UD
2208: SELECT 'x' FROM CSI_CP_COUNTERS_V CO, AHL_UNIT_EFFECTIVITIES_B UE,AHL_UNIT_DEFERRALS_B UD -- Undid app usage related blind changes
2209: WHERE co.customer_product_id = ue.csi_item_instance_id
2210: AND co.counter_id = p_counter_id
2211: AND UE.unit_effectivity_id = UD.unit_effectivity_id
2204:
2205:
2206: CURSOR valid_counter_csr(p_unit_deferral_id IN NUMBER,p_counter_id IN NUMBER) IS
2207: --SELECT 'x' FROM CSI_CP_COUNTERS_V CO, AHL_UNIT_EFFECTIVITIES_APP_V UE,AHL_UNIT_DEFERRALS_B UD
2208: SELECT 'x' FROM CSI_CP_COUNTERS_V CO, AHL_UNIT_EFFECTIVITIES_B UE,AHL_UNIT_DEFERRALS_B UD -- Undid app usage related blind changes
2209: WHERE co.customer_product_id = ue.csi_item_instance_id
2210: AND co.counter_id = p_counter_id
2211: AND UE.unit_effectivity_id = UD.unit_effectivity_id
2212: AND UD.unit_deferral_id = p_unit_deferral_id;
2211: AND UE.unit_effectivity_id = UD.unit_effectivity_id
2212: AND UD.unit_deferral_id = p_unit_deferral_id;
2213:
2214: /*CURSOR mr_valid_counter_csr(p_unit_deferral_id IN NUMBER,p_counter_id IN NUMBER) IS
2215: SELECT 'x' from ahl_unit_effectivities_b UE, ahl_unit_deferrals_b UD,AHL_MR_INTERVALS_V MR,CSI_CP_COUNTERS_V CO
2216: WHERE UD.unit_deferral_id = p_unit_deferral_id
2217: AND UE.unit_effectivity_id = UD.unit_effectivity_id
2218: AND co.customer_product_id = ue.csi_item_instance_id
2219: AND UE.mr_effectivity_id = MR.mr_effectivity_id
2695:
2696: CURSOR curr_counter_val_csr(p_unit_deferral_id IN NUMBER, p_counter_id IN NUMBER,p_deferral_effective_on IN DATE) IS
2697: /* Modified to fix bug# 8328818: ignore disabled counter readings.
2698: SELECT NVL(net_reading, 0) FROM cs_ctr_counter_values_v ctrread, cs_counter_groups_v ctrgrp,
2699: -- AHL_UNIT_EFFECTIVITIES_APP_V UE,AHL_UNIT_DEFERRALS_B UD
2700: AHL_UNIT_EFFECTIVITIES_B UE,AHL_UNIT_DEFERRALS_B UD -- Undid app usage related blind changes
2701: WHERE ctrread.VALUE_TIMESTAMP <= p_deferral_effective_on
2702: AND ctrread.counter_group_id = ctrgrp.counter_group_id
2703: AND SOURCE_OBJECT_CODE = 'CP'
2696: CURSOR curr_counter_val_csr(p_unit_deferral_id IN NUMBER, p_counter_id IN NUMBER,p_deferral_effective_on IN DATE) IS
2697: /* Modified to fix bug# 8328818: ignore disabled counter readings.
2698: SELECT NVL(net_reading, 0) FROM cs_ctr_counter_values_v ctrread, cs_counter_groups_v ctrgrp,
2699: -- AHL_UNIT_EFFECTIVITIES_APP_V UE,AHL_UNIT_DEFERRALS_B UD
2700: AHL_UNIT_EFFECTIVITIES_B UE,AHL_UNIT_DEFERRALS_B UD -- Undid app usage related blind changes
2701: WHERE ctrread.VALUE_TIMESTAMP <= p_deferral_effective_on
2702: AND ctrread.counter_group_id = ctrgrp.counter_group_id
2703: AND SOURCE_OBJECT_CODE = 'CP'
2704: AND SOURCE_OBJECT_ID = UE.csi_item_instance_id
2709: */
2710:
2711: -- Fix for bug# 8328818: ignore disabled counter readings.
2712: -- rewrote above query as we do not need AHL_UNIT_EFFECTIVITIES_B,
2713: -- cs_counter_groups_v, AHL_UNIT_DEFERRALS_B tables.
2714: SELECT * FROM (
2715: SELECT CCR.NET_READING
2716: FROM CSI_COUNTER_READINGS CCR
2717: WHERE CCR.COUNTER_ID = P_COUNTER_ID
3223: p_unit_effectivity_id IN NUMBER) RETURN BOOLEAN IS
3224:
3225:
3226: CURSOR status_code_csr(p_unit_effectivity_id IN NUMBER)IS
3227: SELECT approval_status_code FROM ahl_unit_deferrals_b
3228: WHERE unit_effectivity_id = p_unit_effectivity_id
3229: UNION
3230: SELECT approval_status_code FROM ahl_unit_deferrals_b
3231: WHERE unit_effectivity_id IN
3226: CURSOR status_code_csr(p_unit_effectivity_id IN NUMBER)IS
3227: SELECT approval_status_code FROM ahl_unit_deferrals_b
3228: WHERE unit_effectivity_id = p_unit_effectivity_id
3229: UNION
3230: SELECT approval_status_code FROM ahl_unit_deferrals_b
3231: WHERE unit_effectivity_id IN
3232: (
3233:
3234: /*SELECT ue_id
3341: END IF;
3342: RETURN;
3343: END IF;
3344:
3345: UPDATE ahl_unit_deferrals_b
3346: SET approval_status_code = p_new_status
3347: WHERE unit_deferral_id = p_unit_deferral_id
3348: AND object_version_number = p_object_version_number;--same transaction of caller API and update already happened
3349:
3368:
3369: CURSOR csi_item_instance_id_csr(p_unit_deferral_id IN NUMBER)
3370: --,p_object_version_number IN NUMBER)
3371: IS
3372: SELECT csi_item_instance_id FROM AHL_UNIT_EFFECTIVITIES_B UE, ahl_unit_deferrals_b UD
3373: WHERE UE.unit_effectivity_id = UD.unit_effectivity_id
3374: --AND UD.object_version_number = p_object_version_number
3375: AND UD.unit_deferral_id = p_unit_deferral_id;
3376:
3378:
3379: -- to check whether MR is not terminated already
3380: /*CURSOR valid_mr_csr(p_unit_deferral_id IN NUMBER,p_object_version_number IN NUMBER) IS
3381: SELECT 'x' from AHL_MR_HEADERS_APP_V mr, AHL_MR_HEADERS_APP_V def,
3382: ahl_unit_effectivities_b UE,ahl_unit_deferrals_b UD
3383: WHERE UD.unit_deferral_id = p_unit_deferral_id
3384: AND UD.object_version_number = p_object_version_number
3385: AND UE.unit_effectivity_id = UD.unit_effectivity_id
3386: AND def.mr_header_id = NVL(UE.mr_header_id,def.mr_header_id)
3391:
3392: l_exists VARCHAR2(1);*/
3393:
3394: CURSOR is_calc_needed(p_unit_deferral_id IN NUMBER)IS
3395: SELECT cancel_flag from ahl_unit_deferrals_b
3396: WHERE unit_deferral_id = p_unit_deferral_id;
3397:
3398: l_cancel_flag VARCHAR2(1);
3399:
3501: RETURN;
3502: END IF;
3503:
3504: -- update unit_effectivity_status
3505: UPDATE ahl_unit_deferrals_b
3506: SET approval_status_code = 'DEFERRED',
3507: object_version_number = p_object_version_number + 1
3508: WHERE unit_deferral_id = p_unit_deferral_id
3509: AND object_version_number = p_object_version_number;
3801: END IF;
3802: RETURN;
3803: END IF;
3804:
3805: UPDATE ahl_unit_deferrals_b
3806: SET approval_status_code = p_new_status,
3807: object_version_number = p_object_version_number + 1
3808: WHERE unit_deferral_id = p_unit_deferral_id
3809: AND object_version_number = p_object_version_number;
3837: -- Added object_type to query
3838: CURSOR unit_effectivity_id_csr(p_unit_deferral_id IN NUMBER,
3839: p_object_version_number IN NUMBER)IS
3840: SELECT UD.unit_effectivity_id, ue.object_type
3841: from ahl_unit_deferrals_b UD, AHL_UNIT_EFFECTIVITIES_B UE
3842: WHERE NVL(UE.status_code,'x') NOT IN('ACCOMPLISHED','DEFERRED','EXCEPTION','TERMINATED','CANCELLED','MR-TERMINATE')
3843: AND UE.unit_effectivity_id = UD.unit_effectivity_id
3844: AND UD.object_version_number = p_object_version_number
3845: AND UD.unit_deferral_id = p_unit_deferral_id;
4427:
4428: -- to fetch unit effectivity id
4429: CURSOR unit_effectivity_id_csr(p_unit_deferral_id IN NUMBER,p_object_version_number IN NUMBER) IS
4430: SELECT UD.unit_effectivity_id,UE.mr_header_id,UE.manually_planned_flag,UE.defer_from_ue_id
4431: from ahl_unit_deferrals_b UD,ahl_unit_effectivities_b UE
4432: WHERE UE.unit_effectivity_id = UD.unit_effectivity_id
4433: AND UD.object_version_number = p_object_version_number
4434: AND UD.unit_deferral_id = p_unit_deferral_id;
4435:
4578: AND ue.object_type = 'SR';
4579: l_serial_number csi_item_instances.serial_number%TYPE;
4580:
4581: CURSOR is_initdue_def(p_ue_id in number)IS
4582: SELECT unit_deferral_id from ahl_unit_deferrals_b
4583: WHERE unit_effectivity_id = p_ue_id
4584: AND unit_deferral_type = 'INIT-DUE';
4585:
4586: l_init_due_deferral_id NUMBER;
4954: IF(l_deferral_type = 'MR' AND l_manually_planned_flag = G_NO_FLAG AND p_new_status = 'CANCELLED')THEN
4955: OPEN is_initdue_def(ue_rec.unit_effectivity_id);
4956: FETCH is_initdue_def INTO l_init_due_deferral_id;
4957: IF is_initdue_def%FOUND THEN
4958: UPDATE AHL_UNIT_DEFERRALS_B
4959: SET unit_effectivity_id = l_new_unit_effectivity_id,
4960: LAST_UPDATE_DATE = sysdate,
4961: LAST_UPDATED_BY = fnd_global.user_id,
4962: LAST_UPDATE_LOGIN = fnd_global.login_id
5213: FROM AHL_UNIT_EFFECTIVITIES_VL UE
5214: WHERE unit_effectivity_id = p_unit_effectivity_id;
5215:
5216: CURSOR redundant_deferral_ue_csr(p_unit_effectivity_id IN NUMBER) IS
5217: SELECT UD.unit_deferral_id FROM ahl_unit_deferrals_b UD
5218: WHERE UD.unit_deferral_type = 'DEFERRAL'
5219: AND UD.unit_effectivity_id IN (
5220: SELECT related_ue_id
5221: FROM AHL_UE_RELATIONSHIPS
5882: --------------------------------------------------------------------------------
5883: FUNCTION process_deferred_exceptions(p_unit_effectivity_id IN NUMBER) RETURN BOOLEAN IS
5884:
5885: CURSOR unit_deferral_csr(p_unit_effectivity_id IN NUMBER) IS
5886: SELECT UD.unit_deferral_id FROM ahl_unit_deferrals_b UD
5887: WHERE UD.unit_deferral_type = 'DEFERRAL'
5888: AND UD.unit_effectivity_id = p_unit_effectivity_id;
5889:
5890: l_unit_deferral_id NUMBER;
5912: IS
5913: CURSOR wo_exists_csr(p_unit_deferral_id IN NUMBER) IS
5914: /* -- fix for bug# 6849943 (FP for Bug # 6815689).
5915: SELECT 'x'
5916: FROM ahl_workorder_tasks_v wo, ahl_unit_deferrals_b udf
5917: WHERE wo.unit_effectivity_id = udf.unit_effectivity_id
5918: AND udf.unit_deferral_id = p_unit_deferral_id;
5919: */
5920:
5918: AND udf.unit_deferral_id = p_unit_deferral_id;
5919: */
5920:
5921: SELECT 'x'
5922: FROM ahl_workorders wo, ahl_unit_deferrals_b udf,
5923: ahl_visit_tasks_b vts, ahl_visits_b vst,
5924: (SELECT ORGANIZATION_ID
5925: FROM INV_ORGANIZATION_INFO_V
5926: WHERE NVL (operating_unit, mo_global.get_current_org_id()) = mo_global.get_current_org_id()) ORG