[Home] [Help]
3857:
3858: --cursor to fetch warranty entitlement id for a given SR Id
3859: CURSOR c_get_entl_for_NR_task (c_sr_incident_id IN NUMBER) IS
3860: SELECT AWE.WARRANTY_ENTITLEMENT_ID,AWE.OBJECT_VERSION_NUMBER
3861: FROM AHL_WARRANTY_ENTITLEMENTS AWE ,AHL_VISIT_TASKS_B ATSK
3862: WHERE ATSK.SERVICE_REQUEST_ID = AWE.SR_INCIDENT_ID
3863: AND ATSK.TASK_TYPE_CODE = 'PLANNED'
3864: AND ATSK.MR_ROUTE_ID IS NULL
3865: AND AWE.VISIT_TASK_ID IS NULL
4036: --cursor to fetch the old entitlemet record from DB for the task
4037: CURSOR c_old_entitlement_rec (c_task_id IN NUMBER) IS
4038: SELECT AWCB.WARRANTY_CONTRACT_ID, AWCB.CONTRACT_NUMBER
4039: , AWSE.ENTITLEMENT_STATUS_CODE, AWSE.OBJECT_VERSION_NUMBER
4040: FROM AHL_WARRANTY_ENTITLEMENTS AWSE, AHL_WARRANTY_CONTRACTS_B AWCB
4041: WHERE AWSE.WARRANTY_CONTRACT_ID = AWCB.WARRANTY_CONTRACT_ID(+)
4042: AND AWSE.VISIT_TASK_ID = c_task_id;
4043:
4044: --cursor to fetch active contract id using contract number
4050:
4051: --cursor to check if a record exists in the entitlements for the given work order
4052: CURSOR c_entitlements_exists(c_task_id NUMBER) IS
4053: SELECT WARRANTY_ENTITLEMENT_ID, OBJECT_VERSION_NUMBER
4054: FROM AHL_WARRANTY_ENTITLEMENTS
4055: WHERE VISIT_TASK_ID = c_task_id;
4056:
4057: --cursor to fetch non summary child tasks
4058: CURSOR c_child_tasks(c_task_id NUMBER) IS
4602: AHL_WARRANTY_ENTL_PVT.IS_TASK_WARRANTY_AVAILABLE(ATSK.VISIT_TASK_ID) TASK_WARRANTY,
4603: AHL_WARRANTY_CONTRACTS_PVT.IS_INSTANCE_WARRANTY_AVAILABLE(ATSK.INSTANCE_ID) INSTANCE_WARRANTY,
4604: 'Y' WARRANTY_NOT_APPL_FLAG
4605: FROM AHL_VISIT_TASKS_B ATSK,
4606: AHL_WARRANTY_ENTITLEMENTS ASWE,
4607: AHL_WARRANTY_CLAIMS_B AWCL,
4608: AHL_WARRANTY_CONTRACTS_B AWCB,
4609: FND_LOOKUP_VALUES_VL LKUP1,
4610: FND_LOOKUP_VALUES_VL LKUP2