Добрый день, вам нужно учесть что система производит расчеты относительно базовой валюты соответсвенно вам необходимо указывать курсы валют относительно базовой валюты. Так же следует учитывать что курс валют кешируется на уровне сессии пользователя, тоесть новый курс валюты при расчете на стороне клиента будет использоваться только после того как пользователь выйдет и войдет в систему(после обновления курса).

Пример реализации логики можете посмотреть тут https://marketplace.terrasoft.ru/app/exchange-rate-update-bpmonline

Добрый день!

Здорово что есть готовый и бесплатный инструмент позволяющий загружать валюты и их курсы. Но я рано обрадовался. Установил приложение, запустил процесс и обнаружил ошибку в журнале БП:

System.ServiceModel.EndpointNotFoundException: Прослушивание на http://www.cbr.ru/DailyInfoWebServ/DailyInfo.asmx не выполняла ни одна конечная точка, которая могла бы принять сообщение. Среди прочих причин это могло быть вызвано неправильным адресом или действием SOAP. Подробнее см. в описании InnerException (если имеется). ---> System.Net.WebException: Невозможно соединиться с удаленным сервером ---> System.Net.Sockets.SocketException: Попытка установить соединение была безуспешной, т.к. от другого компьютера за требуемое время не получен нужный отклик, или было разорвано уже установленное соединение из-за неверного отклика уже подключенного компьютера 212.40.192.49:80
   в System.Net.Sockets.Socket.DoConnect(EndPoint endPointSnapshot, SocketAddress socketAddress)
   в System.Net.ServicePoint.ConnectSocketInternal(Boolean connectFailure, Socket s4, Socket s6, Socket& socket, IPAddress& address, ConnectSocketState state, IAsyncResult asyncResult, Exception& exception)
   --- Конец трассировки внутреннего стека исключений ---
   в System.Net.HttpWebRequest.GetRequestStream(TransportContext& context)
   в System.Net.HttpWebRequest.GetRequestStream()
   в System.ServiceModel.Channels.HttpOutput.WebRequestHttpOutput.GetOutputStream()
   --- Конец трассировки внутреннего стека исключений ---
 
Server stack trace: 
   в System.ServiceModel.Channels.HttpOutput.WebRequestHttpOutput.GetOutputStream()
   в System.ServiceModel.Channels.HttpOutput.Send(TimeSpan timeout)
   в System.ServiceModel.Channels.HttpChannelFactory`1.HttpRequestChannel.HttpChannelRequest.SendRequest(Message message, TimeSpan timeout)
   в System.ServiceModel.Channels.RequestChannel.Request(Message message, TimeSpan timeout)
   в System.ServiceModel.Dispatcher.RequestChannelBinder.Request(Message message, TimeSpan timeout)
   в System.ServiceModel.Channels.ServiceChannel.Call(String action, Boolean oneway, ProxyOperationRuntime operation, Object[] ins, Object[] outs, TimeSpan timeout)
   в System.ServiceModel.Channels.ServiceChannelProxy.InvokeService(IMethodCallMessage methodCall, ProxyOperationRuntime operation)
   в System.ServiceModel.Channels.ServiceChannelProxy.Invoke(IMessage message)
 
Exception rethrown at [0]: 
   в System.Runtime.Remoting.Proxies.RealProxy.HandleReturnMessage(IMessage reqMsg, IMessage retMsg)
   в System.Runtime.Remoting.Proxies.RealProxy.PrivateInvoke(MessageData& msgData, Int32 type)
   в Terrasoft.Configuration.CbrfDI.DailyInfoSoap.GetCursOnDate(DateTime On_date)
   в Terrasoft.Configuration.TscCbrfLoader.Load()
   в Terrasoft.Core.Process.TscLoadCurrencyRateMethodsWrapper.RunLoadCurrencyRateExecute(ProcessExecutingContext context)
   в Terrasoft.Core.Process.ProcessFlowElement.Execute(ProcessExecutingContext context)

Сталкивались ли вы с этим? В чем может быть причина?

Этот механизм реализован компанией «Техносерв консалтинг», лучше связаться с ними. А по тексту в журнале, может, с Вашего веб-сервера не было доступа к адресу http://www.cbr.ru/DailyInfoWebServ/DailyInfo.asmx.

Здравствуйте!

Система считает корректно:
[Цена продукта в $]/[Курс (1,31)]*100(рублей/$)

Итого, при стоимости товара в 1$ его цена будет составлять 76.3358. Так как тип "Деньги" - два знака после запятой, то система округлит значение до 76.34.

При стоимости в 100$ - сумма будет 7633.58 (при округлении - 7633.58).

Здравствуйте, Алексей!
Такой функционал реализован в версии 3.5.2.
Могу выслать метод, реализующий пересчет цены.

Андрей, можете и мне выслать.

Т.е. при изменении курса валют в справочнике автоматически пересчитывается базовая цена в карточке продукта и соответствующие цены в прайс листах?

Спасибо!

Андрей, здравствуйте!

К сожалению, у нас версия 3.3.2
Если не сложно - вышлите, пожалуйста. Вы меня очень выручите.

Здравствуйте!
В 3.5.2 пересчет реализовано действие, по которому вызывается следующая функция:

function amiRecalcOfferingPriceOnExecute(ActionMenuItem, Sender) {
	if (BaseWorkspace.Grid.SelectedIDs.Count == 0) {
		return;
	}
	var OfferingIDs = GetArrayByCollection(BaseWorkspace.Grid.SelectedIDs);
	var CurrentDate = GetLocalDate();
	RecalcOfferingPrices(CurrentDate, OfferingIDs, 'IDs');
}

, где

function RecalcOfferingPrices(CurrentDate, SelectedIDs, FilterName) {
	var RecordsCount = SelectedIDs.length;
	if (RecordsCount == 0) {
		ShowWarningDialog("Не выбрано ни одной записи");
		return;
	}
	var OfferingDataset = GetSingleItemByCode('ds_Offering', 'RecalcOfferingPrices');
	EnableDatasetFields(OfferingDataset, false);
	EnableDatasetFields(OfferingDataset, true, ['ID', 'CurrencyID', 'Rate']);
	ApplyDatasetIncludeFilter(OfferingDataset, 'IDs', SelectedIDs, true);
	OfferingDataset.Close();
	OfferingDataset.Open();
 
	var PriceCategoryDataset = GetSingleItemByCode('ds_PriceCategory', 'RecalcOfferingPrices');
	EnableDatasetFields(PriceCategoryDataset, false);
	EnableDatasetFields(PriceCategoryDataset, true, ['ID', 'IsBase', 
		'PriceCalcMethodID', 'Name', 'DiscountPercent', 'CurrencyID']);
	ApplyDatasetFilter(PriceCategoryDataset, 'IsDefault', true, true);
	PriceCategoryDataset.Close();
	PriceCategoryDataset.Open();
 
	var OfferingID;
	var PriceCalcMethodID;
	var PrimeCost;
	var PriceCategoryID;
	OfferingDataset.GotoFirst();
	while (!OfferingDataset.IsEOF) {
		OfferingID = OfferingDataset('ID');
		PriceCategoryDataset.GotoFirst();
		while (!PriceCategoryDataset.IsEOF) {
			PriceCategoryID = PriceCategoryDataset('ID');
			PriceCalcMethodID = PriceCategoryDataset('PriceCalcMethodID');
			PrimeCost = GetOfferingPrimeCost(OfferingID, PriceCalcMethodID) *
				(1 + PriceCategoryDataset('DiscountPercent') / 100);
 
			if (!IsZeroValue(PrimeCost)) {
				var OfferingPriceObject = GetOfferingPriceData(OfferingID, 
					CurrentDate, PriceCategoryID, true);
				var Dataset = OfferingPriceObject.Dataset;
				if (IsEmptyValue(OfferingPriceObject.ID) ||
					GetDateDiff(OfferingPriceObject.StartDate, CurrentDate) != 0) {
					OfferingPriceObject.PriceKindID = opk_PriceList;
					OfferingPriceObject.PriceCategoryID = PriceCategoryID;
					OfferingPriceObject.PriceCategoryName = PriceCategoryDataset('Name');
					if (IsEmptyValue(OfferingPriceObject.ID)) {
						OfferingPriceObject.CurrencyID = PriceCategoryDataset('CurrencyID');
					}
					OfferingPriceObject.Rate = GetCurrencyRate(
						OfferingPriceObject.CurrencyID, CurrentDate, false);
					OfferingPriceObject.StartDate = CurrentDate;
					OfferingPriceObject.DueDate = CurrentDate;
					OfferingPriceObject.ID = null;
					FillOfferingPriceObjectDefault(OfferingPriceObject, CurrentDate);
					OfferingPriceObject.IsPriceWithTaxCalc = false;
				}
 
				OfferingPriceObject.BasicPrice = PrimeCost;
				OfferingPriceObject.Price = RoundFloatValue(CalcNonBasicPrice(
					OfferingPriceObject.BasicPrice, OfferingPriceObject.CurrencyID, 
					OfferingPriceObject.Rate), 2);
				OldIsPriceWithTaxCalc = OfferingPriceObject.IsPriceWithTaxCalc;
				OfferingPriceObject.IsPriceWithTaxCalc = false;
				OfferingPriceDataChange('Price', OfferingPriceObject.Price,
					OfferingPriceObject);
				OfferingPriceObject.IsPriceWithTaxCalc = OldIsPriceWithTaxCalc;
 
				if (IsEmptyValue(OfferingPriceObject.ID)) {
					AppendOfferingPriceByObject(OfferingID, OfferingPriceObject);
				} else {
					Dataset.Edit();
					CopyOfferingPriceObjectToDataset(OfferingPriceObject, Dataset);
					Dataset.Post();
				}
			}
 
			PriceCategoryDataset.GotoNext();
		}
		OfferingDataset.GotoNext();
	}
}

Адаптацию под свои версии предлагаю Вам сделать самостоятельно.

Здравствуйте!
Оказалось, такая функция реализована ещё в 3.3.2.290 в действиях над продуктами
(раздел "Продукты" ->"Действия ->"Пересчитать и добавить новые цены по прайс-листам").
В любом случае - Андрей, спасибо Вам! :twisted:

Алексей, действительно, не подумал, что надо в Distribution смотреть.
Всегда пожалуйста!

Был пример:
http://community.terrasoft.ua/node/2508

UPD
Поиск в верхнем правом углу.

Спасибо!