4149: l_currency_code := G_INV_CURR_CODE;
4150: --null;
4151: END IF;
4152:
4153: print_Debug('Calling mtl_qp_price.get_transfer_price', 'Get_transfer_price_for_item');
4154: l_transfer_price := MTL_QP_PRICE.get_transfer_price_ds(
4155: p_transaction_id => l_transaction_id
4156: , p_sell_ou_id => p_to_org_id
4157: , p_ship_ou_id => p_from_org_id
4150: --null;
4151: END IF;
4152:
4153: print_Debug('Calling mtl_qp_price.get_transfer_price', 'Get_transfer_price_for_item');
4154: l_transfer_price := MTL_QP_PRICE.get_transfer_price_ds(
4155: p_transaction_id => l_transaction_id
4156: , p_sell_ou_id => p_to_org_id
4157: , p_ship_ou_id => p_from_org_id
4158: , p_flow_type => l_flow_type
4177: print_Debug('l_msg_data = ' || l_msg_data, 'get_transfer_price_for_item');
4178: print_Debug('l_msg_count = ' || l_msg_count, 'get_transfer_price_for_item');
4179:
4180: if( l_return_status <> G_RET_STS_SUCCESS ) THEN
4181: print_Debug('Error from mtl_qp_price', 'get_transfer_price_for_item');
4182: raise FND_API.G_EXC_ERROR;
4183: end if;
4184:
4185: IF( l_transfer_price is NULL or l_transfer_price = -99 ) then