[Home] [Help]
2: /* $Header: csdvutlb.pls 120.48.12020000.6 2013/03/15 00:42:19 takwong ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CSD_PROCESS_UTIL';
5: G_FILE_NAME CONSTANT VARCHAR2(12) := 'csdvutlb.pls';
6: g_debug NUMBER := csd_gen_utility_pvt.g_debug_level;
7: -- bug#7355526, nnadig.
8: -- cache for maintaining the inventory parameters for negative inventory.
9: type negative_inventory is table of NUMBER index by pls_integer;
10: type override_negative_qty is table of number index by pls_integer;
615: and cbtc.billing_type = tbt.billing_type
616: and nvl(cbtc.billing_category, '-999') ='M';
617:
618: begin
619: csd_gen_utility_pvt.add('At the Begin in ');
620:
621: csd_gen_utility_pvt.dump_api_info ( p_pkg_name => G_PKG_NAME,
622: p_api_name => l_api_name );
623:
617:
618: begin
619: csd_gen_utility_pvt.add('At the Begin in ');
620:
621: csd_gen_utility_pvt.dump_api_info ( p_pkg_name => G_PKG_NAME,
622: p_api_name => l_api_name );
623:
624: csd_gen_utility_pvt.add('P_incident_id ='||P_incident_id);
625: csd_gen_utility_pvt.add('p_inventory_item_id ='||p_inventory_item_id );
620:
621: csd_gen_utility_pvt.dump_api_info ( p_pkg_name => G_PKG_NAME,
622: p_api_name => l_api_name );
623:
624: csd_gen_utility_pvt.add('P_incident_id ='||P_incident_id);
625: csd_gen_utility_pvt.add('p_inventory_item_id ='||p_inventory_item_id );
626: csd_gen_utility_pvt.add('P_transaction_type_id ='||P_transaction_type_id);
627: csd_gen_utility_pvt.add('p_txn_billing_type_id ='||p_txn_billing_type_id);
628:
621: csd_gen_utility_pvt.dump_api_info ( p_pkg_name => G_PKG_NAME,
622: p_api_name => l_api_name );
623:
624: csd_gen_utility_pvt.add('P_incident_id ='||P_incident_id);
625: csd_gen_utility_pvt.add('p_inventory_item_id ='||p_inventory_item_id );
626: csd_gen_utility_pvt.add('P_transaction_type_id ='||P_transaction_type_id);
627: csd_gen_utility_pvt.add('p_txn_billing_type_id ='||p_txn_billing_type_id);
628:
629: /*Initialize message list if p_init_msg_list is set to TRUE.*/
622: p_api_name => l_api_name );
623:
624: csd_gen_utility_pvt.add('P_incident_id ='||P_incident_id);
625: csd_gen_utility_pvt.add('p_inventory_item_id ='||p_inventory_item_id );
626: csd_gen_utility_pvt.add('P_transaction_type_id ='||P_transaction_type_id);
627: csd_gen_utility_pvt.add('p_txn_billing_type_id ='||p_txn_billing_type_id);
628:
629: /*Initialize message list if p_init_msg_list is set to TRUE.*/
630: IF FND_API.to_Boolean(p_init_msg_list) THEN
623:
624: csd_gen_utility_pvt.add('P_incident_id ='||P_incident_id);
625: csd_gen_utility_pvt.add('p_inventory_item_id ='||p_inventory_item_id );
626: csd_gen_utility_pvt.add('P_transaction_type_id ='||P_transaction_type_id);
627: csd_gen_utility_pvt.add('p_txn_billing_type_id ='||p_txn_billing_type_id);
628:
629: /*Initialize message list if p_init_msg_list is set to TRUE.*/
630: IF FND_API.to_Boolean(p_init_msg_list) THEN
631: FND_MSG_PUB.initialize;
649: X_MSG_DATA => x_msg_data,
650: X_ORG_ID => l_operating_unit,
651: X_PROFILE => l_profile);
652: IF (x_return_status <> CSD_PROCESS_UTIL.G_RET_STS_SUCCESS) THEN
653: csd_gen_utility_pvt.ADD('Error in Deriving the Operating Unit ');
654: END IF;
655: ELSE
656: Fnd_Profile.Get('ORG_ID',l_operating_unit);
657: END IF;
655: ELSE
656: Fnd_Profile.Get('ORG_ID',l_operating_unit);
657: END IF;
658:
659: csd_gen_utility_pvt.add('l_operating_unit ='||l_operating_unit);
660:
661: begin
662: select MATERIAL_BILLABLE_FLAG
663: into l_billing_type
673: FND_MSG_PUB.Add;
674: RAISE FND_API.G_EXC_ERROR;
675: End;
676:
677: csd_gen_utility_pvt.add('Item billing type is ='||l_billing_type);
678:
679:
680: l_transaction_type_id:= P_transaction_type_id;
681:
692: and nvl(tbt.end_date_active,(sysdate));
693: */
694: exception
695: When No_data_found then
696: csd_gen_utility_pvt.add('No record found for p_txn_billing_type_id='||p_txn_billing_type_id);
697: FND_MESSAGE.SET_NAME('CSD','CSD_API_INV_TXN_BILL_TYPE_ID');
698: FND_MESSAGE.SET_TOKEN('TXN_BILLING_TYPE_ID',p_txn_billing_type_id);
699: FND_MSG_PUB.Add;
700: RAISE FND_API.G_EXC_ERROR;
941: -- Initialize the table
942: x_prod_txn_tbl.delete;
943:
944: IF (g_debug > 0 ) THEN
945: csd_gen_utility_pvt.add('At the Begin in build_prod_txn_tbl');
946: END IF;
947:
948: IF (g_debug > 0 ) THEN
949: csd_gen_utility_pvt.add('p_repair_line_id ='||p_repair_line_id);
945: csd_gen_utility_pvt.add('At the Begin in build_prod_txn_tbl');
946: END IF;
947:
948: IF (g_debug > 0 ) THEN
949: csd_gen_utility_pvt.add('p_repair_line_id ='||p_repair_line_id);
950: END IF;
951:
952:
953: IF NVL(p_repair_line_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
986: FND_MESSAGE.SET_NAME('CSD','CSD_API_INV_REP_LINE_ID');
987: FND_MESSAGE.SET_TOKEN('REPAIR_LINE_ID',p_repair_line_id);
988: FND_MSG_PUB.ADD;
989: IF (g_debug > 0 ) THEN
990: csd_gen_utility_pvt.ADD('repair line Id does not exist');
991: END IF;
992:
993: RAISE FND_API.G_EXC_ERROR;
994: END IF;
1021: END IF;
1022:
1023:
1024: IF (g_debug > 0 ) THEN
1025: csd_gen_utility_pvt.add('l_repair_type_ref ='||l_repair_type_ref);
1026: END IF;
1027:
1028: IF (g_debug > 0 ) THEN
1029: csd_gen_utility_pvt.add('l_auto_process_rma='||l_auto_process_rma);
1025: csd_gen_utility_pvt.add('l_repair_type_ref ='||l_repair_type_ref);
1026: END IF;
1027:
1028: IF (g_debug > 0 ) THEN
1029: csd_gen_utility_pvt.add('l_auto_process_rma='||l_auto_process_rma);
1030: END IF;
1031:
1032:
1033: -- Get the price_list
1042: l_return_reason := p_return_reason_code;
1043: END IF;
1044:
1045: IF (g_debug > 0 ) THEN
1046: csd_gen_utility_pvt.add('l_price list_id ='||l_price_list_id);
1047: END IF;
1048:
1049: IF (g_debug > 0 ) THEN
1050: csd_gen_utility_pvt.add('l_return_reason ='||l_return_reason);
1046: csd_gen_utility_pvt.add('l_price list_id ='||l_price_list_id);
1047: END IF;
1048:
1049: IF (g_debug > 0 ) THEN
1050: csd_gen_utility_pvt.add('l_return_reason ='||l_return_reason);
1051: END IF;
1052:
1053: IF (g_debug > 0 ) THEN
1054: csd_gen_utility_pvt.add('l_cps_txn_billing_type_id='||l_cps_txn_billing_type_id );
1050: csd_gen_utility_pvt.add('l_return_reason ='||l_return_reason);
1051: END IF;
1052:
1053: IF (g_debug > 0 ) THEN
1054: csd_gen_utility_pvt.add('l_cps_txn_billing_type_id='||l_cps_txn_billing_type_id );
1055: END IF;
1056:
1057: IF (g_debug > 0 ) THEN
1058: csd_gen_utility_pvt.add('l_cpr_txn_billing_type_id='||l_cpr_txn_billing_type_id );
1054: csd_gen_utility_pvt.add('l_cps_txn_billing_type_id='||l_cps_txn_billing_type_id );
1055: END IF;
1056:
1057: IF (g_debug > 0 ) THEN
1058: csd_gen_utility_pvt.add('l_cpr_txn_billing_type_id='||l_cpr_txn_billing_type_id );
1059: END IF;
1060:
1061: IF (g_debug > 0 ) THEN
1062: csd_gen_utility_pvt.add('l_ls_txn_billing_type_id ='||l_ls_txn_billing_type_id );
1058: csd_gen_utility_pvt.add('l_cpr_txn_billing_type_id='||l_cpr_txn_billing_type_id );
1059: END IF;
1060:
1061: IF (g_debug > 0 ) THEN
1062: csd_gen_utility_pvt.add('l_ls_txn_billing_type_id ='||l_ls_txn_billing_type_id );
1063: END IF;
1064:
1065: IF (g_debug > 0 ) THEN
1066: csd_gen_utility_pvt.add('l_lr_txn_billing_type_id ='||l_lr_txn_billing_type_id );
1062: csd_gen_utility_pvt.add('l_ls_txn_billing_type_id ='||l_ls_txn_billing_type_id );
1063: END IF;
1064:
1065: IF (g_debug > 0 ) THEN
1066: csd_gen_utility_pvt.add('l_lr_txn_billing_type_id ='||l_lr_txn_billing_type_id );
1067: END IF;
1068:
1069:
1070: /*Bug#5190905
1202: end if;
1203: end if;
1204:
1205: IF (g_debug > 0 ) THEN
1206: csd_gen_utility_pvt.add('After calling csd_get_txn_billing_type ');
1207: csd_gen_utility_pvt.add('l_cps_txn_billing_type_id='||l_cps_txn_billing_type_id );
1208: csd_gen_utility_pvt.add('l_cpr_txn_billing_type_id='||l_cpr_txn_billing_type_id );
1209: csd_gen_utility_pvt.add('l_ls_txn_billing_type_id ='||l_ls_txn_billing_type_id );
1210: csd_gen_utility_pvt.add('l_lr_txn_billing_type_id ='||l_lr_txn_billing_type_id );
1203: end if;
1204:
1205: IF (g_debug > 0 ) THEN
1206: csd_gen_utility_pvt.add('After calling csd_get_txn_billing_type ');
1207: csd_gen_utility_pvt.add('l_cps_txn_billing_type_id='||l_cps_txn_billing_type_id );
1208: csd_gen_utility_pvt.add('l_cpr_txn_billing_type_id='||l_cpr_txn_billing_type_id );
1209: csd_gen_utility_pvt.add('l_ls_txn_billing_type_id ='||l_ls_txn_billing_type_id );
1210: csd_gen_utility_pvt.add('l_lr_txn_billing_type_id ='||l_lr_txn_billing_type_id );
1211: END IF;
1204:
1205: IF (g_debug > 0 ) THEN
1206: csd_gen_utility_pvt.add('After calling csd_get_txn_billing_type ');
1207: csd_gen_utility_pvt.add('l_cps_txn_billing_type_id='||l_cps_txn_billing_type_id );
1208: csd_gen_utility_pvt.add('l_cpr_txn_billing_type_id='||l_cpr_txn_billing_type_id );
1209: csd_gen_utility_pvt.add('l_ls_txn_billing_type_id ='||l_ls_txn_billing_type_id );
1210: csd_gen_utility_pvt.add('l_lr_txn_billing_type_id ='||l_lr_txn_billing_type_id );
1211: END IF;
1212:
1205: IF (g_debug > 0 ) THEN
1206: csd_gen_utility_pvt.add('After calling csd_get_txn_billing_type ');
1207: csd_gen_utility_pvt.add('l_cps_txn_billing_type_id='||l_cps_txn_billing_type_id );
1208: csd_gen_utility_pvt.add('l_cpr_txn_billing_type_id='||l_cpr_txn_billing_type_id );
1209: csd_gen_utility_pvt.add('l_ls_txn_billing_type_id ='||l_ls_txn_billing_type_id );
1210: csd_gen_utility_pvt.add('l_lr_txn_billing_type_id ='||l_lr_txn_billing_type_id );
1211: END IF;
1212:
1213:
1206: csd_gen_utility_pvt.add('After calling csd_get_txn_billing_type ');
1207: csd_gen_utility_pvt.add('l_cps_txn_billing_type_id='||l_cps_txn_billing_type_id );
1208: csd_gen_utility_pvt.add('l_cpr_txn_billing_type_id='||l_cpr_txn_billing_type_id );
1209: csd_gen_utility_pvt.add('l_ls_txn_billing_type_id ='||l_ls_txn_billing_type_id );
1210: csd_gen_utility_pvt.add('l_lr_txn_billing_type_id ='||l_lr_txn_billing_type_id );
1211: END IF;
1212:
1213:
1214: l_org_id := csd_process_util.get_org_id(l_incident_id);
1217: --l_inv_org_id := csd_process_util.get_inv_org_id;
1218:
1219: IF (g_debug > 0 ) THEN
1220:
1221: csd_gen_utility_pvt.add('l_incident_id ='||l_incident_id);
1222: csd_gen_utility_pvt.add('l_org_id ='||l_org_id);
1223: csd_gen_utility_pvt.add('l_inv_org_id ='||l_inv_org_id);
1224:
1225: END IF;
1218:
1219: IF (g_debug > 0 ) THEN
1220:
1221: csd_gen_utility_pvt.add('l_incident_id ='||l_incident_id);
1222: csd_gen_utility_pvt.add('l_org_id ='||l_org_id);
1223: csd_gen_utility_pvt.add('l_inv_org_id ='||l_inv_org_id);
1224:
1225: END IF;
1226:
1219: IF (g_debug > 0 ) THEN
1220:
1221: csd_gen_utility_pvt.add('l_incident_id ='||l_incident_id);
1222: csd_gen_utility_pvt.add('l_org_id ='||l_org_id);
1223: csd_gen_utility_pvt.add('l_inv_org_id ='||l_inv_org_id);
1224:
1225: END IF;
1226:
1227: l_revision := l_inv_revision;
4002: x_org_id => l_org_id,
4003: x_profile => l_profile);
4004:
4005: if( l_return_status <> csd_process_util.g_ret_sts_success) then
4006: csd_gen_utility_pvt.add('Error in deriving the Org id ');
4007: end if;
4008:
4009: ELSE
4010: ------------------------------------------------------
4460:
4461: END IF;
4462:
4463: IF (g_debug > 0 ) THEN
4464: csd_gen_utility_pvt.add('l_repair_line_id ='||l_repair_line_id);
4465: END IF;
4466:
4467: IF (g_debug > 0 ) THEN
4468: csd_gen_utility_pvt.add('l_repair_mode ='||l_repair_mode);
4464: csd_gen_utility_pvt.add('l_repair_line_id ='||l_repair_line_id);
4465: END IF;
4466:
4467: IF (g_debug > 0 ) THEN
4468: csd_gen_utility_pvt.add('l_repair_mode ='||l_repair_mode);
4469: END IF;
4470:
4471:
4472: IF l_repair_mode = 'WIP' then
4479: EXCEPTION
4480: WHEN OTHERS THEN
4481: RAISE FND_API.G_EXC_ERROR;
4482: IF (g_debug > 0 ) THEN
4483: csd_gen_utility_pvt.add('repair line Id not found');
4484: END IF;
4485:
4486: END;
4487:
4485:
4486: END;
4487:
4488: IF (g_debug > 0 ) THEN
4489: csd_gen_utility_pvt.add('l_qty_completed ='||l_qty_completed);
4490: END IF;
4491:
4492: IF (g_debug > 0 ) THEN
4493: csd_gen_utility_pvt.add('l_prod_txn_qty ='||l_prod_txn_qty);
4489: csd_gen_utility_pvt.add('l_qty_completed ='||l_qty_completed);
4490: END IF;
4491:
4492: IF (g_debug > 0 ) THEN
4493: csd_gen_utility_pvt.add('l_prod_txn_qty ='||l_prod_txn_qty);
4494: END IF;
4495:
4496: /************* travi comment on 030703 for Bug # 2830828 **************
4497: If nvl(l_qty_completed,0) < l_prod_txn_qty then
4498: FND_MESSAGE.SET_NAME('CSD','CSD_API_PROCESS_NOT_ALLOWED');
4499: FND_MESSAGE.SET_TOKEN('QTY_COMPLETED',l_qty_completed);
4500: FND_MSG_PUB.ADD;
4501: IF (g_debug > 0 ) THEN
4502: csd_gen_utility_pvt.ADD('Prod txn qty is more than qty completed :'||l_qty_completed);
4503: END IF;
4504:
4505: RAISE FND_API.G_EXC_ERROR;
4506: end if;
4515: and source_object_id = l_repair_line_id
4516: and task_status_id not in (7,8,9,11);
4517:
4518: IF (g_debug > 0 ) THEN
4519: csd_gen_utility_pvt.ADD('l_count= '||l_count);
4520: END IF;
4521:
4522: IF l_count > 0 then
4523: FND_MESSAGE.SET_NAME('CSD','CSD_API_TASK_NOT_COMPLETE');
4524: FND_MESSAGE.SET_TOKEN('REPAIR_LINE_ID',l_repair_line_id);
4525: FND_MSG_PUB.ADD;
4526:
4527: IF (g_debug > 0 ) THEN
4528: csd_gen_utility_pvt.ADD('One or more of the tasks for repair line : '||l_repair_line_id||' :is not completed');
4529: END IF;
4530: End If;
4531:
4532: END IF;
4591: l_prod_txn_qty := p_prod_txn_qty;
4592: END IF;
4593:
4594: IF (g_debug > 0 ) THEN
4595: csd_gen_utility_pvt.add('l_qty_by_type ='||l_qty_by_type);
4596: END IF;
4597:
4598: IF (g_debug > 0 ) THEN
4599: csd_gen_utility_pvt.add('l_prod_txn_qty ='||l_prod_txn_qty);
4595: csd_gen_utility_pvt.add('l_qty_by_type ='||l_qty_by_type);
4596: END IF;
4597:
4598: IF (g_debug > 0 ) THEN
4599: csd_gen_utility_pvt.add('l_prod_txn_qty ='||l_prod_txn_qty);
4600: END IF;
4601:
4602: IF (g_debug > 0 ) THEN
4603: csd_gen_utility_pvt.add('l_repair_qty ='||l_repair_qty);
4599: csd_gen_utility_pvt.add('l_prod_txn_qty ='||l_prod_txn_qty);
4600: END IF;
4601:
4602: IF (g_debug > 0 ) THEN
4603: csd_gen_utility_pvt.add('l_repair_qty ='||l_repair_qty);
4604: END IF;
4605:
4606:
4607: IF (NVL(l_qty_by_type,0) + NVL(l_prod_txn_qty,0)) > NVL(l_repair_qty,0) THEN
4608: FND_MESSAGE.SET_NAME('CSD','CSD_API_INV_QUANTITY');
4609: FND_MESSAGE.SET_TOKEN('REPAIR_LINE_ID',p_repair_line_id);
4610: FND_MSG_PUB.ADD;
4611: IF (g_debug > 0 ) THEN
4612: csd_gen_utility_pvt.ADD('Prod txn qty is more than qty in repair Line :'||p_repair_line_id);
4613: END IF;
4614:
4615: RAISE FND_API.G_EXC_ERROR;
4616: END IF;
4952:
4953: if(l_code = 'RS_') then
4954: l_object_type_code := p_object_type_code;
4955: IF (g_debug > 0 ) THEN
4956: csd_gen_utility_pvt.add('p_object_type_code ='||p_object_type_code);
4957: END IF;
4958:
4959: else
4960: l_object_type_code := 'RS_'||p_object_type_code;
4958:
4959: else
4960: l_object_type_code := 'RS_'||p_object_type_code;
4961: IF (g_debug > 0 ) THEN
4962: csd_gen_utility_pvt.add('In else p_object_type_code ='||p_object_type_code);
4963: END IF;
4964:
4965: end if;
4966: end if;
4974:
4975: IF c_references%NOTFOUND
4976: THEN
4977: IF (g_debug > 0 ) THEN
4978: csd_gen_utility_pvt.add('No data found for l_object_type_code ='||l_object_type_code);
4979: END IF;
4980:
4981: -- NULL;
4982: END IF;
5076: BEGIN
5077:
5078: --debug msg
5079: IF (g_debug > 0 ) THEN
5080: csd_gen_utility_pvt.ADD ('GET_RO_DEFAULT_CURR_PL Begins');
5081: END IF;
5082:
5083: -- Standard Start of API savepoint
5084: SAVEPOINT GET_RO_DEFAULT_CURR_PL;
5104: -- Begin API Body
5105: --
5106:
5107: IF (g_debug > 0 ) THEN
5108: csd_gen_utility_pvt.dump_api_info ( p_pkg_name => G_PKG_NAME,
5109: p_api_name => l_api_name );
5110: END IF;
5111:
5112: --debug msg
5110: END IF;
5111:
5112: --debug msg
5113: IF (g_debug > 0 ) THEN
5114: csd_gen_utility_pvt.ADD ('Check required parameters and validate them');
5115: END IF;
5116:
5117: -- Check the required parameters
5118: CSD_PROCESS_UTIL.Check_Reqd_Param
5133: END IF;
5134:
5135: --debug msg
5136: IF (g_debug > 0 ) THEN
5137: csd_gen_utility_pvt.ADD ('Check required parameters and validation complete');
5138: END IF;
5139:
5140:
5141: --debug msg
5139:
5140:
5141: --debug msg
5142: IF (g_debug > 0 ) THEN
5143: csd_gen_utility_pvt.ADD ('Get business process');
5144: END IF;
5145:
5146: BEGIN
5147:
5169: -- If user did not set default price list, null will be returned
5170:
5171: --debug msg
5172: IF (g_debug > 0 ) THEN
5173: csd_gen_utility_pvt.ADD ('Get SR contract');
5174: END IF;
5175:
5176: -- Incident ID is passed in, get SR contract
5177: IF (p_incident_id IS NOT NULL) THEN
5250: IF (p_ro_contract_line_id IS NOT NULL) THEN
5251:
5252: --debug msg
5253: IF (g_debug > 0 ) THEN
5254: csd_gen_utility_pvt.ADD ('Call OKS_Con_Coverage_PUB.Get_BP_PriceList API: ro contract ='|| p_ro_contract_line_id);
5255: END IF;
5256:
5257: BEGIN
5258:
5271: );
5272:
5273: --debug msg
5274: IF (g_debug > 0 ) THEN
5275: csd_gen_utility_pvt.ADD ('Call OKS API to get price list: return status ='|| x_return_status);
5276: csd_gen_utility_pvt.ADD ('l_pl_out_tbl(i).bp_price_list_id: '|| l_pl_out_tbl(i).bp_price_list_id);
5277: END IF;
5278:
5279: EXCEPTION
5272:
5273: --debug msg
5274: IF (g_debug > 0 ) THEN
5275: csd_gen_utility_pvt.ADD ('Call OKS API to get price list: return status ='|| x_return_status);
5276: csd_gen_utility_pvt.ADD ('l_pl_out_tbl(i).bp_price_list_id: '|| l_pl_out_tbl(i).bp_price_list_id);
5277: END IF;
5278:
5279: EXCEPTION
5280:
5401: -- gilam: end bug 3512619
5402:
5403: --debug msg
5404: IF (g_debug > 0 ) THEN
5405: csd_gen_utility_pvt.ADD ('GET_RO_DEFAULT_CURR_PL Ends');
5406: END IF;
5407:
5408: -- API body ends here
5409:
5621: x_msg_data => x_msg_data);
5622:
5623: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
5624: IF (g_debug > 0 ) THEN
5625: csd_gen_utility_pvt.ADD('Cs_Pricing_Item_Pkg.Call_Pricing_Item failed');
5626: END IF;
5627: -- Shiv Ragunathan, 2/26/04, While fixing FP bug 3449351, noticed
5628: -- that this exception gets raised and is not handled in the API,
5629: -- Since the error status is being returned, no need to raise the
5647: x_msg_data => x_msg_data);
5648:
5649: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
5650: IF (g_debug > 0 ) THEN
5651: csd_gen_utility_pvt.ADD('CSD_PROCESS_UTIL.PRICE_REQUEST failed');
5652: END IF;
5653: END IF;
5654:
5655: END IF;
5981: END IF;
5982:
5983: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
5984: IF (g_debug > 0 ) THEN
5985: csd_gen_utility_pvt.ADD('QP_PREQ_PUB.PRICE_REQUEST failed');
5986: END IF;
5987: END IF;
5988:
5989: END PRICE_REQUEST;