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_OSP_ORDERS_PVT dependencies on AHL_WARRANTY_ENTL_PVT

Line 275: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type,

271:
272: --salogan added the following for supplier warranty starts
273: PROCEDURE Get_Warranty_Rec_for_Create(
274: p_x_osp_order_line_rec IN osp_order_line_rec_type,
275: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type,
276: x_call_process_entl OUT NOCOPY VARCHAR2
277: );
278:
279: PROCEDURE Get_Warranty_Rec_for_Update(

Line 281: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type,

277: );
278:
279: PROCEDURE Get_Warranty_Rec_for_Update(
280: p_x_osp_order_line_rec IN osp_order_line_rec_type,
281: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type,
282: x_call_process_entl OUT NOCOPY VARCHAR2
283: );
284:
285: PROCEDURE Get_Entl_rec_for_Delete(

Line 288: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

284:
285: PROCEDURE Get_Entl_rec_for_Delete(
286: p_osp_order_id IN NUMBER := null,
287: p_osp_order_line_id IN NUMBER := null,
288: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
289: );
290: --salogan added the following for supplier warranty ends
291:
292: PROCEDURE convert_order_header_val_to_id(

Line 3470: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type;

3466: l_header_site_id NUMBER;
3467: i NUMBER;
3468: --salogan added for supplier warranty starts
3469: l_call_process_entl VARCHAR2(1);
3470: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type;
3471: --salogan added for supplier warranty ends
3472:
3473: CURSOR get_order_lines(c_osp_order_id NUMBER) IS
3474: SELECT osp_order_line_id

Line 3587: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

3583: Get_Entl_rec_for_Delete(
3584: p_osp_order_line_id => p_x_osp_order_lines_tbl(i).osp_order_line_id,
3585: x_warranty_entl_tbl => l_entl_rec_tbl);
3586: --Not passing p_commit the main API commits the data at the end
3587: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3588: p_api_version => p_api_version,
3589: p_validation_level => p_validation_level,
3590: p_module_type => p_module_type,
3591: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 3591: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

3587: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3588: p_api_version => p_api_version,
3589: p_validation_level => p_validation_level,
3590: p_module_type => p_module_type,
3591: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
3592: p_x_warranty_entl_tbl => l_entl_rec_tbl,
3593: x_return_status => l_return_status,
3594: x_msg_count => l_msg_count,
3595: x_msg_data => l_msg_data);

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

3596:
3597: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3598: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3599: G_LOG_PREFIX||l_api_name,
3600: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
3601: l_return_status);
3602: END IF;
3603:
3604: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 3644: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Need to call ? ' || l_call_process_entl);

3640:
3641: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3642: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3643: G_LOG_PREFIX||l_api_name,
3644: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Need to call ? ' || l_call_process_entl);
3645: END IF;
3646:
3647: IF(l_call_process_entl = 'Y') THEN
3648: --Not passing p_commit the main API commits the data at the end

Line 3649: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

3645: END IF;
3646:
3647: IF(l_call_process_entl = 'Y') THEN
3648: --Not passing p_commit the main API commits the data at the end
3649: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3650: p_api_version => p_api_version,
3651: p_validation_level => p_validation_level,
3652: p_module_type => p_module_type,
3653: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 3653: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

3649: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3650: p_api_version => p_api_version,
3651: p_validation_level => p_validation_level,
3652: p_module_type => p_module_type,
3653: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
3654: p_x_warranty_entl_tbl => l_entl_rec_tbl,
3655: x_return_status => l_return_status,
3656: x_msg_count => l_msg_count,
3657: x_msg_data => l_msg_data);

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

3658:
3659: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3660: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3661: G_LOG_PREFIX||l_api_name,
3662: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
3663: l_return_status);
3664: END IF;
3665:
3666: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 3688: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Need to call ? ' || l_call_process_entl);

3684:
3685: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3686: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3687: G_LOG_PREFIX||l_api_name,
3688: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Need to call ? ' || l_call_process_entl);
3689: END IF;
3690:
3691: IF(l_call_process_entl = 'Y') THEN
3692: --Not passing p_commit the main API commits the data at the end

Line 3693: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

3689: END IF;
3690:
3691: IF(l_call_process_entl = 'Y') THEN
3692: --Not passing p_commit the main API commits the data at the end
3693: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3694: p_api_version => p_api_version,
3695: p_validation_level => p_validation_level,
3696: p_module_type => p_module_type,
3697: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_NONPLANNER,

Line 3697: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_NONPLANNER,

3693: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3694: p_api_version => p_api_version,
3695: p_validation_level => p_validation_level,
3696: p_module_type => p_module_type,
3697: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_NONPLANNER,
3698: p_x_warranty_entl_tbl => l_entl_rec_tbl,
3699: x_return_status => l_return_status,
3700: x_msg_count => l_msg_count,
3701: x_msg_data => l_msg_data);

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

3702:
3703: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3704: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3705: G_LOG_PREFIX||l_api_name,
3706: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
3707: l_return_status);
3708: END IF;
3709:
3710: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 3847: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

3843: p_osp_order_id => p_x_osp_order_rec.osp_order_id,
3844: x_warranty_entl_tbl => l_entl_rec_tbl);
3845:
3846: --Not passing p_commit the main API commits the data at the end
3847: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3848: p_api_version => p_api_version,
3849: p_validation_level => p_validation_level,
3850: p_module_type => p_module_type,
3851: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 3851: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

3847: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3848: p_api_version => p_api_version,
3849: p_validation_level => p_validation_level,
3850: p_module_type => p_module_type,
3851: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
3852: p_x_warranty_entl_tbl => l_entl_rec_tbl,
3853: x_return_status => l_return_status,
3854: x_msg_count => l_msg_count,
3855: x_msg_data => l_msg_data);

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

3856:
3857: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3858: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3859: G_LOG_PREFIX||l_api_name,
3860: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
3861: l_return_status);
3862: END IF;
3863:
3864: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 3940: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

3936: p_osp_order_line_id => p_x_osp_order_lines_tbl(i).osp_order_line_id,
3937: x_warranty_entl_tbl => l_entl_rec_tbl);
3938:
3939: --Not passing p_commit the main API commits the data at the end
3940: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3941: p_api_version => p_api_version,
3942: p_validation_level => p_validation_level,
3943: p_module_type => p_module_type,
3944: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 3944: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

3940: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3941: p_api_version => p_api_version,
3942: p_validation_level => p_validation_level,
3943: p_module_type => p_module_type,
3944: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
3945: p_x_warranty_entl_tbl => l_entl_rec_tbl,
3946: x_return_status => l_return_status,
3947: x_msg_count => l_msg_count,
3948: x_msg_data => l_msg_data);

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

3949:
3950: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3951: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3952: G_LOG_PREFIX||l_api_name,
3953: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
3954: l_return_status);
3955: END IF;
3956:
3957: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 3992: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Need to call ? ' || l_call_process_entl);

3988:
3989: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3990: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
3991: G_LOG_PREFIX||l_api_name,
3992: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Need to call ? ' || l_call_process_entl);
3993: END IF;
3994:
3995: IF(l_call_process_entl = 'Y') THEN
3996: --Not passing p_commit the main API commits the data at the end

Line 3997: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

3993: END IF;
3994:
3995: IF(l_call_process_entl = 'Y') THEN
3996: --Not passing p_commit the main API commits the data at the end
3997: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3998: p_api_version => p_api_version,
3999: p_validation_level => p_validation_level,
4000: p_module_type => p_module_type,
4001: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_NONPLANNER,

Line 4001: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_NONPLANNER,

3997: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3998: p_api_version => p_api_version,
3999: p_validation_level => p_validation_level,
4000: p_module_type => p_module_type,
4001: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_NONPLANNER,
4002: p_x_warranty_entl_tbl => l_entl_rec_tbl,
4003: x_return_status => l_return_status,
4004: x_msg_count => l_msg_count,
4005: x_msg_data => l_msg_data);

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

4006:
4007: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4008: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4009: G_LOG_PREFIX||l_api_name,
4010: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
4011: l_return_status);
4012: END IF;
4013:
4014: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 4039: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Need to call ? ' || l_call_process_entl);

4035:
4036: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4037: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4038: G_LOG_PREFIX||l_api_name,
4039: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Need to call ? ' || l_call_process_entl);
4040: END IF;
4041:
4042: IF(l_call_process_entl = 'Y') THEN
4043: --Not passing p_commit the main API commits the data at the end

Line 4044: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

4040: END IF;
4041:
4042: IF(l_call_process_entl = 'Y') THEN
4043: --Not passing p_commit the main API commits the data at the end
4044: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
4045: p_api_version => p_api_version,
4046: p_validation_level => p_validation_level,
4047: p_module_type => p_module_type,
4048: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 4048: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

4044: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
4045: p_api_version => p_api_version,
4046: p_validation_level => p_validation_level,
4047: p_module_type => p_module_type,
4048: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
4049: p_x_warranty_entl_tbl => l_entl_rec_tbl,
4050: x_return_status => l_return_status,
4051: x_msg_count => l_msg_count,
4052: x_msg_data => l_msg_data);

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

4053:
4054: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4055: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4056: G_LOG_PREFIX||l_api_name,
4057: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
4058: l_return_status);
4059: END IF;
4060:
4061: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 4156: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Need to call ? ' || l_call_process_entl);

4152:
4153: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4154: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4155: G_LOG_PREFIX||l_api_name,
4156: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Need to call ? ' || l_call_process_entl);
4157: END IF;
4158:
4159: IF(l_call_process_entl = 'Y') THEN
4160: --Not passing p_commit the main API commits the data at the end

Line 4161: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

4157: END IF;
4158:
4159: IF(l_call_process_entl = 'Y') THEN
4160: --Not passing p_commit the main API commits the data at the end
4161: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
4162: p_api_version => p_api_version,
4163: p_validation_level => p_validation_level,
4164: p_module_type => p_module_type,
4165: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 4165: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

4161: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
4162: p_api_version => p_api_version,
4163: p_validation_level => p_validation_level,
4164: p_module_type => p_module_type,
4165: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
4166: p_x_warranty_entl_tbl => l_entl_rec_tbl,
4167: x_return_status => l_return_status,
4168: x_msg_count => l_msg_count,
4169: x_msg_data => l_msg_data);

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

4170:
4171: IF(FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4172: FND_LOG.STRING(FND_LOG.LEVEL_EVENT,
4173: G_LOG_PREFIX||l_api_name,
4174: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
4175: l_return_status);
4176: END IF;
4177:
4178: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 7806: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

7802: -- Type : Private
7803: -- Function : To get the warranty entitlement record during OSP creation
7804: -- Pre-reqs :
7805: -- Parameters : p_x_osp_order_line_rec IN osp_order_line_rec_type Required
7806: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
7807: -- : x_call_process_entl OUT Detarmines the call to process entitlements
7808: --
7809: -- End of Comments
7810:

Line 7813: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type,

7809: -- End of Comments
7810:
7811: PROCEDURE Get_Warranty_Rec_for_Create(
7812: p_x_osp_order_line_rec IN osp_order_line_rec_type,
7813: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type,
7814: x_call_process_entl OUT NOCOPY VARCHAR2
7815: ) IS
7816: -- Standard variables
7817: L_API_NAME CONSTANT VARCHAR2(30) := 'Get_Warranty_Rec_for_Create';

Line 7825: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;

7821: l_contract_id NUMBER := FND_API.G_MISS_NUM;
7822: l_warranty_entl_id NUMBER;
7823: l_call_process_entl VARCHAR2(1) := 'Y';
7824: l_ovn NUMBER;
7825: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;
7826:
7827: -- Cursors defined for the procedure
7828: --Cursor to fetch the active contracts for the given item instance id
7829: CURSOR c_match_contract (c_instance_id IN NUMBER) IS

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

7868: END IF;
7869:
7870: --Store the osp order line id and operation flag in Entitlements Record
7871: l_entitlement_rec.osp_order_line_id := p_x_osp_order_line_rec.osp_order_line_id;
7872: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;
7873: --Store the return value that is validated before process entl API call
7874:
7875: --Auto match contract
7876: IF(p_x_osp_order_line_rec.workorder_id IS NULL) THEN -- Inventory Item based

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

7905: --set the entitlement id for update and the osp line id is already defauled to the record
7906: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
7907: l_entitlement_rec.object_version_number := l_ovn;
7908: --Overwrite the operation flag to update
7909: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
7910: ELSE
7911: l_call_process_entl := 'N';
7912: END IF;
7913: CLOSE c_get_entl_for_wo;

Line 7944: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

7940: -- Type : Private
7941: -- Function : To get the set warranty entitlement record (table type) for OSP updation
7942: -- Pre-reqs :
7943: -- Parameters : p_x_osp_order_line_rec IN osp_order_line_rec_type Required
7944: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
7945: -- : x_call_process_entl OUT Detarmines the call to process entitlements
7946: --
7947: -- End of Comments
7948:

Line 7951: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type,

7947: -- End of Comments
7948:
7949: PROCEDURE Get_Warranty_Rec_for_Update(
7950: p_x_osp_order_line_rec IN osp_order_line_rec_type,
7951: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type,
7952: x_call_process_entl OUT NOCOPY VARCHAR2
7953: ) IS
7954: -- Standard variables
7955: L_API_NAME CONSTANT VARCHAR2(30) := 'Get_Warranty_Rec_for_Update';

Line 7965: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;

7961: l_old_entl_status VARCHAR2(20) := 'NOT_APPLICABLE';
7962: l_task_type VARCHAR2(20) := null;
7963: l_call_process_entl VARCHAR2(1) := 'Y';
7964: l_ovn NUMBER;
7965: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;
7966:
7967: -- Cursors defined for the procedure
7968: --Cursor to fetch the entitlement values from DB
7969: CURSOR c_old_entitlement_rec (c_osp_order_line_id IN NUMBER) IS

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

8055:
8056: IF(p_x_osp_order_line_rec.warranty_entitlement_id is not null) THEN -- Entitlements Record Already Exists UPDATE
8057: l_entitlement_rec.warranty_entitlement_id := p_x_osp_order_line_rec.warranty_entitlement_id;
8058: l_entitlement_rec.object_version_number := l_ovn;
8059: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
8060: ELSIF(p_x_osp_order_line_rec.warranty_entitlement_id is null AND l_entl_status = 'APPROVAL_PENDING') THEN
8061: -- CREATE Entitlement record
8062: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;
8063: l_entitlement_rec.visit_task_id := FND_API.G_MISS_NUM;

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

8058: l_entitlement_rec.object_version_number := l_ovn;
8059: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
8060: ELSIF(p_x_osp_order_line_rec.warranty_entitlement_id is null AND l_entl_status = 'APPROVAL_PENDING') THEN
8061: -- CREATE Entitlement record
8062: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_CREATE;
8063: l_entitlement_rec.visit_task_id := FND_API.G_MISS_NUM;
8064: ELSE
8065: l_call_process_entl := 'N';
8066: END IF;

Line 8100: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

8096: -- Function : To delete/unnassociate the corresponding entitlement record from the OSP Order line.
8097: -- Pre-reqs :
8098: -- Parameters : p_osp_order_id IN NUMBER
8099: -- : p_osp_order_line_id IN NUMBER
8100: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
8101: --
8102: -- End of Comments
8103:
8104: PROCEDURE Get_Entl_rec_for_Delete(

Line 8107: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

8103:
8104: PROCEDURE Get_Entl_rec_for_Delete(
8105: p_osp_order_id IN NUMBER := null,
8106: p_osp_order_line_id IN NUMBER := null,
8107: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
8108: ) IS
8109: -- Standard variables
8110: L_API_NAME CONSTANT VARCHAR2(30) := 'Get_Entl_rec_for_Delete';
8111: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;

Line 8118: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;

8114: l_visit_task_id NUMBER := null;
8115: l_osp_line_id NUMBER := null;
8116: l_count NUMBER;
8117: l_ovn NUMBER;
8118: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;
8119:
8120: -- Cursors defined for the procedure
8121: --Cursor to get entitlement details
8122: CURSOR c_get_entl_details (c_osp_order_line_id IN NUMBER) IS

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

8158: IF(l_visit_task_id IS NOT NULL) THEN --entitlement based on visit
8159: l_entitlement_rec.osp_order_line_id := FND_API.G_MISS_NUM;
8160: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
8161: l_entitlement_rec.object_version_number := l_ovn;
8162: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
8163: ELSE --entitlement based on OSP
8164: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
8165: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_DELETE;
8166: END IF;

Line 8165: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_DELETE;

8161: l_entitlement_rec.object_version_number := l_ovn;
8162: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
8163: ELSE --entitlement based on OSP
8164: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
8165: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_DELETE;
8166: END IF;
8167: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8168: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
8169: L_DEBUG_KEY,

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

8189: IF(l_visit_task_id IS NOT NULL) THEN --entitlement based on visit
8190: l_entitlement_rec.osp_order_line_id := FND_API.G_MISS_NUM;
8191: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
8192: l_entitlement_rec.object_version_number := l_ovn;
8193: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
8194: ELSE --entitlement based on OSP
8195: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
8196: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_DELETE;
8197: END IF;

Line 8196: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_DELETE;

8192: l_entitlement_rec.object_version_number := l_ovn;
8193: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
8194: ELSE --entitlement based on OSP
8195: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
8196: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_DELETE;
8197: END IF;
8198: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8199: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
8200: L_DEBUG_KEY,