Получение курсов валют через веб-сервисы Центробанка РФ

15.03.12

Учетные задачи - Банковские операции

Получение курсов валют напрямую через веб-сервисы Центробанка РФ

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование SM По подписке [?] Купить один файл
Обработка
.zip 11,72Kb
121
121
1 SM
Скачать Купить за 1 850 руб.

Обработка предназначена для демонстрации использования веб-сервисов на примере получения курсов валют напрямую через веб-сервисы Центрального банка РФ.

Платформа 8.2. Толстый клиент.

В архиве также находится WSDL-файл описания всех веб-сервисов Центрального банка РФ.

См. также

Банковские операции Обмен с интернет-банком Эквайринг/ридер магнитных карт Программист Бухгалтер Пользователь Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

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

15000 руб.

21.03.2023    9614    53    14    

51

Управление взаимоотношениями с клиентами (CRM) WEB-интеграция Анализ продаж Системный администратор Программист Пользователь Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Управленческий учет Платные (руб)

Подсистема интеграции Amo CRM с 1С: технические требования, порядок работы, возможности, доработки и обновления. Бесплатный период техподдержки - 1 месяц.

60000 руб.

07.05.2019    32009    62    41    

23

WEB-интеграция 8.3.8 Конфигурации 1cv8 Автомобили, автосервисы Беларусь Украина Россия Казахстан Управленческий учет Платные (руб)

Расширение предназначено для конфигурации "1С:Предприятие 8. Управление Автотранспортом. ПРОФ". Функционал модуля: 1. Заполнение регистров сведений по подсистеме "Мониторинг", а именно: события по мониторингу, координаты по мониторингу, пробег и расход по мониторингу, текущее местоположение ТС по мониторингу 2. Заполнение путевого листа: пробег по мониторингу, время выезда/заезда, табличная часть ГСМ, места стоянок по геозонам. 3. Отчеты по данным загруженным в регистры сведений. 4. Предусмотрена автоматическая загрузка данных в фоновом режиме (условия работы данной загрузке читайте в описании товара) Модуль работает без включенной константы по настройкам мониторинга. Модуль формы предоставляется с открытым кодом, общий модуль защищен. Любой заинтересованный пользователь, имеет возможность скачать демо-версию расширения.

22656 руб.

25.05.2021    13451    39    8    

15

Сайты и интернет-магазины WEB-интеграция Системный администратор Программист Пользователь Платформа 1С v8.3 Конфигурации 1cv8 1С:Управление торговлей 11 Автомобили, автосервисы Россия Управленческий учет Платные (руб)

Интеграционный модуль обмена между конфигурацией Альфа Авто 5 и Альфа Авто 6 и порталом AUTOCRM. Данный модуль универсален. Позволяет работать с несколькими обменами AUTOCRM разных брендов в одной информационной базе в ручном и автоматическом режиме.

36000 руб.

03.08.2020    16861    15    19    

15

WEB-интеграция Программист Платформа 1С v8.3 Бухгалтерский учет 1С:Бухгалтерия 3.0 Бытовые услуги, сервис Платные (руб)

Внешняя обработка разрабатывалась для загрузки документов из Ветменеджер в 1С: Бухгалтерия 3.0

12000 руб.

02.02.2021    17094    46    49    

26
Внимание! Тема закрыта. Добавлять сообщения в закрытую тему запрещено.
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. iov 407 25.02.11 13:52 Сейчас в теме
а график где??? он туда сам напрашивается...
2. Dmitryiv 161 25.02.11 14:24 Сейчас в теме
Кому нужен график - сами нарисуют. Обработка создана в академических целях. :D
3. r.pronin 06.11.11 01:29 Сейчас в теме
http://www.cbr.ru/scripts/Root.asp?Prtid=DWS
Я для примера взял загрузку курсов в Excel.
В 8.2.13 все получилось. Вот как-то так.

самая большая хитрость это в конфигураторе надо создать WS-ссылку из адреса http://www.cbr.ru/DailyInfoWebServ/DailyInfo.asmx?WSDL

Вот типа текст.

Перем СервисЕжедневнойИнформации ;

Функция ПолучитьПоследнююДатуУстановкиКурса ()
	ТипWSПарамера	= СервисЕжедневнойИнформации.ФабрикаXDTO.Пакеты.Получить("http://web.cbr.ru/").Получить("GetLatestDateTime"); 
	WSПараметр 		= СервисЕжедневнойИнформации.ФабрикаXDTO.Создать(ТипWSПарамера);
	
	WSРезультат = СервисЕжедневнойИнформации.GetLatestDateTime(WSПараметр);
	
	Возврат WSРезультат.GetLatestDateTimeResult ;

КонецФункции

Функция ПолучитьСписокКотируемыхВалют ()
	// Получаем список валют
	ТипWSПараметра	 	= СервисЕжедневнойИнформации.ФабрикаXDTO.Пакеты.Получить("http://web.cbr.ru/").Получить("EnumValutes"); 
	WSПараметр			= СервисЕжедневнойИнформации.ФабрикаXDTO.Создать(ТипWSПараметра);
	WSПараметр.Seld		= ложь ;
	СписокВалют			= СервисЕжедневнойИнформации.EnumValutes(WSПараметр);
КонецФункции

Процедура КнопкаВыполнитьНажатие(Кнопка)
	
	Если НЕ ЗначениеЗаполнено (ДатаКурса) Тогда
		ДатаКурса = ПолучитьПоследнююДатуУстановкиКурса();
	КонецЕсли;
	
	// Получаем курсы
	ТипWSПараметра 		= СервисЕжедневнойИнформации.ФабрикаXDTO.Пакеты.Получить("http://web.cbr.ru/").Получить("GetCursOnDate"); 
	WSПараметр			= СервисЕжедневнойИнформации.ФабрикаXDTO.Создать(ТипWSПараметра);
	WSПараметр.On_Date	= ДатаКурса ;
	СписокКурсов 		= СервисЕжедневнойИнформации.GetCursOnDate(WSПараметр);
	
	
	// Загрузить 
	КурсыВалют.Очистить();
	Для Каждого Стр Из СписокКурсов.GetCursOnDateresult.diffgram.ValuteData.ValuteCursOnDate Цикл
		Строка = КурсыВалют.Добавить() ;
		Строка.Курс = Стр.Vcurs ;
		Строка.Кратность = Стр.Vnom ;
		Строка.ВалютаКодСимвольный = Стр.VchCode ;
		Строка.ВалютаКодЧисловой = Прав ("000"+Стр.VCode, 3);
		Строка.ВалютаИмя = Стр.VName ;
	КонецЦикла;
	
КонецПроцедуры

Процедура ПолучитьПоследнююДатуУстановкиКурсовНажатие(Элемент)
	ДатаКурса = ПолучитьПоследнююДатуУстановкиКурса ();
КонецПроцедуры


СервисЕжедневнойИнформации	= WSСсылки.CBR_RU_DailyInfoWebServ.СоздатьWSПрокси	("http://web.cbr.ru/", "DailyInfo", "DailyInfoSoap" );
Показать
7. пользователь 11.07.22 09:41
Сообщение было скрыто модератором.
...
4. пользователь 06.11.11 11:47
Сообщение было скрыто модератором.
...
5. пользователь 06.11.11 15:16
Сообщение было скрыто модератором.
...
6. пользователь 06.11.11 17:02
Сообщение было скрыто модератором.
...
Оставьте свое сообщение