eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_VWP_RULES_PVT dependencies on AHL_WARRANTY_ENTL_PVT

Line 1242: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type; --salogan added for supplier warranty

1238: l_serial_id NUMBER;
1239: l_mr_id NUMBER;
1240: l_mr_route_id NUMBER;
1241: l_description ahl_routes_vl.remarks%TYPE; --Bug 5758813
1242: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type; --salogan added for supplier warranty
1243: l_stage_id NUMBER; --VWP ER-12424063 tchimira :: 17-FEB -2011
1244: -- SKPATHAK :: 02-MAY-2011 :: VWPE
1245: l_stage_type_code VARCHAR2(30);
1246: l_return_to_supply_flag VARCHAR2(1);

Line 1537: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');

1533:
1534: IF (l_log_statement >= l_log_current_level) THEN
1535: fnd_log.string(l_log_statement,
1536: L_DEBUG_KEY,
1537: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
1538: END IF;
1539:
1540: -- calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements
1541: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

Line 1540: -- calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements

1536: L_DEBUG_KEY,
1537: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
1538: END IF;
1539:
1540: -- calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements
1541: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
1542: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
1543: p_x_warranty_entl_tbl => l_entl_rec_tbl,
1544: x_return_status => l_return_status,

Line 1541: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

1537: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
1538: END IF;
1539:
1540: -- calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements
1541: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
1542: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
1543: p_x_warranty_entl_tbl => l_entl_rec_tbl,
1544: x_return_status => l_return_status,
1545: x_msg_count => l_msg_count,

Line 1542: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

1538: END IF;
1539:
1540: -- calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements
1541: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
1542: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
1543: p_x_warranty_entl_tbl => l_entl_rec_tbl,
1544: x_return_status => l_return_status,
1545: x_msg_count => l_msg_count,
1546: x_msg_data => l_msg_data);

Line 1551: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||

1547:
1548: IF (l_log_statement >= l_log_current_level) THEN
1549: fnd_log.string(l_log_statement,
1550: L_DEBUG_KEY,
1551: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
1552: l_return_status);
1553: END IF;
1554:
1555: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 3803: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

3799: -- Pre-reqs :
3800: -- Parameters : p_task_id IN NUMBER Required : Visit Task id
3801: -- : p_instance_id IN NUMBER Required : Instance id
3802: -- : p_service_req_id IN NUMBER
3803: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
3804: --
3805: -- End of Comments
3806:
3807: PROCEDURE Get_Warranty_Rec_for_Create(

Line 3811: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

3807: PROCEDURE Get_Warranty_Rec_for_Create(
3808: p_task_id IN NUMBER,
3809: p_instance_id IN NUMBER,
3810: p_service_req_id IN NUMBER := NULL,
3811: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
3812: ) IS
3813: -- Standard variables
3814: L_API_NAME CONSTANT VARCHAR2(30) := 'Get_Warranty_Rec_for_Create';
3815: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;

Line 3824: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;

3820: l_warranty_entl_id NUMBER := null;
3821: l_task_type VARCHAR2(20):= null;
3822: l_ovn NUMBER;
3823: l_dummy VARCHAR2(1);
3824: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;
3825:
3826: -- Cursors defined for the procedure
3827: --cursor to fetch the visit task type code
3828: CURSOR c_task_type (c_task_id IN NUMBER) IS

Line 3903: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;

3899: IF(c_get_entl_for_NR_task%FOUND) THEN
3900: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
3901: l_entitlement_rec.visit_task_id := p_task_id;
3902: l_entitlement_rec.object_version_number := l_ovn;
3903: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
3904: ELSE
3905: --Store the attributes in Entitlements Record
3906: OPEN c_is_planned_SR_task(p_task_id);
3907: FETCH c_is_planned_SR_task into l_dummy;

Line 3912: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;

3908: IF(c_is_planned_SR_task%FOUND) THEN
3909: l_entitlement_rec.sr_incident_id := p_service_req_id;
3910: END IF;
3911: CLOSE c_is_planned_SR_task;
3912: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;
3913:
3914: --Donot Store the task id in Entitlements Record if service req id is not null
3915: --and task type is summary as these are Non Routine MR's (Summary tasks) and
3916: --these entitlemet records will be deleted on push to production

Line 3930: IF(AHL_WARRANTY_ENTL_PVT.is_task_warranty_available(p_task_id) = 'Y') THEN -- Task warranty Enabled

3926: l_entitlement_rec.visit_task_id := p_task_id;
3927: END IF;
3928:
3929: --Auto match contract
3930: IF(AHL_WARRANTY_ENTL_PVT.is_task_warranty_available(p_task_id) = 'Y') THEN -- Task warranty Enabled
3931: OPEN c_mr_template(p_task_id);
3932: FETCH c_mr_template into l_mr_template; -- Fetch the warranty template id at the MR level
3933: IF(c_mr_template%FOUND) THEN -- If the warranty template id at the MR level is found
3934: OPEN c_match_contract(p_instance_id, l_mr_template);

Line 4004: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

4000: -- Type : Public
4001: -- Function : To get the set warranty entitlement record (table type) for task updation
4002: -- Pre-reqs :
4003: -- Parameters : p_task_rec IN AHL_VWP_RULES_PVT.Task_Rec_Type Required : Visit Task id
4004: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
4005: --
4006: -- End of Comments
4007:
4008: PROCEDURE Get_Warranty_Rec_for_Update(

Line 4010: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

4006: -- End of Comments
4007:
4008: PROCEDURE Get_Warranty_Rec_for_Update(
4009: p_task_rec IN AHL_VWP_RULES_PVT.Task_Rec_Type,
4010: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
4011: ) IS
4012: -- Standard variables
4013: L_API_NAME CONSTANT VARCHAR2(30) := 'Get_Warranty_Rec_for_Update';
4014: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;

Line 4026: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;

4022: l_old_contract_num NUMBER := null;
4023: l_old_entl_status VARCHAR2(20) := 'NOT_APPLICABLE';
4024: l_ovn NUMBER;
4025: l_dummy VARCHAR2(1);
4026: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;
4027: i NUMBER := 1;
4028:
4029: -- Cursors defined for the procedure
4030: --cursor to fetch the visit task type code

Line 4162: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;

4158:
4159: IF(p_task_rec.warranty_entitlement_id is not null) THEN -- Entitlements Record Already Exists UPDATE
4160: l_entitlement_rec.warranty_entitlement_id := p_task_rec.warranty_entitlement_id;
4161: l_entitlement_rec.object_version_number := l_ovn;
4162: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
4163: ELSE -- CREATE Entitlement record
4164: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;
4165: END IF;
4166: --Adding the first record to the OUT param table type

Line 4164: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;

4160: l_entitlement_rec.warranty_entitlement_id := p_task_rec.warranty_entitlement_id;
4161: l_entitlement_rec.object_version_number := l_ovn;
4162: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
4163: ELSE -- CREATE Entitlement record
4164: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;
4165: END IF;
4166: --Adding the first record to the OUT param table type
4167: x_warranty_entl_tbl(0) := l_entitlement_rec;
4168:

Line 4183: IF (AHL_WARRANTY_ENTL_PVT.Is_Task_Warranty_Available (p_task_rec.visit_task_id) = 'Y') THEN

4179:
4180: -- Handling the child task cascading for summary task
4181: -- MANESING::Component Maintenance Planning Project, 07-Aug-2011, call API instead of using flag
4182: --IF(p_task_rec.task_warranty = 'Y') THEN -- If Task warranty enabled
4183: IF (AHL_WARRANTY_ENTL_PVT.Is_Task_Warranty_Available (p_task_rec.visit_task_id) = 'Y') THEN
4184: OPEN c_task_type(p_task_rec.visit_task_id);
4185: FETCH c_task_type into l_task_type;
4186: CLOSE c_task_type;
4187: IF(l_task_type = 'SUMMARY') THEN -- If the Task type is Summary

Line 4202: x_warranty_entl_tbl(i).operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;

4198: FETCH c_entitlements_exists into l_warranty_entl_id, l_ovn;
4199: IF(c_entitlements_exists%FOUND) THEN -- if exists then set update flag else create flag / store it in OUT param
4200: x_warranty_entl_tbl(i).warranty_entitlement_id := l_warranty_entl_id;
4201: x_warranty_entl_tbl(i).object_version_number := l_ovn;
4202: x_warranty_entl_tbl(i).operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
4203: ELSE
4204: x_warranty_entl_tbl(i).operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;
4205: END IF;
4206: CLOSE c_entitlements_exists;

Line 4204: x_warranty_entl_tbl(i).operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;

4200: x_warranty_entl_tbl(i).warranty_entitlement_id := l_warranty_entl_id;
4201: x_warranty_entl_tbl(i).object_version_number := l_ovn;
4202: x_warranty_entl_tbl(i).operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
4203: ELSE
4204: x_warranty_entl_tbl(i).operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;
4205: END IF;
4206: CLOSE c_entitlements_exists;
4207: i := i+1;
4208: END LOOP;

Line 4587: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type;

4583: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;
4584: l_return_status VARCHAR2(1);
4585: l_msg_data VARCHAR2(2000);
4586: l_task_tbl AHL_VWP_RULES_PVT.Task_Tbl_Type := p_task_tbl;
4587: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type;
4588: l_msg_count NUMBER;
4589:
4590: CURSOR c_warranty_record (p_task_id IN NUMBER)
4591: IS

Line 4602: AHL_WARRANTY_ENTL_PVT.IS_TASK_WARRANTY_AVAILABLE(ATSK.VISIT_TASK_ID) TASK_WARRANTY,

4598: ASWE.ENTITLEMENT_STATUS_CODE,
4599: AWCL.CLAIM_NAME,
4600: LKUP2.MEANING CLAIM_STATUS,
4601: AWCL.CLAIM_STATUS_CODE,
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,

Line 4678: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');

4674:
4675: IF (l_log_statement >= l_log_current_level) THEN
4676: fnd_log.string(l_log_statement,
4677: L_DEBUG_KEY,
4678: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
4679: END IF;
4680:
4681: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
4682: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 4681: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

4677: L_DEBUG_KEY,
4678: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
4679: END IF;
4680:
4681: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
4682: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
4683: p_x_warranty_entl_tbl => l_entl_rec_tbl,
4684: x_return_status => l_return_status,
4685: x_msg_count => l_msg_count,

Line 4682: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

4678: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
4679: END IF;
4680:
4681: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
4682: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
4683: p_x_warranty_entl_tbl => l_entl_rec_tbl,
4684: x_return_status => l_return_status,
4685: x_msg_count => l_msg_count,
4686: x_msg_data => l_msg_data);

Line 4691: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||

4687:
4688: IF (l_log_statement >= l_log_current_level) THEN
4689: fnd_log.string(l_log_statement,
4690: L_DEBUG_KEY,
4691: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
4692: l_return_status);
4693: END IF;
4694:
4695: l_msg_count := Fnd_Msg_Pub.count_msg;