1227:
1228: l_enable_advanced_pricing := FND_PROFILE.VALUE('CSD_ENABLE_ADVANCED_PRICING');
1229: l_enable_advanced_pricing := nvl(l_enable_advanced_pricing, 'N');
1230: IF(l_enable_advanced_pricing ='Y') THEN
1231: l_account_id := CSD_CHARGE_LINE_UTIL.Get_SR_AccountId(p_repair_line_id);
1232: l_currency_code := GET_PL_CURRENCY_CODE(l_price_list_id);
1233: get_charge_selling_price(
1234: p_inventory_item_id => l_inv_item_id,
1235: p_price_list_header_id => l_price_list_id,
5073: -- 1) if contract business process price list should be used
5074: IF (l_use_contract_bp_pl) THEN
5075:
5076: x_contract_pl_id := l_pl_out_tbl(i).bp_price_list_id;
5077: x_currency_code := CSD_CHARGE_LINE_UTIL.Get_PLCurrCode(x_contract_pl_id);
5078: x_profile_pl_id := NULL;
5079:
5080: ELSE
5081:
5087: --bug#7140580
5088: IF (l_billing_pl_id IS NOT NULL) and ((nvl(FND_PROFILE.VALUE('CSD_PL_DR_EXCLUDE_CONTRACT_H'), 'N')) = 'N') then
5089:
5090: x_contract_pl_id := l_billing_pl_id;
5091: x_currency_code := CSD_CHARGE_LINE_UTIL.Get_PLCurrCode(x_contract_pl_id);
5092: x_profile_pl_id := NULL;
5093:
5094: -- 3) else get price list from profile option
5095: ELSE
5099: -- if profile option is set
5100: IF (l_profile_pl_id IS NOT NULL) THEN
5101:
5102: x_profile_pl_id := l_profile_pl_id;
5103: x_currency_code := CSD_CHARGE_LINE_UTIL.Get_PLCurrCode(l_profile_pl_id);
5104:
5105: -- gilam: bug 3479944 - added repair type price list default option
5106: -- 4) else get repair type price list
5107: ELSE
5112: -- if repair type price list is set
5113: IF(c_rt_pl_id%FOUND) THEN
5114:
5115: x_profile_pl_id := l_profile_pl_id;
5116: x_currency_code := CSD_CHARGE_LINE_UTIL.Get_PLCurrCode(l_profile_pl_id);
5117:
5118: -- 5) else return nothing
5119: ELSE
5120: