DBA Data[Home] [Help]

APPS.AHL_VWP_TASKS_PVT dependencies on AHL_WARRANTY_ENTL_PVT

Line 217: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

213:
214: --salogan added the following for supplier warranty starts
215: PROCEDURE Get_Entl_rec_for_Delete(
216: p_task_id IN NUMBER,
217: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
218: );
219: --salogan added the following for supplier warranty ends
220:
221: -- VWPE 12730539:: PRAKKUM :: 26-JUL-2011 :: start

Line 957: AHL_WARRANTY_ENTL_PVT.IS_TASK_WARRANTY_AVAILABLE(ATSK.VISIT_TASK_ID) TASK_WARRANTY_FLAG,

953: ASWE.ENTITLEMENT_STATUS_CODE,
954: AWCL.CLAIM_NAME,
955: LKUP2.MEANING CLAIM_STATUS,
956: AWCL.CLAIM_STATUS_CODE,
957: AHL_WARRANTY_ENTL_PVT.IS_TASK_WARRANTY_AVAILABLE(ATSK.VISIT_TASK_ID) TASK_WARRANTY_FLAG,
958: AHL_WARRANTY_CONTRACTS_PVT.IS_INSTANCE_WARRANTY_AVAILABLE(ATSK.INSTANCE_ID) INSTANCE_WARRANTY_FLAG,
959: NVL2(TO_NUMBER(ASWE.WARRANTY_ENTITLEMENT_ID)
960: , DECODE(ASWE.ENTITLEMENT_STATUS_CODE, 'NOT_APPLICABLE', 'Y', 'N')
961: , 'Y') WARRANTY_NOT_APPL_FLAG

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

1858: l_service_id NUMBER;
1859: l_cost_parent_id NUMBER;
1860: l_originating_task_id NUMBER;
1861: l_department_id NUMBER;
1862: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type; --salogan added for supplier warranty
1863:
1864: -- To find visit related information
1865: CURSOR c_visit(x_id IN NUMBER) IS
1866: SELECT * FROM AHL_VISITS_VL

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

2436:
2437: IF (l_log_statement >= l_log_current_level) THEN
2438: fnd_log.string(l_log_statement,
2439: L_DEBUG_KEY,
2440: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
2441: END IF;
2442:
2443: --Not passing p_commit the main API commits the data at the end
2444: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

Line 2444: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

2440: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
2441: END IF;
2442:
2443: --Not passing p_commit the main API commits the data at the end
2444: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
2445: p_api_version => l_api_version,
2446: p_validation_level => p_validation_level,
2447: p_module_type => p_module_type,
2448: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 2448: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

2444: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
2445: p_api_version => l_api_version,
2446: p_validation_level => p_validation_level,
2447: p_module_type => p_module_type,
2448: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
2449: p_x_warranty_entl_tbl => l_entl_rec_tbl,
2450: x_return_status => l_return_status,
2451: x_msg_count => l_msg_count,
2452: x_msg_data => l_msg_data);

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

2453:
2454: IF (l_log_statement >= l_log_current_level) THEN
2455: fnd_log.string(l_log_statement,
2456: L_DEBUG_KEY,
2457: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
2458: l_return_status);
2459: END IF;
2460:
2461: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 2653: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type;

2649: l_cost_parent_id NUMBER;
2650: l_originating_task_id NUMBER;
2651: l_department_id NUMBER;
2652: --salogan added the following for supplier warranty
2653: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type;
2654:
2655: -- To find visit related information
2656: CURSOR c_visit(x_id IN NUMBER) IS
2657: SELECT * FROM AHL_VISITS_VL

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

3158:
3159: IF (l_log_statement >= l_log_current_level) THEN
3160: fnd_log.string(l_log_statement,
3161: L_DEBUG_KEY,
3162: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
3163: END IF;
3164:
3165: --Not passing p_commit the main API commits the data at the end
3166: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

Line 3166: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

3162: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
3163: END IF;
3164:
3165: --Not passing p_commit the main API commits the data at the end
3166: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3167: p_api_version => l_api_version,
3168: p_validation_level => p_validation_level,
3169: p_module_type => p_module_type,
3170: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 3170: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

3166: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
3167: p_api_version => l_api_version,
3168: p_validation_level => p_validation_level,
3169: p_module_type => p_module_type,
3170: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
3171: p_x_warranty_entl_tbl => l_entl_rec_tbl,
3172: x_return_status => l_return_status,
3173: x_msg_count => l_msg_count,
3174: x_msg_data => l_msg_data);

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

3175:
3176: IF (l_log_statement >= l_log_current_level) THEN
3177: fnd_log.string(l_log_statement,
3178: L_DEBUG_KEY,
3179: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
3180: l_return_status);
3181: END IF;
3182:
3183: l_msg_count := Fnd_Msg_Pub.count_msg;

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

4631: l_cost_parent_id NUMBER;
4632: l_originating_task_id NUMBER;
4633: l_department_id NUMBER;
4634: l_planned_order_flag VARCHAR2(1);
4635: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type; --salogan added for supplier warranty
4636:
4637: -- To find task related information
4638: CURSOR c_Task (x_id IN NUMBER) IS
4639: SELECT * FROM Ahl_Visit_Tasks_VL

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

5079:
5080: IF (l_log_statement >= l_log_current_level) THEN
5081: fnd_log.string(l_log_statement,
5082: L_DEBUG_KEY,
5083: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
5084: END IF;
5085:
5086: --Not passing p_commit the main API commits the data at the end
5087: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

Line 5087: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

5083: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
5084: END IF;
5085:
5086: --Not passing p_commit the main API commits the data at the end
5087: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
5088: p_api_version => l_api_version,
5089: p_validation_level => p_validation_level,
5090: p_module_type => p_module_type,
5091: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 5091: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

5087: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
5088: p_api_version => l_api_version,
5089: p_validation_level => p_validation_level,
5090: p_module_type => p_module_type,
5091: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
5092: p_x_warranty_entl_tbl => l_entl_rec_tbl,
5093: x_return_status => l_return_status,
5094: x_msg_count => l_msg_count,
5095: x_msg_data => l_msg_data);

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

5096:
5097: IF (l_log_statement >= l_log_current_level) THEN
5098: fnd_log.string(l_log_statement,
5099: L_DEBUG_KEY,
5100: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
5101: l_return_status);
5102: END IF;
5103:
5104: l_msg_count := Fnd_Msg_Pub.count_msg;

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

5287: l_serial_ID NUMBER;
5288: l_cost_parent_id NUMBER;
5289: l_originating_task_id NUMBER;
5290: l_department_id NUMBER;
5291: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type; --salogan added for supplier warranty
5292:
5293: -- To find task related information
5294: CURSOR c_Task (x_id IN NUMBER) IS
5295: SELECT * FROM Ahl_Visit_Tasks_VL

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

5726:
5727: IF (l_log_statement >= l_log_current_level) THEN
5728: fnd_log.string(l_log_statement,
5729: L_DEBUG_KEY,
5730: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
5731: END IF;
5732:
5733: --Not passing p_commit the main API commits the data at the end
5734: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

Line 5734: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

5730: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
5731: END IF;
5732:
5733: --Not passing p_commit the main API commits the data at the end
5734: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
5735: p_api_version => l_api_version,
5736: p_validation_level => p_validation_level,
5737: p_module_type => p_module_type,
5738: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 5738: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

5734: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
5735: p_api_version => l_api_version,
5736: p_validation_level => p_validation_level,
5737: p_module_type => p_module_type,
5738: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
5739: p_x_warranty_entl_tbl => l_entl_rec_tbl,
5740: x_return_status => l_return_status,
5741: x_msg_count => l_msg_count,
5742: x_msg_data => l_msg_data);

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

5743:
5744: IF (l_log_statement >= l_log_current_level) THEN
5745: fnd_log.string(l_log_statement,
5746: L_DEBUG_KEY,
5747: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
5748: l_return_status);
5749: END IF;
5750:
5751: l_msg_count := Fnd_Msg_Pub.count_msg;

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

6459: l_workorder_rec AHL_PRD_WORKORDER_PVT.PRD_WORKORDER_REC;
6460: l_workoper_tbl AHL_PRD_WORKORDER_PVT.PRD_WORKOPER_TBL;
6461: l_wip_load_flag VARCHAR2(1):= 'Y';
6462: l_workorder_present VARCHAR2(1);
6463: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type; --salogan added for supplier warranty
6464:
6465: BEGIN
6466: IF (l_log_procedure >= l_log_current_level) THEN
6467: fnd_log.string(l_log_procedure,

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

6720: x_warranty_entl_tbl => l_entl_rec_tbl);
6721: IF (l_log_statement >= l_log_current_level) THEN
6722: fnd_log.string(l_log_statement,
6723: L_DEBUG_KEY,
6724: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
6725: END IF;
6726:
6727: --Not passing p_commit the main API commits the data at the end
6728: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

Line 6728: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

6724: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
6725: END IF;
6726:
6727: --Not passing p_commit the main API commits the data at the end
6728: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
6729: p_api_version => p_api_version,
6730: p_validation_level => p_validation_level,
6731: p_module_type => p_module_type,
6732: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 6732: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

6728: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
6729: p_api_version => p_api_version,
6730: p_validation_level => p_validation_level,
6731: p_module_type => p_module_type,
6732: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
6733: p_x_warranty_entl_tbl => l_entl_rec_tbl,
6734: x_return_status => l_return_status,
6735: x_msg_count => l_msg_count,
6736: x_msg_data => l_msg_data);

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

6737:
6738: IF (l_log_statement >= l_log_current_level) THEN
6739: fnd_log.string(l_log_statement,
6740: L_DEBUG_KEY,
6741: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
6742: l_return_status);
6743: END IF;
6744:
6745: l_msg_count := Fnd_Msg_Pub.count_msg;

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

6847:
6848: l_return_status VARCHAR2(1);
6849: l_workorder_present VARCHAR2(1) := 'N';
6850: l_planned_order_flag VARCHAR2(1);
6851: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type; --salogan added for supplier warranty
6852:
6853: -- To find all tasks related information
6854: CURSOR c_Task (x_id IN NUMBER) IS
6855: SELECT *

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

7187:
7188: IF (l_log_statement >= l_log_current_level) THEN
7189: fnd_log.string(l_log_statement,
7190: L_DEBUG_KEY,
7191: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
7192: END IF;
7193:
7194: --Not passing p_commit the main API commits the data at the end
7195: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

Line 7195: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

7191: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
7192: END IF;
7193:
7194: --Not passing p_commit the main API commits the data at the end
7195: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
7196: p_api_version => p_api_version,
7197: p_validation_level => p_validation_level,
7198: p_module_type => p_module_type,
7199: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 7199: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

7195: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
7196: p_api_version => p_api_version,
7197: p_validation_level => p_validation_level,
7198: p_module_type => p_module_type,
7199: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
7200: p_x_warranty_entl_tbl => l_entl_rec_tbl,
7201: x_return_status => l_return_status,
7202: x_msg_count => l_msg_count,
7203: x_msg_data => l_msg_data);

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

7204:
7205: IF (l_log_statement >= l_log_current_level) THEN
7206: fnd_log.string(l_log_statement,
7207: L_DEBUG_KEY,
7208: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
7209: l_return_status);
7210: END IF;
7211:
7212: l_msg_count := Fnd_Msg_Pub.count_msg;

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

7358: l_workorder_present VARCHAR2(1) := 'N';
7359: l_planned_order_flag VARCHAR2(1);
7360: l_task_type VARCHAR2(80);
7361: l_unit_effectivity_id NUMBER;
7362: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type; --salogan added for supplier warranty
7363:
7364: -- To find all tasks related information
7365: CURSOR c_Task (x_id IN NUMBER) IS
7366: SELECT *

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

7832:
7833: IF (l_log_statement >= l_log_current_level) THEN
7834: fnd_log.string(l_log_statement,
7835: L_DEBUG_KEY,
7836: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
7837: END IF;
7838:
7839: --Not passing p_commit the main API commits the data at the end
7840: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

Line 7840: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

7836: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
7837: END IF;
7838:
7839: --Not passing p_commit the main API commits the data at the end
7840: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
7841: p_api_version => p_api_version,
7842: p_validation_level => p_validation_level,
7843: p_module_type => p_module_type,
7844: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 7844: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

7840: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
7841: p_api_version => p_api_version,
7842: p_validation_level => p_validation_level,
7843: p_module_type => p_module_type,
7844: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
7845: p_x_warranty_entl_tbl => l_entl_rec_tbl,
7846: x_return_status => l_return_status,
7847: x_msg_count => l_msg_count,
7848: x_msg_data => l_msg_data);

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

7849:
7850: IF (l_log_statement >= l_log_current_level) THEN
7851: fnd_log.string(l_log_statement,
7852: L_DEBUG_KEY,
7853: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
7854: l_return_status);
7855: END IF;
7856:
7857: l_msg_count := Fnd_Msg_Pub.count_msg;

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

8087:
8088: IF (l_log_statement >= l_log_current_level) THEN
8089: fnd_log.string(l_log_statement,
8090: L_DEBUG_KEY,
8091: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
8092: END IF;
8093:
8094: --Not passing p_commit the main API commits the data at the end
8095: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

Line 8095: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(

8091: 'Before calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements.');
8092: END IF;
8093:
8094: --Not passing p_commit the main API commits the data at the end
8095: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
8096: p_api_version => p_api_version,
8097: p_validation_level => p_validation_level,
8098: p_module_type => p_module_type,
8099: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

Line 8099: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,

8095: AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements(
8096: p_api_version => p_api_version,
8097: p_validation_level => p_validation_level,
8098: p_module_type => p_module_type,
8099: p_user_role => AHL_WARRANTY_ENTL_PVT.G_USER_PLANNER,
8100: p_x_warranty_entl_tbl => l_entl_rec_tbl,
8101: x_return_status => l_return_status,
8102: x_msg_count => l_msg_count,
8103: x_msg_data => l_msg_data);

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

8104:
8105: IF (l_log_statement >= l_log_current_level) THEN
8106: fnd_log.string(l_log_statement,
8107: L_DEBUG_KEY,
8108: 'After calling AHL_WARRANTY_ENTL_PVT.Process_Warranty_Entitlements. Return Status = ' ||
8109: l_return_status);
8110: END IF;
8111:
8112: l_msg_count := Fnd_Msg_Pub.count_msg;

Line 9854: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

9850: -- Type : Private
9851: -- Function : To delete the corresponding entitlement record from the Visit Task.
9852: -- Pre-reqs :
9853: -- Parameters : p_task_id IN NUMBER
9854: -- : x_warranty_entl_tbl OUT AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
9855: --
9856: -- End of Comments
9857:
9858: PROCEDURE Get_Entl_rec_for_Delete(

Line 9860: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type

9856: -- End of Comments
9857:
9858: PROCEDURE Get_Entl_rec_for_Delete(
9859: p_task_id IN NUMBER,
9860: x_warranty_entl_tbl OUT NOCOPY AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type
9861: ) IS
9862: -- Standard variables
9863: L_API_NAME CONSTANT VARCHAR2(30) := 'Get_Entl_rec_for_Delete';
9864: L_DEBUG_KEY CONSTANT VARCHAR2(100) := 'ahl.plsql.' || G_PKG_NAME || '.' || L_API_NAME;

Line 9869: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;

9865: -- Local variables defined for the procedure
9866: l_warranty_entl_id NUMBER := null;
9867: l_sr_incident_id NUMBER := null;
9868: l_ovn NUMBER;
9869: l_entitlement_rec AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Rec_Type;
9870:
9871: -- Cursors defined for the procedure
9872: -- Cursor to fetch entitlemet details
9873: CURSOR c_get_warranty_entl_id (c_task_id IN NUMBER) IS

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

9899:
9900: IF(l_warranty_entl_id IS NOT NULL) THEN --warranty entitlement exists
9901: IF(l_sr_incident_id IS NULL) THEN
9902: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
9903: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_DELETE;
9904: ELSE
9905: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
9906: l_entitlement_rec.visit_task_id := FND_API.G_MISS_NUM;
9907: l_entitlement_rec.object_version_number := l_ovn;

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

9904: ELSE
9905: l_entitlement_rec.warranty_entitlement_id := l_warranty_entl_id;
9906: l_entitlement_rec.visit_task_id := FND_API.G_MISS_NUM;
9907: l_entitlement_rec.object_version_number := l_ovn;
9908: l_entitlement_rec.operation_flag := AHL_WARRANTY_ENTL_PVT.G_OP_UPDATE;
9909: END IF;
9910: x_warranty_entl_tbl(0) := l_entitlement_rec;
9911: END IF;
9912:

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

10352: l_workorder_rec AHL_PRD_WORKORDER_PVT.PRD_WORKORDER_REC;
10353: l_workoper_tbl AHL_PRD_WORKORDER_PVT.PRD_WORKOPER_TBL;
10354: l_wip_load_flag VARCHAR2(1):= 'Y';
10355: l_workorder_present VARCHAR2(1);
10356: l_entl_rec_tbl AHL_WARRANTY_ENTL_PVT.Warranty_Entl_Tbl_Type; --salogan added for supplier warranty
10357:
10358: BEGIN
10359: IF (l_log_procedure >= l_log_current_level) THEN
10360: fnd_log.string(l_log_procedure,