[Home] [Help]
3200: l_return_status VARCHAR2(1);
3201: l_msg_count NUMBER;
3202: l_msg_data VARCHAR2(200);
3203: l_estimate_line_id NUMBER;
3204: l_ro_sc_rec_type Csd_Ro_Service_Codes_Pvt.RO_SERVICE_CODE_REC_TYPE;
3205: l_obj_ver_number NUMBER;
3206: l_prev_ro_sc_id NUMBER;
3207: l_item_name VARCHAR2(40);
3208: l_warning_flag VARCHAR2(1) := Fnd_Api.G_FALSE;
3218:
3219: -- CURSORS --
3220: CURSOR c_ro_sc_obj_version(p_ro_service_code_id NUMBER) IS
3221: SELECT object_version_number
3222: FROM CSD_RO_SERVICE_CODES
3223: WHERE ro_service_code_id = p_ro_service_code_id;
3224:
3225: --bug#11902612
3226: CURSOR c_default_po(p_repair_line_id NUMBER) IS
3363: END IF;
3364: BEGIN
3365: SELECT COUNT(*)
3366: INTO l_num_service_codes
3367: FROM CSD_RO_SERVICE_CODES
3368: WHERE repair_line_id = p_repair_line_id
3369: AND NVL(applicable_flag, 'N') = 'Y'
3370: AND NVL(applied_to_est_flag, 'N') = 'N';
3371: -- Commented for bugfix 3473869.vkjain.
3655: -- 'x_return_status = '||l_return_status);
3656: END IF;
3657:
3658: -- If SC have been applied to create estimate lines successfully,
3659: -- make sure to update CSD_RO_SERVICE_CODES table with the value `Y' for the
3660: -- column that indicates `applied to estimates'.
3661: IF (l_return_status = Fnd_Api.G_RET_STS_SUCCESS)
3662: THEN
3663: -- if previous ro_sc_id is same as current, no need to update
3694: Fnd_Log.G_Current_Runtime_Level)
3695: THEN
3696: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
3697: lc_mod_name,
3698: 'Calling CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
3699: END IF;
3700: Csd_Ro_Service_Codes_Pvt.Update_RO_Service_Code(p_api_version => 1.0,
3701: p_commit => Fnd_Api.G_FALSE,
3702: p_init_msg_list => Fnd_Api.G_FALSE,
3696: Fnd_Log.STRING(Fnd_Log.Level_Procedure,
3697: lc_mod_name,
3698: 'Calling CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
3699: END IF;
3700: Csd_Ro_Service_Codes_Pvt.Update_RO_Service_Code(p_api_version => 1.0,
3701: p_commit => Fnd_Api.G_FALSE,
3702: p_init_msg_list => Fnd_Api.G_FALSE,
3703: p_validation_level => 0,
3704: p_ro_service_code_rec => l_ro_sc_rec_type,
3711: THEN
3712: l_prev_ro_sc_id := l_est_lines_tbl(i)
3713: .RO_SERVICE_CODE_ID;
3714: ELSE
3715: -- not able to update csd_ro_service_codes table to set as applied to est
3716: x_warning_flag := Fnd_Api.G_TRUE;
3717: IF (Fnd_Log.Level_Statement >=
3718: Fnd_Log.G_Current_Runtime_Level)
3719: THEN
4143: 'SERVICE_CODE' est_line_source_type_code,
4144: ROSC.Service_code_id est_line_source_id1,
4145: null est_line_source_id2,
4146: ROSC.RO_Service_code_id
4147: FROM CSD_RO_SERVICE_CODES ROSC,
4148: CSD_SERVICE_CODES_VL SC,
4149: CSD_SC_WORK_ENTITIES WRK,
4150: CSP_PRODUCT_TASKS a,
4151: CSP_TASK_PARTS b,
4198: 'SERVICE_CODE' est_line_source_type_code,
4199: ROSC.Service_code_id est_line_source_id1,
4200: null est_line_source_id2,
4201: ROSC.RO_Service_code_id
4202: FROM CSD_RO_SERVICE_CODES ROSC,
4203: CSD_SERVICE_CODES_VL SC,
4204: CSD_SC_WORK_ENTITIES WRK,
4205: JTF_TASK_TEMPLATES_B b,
4206: QP_PRICE_LIST_LINES_V c,
4382: 'SERVICE_CODE' est_line_source_type_code,
4383: ROSC.Service_code_id est_line_source_id1,
4384: NULL est_line_source_id2,
4385: ROSC.RO_Service_code_id
4386: FROM CSD_RO_SERVICE_CODES ROSC,
4387: CSD_SERVICE_CODES_VL SC,
4388: CSD_SC_WORK_ENTITIES WRK,
4389: CSP_PRODUCT_TASKS a,
4390: CSP_TASK_PARTS b,
4438: 'SERVICE_CODE' est_line_source_type_code,
4439: ROSC.Service_code_id est_line_source_id1,
4440: NULL est_line_source_id2,
4441: ROSC.RO_Service_code_id
4442: FROM CSD_RO_SERVICE_CODES ROSC,
4443: CSD_SERVICE_CODES_VL SC,
4444: CSD_SC_WORK_ENTITIES WRK,
4445: JTF_TASK_TEMPLATES_B b,
4446: -- QP_PRICE_LIST_LINES_V c,
5392: 'SERVICE_CODE' EST_LINE_SOURCE_TYPE_CODE,
5393: ROSC.Service_Code_id EST_LINE_SOURCE_ID1,
5394: null EST_LINE_SOURCE_ID2,
5395: ROSC.RO_Service_Code_id RO_SERVICE_CODE_ID
5396: FROM CSD_RO_SERVICE_CODES ROSC,
5397: CSD_SERVICE_CODES_VL SC,
5398: CSD_SC_WORK_ENTITIES WRK,
5399: BOM_INVENTORY_COMPONENTS_V BOM,
5400: QP_PRICE_LIST_LINES_V PRICE,
5443: ROSC.Service_Code_id EST_LINE_SOURCE_ID1,
5444: null EST_LINE_SOURCE_ID2,
5445: ROSC.RO_Service_Code_id RO_SERVICE_CODE_ID,
5446: RES.resource_id RESOURCE_ID -- vkjain. 3449978
5447: FROM CSD_RO_SERVICE_CODES ROSC,
5448: CSD_SC_WORK_ENTITIES WRK,
5449: CSD_SERVICE_CODES_VL SC,
5450: BOM_OPERATION_SEQUENCES OPSEQ,
5451: BOM_OPERATION_RESOURCES OPRES,
5495: 'SERVICE_CODE' EST_LINE_SOURCE_TYPE_CODE,
5496: ROSC.Service_Code_id EST_LINE_SOURCE_ID1,
5497: NULL EST_LINE_SOURCE_ID2,
5498: ROSC.RO_Service_Code_id RO_SERVICE_CODE_ID
5499: FROM CSD_RO_SERVICE_CODES ROSC,
5500: CSD_SERVICE_CODES_VL SC,
5501: CSD_SC_WORK_ENTITIES WRK,
5502: BOM_INVENTORY_COMPONENTS_V BOM,
5503: -- QP_PRICE_LIST_LINES_V PRICE,
5545: ROSC.Service_Code_id EST_LINE_SOURCE_ID1,
5546: NULL EST_LINE_SOURCE_ID2,
5547: ROSC.RO_Service_Code_id RO_SERVICE_CODE_ID,
5548: RES.resource_id RESOURCE_ID -- vkjain. 3449978
5549: FROM CSD_RO_SERVICE_CODES ROSC,
5550: CSD_SC_WORK_ENTITIES WRK,
5551: CSD_SERVICE_CODES_VL SC,
5552: BOM_OPERATION_SEQUENCES OPSEQ,
5553: BOM_OPERATION_RESOURCES OPRES,