Загрузка курсов валют с НБУ (Украина) в 1С 7.7

Публикация № 1450795 Дата создания: 31.05.21 13:00

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

1с7.7 курсы валют https 1c7

Загрузка курсов валют в 1С 7.7 с сайта НБУ (Украина), используя "Msxml2.ServerXMLHTTP.6.0"

Это моя первая публикация, критика принимается

Обработка запускается как внешняя. Указывается период загрузки и в списки определяются нужные валюты. если при запуску появится сообщение "Не удалось обнаружить компоненту V7Plus.dll!", нужно добавить в папку базы или в папку с платформой "V7Plus.dll" и "V7Plus.als".   

Никогда не работал с 1с7.7, а тут пришлось. Долго искал нужную информацию, решил поделиться

Загрузка курсов валют с сайта bank.gov.ua( Национальный Банк Украины). Тестировал на платформе 1с7.7(7.70.027) конфигурация "Бухгалтерский учет" для Украины (7.70.202)


При решении этой задачи возникла проблема, "V7HttpReader" не работает с https, поэтому использовал объект: "Msxml2.ServerXMLHTTP.6.0"

    Соединение = СоздатьОбъект("Msxml2.ServerXMLHTTP.6.0");     //AddIn.V7HttpReader
    Адрес ="https://bank.gov.ua/NBUStatService/v1/statdirectory/exchange?date="+ДатаВалюты;
       
    Соединение.open("GET",Адрес,0);
    Соединение.send(); 
    если Соединение.status = 200 тогда 
        Стр = Соединение.ResponseXML();    
    КонецЕсли; 

в результате был получен xml(можна результат получить в текстовом формате  "Стр = Соединение.ResponseText()")

Дальше считал xml, для этого нужно чтобы была установлена внешняя компонента "V7Plus.dll".Если данная компонента не установлена, нужно закинуть файлы "V7Plus.dll" и "V7Plus.als" в папку с базой или в папку с платформой. 

 Анализатора xml получаем результат и помещаем в нужные реквизиты(записывал в таблицу значений): 

   Анализатор=СоздатьОбъект("AddIn.XMLParser");
   XMLДокументПолуч = Анализатор.СоздатьДокумент();
   XMLДокументПолуч.Загрузить(Стр);
   XMLДокументПолуч.Кодировка = "UTF-8";  
                
                
    ВсеУзлы=XMLДокументПолуч.ВыбратьУзел("exchange");//currency  
    кол=ВсеУзлы.КоличествоПодчиненных();
                
     Для счВерхУровень =1 по кол цикл
        ВыборкаРеквезитов = ВсеУзлы.ПолучитьПодчиненныйПоНомеру(счВерхУровень); 
                     
        ТаблицаЗначений.НоваяСтрока();
        ТаблицаЗначений.ДатаКурсу  = ТекПериодКурса;
        Для сч =1 по ВыборкаРеквезитов.КоличествоПодчиненных() цикл  
            НоваяСтрока = ВыборкаРеквезитов.ПолучитьПодчиненныйПоНомеру(сч);
            Если НоваяСтрока.Наименование = "r030" тогда
                ТаблицаЗначений.КодВалюты = НоваяСтрока.Значение;
            иначеесли НоваяСтрока.Наименование = "rate" тогда  
                ТаблицаЗначений.Курс =      НоваяСтрока.Значение;
            КонецЕсли;
          конеццикла;    
       конеццикла; 

Для корректной работы должны быть указаны корректные коды валют. Перерасчет до кратности в справочнику Валюты.

Скачать файлы

Наименование Файл Версия Размер
Загрузка курсов валют с НБУ(Украина) в 1с 7.7:

.ert 215,00Kb
0
.ert 1.0 215,00Kb Скачать
Компонента для работы 1с 7.7 з вн источниками

.DLL 232,08Kb
0
.DLL 232,08Kb Скачать
Компонента для работы 1с 7.7 з вн источниками2

.als 62,95Kb
0
.als 62,95Kb Скачать

Специальные предложения

Оставьте свое сообщение

См. также

Загрузка адресов произвольного формата (КЛАДР и нестандартных "грязных" адресов) в ФИАС современных конфигураций из 1С 7.7

Обработка справочников Перенос данных из 1С7.7 в 1C8.X Загрузка и выгрузка в Excel v7.7 v8 1cv8.cf 1cv7.md ERP2 Абонемент ($m)

Описание технологии загрузки любых адресов из 1С 7.7 с разложением по ФИАС в современные конфигурации 1C 8.3 на примере ERP. Предлагаемый способ просто чудо, он гарантирует результат, он очень простой и качественный! Моя обработка является синтаксическим анализатором, который подставляет в строку грязного адреса выражение "Дом №" и "Корпус", благодаря чему грязные адреса 7.7 сами очень хорошо раскладываются по значимым полям ФИАС - заполняется область, город, улица, дом, корпус.. все раскладывается само с помощью встроенного механизма современных конфигураций 1С 8.3, который написали сами сотрудники фирмы 1С!

1 стартмани

16.08.2019    11023    10    ksnik    12    

Загрузка адреса юридического лица из ЕГРЮЛ для 1С 7.7 и 8.3

Обработка справочников v7.7 v8 1cv8.cf 1cv7.md Россия Абонемент ($m)

Обработка позволяет загрузить адрес юридического лица с сайта ЕГРЮЛ (https://egrul.nalog.ru) для платформы 7.7 .Сделана на основе обработки для платформы 8.3 "Загрузка адреса юридического лица из ЕГРЮЛ" от Александра Белякова (https://infostart.ru/public/676211/).

1 стартмани

26.10.2017    9356    25    hvostik    8    

Получение сведений об автомобиле по идентификатору VIN

WEB v7.7 v8 Автомобили, автосервисы Абонемент ($m)

XML RPC сервис для получения сведений об автомобиле по его VIN идентификатору.

1 стартмани

26.12.2013    13788    36    zsrg    13    

Разбор строки адреса из 7.7 в структуру 8-ки

Обработка справочников Перенос данных из 1С7.7 в 1C8.X v7.7 v8 1cv8.cf 1cv7.md КД Абонемент ($m)

Разбор строки адреса в структуру для БУ8 (Украина)

1 стартмани

11.01.2012    12069    21    maddy    1