Получение информации о кредитной организации (банке) с сайта ЦБ РФ
Учетные задачи - Банковские операции
Файлы
ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний
Оформите подписку на компанию для решения рабочих задач
Оформить подписку и скачать решение со скидкойВы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».
- 0% комиссии — оплата напрямую исполнителю;
- Исполнители любого масштаба — от отдельных специалистов до команд под проект;
- Прямой обмен контактами между заказчиком и исполнителем;
- Безопасная сделка — при необходимости;
- Рейтинги, кейсы и прозрачная система откликов.
Итак, нам нужно получить информацию о банке, которой по каким-то причинам нет в классификаторе банков 1С. Я, например, столкнулся с тем, что отсутствовала адресная информация о банке и статус лицензии. Пришлось "изобрести велосипед". Итак, вкратце по действиям:
- Создаем WS-ссылку на веб-сервис ЦБ
- Далее в коде Вашего модуля или обработки необходимо:
- Проинициализировать созданную ссылку WS
- Преобразовать БИК Банка в внутренний код
- Отправить его на веб-сервис сайта СБ РФ
- Код данного действа привожу тут:
Сервис=WSСсылки.cbrf.СоздатьWSПрокси("http://web.cbr.ru/", "CreditOrgInfo", "CreditOrgInfoSoap"); ВнутреннийКодБанка=Сервис.BicToIntCode(Банк.Код); Если ВнутреннийКодБанка=-1 Тогда Возврат; КонецЕсли; CreditInfoByIntCodeXMLТип=Сервис.ФабрикаXDTO.Тип("http://web.cbr.ru/","CreditInfoByIntCodeXML"); ЭкземплярCreditInfoByIntCodeXMLТип=Сервис.ФабрикаXDTO.Создать(CreditInfoByIntCodeXMLТип); ЭкземплярCreditInfoByIntCodeXMLТип.InternalCode=ВнутреннийКодБанка; РезультатКО=Сервис.CreditInfoByIntCode(ЭкземплярCreditInfoByIntCodeXMLТип).CreditInfoByIntCodeResult.diffgram.CreditOrgInfo.CO; - Обработка полученного результата есть в обработке, размещенной ниже.
В принципе, ничего сложного, отладчиком можно посмотреть поля, доступные в возвращаемом запросе.
Заранее прошу строго не судить - это моя первая публикация. Самому стрррашно ))) Полезные советы и рекомендации приветствую )
Вступайте в нашу телеграмм-группу Инфостарт