[Home] [Help]
377: l_rowid VARCHAR2(30);
378:
379: CURSOR unit_deferral_id_csr(p_unit_effectivity_id In NUMBER) IS
380: SELECT unit_deferral_id, object_version_number
381: from ahl_unit_deferrals_b
382: WHERE unit_deferral_type = 'DEFERRAL'
383: AND unit_effectivity_id = p_unit_effectivity_id;
384:
385: l_unit_deferral_id NUMBER;
883: and mr.version_number >= def.version_number;*/
884:
885: -- to check whether this deferral record can be updated or deleted
886: CURSOR valid_deferral_up_csr(p_unit_deferral_id IN NUMBER) IS
887: SELECT 'x' from ahl_unit_deferrals_b
888: WHERE approval_status_code IN ('DRAFT','DEFERRAL_REJECTED')
889: AND unit_deferral_type = 'DEFERRAL'
890: AND unit_deferral_id = p_unit_deferral_id;
891:
2140: p_df_schedules_tbl IN AHL_PRD_DF_PVT.df_schedules_tbl_type)IS
2141:
2142:
2143: CURSOR valid_counter_csr(p_unit_deferral_id IN NUMBER,p_counter_id IN NUMBER) IS
2144: --SELECT 'x' FROM CSI_CP_COUNTERS_V CO, AHL_UNIT_EFFECTIVITIES_APP_V UE,AHL_UNIT_DEFERRALS_B UD
2145: SELECT 'x' FROM CSI_CP_COUNTERS_V CO, AHL_UNIT_EFFECTIVITIES_B UE,AHL_UNIT_DEFERRALS_B UD -- Undid app usage related blind changes
2146: WHERE co.customer_product_id = ue.csi_item_instance_id
2147: AND co.counter_id = p_counter_id
2148: AND UE.unit_effectivity_id = UD.unit_effectivity_id
2141:
2142:
2143: CURSOR valid_counter_csr(p_unit_deferral_id IN NUMBER,p_counter_id IN NUMBER) IS
2144: --SELECT 'x' FROM CSI_CP_COUNTERS_V CO, AHL_UNIT_EFFECTIVITIES_APP_V UE,AHL_UNIT_DEFERRALS_B UD
2145: SELECT 'x' FROM CSI_CP_COUNTERS_V CO, AHL_UNIT_EFFECTIVITIES_B UE,AHL_UNIT_DEFERRALS_B UD -- Undid app usage related blind changes
2146: WHERE co.customer_product_id = ue.csi_item_instance_id
2147: AND co.counter_id = p_counter_id
2148: AND UE.unit_effectivity_id = UD.unit_effectivity_id
2149: AND UD.unit_deferral_id = p_unit_deferral_id;
2148: AND UE.unit_effectivity_id = UD.unit_effectivity_id
2149: AND UD.unit_deferral_id = p_unit_deferral_id;
2150:
2151: /*CURSOR mr_valid_counter_csr(p_unit_deferral_id IN NUMBER,p_counter_id IN NUMBER) IS
2152: SELECT 'x' from ahl_unit_effectivities_b UE, ahl_unit_deferrals_b UD,AHL_MR_INTERVALS_V MR,CSI_CP_COUNTERS_V CO
2153: WHERE UD.unit_deferral_id = p_unit_deferral_id
2154: AND UE.unit_effectivity_id = UD.unit_effectivity_id
2155: AND co.customer_product_id = ue.csi_item_instance_id
2156: AND UE.mr_effectivity_id = MR.mr_effectivity_id
2631: l_msg_count NUMBER;
2632:
2633: CURSOR curr_counter_val_csr(p_unit_deferral_id IN NUMBER, p_counter_id IN NUMBER,p_deferral_effective_on IN DATE) IS
2634: SELECT NVL(net_reading, 0) FROM cs_ctr_counter_values_v ctrread, cs_counter_groups_v ctrgrp,
2635: -- AHL_UNIT_EFFECTIVITIES_APP_V UE,AHL_UNIT_DEFERRALS_B UD
2636: AHL_UNIT_EFFECTIVITIES_B UE,AHL_UNIT_DEFERRALS_B UD -- Undid app usage related blind changes
2637: WHERE ctrread.VALUE_TIMESTAMP <= p_deferral_effective_on
2638: AND ctrread.counter_group_id = ctrgrp.counter_group_id
2639: AND SOURCE_OBJECT_CODE = 'CP'
2632:
2633: CURSOR curr_counter_val_csr(p_unit_deferral_id IN NUMBER, p_counter_id IN NUMBER,p_deferral_effective_on IN DATE) IS
2634: SELECT NVL(net_reading, 0) FROM cs_ctr_counter_values_v ctrread, cs_counter_groups_v ctrgrp,
2635: -- AHL_UNIT_EFFECTIVITIES_APP_V UE,AHL_UNIT_DEFERRALS_B UD
2636: AHL_UNIT_EFFECTIVITIES_B UE,AHL_UNIT_DEFERRALS_B UD -- Undid app usage related blind changes
2637: WHERE ctrread.VALUE_TIMESTAMP <= p_deferral_effective_on
2638: AND ctrread.counter_group_id = ctrgrp.counter_group_id
2639: AND SOURCE_OBJECT_CODE = 'CP'
2640: AND SOURCE_OBJECT_ID = UE.csi_item_instance_id
3086: p_unit_effectivity_id IN NUMBER) RETURN BOOLEAN IS
3087:
3088:
3089: CURSOR status_code_csr(p_unit_effectivity_id IN NUMBER)IS
3090: SELECT approval_status_code FROM ahl_unit_deferrals_b
3091: WHERE unit_effectivity_id = p_unit_effectivity_id
3092: UNION
3093: SELECT approval_status_code FROM ahl_unit_deferrals_b
3094: WHERE unit_effectivity_id IN
3089: CURSOR status_code_csr(p_unit_effectivity_id IN NUMBER)IS
3090: SELECT approval_status_code FROM ahl_unit_deferrals_b
3091: WHERE unit_effectivity_id = p_unit_effectivity_id
3092: UNION
3093: SELECT approval_status_code FROM ahl_unit_deferrals_b
3094: WHERE unit_effectivity_id IN
3095: (
3096:
3097: /*SELECT ue_id
3204: END IF;
3205: RETURN;
3206: END IF;
3207:
3208: UPDATE ahl_unit_deferrals_b
3209: SET approval_status_code = p_new_status
3210: WHERE unit_deferral_id = p_unit_deferral_id
3211: AND object_version_number = p_object_version_number;--same transaction of caller API and update already happened
3212:
3231:
3232: CURSOR csi_item_instance_id_csr(p_unit_deferral_id IN NUMBER)
3233: --,p_object_version_number IN NUMBER)
3234: IS
3235: SELECT csi_item_instance_id FROM AHL_UNIT_EFFECTIVITIES_B UE, ahl_unit_deferrals_b UD
3236: WHERE UE.unit_effectivity_id = UD.unit_effectivity_id
3237: --AND UD.object_version_number = p_object_version_number
3238: AND UD.unit_deferral_id = p_unit_deferral_id;
3239:
3241:
3242: -- to check whether MR is not terminated already
3243: /*CURSOR valid_mr_csr(p_unit_deferral_id IN NUMBER,p_object_version_number IN NUMBER) IS
3244: SELECT 'x' from AHL_MR_HEADERS_APP_V mr, AHL_MR_HEADERS_APP_V def,
3245: ahl_unit_effectivities_b UE,ahl_unit_deferrals_b UD
3246: WHERE UD.unit_deferral_id = p_unit_deferral_id
3247: AND UD.object_version_number = p_object_version_number
3248: AND UE.unit_effectivity_id = UD.unit_effectivity_id
3249: AND def.mr_header_id = NVL(UE.mr_header_id,def.mr_header_id)
3352: RETURN;
3353: END IF;
3354:
3355: -- update unit_effectivity_status
3356: UPDATE ahl_unit_deferrals_b
3357: SET approval_status_code = 'DEFERRED',
3358: object_version_number = p_object_version_number + 1
3359: WHERE unit_deferral_id = p_unit_deferral_id
3360: AND object_version_number = p_object_version_number;
3645: END IF;
3646: RETURN;
3647: END IF;
3648:
3649: UPDATE ahl_unit_deferrals_b
3650: SET approval_status_code = p_new_status,
3651: object_version_number = p_object_version_number + 1
3652: WHERE unit_deferral_id = p_unit_deferral_id
3653: AND object_version_number = p_object_version_number;
3681: -- Added object_type to query
3682: CURSOR unit_effectivity_id_csr(p_unit_deferral_id IN NUMBER,
3683: p_object_version_number IN NUMBER)IS
3684: SELECT UD.unit_effectivity_id, ue.object_type
3685: from ahl_unit_deferrals_b UD, AHL_UNIT_EFFECTIVITIES_B UE
3686: WHERE NVL(UE.status_code,'x') NOT IN('ACCOMPLISHED','DEFERRED','EXCEPTION','TERMINATED','CANCELLED','MR-TERMINATE')
3687: AND UE.unit_effectivity_id = UD.unit_effectivity_id
3688: AND UD.object_version_number = p_object_version_number
3689: AND UD.unit_deferral_id = p_unit_deferral_id;
4270: x_return_status OUT NOCOPY VARCHAR2)IS
4271:
4272: -- to fetch unit effectivity id
4273: CURSOR unit_effectivity_id_csr(p_unit_deferral_id IN NUMBER,p_object_version_number IN NUMBER) IS
4274: SELECT UD.unit_effectivity_id from ahl_unit_deferrals_b UD
4275: WHERE UD.object_version_number = p_object_version_number
4276: AND UD.unit_deferral_id = p_unit_deferral_id;
4277:
4278: l_unit_effectivity_id NUMBER;
4835: FROM AHL_UNIT_EFFECTIVITIES_VL UE
4836: WHERE unit_effectivity_id = p_unit_effectivity_id;
4837:
4838: CURSOR redundant_deferral_ue_csr(p_unit_effectivity_id IN NUMBER) IS
4839: SELECT UD.unit_deferral_id FROM ahl_unit_deferrals_b UD
4840: WHERE UD.unit_deferral_type = 'DEFERRAL'
4841: AND UD.unit_effectivity_id IN (
4842: SELECT related_ue_id
4843: FROM AHL_UE_RELATIONSHIPS
5409: --------------------------------------------------------------------------------
5410: FUNCTION process_deferred_exceptions(p_unit_effectivity_id IN NUMBER) RETURN BOOLEAN IS
5411:
5412: CURSOR unit_deferral_csr(p_unit_effectivity_id IN NUMBER) IS
5413: SELECT UD.unit_deferral_id FROM ahl_unit_deferrals_b UD
5414: WHERE UD.unit_deferral_type = 'DEFERRAL'
5415: AND UD.unit_effectivity_id = p_unit_effectivity_id;
5416:
5417: l_unit_deferral_id NUMBER;
5439: IS
5440: CURSOR wo_exists_csr(p_unit_deferral_id IN NUMBER) IS
5441: /* -- fix for bug# 6849943 (FP for Bug # 6815689).
5442: SELECT 'x'
5443: FROM ahl_workorder_tasks_v wo, ahl_unit_deferrals_b udf
5444: WHERE wo.unit_effectivity_id = udf.unit_effectivity_id
5445: AND udf.unit_deferral_id = p_unit_deferral_id;
5446: */
5447:
5445: AND udf.unit_deferral_id = p_unit_deferral_id;
5446: */
5447:
5448: SELECT 'x'
5449: FROM ahl_workorders wo, ahl_unit_deferrals_b udf,
5450: ahl_visit_tasks_b vts, ahl_visits_b vst,
5451: (SELECT ORGANIZATION_ID
5452: FROM INV_ORGANIZATION_INFO_V
5453: WHERE NVL (operating_unit, mo_global.get_current_org_id()) = mo_global.get_current_org_id()) ORG