Загрузить валюту Сумы в 1С8
тзВалюта = Новый ТаблицаЗначений;
тзВалюта.Колонки.Добавить("Code");
тзВалюта.Колонки.Добавить("Ccy");
тзВалюта.Колонки.Добавить("Валюта", Новый ОписаниеТипов("СправочникСсылка.Валюты"));
справ = Справочники.Валюты.Выбрать();
Пока справ.Следующий() Цикл
справНаим = СокрЛП(справ.Наименование);
Если справНаим = "RUB"
ИЛИ справНаим = "USD"
ИЛИ справНаим = "EUR" Тогда
нс = тзВалюта.Добавить();
нс.Code = справ.Код;
нс.Ccy = справ.Наименование;
нс.Валюта = справ.Ссылка;
КонецЕсли;
КонецЦикла;
ИмяВременногоФайла = ПолучитьимяВременногоФайла("json");
HTTP = Новый HTTPСоединение("cbu...